MVSFORUMS.com

Every group consists of 4 records, and if a file name matches either FILE1 or FILE2, or FILE4 then I want to write out those group's records to an Output file.

nbdtrjk_1,

Can the file1 , fil ...

Dibakar,

You can use Cryptographic services to encrypt the data

https://www.ibm.com/docs/en/zos/3.2.0?topic=zos-cryptographic-services

You can also use "Data Privacy for Diagnostics&q ...

Suchay,

A few issues.

1. Your first attempt failed because you are using BUILD which cannot see the new fields that you added at the end of the record.
2. You are adding the new key on INREC ...

DEFINE HEX-STATUS W X 2

In our shop we are using the Easytrieve IMU. Does 'X' is the valid in the above definition ?

nbdtrjk_1,

I made it abundantly clear that my code is untested. ...

nbdtrjk_1,

Your question has got NOTHING to do with BITS. You just need to validate a hex value. I am just showing for 1 byte , you can expand it handle all the bytes from 26 to 4055 using an ar ...

if bit values is 0 then do something
if bit values is 8 then do something
if bit values is 1 then do something

can someone help me how to get this done ?

nbdtrjk_1,

Not sure if you rea ...

S1,

It is a little bit tricky as you want to parse and re-arrange based on the denomination value. The following DFSORT JCL will give you the desired results

//STEP0100 EXEC PGM=SORT ...

bauer,

A simple SUPERC in batch for DSN= and PGM= will give you the list of the datasets and programs, however, it wouldn't be able to find which datasets needs to be deleted.

Also unless you ...

For example, in the below statement

$$DD01 COPY MOVE=(1,20,1),MOVE=(76,10C? ?)

in place of 20, I want to use some variable STP which has value 20.
something like this

STP=2 ...

ramy2016,

You need to use the trick of joinkeys matching the file to it self. The second file will count the number of duplicates and upon matching every record has the counter. Now we can just el ...

peterwarren,

Try these untested control cards

//SYSIN DD *
OPTION COPY,VLSCMP
INCLUDE COND=((2363,1,CH,NE,C'Y ...

peterwarren,

It is not clear as to what the real requirement is. Please answer the following questions

1. What is the LRECL and RECFM of the input file?
2. Can the records contain ALL 3 se ...

jathampy,

It is quite simple to replace the variable contents. Here is an untested DFSORT JCL that will give you the desired results.

//SYSIN DD * ...

psivamadhusudhan,

You need to talk to your system programmer if the conversion service is installed. If you are authorized to issue system commands then you can issue the command D UNI,CONV OR
...

psivamadhusudhan,

Sort products do not have the ability to perform character set conversions. However you can use iconv utility to do the conversion. Check this link

https://www.ibm.com/docs/ ...