Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums 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: 672
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 Calling and updating SAS Macro variab... Yogesh Jaiswal All Other Mainframe Topics 7 Thu Oct 11, 2018 12:37 pm
No new posts SMF IFAMGET macro GTPB_RETURNEDLENGT... ironheinrich7 IBM Tools 0 Thu Aug 02, 2018 6:53 pm
No new posts SMF IFAMGET macro GTPB_RETURNEDLENGT... ironheinrich7 PL/I & Assembler 0 Fri Jul 13, 2018 7:56 pm
No new posts IBM Pcomm macro startmacro command do... JGregoire IBM Tools 0 Wed May 09, 2018 12:16 pm
No new posts reg query on DYNALLOC feature raghuraman123 SYNCSORT 12 Wed Jan 10, 2018 2:42 pm

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