wes/AS400_RPG_Examples
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Merge branch 'master' of http://c0smere.net:3000/wes/AS400_RPG_Examples

Browse Source
This commit is contained in:
Wes
2021-08-26 22:16:07 -04:00
parent 59955b8412 9613099914
commit 8f95fd5871
2 changed files with 6 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
README.md
+5 -1
View File
@@ -1,3 +1,7 @@
# AS400_RPG_Examples # AS400_RPG_Examples
Code examples related to the AS400/RPG programming language. The example in here is an interactive report program written in the (long dead) AS400/RPG programming language.
It was used by the planning department in a textile mill to run what-if manufacturing scenarios. The user input SKUs and requested quantities to weave and received a report back detailing pounds of yarn required vs on-hand quantities and weeks to weave figures.
RPG is of course no longer relevant in today's world; but, it is something I taught myself after being offered a job that required it and I am proud of this particular program as it takes advantage of some of the languages more advanced techniques (Multiple-occurrence data structures, free format code blocks, etc.)
rpgle_example.rpg
+1 -1
View File
@@ -1,5 +1,5 @@
F********************************************************************************************** F**********************************************************************************************
F* AUTHOR: Wes Ray F* AUTHOR: Wes R.
F* F*
F* This program is called by __________ when the user presses F10 to run the report. The input F* This program is called by __________ when the user presses F10 to run the report. The input
F* file BATCH is a physical file in QTEMP that is created/cleared each time __________ is run. F* file BATCH is a physical file in QTEMP that is created/cleared each time __________ is run.