4. November 2015 18:20
XMLPORT.EXPORT(XMLPORT::"XMLPort_Customer",OutStreamVar, customer);
xMLPort.SETTABLEVIEW(customer);
xMLPort.SETDESTINATION(stream);
xMLPort.EXPORT;
XML_Export_Customer()
customer.RESET();
customer.GET('154451');
path := 'C:\XML\Customer_';
extension := '.xml';
fileNameVar := FORMAT(customer."No.");
xMLFileName := path + fileNameVar + extension ;
xMLFile.CREATE(xMLFileName);
xMLFile.CREATEOUTSTREAM(stream);
xMLPort.SETTABLEVIEW(customer);
xMLPort.SETDESTINATION(stream);
xMLPort.EXPORT;
xMLFile.CLOSE;
MESSAGE('FERTIG');
CLEAR(xMLPort);
4. November 2015 21:09
customer.GET('154451');
customer.SETRANGE("No.", '154451');
5. November 2015 08:40