syncsort

问题 I want to do following transposing of records into column using SORT (snycsort or DFSORT). It should be scalable to any number of records .Is this possible ? DE001XYX A CD100000 B CD200000 C DE001KKK A CD100000 B DE003ZZZ A DE001XYX A CD100000 B CD200000 C DE001KKK A CD100000 B ........ Transpose DE001XYX CD100000 CD200000 DE001KKK CD100000 DE003ZZZ DE001XYX CD100000 CD200000 DE001KKK CD100000 ..... 回答1: This is one question which I Favorited and longed to solve it myself for quite some time.

问题 I have a request similar to the "JCL for previous month-year in dataset name" question. The answer to that question used an ALTER statement, which assumes knowledge of the date. I have JCL to append the year to the DSN, however in January, I need the previous year. I think this is possible with the help of SYNCSORT or DFSORT, but am not experienced with either of these. Any assistance is appreciated. Here is the current JCL: //B999999X JOB (80594,XXX),'MAKE DATE', // CLASS=C,MSGCLASS=C,NOTIFY

问题 I have a request similar to the "JCL for previous month-year in dataset name" question. The answer to that question used an ALTER statement, which assumes knowledge of the date. I have JCL to append the year to the DSN, however in January, I need the previous year. I think this is possible with the help of SYNCSORT or DFSORT, but am not experienced with either of these. Any assistance is appreciated. Here is the current JCL: //B999999X JOB (80594,XXX),'MAKE DATE', // CLASS=C,MSGCLASS=C,NOTIFY

问题 I am trying to sort a data set and writing into a new data set, Every time i am executing the job, its abending (ABEND=U0016). message form SYSOUT. WER276B SYSDIAG= 24646562, 29667262, 29667262, 27500165 WER164B 307,288K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED, WER164B 0 BYTES RESERVE REQUESTED, 307,272K BYTES USED WER036B G=5174,B=1,BIAS=99 WER162B 75 PREALLOCATED SORTWORK TRACKS, 3,750,000 DYNAMICALLY ALLOCATED, WER162B 26,721,480 ACQUIRED IN 2,230 SECONDARY EXTENTS, 0 RELEASED,

问题 SORT: JOINKEYS FILES=F1,FIELDS=(5,4,A,10,20,A) JOINKEYS FILES=F2,FIELDS=(1,4,A,6,20,A) REFORMAT FIELDS=(F1:10,20,9,1,5,4,30,1,31,10,F2:27,10) JOIN UNPAIRED,F1 INREC BUILD=(1,36,C',',37,10,C',',27,10,SFF,SUB,37,10,SFF, EDIT=(TTTTTT)) OUTPUT IS: *2nd row 4th column is spaces as unpaired from 2nd file, needs to be 0s automatically. 22680372 ,5102, 1, 1,000000 22222222 ,5105, 2, ,000002 OUTPUT shud be: *2nd row 4th column is 0 or 0000s as unpaired from 2nd file, needs to be 0s automatically.

问题 I have two input files, each with length of 5200 bytes. A seven byte key is used to compare both files, if there is a match then it needs to be written to "match" file but while writing to match file I need a few fields from infile1 and all other fields from infile2 . If there is no match then write to no match file. Is it possible to do it in sort ? I know it can be easily done using COBOL program but just want to know in SORT/ICETOOL/Easytrieve Plus (EZTPA00) . 回答1: Since 12,200 people have