MVSFORUMS.com

[haseen_mohammed]

hi,

i have a condition in which i want to pass a parameter in loop to another program.the parameters are constants.

i.e like 'HAI', 'HOW'. if i can initialise them like that in workin storage itself, other than movin the values in the perform loop seperatel and passing. it will be easy for processing.

is there any way to do that

i mean like

there is an array ws-array occurs 10 times.

ws-array(1) pic x(03) value 'HAI'.
ws-array(2) pic x(03) calue 'HOW'.

is there any method to implement this since the above mentioined method is giving me compilation error.

please let me know if more details if needed.

thanks

Haseen

[kolusu]

haseen_mohammed,

Please search before posting. Check this link

http://www.mvsforums.com/helpboards/viewtopic.php?t=4327&highlight=array

Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

[haseen_mohammed]

hi,

thanks for the help. it is working and i am able to process it easily.

then again this is related to submitting emailing jcl from program, but i am facing a strange problem.

the jcl i am using is

//TTOI9911 JOB 0,CLASS=I,MSGCLASS=0,NOTIFY=&SYSUID,USER=&SYSUID,
// SCHENV=SAS
//*
//PARALL EXEC SAS,WORK='5000,2000',
// CONFIG='PREV.PEV1.DATA(SASEMAIL)'
//SYSIN DD *
FILENAME MYMAIL EMAIL 'XXXXX@YYY.COM'
SUBJECT='HAI'
;
DATA _NULL_;
FILE MYMAIL;
PUT 'JUST TESTING';
RUN;
/*
//

and
/*EOF for spooling it .

i have declared them in working storage like the method suggested and passed to the spooling cics command.
the cics calls to spool the line are coming out with respcode 0.
but only till
//SYSIN DD *
is gettin written to spool with error message

EXPECTED CONTINUATION NOT RECEIVED

this jcl when submitted directly is working fine and i am gettin email.

can u help on this ..

thanks a lot again ..

haseen.