Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

DYNALLOC macro in Assember -Is there a way to capture in JES

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler
View previous topic :: :: View next topic  
Author Message
sudarshan.srivathsav

New User


Joined: 10 Jul 2012
Posts: 24
Location: USA

PostPosted: Wed May 07, 2014 10:11 pm    Post subject: DYNALLOC macro in Assember -Is there a way to capture in JES
Reply with quote

All,

Iam using DYNALLOC macro to create a DD name for a dsn in my assembler program, but unlike the regular DD names in JCL which comes up as JES2 messages in JESYSMSG .

Example: JES2 ALLOCATED TO SYSOUT

Is there a way to get a similar message for the DD name that iam dynamically allocating in my assembler program?

Any help would be appreciated.

Thanks,
Sudarshan
Back to top
View user's profile Send private message

steve-myers

Active User


Joined: 30 Nov 2013
Posts: 477
Location: The Universe

PostPosted: Wed May 07, 2014 11:02 pm    Post subject:
Reply with quote

Yes, the message is already there. As far as I know you don't have to do anything special.

Just to verify this, I wrote this little program.
Code:
TESTDYN1 CSECT
         USING *,12
         SAVE  (14,12),,*
         LR    12,15
         LA    1,DYNPARM
         DYNALLOC ,
FREEZE   RETURN (14,12),T,RC=0
DYNPARM  DC    A(X'80000000'+DYNRB)
DYNRB    DC    AL1(S99RBEND-S99RB,S99VRBAL,0,0)
         DC    2AL2(0)
         DC    A(TXTPP,0,0)
TXTPP    DC    A(TXT01,X'80000000'+TXT02)
TXT01    DC    AL2(DALSYSOU,1,1),C'Z'
TXT02    DC    AL2(DALDDNAM,1,L'DDNAME)
DDNAME   DC    C'TESTDYN1'
         DC    0D'0'
         PUSH  PRINT
         PRINT NOGEN
         IEFZB4D0 ,
         IEFZB4D2 ,
         POP   PRINT
         END   TESTDYN1
After I ran it,
Code:
IEF237I JES2 ALLOCATED TO TESTDYN1
appeared in the JESYSMSG data set for my TSO session.

The MSGLEVEL JOB statement parameter must be set to capture these messages.
Back to top
View user's profile Send private message
sudarshan.srivathsav

New User


Joined: 10 Jul 2012
Posts: 24
Location: USA

PostPosted: Wed May 07, 2014 11:30 pm    Post subject:
Reply with quote

Thanks Steve
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to Capture the Max return code of... anilkumar922 All Other Mainframe Topics 0 Thu Jan 12, 2017 12:02 pm
No new posts PCOMM macro to call another PCOMM macro boyti ko All Other Mainframe Topics 4 Tue Jul 12, 2016 4:30 pm
No new posts Send parameter for macro STIMERM from... Daniel Teolotitla PL/I & Assembler 13 Tue Jul 05, 2016 9:23 pm
No new posts RACF Easytrieve Plus macro Susan Jackson CA Products 0 Fri Jun 03, 2016 8:25 pm
No new posts Change Data Capture Ron Klop DFSORT/ICETOOL 14 Fri Apr 15, 2016 2:56 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us