Write a COBOL program to compute and print the amount due. Run the program once for each vendor.
**Input:**For each vendor, prompt for and enter the followinf data.
Vendor Vendor Invoice Invoice Discount
Number Name Number Amount Rate
217 Metacraft A1239 2309.12 0.10
349 IntraTell T9823 670.00 0.09
712 Reylock F0176 4563.78 0.12
501 Universal W0105 1200.00 0.09
196 Northland X2781 3429.34 0.10
**Output:**For each vendor, print the following information:
Author Accounts Payable mm/dd/yyyy
Invoice Number: XXXXX
Vendor Number: 999
Vendor Name: X-----X
Invoice Amount: $9999.99
Discount Amount: $ 999.99
Amount Due: $9999.99
## Deliverables
1) Complete and fully-functional working program(s) in executable form as well as complete source code of all work done.
2) Deliverables must be in ready-to-run condition, as follows (depending on the nature of the deliverables):
a) For web sites or other server-side deliverables intended to only ever exist in one place in the Buyer's environment--Deliverables must be installed by the Seller in ready-to-run condition in the Buyer's environment.
b) For all others including desktop software or software the buyer intends to distribute: A software installation package that will install the software in ready-to-run condition on the platform(s) specified in this bid request.
3) All deliverables will be considered "work made for hire" under U.S. Copyright law. Buyer will receive exclusive and complete copyrights to all work purchased. (No GPL, GNU, 3rd party components, etc. unless all copyright ramifications are explained AND AGREED TO by the buyer on the site per the coder's Seller Legal Agreement).
## Platform
Processing Requirements:
-Compute the discount amount:
invoice amount x discount rate
-Compute the amount due:
invoice amount - discount amount