CICS hello world program

       IDENTIFICATION DIVISION.                   
       PROGRAM-ID.    COBCIC17.                   
       AUTHOR.        KK.                         
       DATE-WRITTEN.  11-11-1111.                 
       SECURITY.                                  
       DATA DIVISION.                             
       WORKING-STORAGE SECTION.                   
        01 WS-TEMP PIC X(30).                     
       PROCEDURE DIVISION.                        
            MOVE 'HELLO  WORLD' TO WS-TEMP.
            EXEC CICS                             
             SEND FROM (WS-TEMP)                  
             ERASE                                
            END-EXEC.                             
            EXEC CICS                             
             RETURN                               
           END-EXEC.



cicscob

//usermfC JOB ,,NOTIFY=&SYSUID,CLASS=A,MSGLEVEL=(1,1),MSGCLASS=H    
//JOBPROC  JCLLIB ORDER=IBMUSER.COMPILER.JCLS                        
//CICSCOB  EXEC CICSCOB1,                                            
//         SRCLIB=usermf.JAN30.KK.LMS,    --> SOURCE LIB NAME       
//         MEM=COBCIC17,                     --> MEMBER              
//         COPYLIB=usermf.JAN30.COBOLPGM.BMS,        --> BMS MAP LIB
//         BMSLIB=usermf.JAN30.COBOLPGM.BMS,  --> BMS MAP LIB       
//         LOADLIB=MTPLTRG.CICS.LOADLIB     **  DO NOT CHANGE  **