PL/I for AIX

 View Only
Expand all | Collapse all

Get real DSN Name provided via DDNAME

  • 1.  Get real DSN Name provided via DDNAME

    Posted Fri July 18, 2014 03:09 AM

    Originally posted by: JustAFreeName


    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

     

     

     

     

     



  • 2.  Re: Get real DSN Name provided via DDNAME

    Posted Fri July 18, 2014 06:51 AM

    Originally posted by: JustAFreeName


    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.

     



  • 3.  Re: Get real DSN Name provided via DDNAME

    Posted Mon August 04, 2014 11:51 AM

    Originally posted by: Patrick_Vogt (SKY)


    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.