- Program 1 :
Gets control fron CICS
Writes a record “RECORD 1” to file1.
XCTL to Program 2
Program 2 :
Abend
What will be result ?.
Ans : The file1 will be restored to the original position. That is, If we Browse the “FILE 1”, “RECORD 1” will not be available. (ROLL BACK)
- Program 1 :
Gets control fron CICS
Writes a record “RECORD 1” to file1.
XCTL to Program 2
Program 2 :
Do some operation.
Return control to CICS.
Whether task number (EIBTASKN) will be same for both the programs ?.
ANS : Yes .
- How to submit a job from CICS ?.
ANS : Define a extra partition TDQ. Write the JCL into it. In Destination control table define a DSCNAME for TDQ. This DSCNAME should be included in the start up job of CICS region and this ddname should be directed to INTRDR.
- Can a CICS program without Linkage section ?>
ANS : No. Linkage section should be defined in all the CICS programs.
- Program 1 :
Gets control fron CICS
Writes a record “RECORD 1” to file1.
LINK to Program 2
Program 2 :
Do some operation.
EXEC CICS RETURN TRANSID (“XXXX”)
COMMAREA (CA-COMM-AREA)
LENGTH (LENGTH OF CA-COMM-AREA)
END-EXEC.
What is the resut ?.
ANS : While executing program 2 , abend will occur.
In Linked program we can not code RETURN with TRANID option.
Follwing is the correct one.
EXEC CICS RETURN
END-EXEC.
No comments:
Post a Comment
Note: Only a member of this blog may post a comment.