22. Dezember 2009 17:27
VALIDATE("purchase header"."No.","purchase header"."No."::rg_kreis1);
VALIDATE("purchase header"."No.","purchase header"."No."::"rg_kreis1");
VALIDATE("purchase header"."No.","purchase header"."No."::'rg_kreis1');
VALIDATE("purchase header"."No.","purchase header"."No."::next);
//VALIDATE("purchase header"."No.","purchase header"."No."::rg_kreis1); ohne explizite Angabe
VALIDATE("purchase header"."No.","");
22. Dezember 2009 17:33
22. Dezember 2009 17:49
WORKDATE := tmpRec.InvoiceDate;
EVALUATE(datum,'01.'+tmpRec.Month+'.'+tmpRec.Year);
purchaseHeader.INIT;
purchaseHeader."Document Type" := purchaseHeader."Document Type"::Invoice;
purchaseHeader.VALIDATE("Posting Date", datum);
purchaseHeader.VALIDATE("Due Date", tmpRec.PayoutDate);
purchaseHeader.VALIDATE("Pay-to Contact No.",tmpRec.CustomerId);
purchaseHeader.VALIDATE("Buy-from Contact No.",tmpRec.CustomerId);
purchaseHeader.VALIDATE("Buy-from Address",Contact.Address);
purchaseHeader.VALIDATE("Buy-from Address 2",Contact."Address 2");
purchaseHeader.VALIDATE("Buy-from City",Contact.City);
purchaseHeader.VALIDATE("Buy-from Post Code",Contact."Post Code");
purchaseHeader.VALIDATE("Currency Code",tmpRec.Currency);
purchaseHeader.VALIDATE("Vendor Invoice No.",tmpRec.InvoiceId);
purchaseHeader.INSERT(TRUE);
22. Dezember 2009 17:55
22. Dezember 2009 18:28