CLEAR(XMLportFinishing); CLEAR(Ficheiro); CLEAR(recFicheirosFinishing); CLEAR(vFileNumber); CLEAR(vLastName); recConfigFinishing.GET; MARKEDONLY(TRUE); IF FINDFIRST THEN BEGIN Ficheiro.CREATE(recConfigFinishing."Pasta de arquivo" +'\'+ recFicheirosFinishing.Nome + '.xml'); Ficheiro.CREATEOUTSTREAM(FXOutStream); XMLportFinishing.fxSetFinishingCodes(recFicheirosFinishing.Nome, vLastName); vTeste:=COUNT; XMLportFinishing.SETTABLEVIEW(Rec); XMLportFinishing.SETDESTINATION(FXOutStream); XMLportFinishing.EXPORT(); Ficheiro.CLOSE; MARKEDONLY(FALSE); CLEARMARKS; END ELSE ERROR('Não existem registos seleccionados.'); fxSetFilter(vFilter); CurrForm.UPDATE;I get the message at the XMLportFinishing.SETTABLEVIEW(Rec) call.
Comments
No PM,please use the forum. || May the <SOLVED>-attribute be in your title!
best regards