Need to create control card using flag from i/p file

leo_sangha · New User Joined: 11 Aug 2005 Posts: 85 Location: England

Hi,

I want to create two separate control cards using a flag(6th position) in the Input File using DFSORT/ICETOOL. Is this possible?

Sample Input Data:
---------------------
00020L
00020R

Requirement:
--------------
IF the flag = 'L' THEN output control card should look like

LOAD DATA
RESUME YES
INTO TABLE
PART
00020(this is the 1st 5 bytes from the input file)
TABLE STRUCTURE

IF the flag = 'R' THEN output control card should look like

LOAD DATA
RESUME YES
INTO TABLE
PART
00020(this is the 1st 5 bytes from the input file)
REPLACE
TABLE STRUCTURE

Please let me know if this can be done.

Thanks

shankar.v · Posted: Wed Aug 29, 2007 6:25 pm

leo_sangha · New User Joined: 11 Aug 2005 Posts: 85 Location: England

Thanks Shankar,

i can try this 2mrw, just one question .. i hope i can give input file also where you have specified the input data DD statement SORTIN

// EXEC PGM=SORT
//SORTIN DD *
00020L
00020R
/*

//SORTIN DD DSN=INPUT.FILE,DISP=SHR

Regards
Manpreet

dick scherrer · Posted: Wed Aug 29, 2007 11:39 pm

Hello,

Yes, you can use a file as input.

leo_sangha · New User Joined: 11 Aug 2005 Posts: 85 Location: England

Thanks Shankar & Dick Scherrer,

Sort is working fine. Appreciate all your help.

Thanks & Regards