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