manyone
New User
Joined: 09 Mar 2006
Posts: 21
|
|
|
|
I’ve put together a small COBOL project that generates seasonal storylines — Christmas and Thanksgiving — using variable templates.
It’s designed to run on MVS/TK4 (COBOL 74) as well as GNU COBOL on PC.
The core logic uses DISPLAY/ACCEPT for interaction, fixed-length records, and SimoTime’s SIMOSUB1 for variable substitution.
Files:
vars.dat — defines up to 14 variables, 7 options each
plot.dat — single-record template with <var> placeholders
CLIST: EX RUN(HALLMARK) 'XMAS'
JCL included for compiling and linking SIMOSUB2 with HALLMARK
All output is word-wrapped to 80 columns — ready for 3270 display.
Code and examples here:
👉 github.com/manyone/cobol-hallmark-generator
I’d appreciate any feedback. |
|
