Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
Get jobname using EZACFSM1
Goto page 1, 2  Next
 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Other Mainframe Topics
Author Message
rajatbagga

Active User


Joined: 11 Mar 2007
Posts: 124
Location: india

PostPosted: Thu Jul 10, 2008 12:58 pm    Post subject: Get jobname using EZACFSM1
Reply with quote

Can anybody tell me how we can write the JOB name into a PS file using EZACFSM1.

Regards,
Rajat
Back to top
View user's profile Send private message
References
PostPosted: Thu Jul 10, 2008 12:58 pm    Post subject: Re: Get jobname using EZACFSM1 Reply with quote

Splitted: Thu Jul 10, 2008 2:26 pm by superk From Topic Job Name in SORT (DFSORT/ICETOOL)
Bill Dennis

Active User


Joined: 17 Aug 2007
Posts: 246
Location: Iowa, USA

PostPosted: Thu Jul 10, 2008 6:55 pm    Post subject:
Reply with quote

Do you want the name of the job executing EZACFSM1 or the job about to be submitted by the EZACFSM1 step?
Back to top
View user's profile Send private message
rajatbagga

Active User


Joined: 11 Mar 2007
Posts: 124
Location: india

PostPosted: Sat Jul 12, 2008 10:21 pm    Post subject: Reply to: Get jobname using EZACFSM1
Reply with quote

hello,

I want the job about to be submitted by the EZACFSM1 step to be written in a PS file.

Regrads,
Rajat
Back to top
View user's profile Send private message
dick scherrer

Global Moderator


Joined: 23 Nov 2006
Posts: 7505
Location: 221 B Baker St

PostPosted: Sat Jul 12, 2008 10:38 pm    Post subject:
Reply with quote

Hello,

I'm confused. . . icon_confused.gif

You mention you want the name and then later you want the job.

Please post what you "have" and what you want to be put into the PS file.

What are you hoping to get in this topic that you did not get in your earlier topic about EZACFSM1?
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 2560
Location: italy

PostPosted: Sat Jul 12, 2008 11:22 pm    Post subject: Reply to: Get jobname using EZACFSM1
Reply with quote

EZACFSM1 will get the jobname of the currently executing job...

how do You expect for EZACFSM1 to find the name of the job being submitted?
the jobname is part of the input, so there should be no need to get it from anywhere
unless there was a language misunderstanding !
Back to top
View user's profile Send private message
rajatbagga

Active User


Joined: 11 Mar 2007
Posts: 124
Location: india

PostPosted: Tue Jul 15, 2008 4:02 pm    Post subject:
Reply with quote

hello,

Yes I want the jobname of the currently executing job to be written in a PS file using EZACFSM1 ...

Regards
Rajat
Back to top
View user's profile Send private message
Bill Dennis

Active User


Joined: 17 Aug 2007
Posts: 246
Location: Iowa, USA

PostPosted: Wed Jul 16, 2008 2:13 am    Post subject:
Reply with quote

JOB1 is executing EZACFSM1 to submit JOB2.

Do you want "JOB1" to be written into a file?

Do you really want to submit JOB2 or are you only trying to get the name of the currently executing job? There are REXX and COBOL samples out here to do that. EZACFSM1 doesn't do that.
Back to top
View user's profile Send private message
rajatbagga

Active User


Joined: 11 Mar 2007
Posts: 124
Location: india

PostPosted: Thu Jul 17, 2008 8:24 am    Post subject:
Reply with quote

hello,

Yes, i want JOB1 to be written into PS file. But I thought EZACFSM1 can also do this. But anyways let me know how a COBOL pgm can do this.

Regards,
Rajat.
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 2560
Location: italy

PostPosted: Thu Jul 17, 2008 2:28 pm    Post subject: Reply to: Get jobname using EZACFSM1
Reply with quote

IIRC it should be possible
try this
Code:

