Portal | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist 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 Member


Joined: 30 Nov 2013
Posts: 859
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 ISPF Edit Macro with profile commands... Lynne Schuler TSO/ISPF 14 Thu Jun 18, 2020 7:25 pm
No new posts TSO and the STAX Assembler Macro mxgdontmics PL/I & Assembler 43 Mon Jun 15, 2020 10:33 am
No new posts Need to open a DSN using REXX & e... Y Marwaha CLIST & REXX 10 Fri Jun 05, 2020 7:30 pm
No new posts How to Assign a Function key to Mainf... upendrasri TSO/ISPF 4 Sat May 30, 2020 9:03 pm
No new posts Mainframe ISPREDIT Macro query upendrasri TSO/ISPF 3 Wed May 27, 2020 1:12 pm

Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us