开云体育

ctrl + shift + ? for shortcuts
© 2025 开云体育

RPG and VSAMIO


 

Hello again,
I've been running the RPG examples from Jay Moseley's website (?and been successful, sorta, until example 3.? It reads a card file to create an ISAM file but I thought it would invoke VSAMIO and process the RPG program to work with a VSAM file instead of ISAM.? According to what I've read on his site is should work with COBOL, Assembler, and PL/1 as well.? However, it seems to be on MVS systems only.? Can anyone confirm?
I don't remember how to create or process ISAM, it's been way too long!??I downloaded and ran the samples from??without problem and thought I'd play around with Jay's RPG example programs.?
BTW, example 2 runs ok except it goes into a loop at EOJ.? I replaced the tape output with SYSLST and it runs fine. I've no idea what's going on.


 

Hello Jim,

VSAMIO was written for an usage with the COBOL and PL/I (F) compilers of MVT. I was able to assemble VSAMIO on DOS/VS and use it with the FCOBOL compiler of DOS/VS. I have no idea how to use it from a RPG program.

As for ISAM datasets, they must reside on a 2314 DASD and they are defined with the usual DLBL and EXTENT statements. The exact syntax is on page 38 of GC33-5376 "DOS/VS System Control Statements". :-)

At first sight, I would say it is probably easier for you trying to (recall how to) use ISAM datasets than trying to use VSAMIO with RPG.

Cheers,

Rene FERLAND, Montreal


 

开云体育

Do not feel bad. ?I never could get an RPG program to work right. ? In the 70's I was at a shop that strictly used RPG. ? Others in the shop had no problem. ?My brain just did not grok RPG. ?One time I gave up and did it in assembler. ?That worked fine. ?Fortunately I was the systems programmer so did not write a lot of application programs.

Harold Grovesteen

On Fri, 2021-01-08 at 18:40 -0800, Jim Snellen wrote:
Hello again,
I've been running the RPG examples from Jay Moseley's website (?and been successful, sorta, until example 3.? It reads a card file to create an ISAM file but I thought it would invoke VSAMIO and process the RPG program to work with a VSAM file instead of ISAM.? According to what I've read on his site is should work with COBOL, Assembler, and PL/1 as well.? However, it seems to be on MVS systems only.? Can anyone confirm?
I don't remember how to create or process ISAM, it's been way too long!??I downloaded and ran the samples from??without problem and thought I'd play around with Jay's RPG example programs.?
BTW, example 2 runs ok except it goes into a loop at EOJ.? I replaced the tape output with SYSLST and it runs fine. I've no idea what's going on.


 

On Sat, Jan 09, 2021 at 09:28:27AM -0600, Harold Grovesteen wrote:

Do not feel bad. I never could get an RPG program to work right. In
the 70's I was at a shop that strictly used RPG. Others in the shop
had no problem. My brain just did not grok RPG.
My brain has had similar experiences with RPG. A few years ago the company
I work for migrated from our mainframe z/OS based platform to an IBM i based
platform. I'm thankful that platform now has free-format RPG. I'm not a
programmer, but have dabbled a bit with CL and free-format RPG and have no
trouble with those. I've tried learning older versions of RPG out of
curiosity. My brain was not willing to cooperate with that endeavor.



--

Kevin



Bruceville, TX

What's the definition of a legacy system? One that works!
Errare humanum est, ignoscere caninum.


 

Funny you mention rewriting to Assembler Harold, that’s what I did and the DTFIS macro assembled just fine. Thanks for the feedback.
Now I’m gonna look at the System Control Statements to refresh my memory on ISAM JCL.

Best regards,
Jim

On Jan 9, 2021, at 1:01 PM, Kevin Monceaux <Kevin@...> wrote:

?On Sat, Jan 09, 2021 at 09:28:27AM -0600, Harold Grovesteen wrote:

Do not feel bad. I never could get an RPG program to work right. In
the 70's I was at a shop that strictly used RPG. Others in the shop
had no problem. My brain just did not grok RPG.
My brain has had similar experiences with RPG. A few years ago the company
I work for migrated from our mainframe z/OS based platform to an IBM i based
platform. I'm thankful that platform now has free-format RPG. I'm not a
programmer, but have dabbled a bit with CL and free-format RPG and have no
trouble with those. I've tried learning older versions of RPG out of
curiosity. My brain was not willing to cooperate with that endeavor.



--

Kevin



Bruceville, TX

What's the definition of a legacy system? One that works!
Errare humanum est, ignoscere caninum.