Fala Henrique, tudo certo?
Veja se isso te ajuda:
ClassMethod readCSV(pDiretorio As %String) As %Status {
Set tRS = ##class(%ResultSet).%New("%Library.File:FileSet")
Set tSC = tRS.Execute(pDiretorio,"*.csv",,0)
While (tRS.Next()) {
Set tFile = ##Class(%FileCharacterStream).%New()
Set tFile.Filename = tRS.Get("Name")
; open e restante da implementação ....
}
Quit $$$OK
}Abraço.
- Efetue login para postar comentários