Add MTNCUST, etc

This commit is contained in:
SJLennon
2020-10-05 17:38:34 -04:00
parent dfc6e50c07
commit c38786fdab
7 changed files with 2275 additions and 8 deletions
+16 -8
View File
@@ -1,19 +1,19 @@
### 5250 Subfile: Full Screen and Windows
## 5250 Subfile: Full Screen and Windows
(__Under Construction__)
This is a working application that allows display, selection and maintenance of a customer master. The screens are _similar_ to what you see in PDM. The code is modular and there are several programs that can be called from multiple places. SQL is used for all database IO. There are full screen subfiles and subfiles in a window.
#### Sample Inquiry Screens
### Sample Inquiry Screens
![Inquiry Subfile](Images/Inquiry_Subfile.png)
![Inquiry Subfile](Images/Inquiry_Display.png)
#### Sample Maintenance Screen
### Sample Maintenance Screen
![Inquiry Subfile](Images/Maintenance_Display.png)
* PMTCUSTR
#### PMTCUSTR/PMTCUSTD
RPG program that puts up a 5250 subfile that allows searching by customer name, city and state. Display of Inactive records can be toggled using F9.
@@ -23,12 +23,20 @@ This is a working application that allows display, selection and maintenance of
- M gives 2=Edit 5=Display
- S gives 1=select 5=Display
Conceptually, you can call this program from almost anywhere and access to it is contolled by whatever menuing or security system you have in place. The general user population would progably get Inquiry and Sales would have Maintanance. Selection could be used for any in-house program that needed to prompt for a customer id number.
* PMTCUSTD
This is the display file for PMTCUSTR.
#### MTNCUSTR/MTNCUSTD
* CustMast.SQL
RPG program that maintains a customer. Customer id is provided as the first parameter. It also adds or displays a customer. Function is controlled by the second parameter. It is called from PMTCUSTR, but it could be called from any program that has a customer id available.
#### CRTMSGF
Creates the CUSTMSGF message file used by the programs.
#### CRTDTAARA
Create the CUSTNEXT data area that contains the next available customer id.
#### CustMast.SQL
SQL code to create and populate the CUSTMAST tsble. You will need to change the _set schema_ to your target library.