From 352af735bb0dc9c0c9b569956b27c87849d1e3be Mon Sep 17 00:00:00 2001 From: Wesley Ray Date: Thu, 25 Jun 2020 02:19:18 +0000 Subject: [PATCH 1/3] Update 'README.md' Added a blurb giving context to this example --- README.md | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/README.md b/README.md index 89f5cfb..d698099 100644 --- a/README.md +++ b/README.md @@ -1,3 +1,7 @@ # AS400_RPG_Examples -Code examples related to the AS400/RPG programming language. \ No newline at end of file +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-occurence data structures, free format code blocks, etc.) \ No newline at end of file From f3fe46ce06aaa1a0483c49f0f21ad870afa7d644 Mon Sep 17 00:00:00 2001 From: Wesley Ray Date: Tue, 2 Feb 2021 17:05:15 +0000 Subject: [PATCH 2/3] Update 'README.md' --- README.md | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/README.md b/README.md index d698099..8fffc1c 100644 --- a/README.md +++ b/README.md @@ -4,4 +4,4 @@ The example in here is an interactive report program written in the (long dead) 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-occurence data structures, free format code blocks, etc.) \ No newline at end of file +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.) \ No newline at end of file From 96130999140b1c5842515aa5bc4d2779ba306163 Mon Sep 17 00:00:00 2001 From: Wesley R Date: Tue, 2 Mar 2021 21:45:05 +0000 Subject: [PATCH 3/3] Update 'rpgle_example.rpg' --- rpgle_example.rpg | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/rpgle_example.rpg b/rpgle_example.rpg index ccbd0a4..e9ad9e1 100644 --- a/rpgle_example.rpg +++ b/rpgle_example.rpg @@ -1,5 +1,5 @@ F********************************************************************************************** - F* AUTHOR: Wes Ray + F* AUTHOR: Wes R. F* 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.