Page 1 of 1

New structure for every CICS Program

PostPosted: Mon 18 Jan 2016, 10:26
by agourav19890
Hi,
As per the new rule we have to code below section also but when i am doing this getting error - "GROUP" is a reserved word related to language not supported by this compiler.

Please advice can I use name GROUP1 instead of GROUP.

01 CICSIDENT.
02 FILLER PIC X(8) VALUE '**CICS**'.
02 FILLER PIC X(8) VALUE 'USERID: '.
02 USERID PIC X(8) VALUE 'RA2000'.
02 FILLER PIC X(8) VALUE 'NAME: '.
02 NAME PIC X(20) VALUE 'RAHUL'.
02 FILLER PIC X(12) VALUE 'DESCRIPTION:'.
02 DESC PIC X(80)
VALUE 'PROGRAM TO DO AUTHENTICATION OF USERID AND PROGRAM'.
02 FILLER PIC X(12) VALUE 'CICS GROUP: '.
02 GROUP PIC X(8) VALUE 'RA2000'.
02 FILLER PIC X(12) VALUE 'CICS TRAN: '.
02 TRAN PIC X(8) VALUE 'ACCM'.

Warm regards

Re: New structure for every CICS Program

PostPosted: Mon 18 Jan 2016, 11:25
by prino
You can call the fields anything you like, if you want to call all of them FILLER, feel free to do so. The important thing is that we want to see all the data appear in the LOAD module - so putting in this structure as comments in your source will not do. How you call it, we really don't care, fieldnames don't appear in the LOAD module anyway...