Search found 47 matches

by raulravi
Wed Dec 03, 2014 6:22 pm
Forum: DFSORT , ICETOOL & Utilities
Topic: If Then & When in DFSORT / ICETOOL
Replies: 3
Views: 2609

Find and replace text in a PDS member: I think this is the right question. File1 ----+----1----+----2----+----3----+----4----+----5 ***************************** Top of Data ******** NUMBER 99999 OUTPUT IS A PDS MEMBER WHICH IS EXPECTED TO LOOK LIKE: ----+----1----+ *************** NAME -- ABD DEPT ...
by raulravi
Wed Dec 03, 2014 5:56 pm
Forum: DFSORT , ICETOOL & Utilities
Topic: If Then & When in DFSORT / ICETOOL
Replies: 3
Views: 2609

Hi William Collins,

What if the file three is a data card member?
is it still possible?

FILE1 = INPUT 1
FILE2 = INPUT2
SORTOUT DD DSN=AAAA.BBBB.CCCC(DATACARD),DISP=OLD

?
by raulravi
Mon Nov 17, 2014 1:31 pm
Forum: DFSORT , ICETOOL & Utilities
Topic: If Then & When in DFSORT / ICETOOL
Replies: 3
Views: 2609

If Then & When in DFSORT / ICETOOL

Find and replace records in file 2 from file1 FILE1 ----+----1----+----2----+----3----+----4----+----5 ***************************** Top of Data ******** NAME AAAAA ROLL NUMBER 12345 CLASS SEVEN SUBJECT MATHS FILE2 ----+----1----+----2----+ ************************* MY NAME IS XXXXX XXXXX IS MY ROLL...
by raulravi
Mon Aug 04, 2014 1:20 pm
Forum: DFSORT , ICETOOL & Utilities
Topic: X'1F' as Delimiter in DFSORT of Icetool
Replies: 1
Views: 1486

X'1F' as Delimiter in DFSORT of Icetool

Hi,

I do have a input file as below, to which i need to add X'1F' (Unit Seprator) as a delimiter.

Is it possible to use X'1F' as Delimiter in DFSORT of Icetool ?

Regards,
Raul
by raulravi
Thu Mar 27, 2014 11:21 am
Forum: DFSORT , ICETOOL & Utilities
Topic: Special Char ~ is not displayed in SYSOUT
Replies: 1
Views: 1957

Special Char ~ is not displayed in SYSOUT

Hi, I am trying to place a delimiter ~ in a Flat file as below: //S1 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //SORTIN DD * EMP# EMPNAME EMPEXPER 111 AAAA 1 1112 BC 10 12 DBAC 2 /* //SORTOUT DD SYSOUT=* //SYSIN DD * OPTION COPY INREC BUILD=(1,60,SQZ=(SHIFT=LEFT,MID=C'~')) /* When i look in...
by raulravi
Thu Jul 11, 2013 12:19 pm
Forum: DFSORT , ICETOOL & Utilities
Topic: to merge 2 records of the input file using SORT
Replies: 18
Views: 23107

Merge duplicate records in the same file

Input file: (FB/80) OWGU801D @@DB2DSN OWGU801D G@OWFSOR OWGU802D @@DB2DSN OWGU802D G@OWFCRD OWGU801D G@OWFRRR I have to merge the two records in the I/P file based on the key(1:8) Expected Output file: (FB/80) OWGU801D @@DB2DSN / G@OWFSOR / G@OWFRRR OWGU802D @@DB2DSN / G@OWFCRD Is there any way to d...
by raulravi
Mon Jan 07, 2013 6:20 pm
Forum: DFSORT , ICETOOL & Utilities
Topic: Multiple Conditions to Copy a File
Replies: 7
Views: 5996

Dear William,

As i said earlier, i am scared and confused with that complex code. Can you help me out with some simple one.

Regards,
Raul
by raulravi
Mon Jan 07, 2013 3:22 pm
Forum: DFSORT , ICETOOL & Utilities
Topic: Multiple Conditions to Copy a File
Replies: 7
Views: 5996

OK let me put it clearly I want to copy the file if it is like this "00","01082012","070516","RBSSUAMIR" "01","1000009917","1234001","User 001" "01","1000010059","1234017","User 022" "01","1000009955","1234007","User 007" "01","1000009964","1234008","User 008" "01","1000009986","1234010","User 012" ...
by raulravi
Mon Jan 07, 2013 12:23 pm
Forum: DFSORT , ICETOOL & Utilities
Topic: Multiple Conditions to Copy a File
Replies: 7
Views: 5996

Multiple Conditions to Copy a File

I have a File as below "00","01082012","070516","RBSSUAMIR" "01","1000009917","1234001","User 001" "01","1000010059","1234017","User 022" "01","1000009955","1234007","User 007" "01","1000009964","1234008","User 008" "01","1000009986","1234010","User 012" "99","01082012","070516","RBSSUAMIR" I want t...
by raulravi
Tue Oct 16, 2012 9:00 am
Forum: DFSORT , ICETOOL & Utilities
Topic: Checking Header & Trailer
Replies: 12
Views: 9615

Pardon me , i could'nt get that... Its very complex & Vague.

Can you make it simple & clear?
by raulravi
Mon Oct 15, 2012 5:48 pm
Forum: DFSORT , ICETOOL & Utilities
Topic: Checking Header & Trailer
Replies: 12
Views: 9615

Code: Select all

ICE201I H RECORD TYPE IS F - DATA STARTS IN POSITION 1                         
ICE751I 0 C5-K62149 C6-K90026 C7-K58148 C8-K67572 E4-K58148 C9-BASE   E5-K72040
by raulravi
Mon Oct 15, 2012 1:53 pm
Forum: DFSORT , ICETOOL & Utilities
Topic: Checking Header & Trailer
Replies: 12
Views: 9615

My Objective is to copy the File only if it has got Both Header & Trailer Record.

If Trailer Record is not present, i will have to stop the copying..
by raulravi
Mon Oct 15, 2012 1:13 pm
Forum: DFSORT , ICETOOL & Utilities
Topic: Checking Header & Trailer
Replies: 12
Views: 9615

But how to verify that the file has got the Trailer record at the end?
by raulravi
Mon Oct 15, 2012 9:34 am
Forum: DFSORT , ICETOOL & Utilities
Topic: Checking Header & Trailer
Replies: 12
Views: 9615

Yes William,

A non-zero return code should do i guess.

In my next JSTEP i will place a check If RC=0 proceed else stop.

Ravi
by raulravi
Fri Oct 12, 2012 5:06 pm
Forum: DFSORT , ICETOOL & Utilities
Topic: Checking Header & Trailer
Replies: 12
Views: 9615

Sample File

Code: Select all

UHDR 20120811 AAAA xxx
000001 160000
000002 150000
000003 150005
000004 151000
000005 151999
UTRL 20120811 00005 xxx
Read the file, if there is no Trailer record, we have to abend the JOb.