Got an error with "JFY" option



IBM's flagship sort product DFSORT for sorting, merging, copying, data manipulation and reporting. Includes ICETOOL and ICEGENER

Got an error with "JFY" option

Postby xcspg3 » Tue Sep 25, 2007 6:41 pm

Hi,
I've got an error with "JFY" option.

Jcl
//S10      EXEC PGM=ICEMAN                           
//SORTIN   DD *                                       
1234567890                                           
       MAX                                           
        MA                                           
         X                                           
/*                                                   
//SORTOUT  DD  DSN=ACBAN0.PC00M.JFY.OUT,             
//             DISP=(NEW,CATLG,DELETE),               
//             UNIT=(SYSDA,,),                       
//             SPACE=(CYL,(001,01,),RLSE,,),         
//             DCB=(LRECL=080,RECFM=FB)               
//SYSOUT   DD  SYSOUT=*                               
//SYSIN    DD *                                       
  INREC BUILD=(1,10,JFY=(SHIFT=LEFT))                 
  SORT FIELDS=(1,10,CH,A)                             
/*                                                   

Mesage error
ICE000I J - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R5 -
            INREC BUILD=(1,10,JFY=(SHIFT=LEFT))               
                                 $                             
ICE007A P SYNTAX ERROR                                         
            SORT FIELDS=(1,10,CH,A)                           
ICE052I J END OF DFSORT                                       


Can you help me?
Thanks
Max
xcspg3
 
Posts: 29
Joined: Tue Sep 25, 2007 6:34 pm
Has thanked: 0 time
Been thanked: 0 time

Re: Got an error with "JFY" option

 

Re: JFY option

Postby CICS Guy » Tue Sep 25, 2007 7:17 pm

Do you have all of the DFSORT PTFs applied?
z/OS DFSORT V1R5 PTF UK90007 and DFSORT Release 14 PTF UK90006, first available in April, 2006, provide important enhancements to DFSORT and DFSORT's ICETOOL for extracting variable position/length fields ... into fixed parsed fields (PARSE, %nn); justifying and squeezing data (JFY, SQZ) ...
CICS Guy
 
Posts: 255
Joined: Wed Jun 20, 2007 4:08 am
Has thanked: 0 time
Been thanked: 0 time

Re: JFY option

Postby Frank Yaeger » Tue Sep 25, 2007 9:31 pm

Max,

CICS guy is right. The syntax error indicates your site does not have z/OS DFSORT V1R5 PTF UK90007 (April, 2006) applied. You need that PTF to use JFY. Ask your System Programmer to install it (it's free). For complete details on all of the new DFSORT and ICETOOL functions available with the April, 2006 PTF, see:

http://www.ibm.com/servers/storage/supp ... /mvs/peug/

A note about a conflict in your job:

You have:

  INREC BUILD=(1,10,JFY=(SHIFT=LEFT)) 


which builds 10-byte records, but you have LRECL=080 for SORTOUT. The mismatch will cause DFSORT to pad your output records with binary zeros from positions 11-80. It's best to remove LRECL=080 and let DFSORT set the correct LRECL automatically.

If you want 10-byte records, removing LRECL=080 will work.

If you want blanks from 11-80, use:

  INREC BUILD=(1,10,JFY=(SHIFT=LEFT),80:X) 


If you want to justify input positions 1-10 and keep input positions 11-80 unchanged, use:

  INREC OVERLAY=(1,10,JFY=(SHIFT=LEFT)) 
Frank Yaeger - DFSORT Development Team (IBM) - yaeger@us.ibm.com
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
=> DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort
User avatar
Frank Yaeger
Global moderator
 
Posts: 1080
Joined: Sat Jun 09, 2007 8:44 pm
Has thanked: 0 time
Been thanked: 14 times

Re: Got an error with "JFY" option

Postby xcspg3 » Sun Oct 07, 2007 4:01 pm

Hi,
my System Administrators have installed "PTF UK90007". Now I can use JFY option !
Thanks a lot
Max
xcspg3
 
Posts: 29
Joined: Tue Sep 25, 2007 6:34 pm
Has thanked: 0 time
Been thanked: 0 time

Re: Got an error with "JFY" option

Postby Frank Yaeger » Mon Oct 08, 2007 10:07 pm

Enjoy!
Frank Yaeger - DFSORT Development Team (IBM) - yaeger@us.ibm.com
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
=> DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort
User avatar
Frank Yaeger
Global moderator
 
Posts: 1080
Joined: Sat Jun 09, 2007 8:44 pm
Has thanked: 0 time
Been thanked: 14 times


Return to DFSORT/ICETOOL/ICEGENER

 


  • Related topics
    Replies
    Views
    Last post