Re: RPG on OS/390

[Simon Coulter <shc@xxxxxxxxxxxxxxxxx>]

On 11/03/2006, at 1:27 AM, Jon Paris wrote:

> I think Simon meant RPG III.

Actually I did mean RPG II but in light of your comments I dug out my 
old SAA RPG Reference Summary (SC09-1164-02) from April 1991 which 
applies to V2R1 of IBM SAA RPG/400 and V1 of IBM SAA RPG/390.

Seems it's not as bad as I thought. At least it supports the new 
RPG/400 op-codes for character data. It has no support for externally 
described files nor for work station files. I have no idea how they do 
screen I/O using RPG on the mainframe. No support for composite keys 
either.

For what it's worth here is a list of the features that are NOT 
supported in SAA RPG/390:

        o Various File and Program Error Codes
        o F-spec:
                - WORKSTN files
                - Record number for SFILE
        o F-spec continuation:
                - COMIT
                - ID
                - IGNORE
                - IND
                - NUM
                - PASS
                - RENAME
                - SAVDS
                - SFILE
                - SLN
        o I-specs:
                - U1 to U8
                - External data structures
        o C-specs:
                - KA to KN, KP to KY
                - U1 to U8
                - Numeric fields still limited to 15 digits
                - Op-code extender N (no lock)
                - Format names
        o O-specs:
                - KA to KN, KP to KY
                - U1 to U8
                - Edit code 5 to 9
                - K1 to K8
                - Format names
        o Op-Codes:
                - ACQ
                - CLEAR *NOKEY
                - COMIT
                - DSPLY
                - EXFMT
                - FREE
                - KFLD
                - KLIST
                - NEXT
                - POST
                - READC
                - REL
                - ROLBK
                - SHTDN

SAA RPG/390 did get support for Graphic data types though and a few 
mainframe-specific file and program error codes.

Regards,
Simon Coulter.
--------------------------------------------------------------------
   FlyByNight Software         AS/400 Technical Specialists

   http://www.flybynight.com.au/
   Phone: +61 3 9419 0175   Mobile: +61 0411 091 400        /"\
   Fax:   +61 3 9419 0175                                   \ /
                                                             X
                 ASCII Ribbon campaign against HTML E-Mail  / \
--------------------------------------------------------------------