MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

problems facing when using trailer in VB file

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities
View previous topic :: View next topic  
Author Message
infoman123
Beginner


Joined: 02 Nov 2004
Posts: 57
Topics: 20
PostPosted: Wed Dec 28, 2005 6:00 am    Post subject: problems facing when using trailer in VB file Reply with quote
Hi,

i am getting a strange problem while using trailer in a vb file.the below is my sort card.
Code:

SORT  FIELDS=(5,20,ZD,A),SKIPREC=1,STOPAFT=00051613   
SUM FIELDS=NONE                                     
OUTFIL FNAMES=SORTOUT,REMOVECC,                     
TRAILER1=(1:X'FFFF',COUNT=(M11,LENGTH=8))           

Its giving RC 16 with following message
ICE143I 0 BLOCKSET     SORT  TECHNIQUE SELECTED                     
ICE000I 1 - CONTROL STATEMENTS FOR 5740-SM1, DFSORT REL 14.0 - 17:34
            SORT  FIELDS=(5,20,ZD,A),SKIPREC=1,STOPAFT=00051613     
              SUM FIELDS=NONE                                       
              OUTFIL FNAMES=SORTOUT,REMOVECC,                       
              TRAILER1=(1:X'FFFF',COUNT=(M11,LENGTH=8))             
                           $                                       
ICE007A 6 SYNTAX ERROR                                             
ICE052I 3 END OF DFSORT                                             


But it was working fine when i was using
Code:

TRAILER1=(1:X'FFFF',COUNT=(M11,LENGTH=8))

for a VB file this was working fine and ended with RC 0.

and when i was trying
Code:

 TRAILER1=(1:C'FFFF',COUNT=(M11,LENGTH=8))

for a VB file,the sort is working fine and giving desired output.

Can anyone help me??
Back to top
View user's profile Send private message
Frank Yaeger
Sort Forum Moderator
Sort Forum Moderator


Joined: 02 Dec 2002
Posts: 1618
Topics: 31
Location: San Jose
PostPosted: Wed Dec 28, 2005 10:20 am    Post subject: Reply with quote
You say it's working fine in one case, but not in the other, but the two cases you show seem to be identical, that is:


Code:

   TRAILER1=(1:X'FFFF',COUNT=(M11,LENGTH=8))


If the $ for the syntax error is under the X'FFFF', that would indicate you don't have z/OS DFSORT V1R5 PTF UQ95214 or DFSORT R14 PTF UQ95213 (Dec, 2004) which is needed in order to use hex constants in HEADERx/TRAILERx. 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 Dec, 2004 PTF, see:

www.ibm.com/servers/storage/support/software/sort/mvs/pdug/

If that's not the problem, then please be more clear about what's working and what's not working.
_________________
Frank Yaeger - DFSORT Development Team (IBM)
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
DFSORT is on the Web at:
www.ibm.com/storage/dfsort
Back to top
View user's profile Send private message Send e-mail Visit poster's website
infoman123
Beginner


Joined: 02 Nov 2004
Posts: 57
Topics: 20
PostPosted: Wed Dec 28, 2005 11:22 am    Post subject: Reply with quote
Hi frank...
It was a typo.. when i tried the same with FB file it worked and didnt gave any syntax error. But this sort card with VB file is giving the problem
Back to top
View user's profile Send private message
Frank Yaeger
Sort Forum Moderator
Sort Forum Moderator


Joined: 02 Dec 2002
Posts: 1618
Topics: 31
Location: San Jose
PostPosted: Wed Dec 28, 2005 11:51 am    Post subject: Reply with quote
I don't see any reason why that same TRAILER1 operand would get a syntax error with VB, but not with FB. When I run your control statements with DFSORT (I have the PTF of course), it runs fine with VB.

Try the following to find out if you have the DFSORT Dec, 2004 PTF installed:

Code:

//S1 EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SORTIN DD *
//SORTOUT DD DUMMY
//SYSIN DD *
   OPTION COPY
   INREC OVERLAY=(5:C'A')
/*


If you get return code 16, you don't have the PTF so you need to get it installed in order to use X'FFFF' in TRAILER1 (with FB or VB). If you get return code 0, you do have the PTF, so I'd need to see the complete //SYSOUT messages for both the FB run you say didn't get the ICE007A and the VB run you say did.
_________________
Frank Yaeger - DFSORT Development Team (IBM)
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
DFSORT is on the Web at:
www.ibm.com/storage/dfsort
Back to top
View user's profile Send private message Send e-mail Visit poster's website
infoman123
Beginner


Joined: 02 Nov 2004
Posts: 57
Topics: 20
PostPosted: Wed Dec 28, 2005 8:45 pm    Post subject: Reply with quote
Yes Frank,

You are absolutely right.. we dont have z/OS DFSORT V1R5 PTF UQ95214 or DFSORT R14 PTF UQ95213 installed as it gave a RC of 16.

Sorry i tried the X'FFFF' in another machine we have z/OS DFSORT V1R5 PTF UQ95214 or DFSORT R14 PTF UQ95213 installed i think.
Back to top
View user's profile Send private message
Frank Yaeger
Sort Forum Moderator
Sort Forum Moderator


Joined: 02 Dec 2002
Posts: 1618
Topics: 31
Location: San Jose
PostPosted: Thu Dec 29, 2005 10:43 am    Post subject: Reply with quote
Ok. I thought that might be the case (different machines). Thanks for the feedback.
_________________
Frank Yaeger - DFSORT Development Team (IBM)
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
DFSORT is on the Web at:
www.ibm.com/storage/dfsort
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group