<<snip>>
We have a CICS program that builds the parameter list and then issues
the CA-7 SVC to Demand jobs.
<<unsnip>>
We're not at R11 of CA7 yet (but close) and we have a CICS program that
does something similar. Is this how your programs coded?
IF (COMMAREA-COMMAND-TYPE = 'DEM')
MOVE +48 TO CA7-COMMAND-LENG
MOVE COMMAREA-COMMAND-JOBN TO U7DATA-DMD-JOBN
MOVE U7DATA-DMD TO CA7-COMMAND
GO TO 5000-CALL-U7SVC.
:
:
5000-CALL-U7SVC.
CALL 'U7SVC' USING CA7-COMMAND-AREA.
GO TO 9000-GOBACK.
Alan Schwartz
Assurant Shared Business Services
Lead Systems Programmer
Phone: 651-361-4758
Fax: 651-361-5625
**************************************************************************************
This e-mail message and all attachments transmitted with it may contain legally
privileged and/or confidential information intended solely for the use of the
addressee(s). If the reader of this message is not the intended recipient, you
are hereby notified that any reading, dissemination, distribution, copying,
forwarding or other use of this message or its attachments is strictly
prohibited. If you have received this message in error, please notify the
sender immediately and delete this message and all copies and backups thereof.
Thank you.
**************************************************************************************
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
