Re: Starting out with sub-procedures

["Buck" <buck.calabro@xxxxxxxxxxxx>]

> CPF checks number of parms, and programs that pass
> wrong data types consistently error off.

Try this and see what error you get:

QRPGSRC PARMCALL:
H        1
I            DS
I                                        1   50ZONE
I            DS
I                                    B   1   20BINSML
I            DS
I                                    B   1   40BINBIG
C                     CALL 'PARMRECV'
C* 5/0 and 5
C                     PARM 47        PACK    50
C                     PARM 'CHARS'   CHAR    5
C  NLR                MOVE 'A'       MORE  100
C                     DUMP
C                     SETON                     LR

QRPGSRC PARMRECV
H        1
C           *ENTRY    PLIST
C* 10 and 50, both char.
C                     PARM           PACK   10
C                     PARM           CHAR   50
C                     DUMP
C                     MOVE *ALL'%'   CHAR
C                     SETON                     LR

Especially, look at MORE, from the dump in PARMCALL.

CPF does not check data type, and most assuredly allows you to wipe out
storage without a message.  Don't ask me how I came to find that out, but it
was long, long ago.
  --buck