IF (QtyToBeShippedBase <> 0) THEN IF "Document Type" IN ["Document Type"::"Return Order","Document Type"::"Credit Memo"] THEN ReserveSalesLine.TransferSalesLineToItemJnlLine(SalesLine,ItemJnlLine,QtyToBeShippedBase,CheckApplFromItemEntry) ELSE TransferReservToItemJnlLine( SalesLine,ItemJnlLine,-QtyToBeShippedBase,TempTrackingSpecification,CheckApplFromItemEntry); IF CheckApplFromItemEntry THEN TESTFIELD("Appl.-from Item Entry");New:
IF (QtyToBeShippedBase <> 0) THEN BEGIN IF "Document Type" IN ["Document Type"::"Return Order","Document Type"::"Credit Memo"] THEN ReserveSalesLine.TransferSalesLineToItemJnlLine(SalesLine,ItemJnlLine,QtyToBeShippedBase,CheckApplFromItemEntry) ELSE TransferReservToItemJnlLine( SalesLine,ItemJnlLine,-QtyToBeShippedBase,TempTrackingSpecification,CheckApplFromItemEntry); IF CheckApplFromItemEntry THEN TESTFIELD("Appl.-from Item Entry"); END;What do you think? Is this the correct solution?
Answers
btw.
I always use BEGIN/END. =;