|
View previous topic :: View next topic
|
| Author |
Message |
reach2abhinavtyagi
New User
Joined: 04 Aug 2016
Posts: 7
Location: India
|
|
|
|
Hi,
I am running a JOINKEY on 2 Fixed length files to identify delta records between the two files as below.
JOINKEYS F1=CURRFL,FIELDS=(1,10,A)
JOINKEYS F2=PREVFL,FIELDS=(1,10,A)
JOIN UNPAIRED
REFORMAT FIELDS=(F1:1,4351,?,F2:1,4351)
OUTFIL REMOVECC,OMIT=(1,4351,CH,EQ,4353,4351,CH),
IFTHEN=(WHEN=(4352,1,CH,EQ,C'1'),BUILD=(1,4351,C'I')),
IFTHEN=(WHEN=(4352,1,CH,EQ,C'2'),BUILD=(4353,4351,C'D')),
IFTHEN=(WHEN=(NONE),BUILD=(1,4351,C'U'))
Issues.
When I am running the same code for FB files of length say 198 with relevant modifications, it works fine. However, When I run it for FB Files of length 4351, it abends with RC = 16
JOINKEYS APPLICATION TERMINATED - SEE DFSMSG MESSAGES
DFSMSG - Doesn't give clarity on the reason of failure.
Please suggest. Thanks.
Regards
Abhinav |
|
| Back to top |
|
 |
