Thank you. -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Chase, John Sent: Thursday, September 25, 2014 9:37 AM To: [email protected] Subject: Re: Help finding CICS Application Programming Primer
GIYF.... > -----Original Message----- > From: IBM Mainframe Discussion List On Behalf Of Hansen, Dave L - > Eagan, MN > > Dear Group, > > (Still waiting on the CICS-L Listserv) > > Back when my hair was a younger color I used to write online CICS > programs. I found a sample CICS program shown below. I found the JCL > for Batch compilation for COBOL programs documented in the CICS > Application Programming Guide (SC34-2844). I was looking for more > information on building a test transaction for CICS. From the infocenter I > did find The general insurance application under the samples. Also I could > find Batch compilation for COBOL programs documented at the infocenter. > > The CICS TS for z/OS V5 R1 Application Programming Reference > (SC34-2845) describes What you need to know to understand this manual on page > vii. It lists the CICS Application Programming Primer. > Q). Where is the CICS Application Programming Primer? I did not find it in > the bibliography. I > didn't find a link like that at the infocenter. Just trying to find > what information is available and where. > > > Thanks, Dave > > > > IDENTIFICATION DIVISION. > PROGRAM-ID. SAMCICS. > * > ENVIRONMENT DIVISION. > DATA DIVISION. > WORKING-STORAGE DIVISION. > * > 01 WS-INPUT. > 05 WS-TRAN-ID PIC X(4). > 05 WS-MESSAGE-I PIC X(70). > * > 01 WS-OUTPUT. > 05 WS-TEXT PIC X(8). > 05 WS-MESSAGE-O PIC X(70). > * > 01 WS-MSG-LENGTH PIC S9(4) COMP. > * > PROCEDURE DIVISION. > * > > MOVE 74 TO WS-MSG-LENGTH. > * > EXEC CICS RECEIVE > INTO(WS-INPUT) > LENGTH(WS-MSG-LENGTH) > END-EXEC. > * > MOVE WS-MESSAGE-I TO WS-MESSAGE-O. > MOVE 'OUTPUT: ' TO WS-TEXT. > MOVE 78 TO WS-MSG-LENGTH. > * > EXEC CICS SEND > FROM(WS-OUTPUT) > LENGTH(WS-MSG-LENGTH) > ERASE > END-EXEC. > * > EXEC CICS RETURN > END-EXEC. > * > GOBACK. > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, send > email to [email protected] with the message: INFO IBM-MAIN ********************************************************************** Information contained in this e-mail message and in any attachments thereto is confidential. If you are not the intended recipient, please destroy this message, delete any copies held on your systems, notify the sender immediately, and refrain from using or disclosing all or any part of its content to any other person. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
