Search found 805 matches

by Frank Yaeger
Fri Sep 02, 2011 2:47 am
Forum: DFSORT , ICETOOL & Utilities
Topic: WIDTH(28) not valid for OCCUR?
Replies: 7
Views: 8902

Kind of arbitrary, but FBA/121 was popular for reports way back when. :lol:
by Frank Yaeger
Fri Sep 02, 2011 1:02 am
Forum: DFSORT , ICETOOL & Utilities
Topic: WIDTH(28) not valid for OCCUR?
Replies: 7
Views: 8902

For OCCUR, the description of WIDTH(n) points to DISPLAY: WIDTH(n) See the discussion of this operand on the DISPLAY statement in "DISPLAY Operator" in topic 7.8. For DISPLAY, the description of WIDTH(n) says: WIDTH(n) Specifies the line length and LRECL you want ICETOOL to use for your list data se...
by Frank Yaeger
Mon Aug 29, 2011 10:44 pm
Forum: JCL
Topic: Need your help ....compare 2 files using ICETOOL and SPLICE
Replies: 33
Views: 31575

You have to generate symbols for each field (p,m) you need, e.g. BLD1,223,11 BLD2,241,12 BLD3,253,192 (BLD1,16:C'INS',19:BLD2,31:BLD3) You can also generate symbols for the columns if necessary, e.g. COLA,16 COLB,19 COLC,31 (BLD1,COLA:C'INS',COLB:BLD2,COLC:BLD3) You'll need to use DFSORT's arithmeti...
by Frank Yaeger
Fri Aug 26, 2011 10:24 pm
Forum: JCL
Topic: Need your help ....compare 2 files using ICETOOL and SPLICE
Replies: 33
Views: 31575

Ok, this should get you started: //S1 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSG DD SYSOUT=* //IN DD DSN=... input file1 (FB/n) //T1 DD DSN=&&T1,UNIT=SYSDA,SPACE=(TRK,(1,1)),DISP=(,PASS) //SYM DD DSN=&&S1,UNIT=SYSDA,SPACE=(TRK,(1,1)),DISP=(,PA...
by Frank Yaeger
Thu Aug 25, 2011 10:22 pm
Forum: JCL
Topic: Need your help ....compare 2 files using ICETOOL and SPLICE
Replies: 33
Views: 31575

If there are 6 to 7 segments having different LRECL and Same format as FB then can we consolidate to one PROC with different jobs? Well, theoretically it would be possible. You could convert the first record of the input file to VB, determine it's FB LRECL as RDW length-4 and then generate symbols ...
by Frank Yaeger
Wed Aug 24, 2011 10:10 pm
Forum: JCL
Topic: Need your help ....compare 2 files using ICETOOL and SPLICE
Replies: 33
Views: 31575

You've changed your requirement so many times now that I don't know what you want any more. Your code is working properly to create these 3 files. Only I have a question for OUTput file1 to 4 as described in previous post. And date issue. I've answered the date question above. I don't know what your...
by Frank Yaeger
Wed Aug 24, 2011 10:05 pm
Forum: JCL
Topic: Need your help ....compare 2 files using ICETOOL and SPLICE
Replies: 33
Views: 31575

Will it support if Both the input files have close to 1 million records each ?
Yes.
by Frank Yaeger
Wed Aug 24, 2011 10:03 pm
Forum: JCL
Topic: Need your help ....compare 2 files using ICETOOL and SPLICE
Replies: 33
Views: 31575

The system shoud take the date automatically on which comparison has happened. For example, if comparison is done on 08/24/2011 then in output file, it should take the date as 08/24/2011 automatically. We should not hard code the value as below. //SYMNAMES DD * CRDATE,'05/15/2011' You can use: //SY...
by Frank Yaeger
Wed Aug 24, 2011 12:50 am
Forum: JCL
Topic: Need your help ....compare 2 files using ICETOOL and SPLICE
Replies: 33
Views: 31575

You can use a DFSORT job like the following to do what you asked for (hopefully, I got the field positions right): //S1 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //SYMNAMES DD * CRDATE,'05/15/2011' //IN1 DD DSN=... Prior file //IN2 DD DSN=... Current file //OUT1 DD DSN=... output file1 //OUT2 DD DSN=... ou...
by Frank Yaeger
Mon Aug 22, 2011 11:03 pm
Forum: JCL
Topic: Need your help ....compare 2 files using ICETOOL and SPLICE
Replies: 33
Views: 31575

05/15/2011 KX010 INS 000004 8935201 You've shown me an output record, but not the input records that produce that output record. You say you want INS, UPD and DEL in the output records, but you've only shown an INS output record, not the others, and not the input records that produce each case. So ...
by Frank Yaeger
Fri Aug 19, 2011 9:51 pm
Forum: JCL
Topic: Need your help ....compare 2 files using ICETOOL and SPLICE
Replies: 33
Views: 31575

Could you please help me to solve this issue? Not with the information you supplied. I suspect JOINKEYS would be a better choice here than SPLICE, but I'd need more information to show you how. Please show an example of the records in each input file (relevant fields only) and what you expect for o...
by Frank Yaeger
Wed Aug 10, 2011 9:49 pm
Forum: DFSORT , ICETOOL & Utilities
Topic: Prefix Hex data to data record
Replies: 2
Views: 4176

What is the RECFM and LRECL of your input file and expected output file? Is there something in the header record that identifies it as such (e.g. '0' in position 1)? What? Is there something in the trailer record that identifies it as such (e.g. '9' in posiiton 1)? What? Input file: can be of any le...
by Frank Yaeger
Mon Aug 08, 2011 9:56 pm
Forum: DFSORT , ICETOOL & Utilities
Topic: Getting insufficient space - SYNCSORT
Replies: 6
Views: 9772

Also note, that while the topic is in the DFSORT part of the forum, the question relates to Syncsort.
FYI, this Forum is actually for "DFSORT , ICETOOL & Utilities" questions, so it's the correct place for all sort utility questions.
by Frank Yaeger
Thu Aug 04, 2011 11:21 pm
Forum: DFSORT , ICETOOL & Utilities
Topic: comparing files with icetool
Replies: 6
Views: 7577

the best solution would even be to write all information into one file containing the information n = new (for rows with keys only in file 2) d = deleted (for rows with keys only in file 1) c = changed (for rows with same key in file 1 and 2 but different rest). You can get that with a DFSORT job l...
by Frank Yaeger
Thu Aug 04, 2011 11:18 pm
Forum: DFSORT , ICETOOL & Utilities
Topic: comparing files with icetool
Replies: 6
Views: 7577

You can use these DFSORT control statements to get what you want: * CONTROL STATEMENTS FOR JOINKEYS APPLICATION JOINKEYS F1=INA,FIELDS=(1,7,A),SORTED JOINKEYS F2=INB,FIELDS=(1,7,A),SORTED JOIN UNPAIRED,F1,F2 REFORMAT FIELDS=(F1:1,13,F2:1,13,?) * CONTROL STATEMENTS FOR MAIN TA...