Joerg.Findeisen
Senior Member
Joined: 15 Aug 2015
Posts: 1429
Location: Bamberg, Germany
|
|
|
|
Remember to use code tags when presenting code/data to the forum.
Show all (error) messages of your job, please. See also REGION Size of you job. |
|
| Back to top |
|
|
reach2abhinavtyagi
New User
Joined: 04 Aug 2016
Posts: 7
Location: India
|
|
|
|
Hi,
I have tried with REGION=0M, still it fails.
The number of records in the CURRENT and PREV file are < 500.
Regards
Abhinav |
|
| Back to top |
|
|
Joerg.Findeisen
Senior Member
Joined: 15 Aug 2015
Posts: 1429
Location: Bamberg, Germany
|
|
|
|
| What error messages are you seeing? It's hard to guess what is wrong without more information. |
|
| Back to top |
|
|
sergeyken
Senior Member
Joined: 29 Apr 2008
Posts: 2264
Location: USA
|
|
|
|
| reach2abhinavtyagi wrote: |
| Code: |
| JOINKEYS APPLICATION TERMINATED - SEE DFSMSG MESSAGES |
DFSMSG - Doesn't give clarity on the reason of failure. |
Where exactly did you try to find those DFSMSG messages? |
|
| Back to top |
|
|
reach2abhinavtyagi
New User
Joined: 04 Aug 2016
Posts: 7
Location: India
|
|
|
|
There is a member in Spool with name DFSMSG - Excerpts from this are given below.
ORIGINAL STATEMENTS FROM CTL2CNTL FOLLOW
JOINKEYS F1=CURRFL,FIELDS=(REC-KEY,A)
JOINKEYS F2=PREVFL,FIELDS=(REC-KEY,A)
JOIN UNPAIRED
REFORMAT FIELDS=(F1:FULL-REC,?,F2:FULL-REC)
OUTFIL REMOVECC,OMIT=(CURR-REC,EQ,PREV-REC),
IFTHEN=(WHEN=(REC-FLAG,EQ,C'1'),BUILD=(CURR-REC,C'I')),
IFTHEN=(WHEN=(REC-FLAG,EQ,C'2'),BUILD=(PREV-REC,C'D')),
IFTHEN=(WHEN=(NONE),BUILD=(CURR-REC,C'U'))
ORIGINAL STATEMENTS FROM PARMLIST FOLLOW
DEBUG NOABEND,ESTAE
OPTION MSGDDN=DFSMSG,LIST,MSGPRT=ALL,RESINV=0,SORTDD=CTL2,SORTOUT=TEMP
,DYNALLOC
SORT FIELDS=COPY
PERFORMING SYMBOL SUBSTITUTION AS NEEDED
THIS IS THE JOINKEYS MAIN TASK FOR JOINING F1 AND F2
JOINKEYS IS USING THE F1 SUBTASK FOR CURRFL - SEE JNF1JMSG MESSAGES
JOINKEYS IS USING THE F2 SUBTASK FOR PREVFL - SEE JNF2JMSG MESSAGES
JOINED RECORDS: TYPE=F, LENGTH=8703
JOINED RECORDS: TYPE=F, LENGTH=8703
RECORD TYPE IS F - DATA STARTS IN POSITION 1
INVALID FIELD OR CONSTANT IN TEMP2 IFTHEN 0 CONDITION 1
C5-I90068 C6-I90068 C7-I76949 C8-I75151 E9-I77769 E7-I76949
BLOCKSET COPY TECHNIQUE SELECTED
VISIT www.ibm.com/storage/dfsort FOR DFSORT PAPERS, EXAMPLES AN
- CONTROL STATEMENTS FOR 5650-ZOS, Z/OS DFSORT V2R4 - 07:27 ON TUE MA
JOINKEYS F1=CURRFL,FIELDS=(1,10,A)
JOINKEYS F2=PREVFL,FIELDS=(1,10,A)
JOIN UNPAIRED
REFORMAT FIELDS=(F1:1,4351,?,F2:1,4351)
OUTFIL REMOVECC,OMIT=(1,4351,CH,EQ,4353,4351,CH),IFTHEN=(WHEN=(4352,1
CH,EQ,C'1'),BUILD=(1,4351,C'I')),IFTHEN=(WHEN=(4352,1,C
,EQ,C'2'),BUILD=(4353,4351,C'D')),IFTHEN=(WHEN=(NONE),B
ILD=(1,4351,C'U'))
END OF STATEMENTS FROM CTL2CNTL - PARAMETER LIST STATEMENTS FOLLOW
DEBUG NOABEND,ESTAE
OPTION MSGDDN=DFSMSG,LIST,MSGPRT=ALL,RESINV=0,SORTDD=CTL2,SORTOUT=TEM
2,DYNALLOC
SORT FIELDS=COPY
END OF DFSORT |
|
| Back to top |
|
|
Joerg.Findeisen
Senior Member
Joined: 15 Aug 2015
Posts: 1429
Location: Bamberg, Germany
|
|
|
|
Use code tags when presenting code/data to the forum!!! How difficult can it be. 
Check what is written here: INVALID FIELD OR CONSTANT IN TEMP2 IFTHEN 0 CONDITION 1, that should be self explaining. |
|
| Back to top |
|
|
Joerg.Findeisen
Senior Member
Joined: 15 Aug 2015
Posts: 1429
Location: Bamberg, Germany
|
|
| Back to top |
|
|
reach2abhinavtyagi
New User
Joined: 04 Aug 2016
Posts: 7
Location: India
|
|
|
|
Hi,
I am sorry, but i couldn't understand the meaning of this error. The code works fully fine with the same set of statements for file with LRECL=198, but not this one which has bigger length 4351.
Can you please suggest what correction is required.
Thanks.
Abhinav |
|
| Back to top |
|
|
sergeyken
Senior Member
Joined: 29 Apr 2008
Posts: 2264
Location: USA
|
|
|
|
| reach2abhinavtyagi wrote: |
Hi,
I am sorry, but i couldn't understand the meaning of this error. The code works fully fine with the same set of statements for file with LRECL=198, but not this one which has bigger length 4351.
Can you please suggest what correction is required.
Thanks.
Abhinav |
Please, learn how to use the Code button when submitting your code and/or data samples!!!!!!
What are the names REC-FLAG, CURR-REC, PREV-REC in your sample?
Besides of their unknown definition, they have been coded using the syntax not acceptable by SORT utility. Please, read at least one single manual on DFSORT/ICETOOL.
| Code: |
IFTHEN=(WHEN=(REC-FLAG,EQ,C'1'),BUILD=(CURR-REC,C'I')),
IFTHEN=(WHEN=(REC-FLAG,EQ,C'2'),BUILD=(PREV-REC,C'D')), |
Those undefined IDs have been spread anywhere in your sample. How did you create your code? |
|
| Back to top |
|
|
sergeyken
Senior Member
Joined: 29 Apr 2008
Posts: 2264
Location: USA
|
|
|
|
| sergeyken wrote: |
What are the names REC-FLAG, CURR-REC, PREV-REC in your sample?
Besides of their unknown definition, they have been coded using the syntax not acceptable by SORT utility. |
Sorry, now hyphens become also allowed as symbolic names for DFSORT. At this point I was wrong.
The problem with the code is, unallowed attempt to compare the fields longer than 256 characters; it is mentioned explicitly in DFSORT manual for comparison operation, and in the description of the error message, too. |
|
| Back to top |
|
|
Joerg.Findeisen
Senior Member
Joined: 15 Aug 2015
Posts: 1429
Location: Bamberg, Germany
|
|
|
|
| sergeyken wrote: |
| The problem with the code is, unallowed attempt to compare the fields longer than 256 characters; it is mentioned explicitly in DFSORT manual for comparison operation, and in the description of the error message, too. |
See what I have earlier linked to:
|
|
| Back to top |
|
|
sergeyken
Senior Member
Joined: 29 Apr 2008
Posts: 2264
Location: USA
|
|
|
|
| Joerg.Findeisen wrote: |
| sergeyken wrote: |
| The problem with the code is, unallowed attempt to compare the fields longer than 256 characters; it is mentioned explicitly in DFSORT manual for comparison operation, and in the description of the error message, too. |
See what I have earlier linked to:
|
Looks like the TS cannot read by himself... 
Someone must read it for him, and then reproduce the issue in his own words. |
|
| Back to top |
|
|
|
|
  |
All times are GMT + 6 Hours |
|
