search a string - OMIT OVERLAY

[anu.slaksh]

Here is my requirement,

i have ps file with record length 42.
1-9 is employee id
10-42 is employee name..

in this file i need to search for a string 'JACK'. If this is present in any position from 10 - 42 this record has to be reported or else if 'JACK' is the only string found from 10 - 42 position that record has to be skipped.
for example.

Code: Select all

emp - id    emp-name
xxxxxxxxxJACK HENDRY
aaaaaaaaaHARRIS JACK
bbbbbbbbb     JACK

here, the third record has to be skipped as the string 'JACK' is not preceeded or followed by any other string.

Can this be done in sort??
if so can anyone tell the possible ways..

[Frank Yaeger]

By "skipped", do you mean deleted?
By "reported", do you mean included?

What do you want to do if JACK is NOT found anywhere in the field?

To make it clear what you want to do, show me the output records you would expect for the following input records.

Code: Select all

xxxxxxxxxJACK HENDRY
aaaaaaaaaHARRIS JACK
bbbbbbbbb     JACK
yyyyyyyyy HARRIS
ccccccccc   JOHN HARRIS
zzzzzzzzz  JACK JACK
qqqqqqqqq   JACKIE
rrrrrrrrr JACKIE CHAN
mmmmmmmmm  HIJACK
aaaaaaaaa  NO HIJACK

[anu.slaksh]

as per my requirement,

the output should be:
xxxxxxxxxJACK HENDRY
aaaaaaaaaHARRIS JACK
yyyyyyyyy HARRIS
ccccccccc JOHN HARRIS
zzzzzzzzz JACK JACK
qqqqqqqqq JACKIE
rrrrrrrrr JACKIE CHAN
mmmmmmmmm HIJACK
aaaaaaaaa NO HIJACK

Hope this clears your query

[Frank Yaeger]

So you just want to delete any records that only have 'JACK' and keep all the other records. You can use this DFSORT job:

Code: Select all

//S1    EXEC  PGM=ICEMAN
//SYSOUT    DD  SYSOUT=*
//SORTIN DD DSN=...  input file (FB/42)
//SORTOUT DD DSN=...  output file (FB/42)
//SYSIN    DD    *
  OPTION COPY
  INREC OVERLAY=(43:10,33,JFY=(SHIFT=LEFT))
  OUTFIL OMIT=(43,33,CH,EQ,C'JACK'),BUILD=(1,42)
/*