Histórico da Página

...

Local cDirArq := "\EXPCSVTEC\"+cEmpAntFwCodEmp()+"\" + StrTran(FwCodFil(cFilAnt), " ", "_")+"\"

Local lFirstProc := .F.

...

                               MakeDir("\EXPCSVTEC\"+cEmpAntFwCodEmp()+"\")

                               MakeDir(cDirArq)

...

                                               Next nY                                               cDetLinha := Substr(cDetLinha, 1, Len(cDetLinha)-1) + CRLF

                                               fWrite(nHandle, cDetLinha)

...