Initial Add *
This commit is contained in:
+11
-14
@@ -1,23 +1,22 @@
|
||||
## 5250 Subfile: Full Screen and Windows
|
||||
|
||||
(__Under Construction__)
|
||||
# 5250 Subfile: Full Screen and Windows
|
||||
|
||||
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 "page at a time" subfiles (full screen and in a window) and a "load all" subfile in a window. The windows show a couple of border styles.
|
||||
|
||||
### Sample Inquiry Screens
|
||||
## Sample Inquiry Screens
|
||||
|
||||

|
||||
|
||||

|
||||
|
||||
### Sample Maintenance Screen
|
||||
## Sample Maintenance Screen
|
||||
|
||||

|
||||
|
||||
### Prompting to Select a State
|
||||
## Prompting to Select a State
|
||||
|
||||

|
||||
|
||||
#### General Notes
|
||||
## General Notes
|
||||
|
||||
Some of the programs use /Include statements, which are found in the Copy_Mbrs directory. In the code these programs refer to my DEMO library, so to compile you may need to change this.
|
||||
|
||||
@@ -29,10 +28,10 @@ The style tries to have consistent naming and I do not share field names between
|
||||
|
||||
The display file uses a private set of indicators, something I started doing to try to educate coworkers who were struggling with monolithic code where all 99 indicators were in use. You can also reset indicators and such in display files, but I prefer to do it myself.
|
||||
|
||||
#### PMTCUSTR/PMTCUSTD
|
||||
### 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.
|
||||
|
||||
|
||||
There are 3 functions, or modes, controlled by the first parameter passsed: Inquiry to display a record; Maintenance to change a record; Selection to return a customer id.
|
||||
|
||||
- I gives 5=Display
|
||||
@@ -42,17 +41,17 @@ The display file uses a private set of indicators, something I started doing to
|
||||
|
||||
Conceptually, you can call this program from almost anywhere and control access to it by whatever menuing or security system you have in place. The general user population would progably get Inquiry and Sales would have Maintenance. Selection could be used for any in-house program that needed to prompt for a customer id number.
|
||||
|
||||
#### MTNCUSTR/MTNCUSTD
|
||||
### MTNCUSTR/MTNCUSTD
|
||||
|
||||
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, or which needs to add a customer.
|
||||
|
||||
If the cursor is in a field with a + in the field name (ST+ here) you can press F4 to prompt the field.
|
||||
|
||||
The window has the default border, which may vary depending on which 5250 emulator you are using. The sample is using the iACS emulator from IBM.
|
||||
The window has the default border, which may vary depending on which 5250 emulator you are using. The sample is using the iACS emulator from IBM.
|
||||
|
||||
### PMTSTATER/PMTSTATED
|
||||
|
||||
RPG program and window display file to prompt for a USA state code. Called when F4 is used in PMTCUSTR or MTNCUSTR. Display can be sequenced by either state name or 2-character code, toggled by F7.
|
||||
RPG program and window display file to prompt for a USA state code. Called when F4 is used in PMTCUSTR or MTNCUSTR. Display can be sequenced by either state name or 2-character code, toggled by F7.
|
||||
|
||||
Strictly speaking, this is more of a demonstration program that may, or may not, have a lot of practical value in real life.
|
||||
|
||||
@@ -75,5 +74,3 @@ The window has a blue border of reverse image blanks. This will display consiste
|
||||
### States.SQL
|
||||
|
||||
SQL Code to create and populate the STATES table, which is a table of USA state names and their 2-character abbreviations.
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user