RE: Purchase Invoice payment split
What you can do is divide the "Qty to Invoice" by 2 for each item.
Enter your Invoice number(A) & due date info - post.
Then with the remaining "Qty to Invoice".
Enter your Invoice number(B) & due date info - post.
It will then create two invoices (A) & (B) with two due dates based on what you wanted.
NOTE: when Qty's are divisible by two it's great else the two invoice amounts can be off just a bit.
Also if you have alot of lines it can be a big job.
So, long ago I made some small functions to split & unsplit (in case someone accidentally chose split in error)
**WE use the MOD function incase the qty is an ODD #.
Text1 = Would You Like To Split This Invoice?
Text2 = Would You Like To UNDO Split Of Invoice?
//Split Invoice
OnPush()
IF NOT DIALOG.CONFIRM(Text1,TRUE)
THEN EXIT ELSE
Purchline.RESET;
Purchline.SETRANGE(Purchline."Document Type","Document Type");
Purchline.SETRANGE(Purchline."Document No.","No.");
IF Purchline.FIND('-') THEN
REPEAT
IF Purchline."Quantity Received" <>0 THEN BEGIN
Purchline."Qty. to Invoice" := (Purchline."Quantity Received" / 2);
Remainder := Purchline."Quantity Received" MOD 2;
IF Remainder <> 0 THEN MESSAGE('Item %1 Needs Rounding',Purchline."No.");
Purchline.VALIDATE("Qty. to Invoice");
Purchline.MODIFY;
END;
UNTIL Purchline.NEXT = 0;
//Undo Split
IF NOT DIALOG.CONFIRM(Text2,TRUE)
THEN EXIT ELSE
Purchline.RESET;
Purchline.SETRANGE(Purchline."Document Type","Document Type");
Purchline.SETRANGE(Purchline."Document No.","No.");
IF Purchline.FIND('-') THEN
REPEAT
IF Purchline."Quantity Received" <> 0 THEN BEGIN
Purchline."Qty. to Invoice" := (Purchline."Qty. to Invoice" * 2);
Purchline.VALIDATE("Qty. to Invoice");
Purchline.MODIFY;
END;
UNTIL Purchline.NEXT = 0;
Works for us.