|
|
| Author |
Message |
nitishniki
New User
Joined: 27 Dec 2007
Posts: 10
Location: Banglore
|
|
|
|
I have a job which is passing 64 values as parameter to a focus program.
Now I have to put it into production it. So I have to make a seperate job and have to call a proc and I have to pass parameter to program, through the proc. Can anybody suggest the right way to do it? |
|
| Back to top |
|
 |
References
|
 Posted: Wed Jul 02, 2008 9:31 pm Post subject: Re: Passing 64 values as parameter to a focus program |
|
|
|
|
| Splitted: Wed Jul 02, 2008 11:06 pm by superk From Topic Adding a step into a proc from JCL. (JCL) |
dick scherrer
Global Moderator
Joined: 23 Nov 2006
Posts: 7505
Location: 221 B Baker St
|
|
|
|
Hello,
If you post the jcl you are testing, we may be able to suggest ways to proceed with making it production ready.
If there are certain things you must do or may not do, please post these "rules" and save some false starts. |
|
| Back to top |
|
|
nitishniki
New User
Joined: 27 Dec 2007
Posts: 10
Location: Banglore
|
|
|
|
Hi Dick,
tnx for ur response, i am posting the sisin card here..
//SYSOUT DD SYSOUT=A
//SYSIN DD *
EX ZZZVAA
072006,082006,092006,102006,112006,122006,012007,022007,
032007,042007,052007,062007,072007,082007,092007,102007,
NWREGN,NWREGN.
EX ZZZVAA 072006,082006,092006,102006,112006,122006,012007,022007,
032007,042007,052007,062007,072007,082007,092007,102007,
SWREGN,SWREGN.
EX ZZZVAA 072006,082006,092006,102006,112006,122006,012007,022007,
032007,042007,052007,062007,072007,082007,092007,102007,
MWREGN,MWREGN.
EX ZZZVAA 072006,082006,092006,102006,112006,122006,012007,022007,
032007,042007,052007,062007,072007,082007,092007,102007,
SOREGN,SOREGN.
EX ZZZVAA 072006,082006,092006,102006,112006,122006,012007,022007,
032007,042007,052007,062007,072007,082007,092007,102007,
NEREGN,NEREGN.
EX ZZZVAA 072006,082006,092006,102006,112006,122006,012007,022007,
032007,042007,052007,062007,072007,082007,092007,102007,
SEREGN,SEREGN.
EX ZZZVAA 072006,082006,092006,102006,112006,122006,012007,022007,
032007,042007,052007,062007,072007,082007,092007,102007,
HOMOFF,HOMOFF.
**************************** Bottom of Data ****************************
I have to move it to production , previously it was running manualy.
Here problem comes as I have to covert this jcl into proc step and i have to pass these values(in proc) tru utypsym which is again cannot take parameter length more than 100. so,
question is how i productionise it.
did u get my problem..
tnx |
|
| Back to top |
|
|
Bill Dennis
Active User
Joined: 17 Aug 2007
Posts: 247
Location: Iowa, USA
|
|
|
|
| Why does the production version use a PARM while this version uses SYSIN? |
|
| Back to top |
|
|
dick scherrer
Global Moderator
Joined: 23 Nov 2006
Posts: 7505
Location: 221 B Baker St
|
|
|
|
Hello,
Hmmmm. . . I believe the "rules" confuse me (as Bill mentions) 
Is there some reason you cannot copy the "parm" data into some pds member and change the //SYSIN DD to name that pds(member) rather than DD *?
Most environments have a "control lib" that exists just for such requirements. |
|
| Back to top |
|
|
nitishniki
New User
Joined: 27 Dec 2007
Posts: 10
Location: Banglore
|
|
|
|
you r right dick, but that is only can done when, u have static data or constants
but here my problem is: it has to update every month like, one new month will be added and one old month will be truncated and it has to be done autometicaly tru esp or ajs.
r u getting till now if yes reply back then i ll discuss next problem
tnx in adv for showing interest |
|
| Back to top |
|
|
dick scherrer
Global Moderator
Joined: 23 Nov 2006
Posts: 7505
Location: 221 B Baker St
|
|
|
|
Hello,
| Quote: |
| it has to update every month like, one new month will be added and one old month will be truncated |
Yes, it is quite common for control informaton to be updated periodically. This is not usually a big deal? Some process is implemented to create new control info and this process is scheduled to be done before the job(s) using the control info execute. |
|
| Back to top |
|
|
nitishniki
New User
Joined: 27 Dec 2007
Posts: 10
Location: Banglore
|
|
|
|
Yes, you r right, now these parameter has to be copied into the file and the location of file would be given to sisin in the proc.
here in ibm one utility utypsym is there which dynamically resolve the parameter in the file like if i pass date as a parameter in the utypsym it will resolve date as 200807 in the file dynamically ... its like
EX PGMNAME &DATE in sysin pds(mem) will be resolve as EX PGMNAME 200807
FOR LENGTH UPTO 100 WE CAN PASS AS A PARAMETER IN UTYPSYM , BUT IT IS MORE THAN THAT.
SO QUESTION IS HOW TO PASS IT DYNAMICALLY..
HOPE U UNDERSTAND
TNX |
|
| Back to top |
|
|
dick scherrer
Global Moderator
Joined: 23 Nov 2006
Posts: 7505
Location: 221 B Baker St
|
|
|
|
Hello,
TURN YOUR CAPS OFF. . .
Yes, i understand - so far, you do not. . .
| Quote: |
| SO QUESTION IS HOW TO PASS IT DYNAMICALLY.. |
You dynamically replace the contents of the sysin file before each execution - you will not pass all of the data dynamically in some parm.
| Quote: |
| EX PGMNAME &DATE in sysin pds(mem) will be resolve as EX PGMNAME 200807 |
This example shows a symbolic parameter which will not work for your requirement. You will probably not use UTYPSYM for this data. You must implement a process that either updates the old set of parms or creates a new set for each month. |
|
| Back to top |
|
|
nitishniki
New User
Joined: 27 Dec 2007
Posts: 10
Location: Banglore
|
|
|
|
do u know such utility which does same as u mentioned..
please let me know if any...
tnx  |
|
| Back to top |
|
|
dick scherrer
Global Moderator
Joined: 23 Nov 2006
Posts: 7505
Location: 221 B Baker St
|
|
|
|
Hello,
Who/what is responsible for the monthly change in the control informaton that is used by Focus?
What part of the control info changes each month? Other than the region specification, the series of months and years is the same - and they end last October?
If the control info posted is "last month" what will the control informaton for "this month" contain? |
|
| Back to top |
|
|
|
|
|
