IC5Notice: We have upgraded developerWorks Community to the latest version of IBM Connections. For more information, read our upgrade FAQ.
Topic
  • 2 replies
  • Latest Post - ‏2014-08-04T15:50:40Z by SKY@AXA
JustAFreeName
JustAFreeName
10 Posts

Pinned topic Get real DSN Name provided via DDNAME

‏2014-07-18T07:09:15Z |

Hi all!

I have a simple request.

Kontext: PL/1 running on z/OS.

I'm processing files. The files are referenced via DDNAME JCL.

For logging it would be helpful to obtain the real DSN-Name which is accessed through the DDNAME.

To make myself clear, here an example:

//STEP     EXEC PGM=PGMXXX,PARM=('...')
//SYSPRINT DD  SYSOUT=*
//IXMLMBR  DD  DISP=SHR,DSN=AG.AW.ACE.CONNECT.TO.DATASRC.XML.MASTER(XMLIN)

I want to log from PGMXXX

"Processing InputFile AG.AW.ACE.CONNECT.TO.DATASRC.XML.MASTER(XMLIN)"

Is there an PL1 interface which gets the DSN-Name for the DDNAME IXMLMBR?

Any answer is welcomed.

Thy, JustAFreeName

 

 

 

 

 

  • JustAFreeName
    JustAFreeName
    10 Posts

    Re: Get real DSN Name provided via DDNAME

    ‏2014-07-18T10:50:41Z  

    Hi all!

    After searching the internet, I found an answer to my question.

    The PL/1 Language Reference Manual, Chapter 19 "Built-in functions" describes FILEDDWORD();

    FILEDDWORD( IXMLMBR, 'FILENAME');

    It returns the full qualitifed DSN.

    Question is answered, no further acrion required.

    Thx.

     

  • SKY@AXA
    SKY@AXA
    4 Posts

    Re: Get real DSN Name provided via DDNAME

    ‏2014-08-04T15:50:40Z  

    Hi all!

    After searching the internet, I found an answer to my question.

    The PL/1 Language Reference Manual, Chapter 19 "Built-in functions" describes FILEDDWORD();

    FILEDDWORD( IXMLMBR, 'FILENAME');

    It returns the full qualitifed DSN.

    Question is answered, no further acrion required.

    Thx.

     

    Thank you ! Something i need sometimes and found somewhere else (Assembler macros) but i did not know that it is that easy on PL/I.