PAYMENTS.DEF 387 B

123456789101112
  1. DEFINITION MODULE Payments;
  2. FROM DateFunctions IMPORT Date;
  3. FROM NumTypes IMPORT Real8;
  4. PROCEDURE MakePayment(InvoiceNbr : ARRAY OF CHAR;
  5. Pmtdate : Date;
  6. PmtAmt : Real8;
  7. CheckNbr : ARRAY OF CHAR;
  8. CustID : ARRAY OF CHAR);
  9. PROCEDURE ShowPaymentHist(CustID : ARRAY OF CHAR);
  10. (*PROCEDURE ManagePaymentFile();*)
  11. END Payments.