3. Juni 2008 15:42
r_PurchaseLine.RESET;
   r_PurchaseLine."Document Type" := 1;
   r_PurchaseLine."Document No." := c_NewDocNo;
   r_PurchaseLine."Line No." := fct_PurchaseLineNo(c_NewDocNo);
   r_PurchaseLine."No." := c_ArtNr;
   r_PurchaseLine.Quantity := dec_Menge;
   r_PurchaseLine."Direct Unit Cost" := dec_Preis;
   r_PurchaseLine.INSERT;3. Juni 2008 15:46
3. Juni 2008 15:52
3. Juni 2008 15:53
3. Juni 2008 15:55