Re: DFSort Report question

2024-04-22 Thread Sri Hari Kolusu
>> What I would like to do is change LEGACY/KDFAES to PASSPHRASE if possible.

Lionel,

You just want to change the ON value and not the header.  Assuming you have a 
COPY/SORT step to filter the data, you can change the values there.  I am 
showing for position 21, but you can change to that 616 in the control cards

//STEP0100 EXEC PGM=ICETOOL
//TOOLMSG  DD SYSOUT=*
//DFSMSG   DD SYSOUT=*
//IN   DD *
A   LEGACY
B   KDFAES
C   NOPHRASE
D   LIONEL
//T1   DD DSN=&,DISP=(,PASS),SPACE=(TRK,(1,0),RLSE)
//REPORT   DD SYSOUT=*
//TOOLIN   DD *
  COPY FROM(IN) TO(T1) USING(CTL1)
  DISPLAY FROM(T1) LIST(REPORT)   -
 HEADER('Rectype')ON(001,01,CH)   -
 HEADER('PassPhrase') ON(021,10,CH)
/*
//CTL1CNTL DD *
  INREC OVERLAY=(021:21,10,CHANGE=(10,C'LEGACY',C'PASSPHRASE',
  C'KDFAES',C'PASSPHRASE'),
  NOMATCH=(21,10))
/*

The output from this is.

RectypePassPhrase
   
A  PASSPHRASE
B  PASSPHRASE
C  NOPHRASE
D  LIONEL


Hope that is what you want.

PS: if you don't have COPY/SORT pass before the DISPLAY , then you can do it 
using traditional reporting features.

Thanks,
Kolusu
DFSORT Development
IBM Corporation



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: DFSort Report question

2024-04-22 Thread Lionel B. Dyck
In this case here is a sample record

HEADER('PassPhrase') ON(616,10,CH)

The ON value found in the input could be "LEGACY", "KDFAES" or "NOPHRASE".

What I would like to do is change LEGACY/KDFAES to PASSPHRASE if possible.

Thanks

Lionel B. Dyck <>< 
Github: https://github.com/lbdyck
System Z Enthusiasts Discord: https://discord.gg/sze

“Worry more about your character than your reputation. Character is what you
are, reputation merely what others think you are.”   - - - John Wooden

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Sri Hari Kolusu
Sent: Monday, April 22, 2024 2:02 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFSort Report question

>> The ON value could be "LEGACY", "KDFAES", "PASSWORD" or "NOPHRASE".

Lionel,

How do you determine which header value need to be used? I am guessing that
it is going to depend on a value in the file. If So we can dynamically
change it.

Thanks,
Kolusu
DFSORT Development
IBM Corporation

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email
to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: DFSort Report question

2024-04-22 Thread Sri Hari Kolusu
>> The ON value could be "LEGACY", "KDFAES", "PASSWORD" or "NOPHRASE".

Lionel,

How do you determine which header value need to be used? I am guessing that it 
is going to depend on a value in the file. If So we can dynamically change it.

Thanks,
Kolusu
DFSORT Development
IBM Corporation

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


DFSort Report question - SYMNAMES DD ?

2024-04-22 Thread Nash, Jonathan S.
Can you set up a constant in the 
SYMNAMES DD to do that ? 

Or is that for different functions ?

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Lionel B. Dyck
Sent: Monday, April 22, 2024 2:25 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: DFSort Report question

Does anyone know who to change the value found in the ON to a more
meaningful value:

For example this:  HEADER('PassPhrase') ON(616,10,CH)

The ON value could be "LEGACY", "KDFAES", "PASSWORD" or "NOPHRASE".

Thanks in advance

Lionel B. Dyck <>< 
Github: https://github.com/lbdyck
System Z Enthusiasts Discord: https://discord.gg/sze

"Worry more about your character than your reputation. Character is what you
are, reputation merely what others think you are."   - - - John Wooden

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


DFSort Report question

2024-04-22 Thread Lionel B. Dyck
Does anyone know who to change the value found in the ON to a more
meaningful value:

For example this:  HEADER('PassPhrase') ON(616,10,CH)

The ON value could be "LEGACY", "KDFAES", "PASSWORD" or "NOPHRASE".

Thanks in advance

Lionel B. Dyck <>< 
Github: https://github.com/lbdyck
System Z Enthusiasts Discord: https://discord.gg/sze

“Worry more about your character than your reputation. Character is what you
are, reputation merely what others think you are.”   - - - John Wooden

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN