MVSFORUMS.com

[sudoku]

Hi,

I have a VB file and need to do the following:

Fetch H01 and F01 (1st and 2nd record) to sort file output

If on H01 record 20th column is 'RAW'
and
If on F01 record 24th column is 'R'

[Frank Yaeger]

It's not clear what you want to do here. If you want to write the H01 record to the output file if it has 'RAW' and write the F01 record to the output file if it has 'R', then you can use this DFSORT INCLUDE statement:

[sudoku]

Thanks Frank,

I have a VB file with following record type:
======================
H01 RAW .
F01 R .
B01
B01
B01
T01
======================
In want to check if Header H01 has 'RAW' on column 20 and
F01 record has 'R' on column 24

If true write the 2 records H01 and F01 to ouput file
Else write nothing

So for the above record layout the output should look like:

======================
H01 RAW .
F01 R .
======================

I tried running using SORT pgm and the INCLUDE control card you mentioned
but its failing with U016

Thanks,
Sudoku

[Frank Yaeger]

Do you mean that you want to write the two records only if the conditions for both records are true?

That would be the case for the example you showed.

But would you want no records written for these two cases where only one record meets the condition?

Case1:

H01 XXX .
F01 R .
B01
B01
B01
T01

Case 2:

H01 RAW .
F01 X .
B01
B01
B01
T01

[sudoku]

Yes Frank!

I would like to have the two records "only if" condition for both the records are met.
Else it should be empty.

Expected output for Case1 and Case2:

Case1: (empty)


Case2: (empty)


Thanks,
Sudoku

[Frank Yaeger]

Here's a DFSORT/ICETOOL job that will do what you asked for: