View previous topic :: View next topic |
Author |
Message |
sankarthamma Beginner
Joined: 20 May 2010 Posts: 10 Topics: 8 Location: chennai
|
Posted: Sun May 30, 2010 11:55 pm Post subject: Can you Explain the Function Shipping for following prg? |
|
|
How to use the below commands for working properly?
' PROGA ' is at A1R1 region and, calling 'PROGB' is at A1R2 region.
Code: |
EXEC CICS
ALLOCATE SYSID('A1R2')
END-EXEC.
EXEC CICS
LINK PROGRAM ('MYPRG2')
IF (PCT.SYSID('MYPRG2') ! = SPACES &&
PCT.SYSID('MYPRG2')! MYSYSID.SYSID)
ELSE
CALL CICS.PC.LINK('MYPRG2')
END-IF.
END-EXEC.
|
What are the changes are needed to run above prog properly? _________________ T.S.REDDY
CICS |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12376 Topics: 75 Location: San Jose
|
|
Back to top |
|
|
sankarthamma Beginner
Joined: 20 May 2010 Posts: 10 Topics: 8 Location: chennai
|
Posted: Mon May 31, 2010 1:24 am Post subject: |
|
|
sorry kolusu, _________________ T.S.REDDY
CICS |
|
Back to top |
|
|
|
|