- DEFINITION MODULE Payments;
- FROM DateFunctions IMPORT Date;
- FROM NumTypes IMPORT Real8;
- PROCEDURE MakePayment(InvoiceNbr : ARRAY OF CHAR;
- Pmtdate : Date;
- PmtAmt : Real8;
- CheckNbr : ARRAY OF CHAR;
- CustID : ARRAY OF CHAR);
-
- PROCEDURE ShowPaymentHist(CustID : ARRAY OF CHAR);
- (*PROCEDURE ManagePaymentFile();*)
- END Payments.
|