Chapter 2: File Maintenance
Option 14Vendors List
This job prints either the standard Vendors List, or a shortened form of the Vendors List which prints only one line per vendor. The following processing steps accomplish this job.
- Step 1This function allows you to choose which vendors list to print, either the standard or shortened version.
The screen shown below allows you to choose to print the short vendor list.
Initial Setup Vendors screen

Data items for the preceding screen are described below:
- Print Short List?
Y or N Required
the initial default value is ‘N’.
Indicate whether or not you wish to print the shortened Vendors List.
Press ENTER to save the information on this screen.
- Step 2In preparation for performing a sort/selection process on the Vendor information, this step provides you with a default sequencing of data records by Vendor Alpha and Vendor, giving additional sort order choice by Vendor Type, Liability Account, Zip Code and Terms Code, with the option to change modifiable parameters at run time. Selection of data records is provided by Vendor, Vendor Alpha, Vendor Type, Zip Code, Pay Status, Hold Checks?, terms Code and Date Changed, with the option to enter user-specified comparisons at run time.
- Step 3This disposition type is used for all lists of master file information.
- Step 4According to previously specified criteria, this step actually performs the desired selection and/or sorting process.
- Step 5In order to print the Vendors list (Short), this step formats the Vendors information. The following data items are shown: Name, Vendor, Contact, Phone, Telefax Number, Terms Code And description.
A sample output is shown below.
Expert Computing, Inc.
09/02/94 13:37 LGG Page: 1
Vendors List (Short)
Name Vendor Contact Phone Fax Trm Description
====================================================================================================================================
Albert Materials, Inc. 00000040 Milton Albert 555-1256 (206) 555-9874 60 2/10,25 N/25,10
Carpenter’s Union #101 00000150 Fritz Holden 441-2367 ( ) - 10 2/10, Net 30
Electrician’s Union #238 00000160 Cal Worthington 431-8909 ( ) - 10 2/10, Net 30
Insurances Unlimited 00000070 Scott Hansen 555-9988 (206) 555-6000 40 Cash
Internal Revenue Service 00000110 Henry Worthmeyer 456-7890 ( ) - 40 Cash
Sam Jones 00000080 568-9652 ( ) - 20 Net EOM
Miscellaneous Supplier 00000010 - ( ) - 20 Net EOM
Mountain Air Conditioning 00000030 Herman Hill 555-9872 (206) 555-9871 30 3/15th, Net 25th
George Peters 00000090 987-5515 (303) 987-2274 20 Net EOM
Pool and Associates 00000020 Susan White 555-4778 (206) 555-4777 20 Net EOM
State Industrial Insurance 00000130 Joel Bomburg 352-9821 ( ) - 40 Cash
State Withholding Agency 00000120 Janice Sdmith 352-1456 ( ) - 40 Cash
State Unemployment Insurance 00000140 352-0764 ( ) - 40 Cash
Travel Planners 00000060 Jill Peterson 555-4112 (206) 555-1212 50 Net 30
Kris Williams 00000100 987-6541 ( ) - 20 Net EOM
Hardware Services, Inc. 00000050 George Johnson 555-0079 (206) 555-1008 10 2/10, Net 30- Step 6In order to print the standard Vendors List, this step formats the Vendors information. The following data items are shown: Vendor, Vendor Alpha, Name, Hold Checks?, Miscellaneous Vendor?, Balance, Address - Line 1, Pay Status Description, Credit Limit, Address - Line 2, Tax Identifying Number, Retention %, Retention, City, State, Zip Code, Bank Account No, Last Purchase, Country, Needs Corrected 1099?, Last Invoice Number, Phone, Telefax Number, Last Invoice Amount, Contact, Terms Code, Description, Last Payment Date, Vendor Type, Last Check Number, Liability Account, Last Check Amount, Offset Account and Comment.
A sample output is shown below.
Expert Computing, Inc.
09/02/94 13:37 LGG Page: 1
Vendors List
====================================================================================================================================
00000040 ALBERT Albert Materials, Inc. Hold Checks? N Misc Vendor? N Balance: 1768.07
10112 West Smith Pay Status: Normal Credit Limit: 1000000
Tax ID No: Retention: 3 % 2112.07
Seattle WA 98112 Bank Acct No: 205698 Last Invoice Date: 08/14/89
USA Correct 1099? N Last Invoice No: 96215
Phone: (206) 555-1256 FAX: (206) 555-9874 Last Invoice Amt: 2058.00
Contact: Milton Albert Last Pymt Date: 08/16/89
Vendor Type: 10 Supplier Last Check No: 5500
Terms: 060 2/10,25 N/25,10 Last Check Amt: 11110.46
Liab Acct: 2010001001 Accounts Payable, Sales Check GT Max? N In Process? N
Offset Acct: 4010000000MA Cost of Goods Sold, Corp./Mfg.
Comment: Prompt Supplier.
——————————————————————————————————————————————————————————————————
00000150 CARPENTR Carpenter’s Union #101 Hold Checks? N Misc Vendor? N Balance: .00
Union Hall Pay Status: Normal Credit Limit: 5000
Tax ID No: Retention: 0 % .00
Seattle WA 98101 Bank Acct No: Last Invoice Date:
USA Correct 1099? N Last Invoice No:
Phone: (206) 441-2367 FAX: ( ) - Last Invoice Amt: .00
Contact: Fritz Holden Last Pymt Date:
Vendor Type: 40 Agent Last Check No: 0
Terms: 010 2/10, Net 30 Last Check Amt: .00
Liab Acct: 2050600000 Carpenter’s Union #101 Check GT Max? N In Process? N
Offset Acct:
Comment:
——————————————————————————————————————————————————————————————————
00000160 ELECTRIC Electrician’s Union #238 Hold Checks? N Misc Vendor? N Balance: .00
Electrician’s Hall Pay Status: Normal Credit Limit: 4000
Tax ID No: Retention: 0 % .00
Seattle WA 98111 Bank Acct No: Last Invoice Date:
USA Correct 1099? N Last Invoice No:
Phone: (206) 431-8909 FAX: ( ) - Last Invoice Amt: .00
Contact: Cal Worthington Last Pymt Date:
Vendor Type: 40 Agent Last Check No: 0
Terms: 010 2/10, Net 30 Last Check Amt: .00
Liab Acct: 2050700000 Electrician’s Union #238 Check GT Max? N In Process? N
Offset Acct:
Comment:
——————————————————————————————————————————————————————————————————
00000070 INSUR Insurances Unlimited Hold Checks? N Misc Vendor? N Balance: .00
990 Airport Way Pay Status: Normal Credit Limit: 25000
Suite 7 Tax ID No: Retention: 0 % .00
Seattle WA 98511 Bank Acct No: 1236-521 Last Invoice Date: 07/10/89
USA Correct 1099? N Last Invoice No: 89071000
Phone: (206) 555-9988 FAX: (206) 555-6000 Last Invoice Amt: 254.80
Contact: Scott Hansen Last Pymt Date: 08/16/89
Vendor Type: 40 Agent Last Check No: 5502
Terms: 040 Cash Last Check Amt: 254.80
Liab Acct: 2010001001 Accounts Payable, Sales Check GT Max? N In Process? N
Offset Acct: 4130000000 Insurance Expense
Comment: Libaility insurance provider.