//SYMBOLS EXEC PGM=EZACFSM1       
//SYSOUT    DD  SYSOUT=*           
//SYSIN     DD  *                 
DAY        '&DAY'                 
HHMMSS     '&HHMMSS'               
HR         '&HR'                   
JDAY       '&JDAY'                 
JOBNAME    '&JOBNAME'             
LDAY       '&LDAY'                 
LHHMMSS    '&LHHMMSS'             
LHR        '&LHR'                 
LJDAY      '&LJDAY'               
LMIN       '&LMIN'                 
LMON       '&LMON'                 
LSEC       '&LSEC'                 
LWDAY      '&LWDAY'               
LYR2       '&LYR2'                 
LYR4       '&LYR4'                 
LYYMMDD    '&LYYMMDD'             
MIN        '&MIN'                 
MON        '&MON'                 
SEC        '&SEC'                 
SEQ        '&SEQ'                 
SID        '&SID'                 
SYSCLONE   '&SYSCLONE'             
SYSNAME    '&SYSNAME'             
SYSPLEX    '&SYSPLEX'             
SYSR1      '&SYSR1'               
SYSUID     '&SYSUID'               
WDAY       '&WDAY'                 
YR2        '&YR2'                 
YR4        '&YR4'                 
YYMMDD     '&YYMMDD'               
CCYY/MM/DD '&YR4./&LMON./&LDAY'   
HH:MM:SS   '&HR.:&MIN.:&SEC'       


to find the systems symbols try
http://home.flash.net/~mzelden/mvsutil.html
and look for IPLINFO.TXT
Back to top
View user's profile Send private message
Bill Dennis

Active User


Joined: 17 Aug 2007
Posts: 246
Location: Iowa, USA

PostPosted: Fri Jul 18, 2008 3:17 am    Post subject:
Reply with quote

Follow erico's example with '&JOBNAME' but direct SYSOUT to a dataset.
Back to top
View user's profile Send private message
Anuj D.

Senior Member


Joined: 22 Apr 2006
Posts: 1696
Location: Mumbai, India

PostPosted: Fri Jul 18, 2008 1:05 pm    Post subject:
Reply with quote

Hi,

Use of EZACFSM1 was some what new for me, after Enrico's reply did a little search on this, got to learn enough new. Found a link describing the symbols used, might be usable for someone else as well -

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA1E241/2.2.2
Back to top
View user's profile Send private message
Anuj D.

Senior Member


Joined: 22 Apr 2006
Posts: 1696
Location: Mumbai, India

PostPosted: Fri Jul 18, 2008 3:38 pm    Post subject:
Reply with quote

Hi,

I tried the JOB to do what is being discussed in this thread -
Code:
//SYMBOLS EXEC PGM=EZACFSM1                               
//SYSOUT    DD  DSN=HLQ.JOBNAE.IN.PS,DISP=(,CATLG)     
//SYSIN     DD  *                                         
JOBNAME    '&JOBNAME'                                     
/*                                                         


Now the Data Set "HLQ.JOBNAE.IN.PS" is present under ISRDDN, how & why ? Please suggest.
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 2560
Location: italy

PostPosted: Fri Jul 18, 2008 3:44 pm    Post subject: Reply to: Get jobname using EZACFSM1
Reply with quote

Quote:
Now the Data Set "HLQ.JOBNAE.IN.PS" is present under ISRDDN, how & why ? Please suggest.


sometimes a dataset is left around after a browse ( just checked )
strange enough but happens for PS datasets, not for PDS
Back to top
View user's profile Send private message
Bill Dennis

Active User


Joined: 17 Aug 2007
Posts: 246
Location: Iowa, USA

PostPosted: Fri Jul 18, 2008 7:14 pm    Post subject:
Reply with quote

If you used ISPF 3.2 to create the file it probably stays allocated as enrico said. You can use TSO command FREE FILE(ddname) to unallocate it.
Back to top
View user's profile Send private message
Anuj D.

Senior Member


Joined: 22 Apr 2006
Posts: 1696
Location: Mumbai, India

PostPosted: Mon Jul 21, 2008 11:01 am    Post subject:
Reply with quote

Hi Bill,
Bill Dennis wrote:
If you used ISPF 3.2 to create the file it probably stays allocated as enrico said.
No, I didn't allocate it using 3.2, instead it was created in the JOB due to the below statement of the JOB posted in previous post of mine,
Code:
//SYSOUT    DD  DSN=HLQ.JOBNAE.IN.PS,DISP=(,CATLG)


Quote:
You can use TSO command FREE FILE(ddname) to unallocate it.
ok thanks, but it was there on Friday ( July 18,2008 IST) , when I logged in to mainframes today (Monday, July 21,2008 IST) it's not there, what should I conclude..? Please assist.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Other Mainframe Topics All times are GMT + 6 HoursGoto page 1, 2  Next
Page 1 of 2