Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

VB TO VB sort syntax pls...

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
gbalaa_007

New User


Joined: 24 May 2007
Posts: 10
Location: Los angeles, CA

PostPosted: Wed Jul 16, 2008 9:24 pm    Post subject: VB TO VB sort syntax pls...
Reply with quote

I want to copy a 273 bytes VB file to another VB file of 271 bytes.

SORT FIELDS=COPY
OUTFIL FNAMES=01,
OUTREC FIELDS=(5:5,269)

I am getting the SOC abend.

Pls help...

Bala
Back to top
View user's profile Send private message

Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1239
Location: Richfield, MN, USA

PostPosted: Wed Jul 16, 2008 9:32 pm    Post subject:
Reply with quote

I've seen S0C1, S0C4, S0C7, etc. but never an SOC. Please post ALL your error messages and indicate which sort product you use.
Back to top
View user's profile Send private message
gbalaa_007

New User


Joined: 24 May 2007
Posts: 10
Location: Los angeles, CA

PostPosted: Wed Jul 16, 2008 10:01 pm    Post subject: Reply to: VB TO VB sort syntax pls...
Reply with quote

correction to my earlier post....

VB 275bytes to VB 273bytes....

Code:

  SORT FIELDS=COPY
  OUTFIL FNAMES=01,
  OUTREC FIELDS=(5:5,269)


error code USER COMPLETION CODE=0007

Code:

ICE000I 1 - CONTROL STATEMENTS FOR
            SORT FIELDS=COPY
            OUTFIL FNAMES=01,
                          $
ICE007A 0 SYNTAX ERROR
            OUTREC FIELDS=(5:5,269)
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Wed Jul 16, 2008 10:38 pm    Post subject:
Reply with quote

Boy, that's a lot of mistakes for so few control statements.

The flagged error is FNAMES=01. You either need FNAMES=ddname or FILES=nn. FILES=01 would be valid and associated with a SORTOF01 DD. FNAMES=OUT1 would be valid and associated with an OUT1 DD. But FNAMES=01 is invalid.

OUTREC FIELDS=(5:5,269) should be OUTREC=(1,4,5:5,269) or BUILD=(1,4,5:5,269).

A correct version of your DFSORT job would be:

Code:

//S1    EXEC  PGM=ICEMAN
//SYSOUT    DD  SYSOUT=*
//SORTIN DD DSN=...  input file (VB/275)
//OUT1 DD DSN=...    output file (VB/273)
//SYSIN    DD    *
  SORT FIELDS=COPY
  OUTFIL FNAMES=OUT1,
    BUILD=(1,4,5:5,269)
/*


However, note that 5,269 will only work if every record is at least 273 bytes long. Is that the case?
Back to top
View user's profile Send private message
gbalaa_007

New User


Joined: 24 May 2007
Posts: 10
Location: Los angeles, CA

PostPosted: Thu Jul 17, 2008 8:11 pm    Post subject: Reply to: VB TO VB sort syntax pls...
Reply with quote

Thanks a lot Frank Yaeger !!
it worked fine...
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Limit duplicate records in the SORT pshongal SYNCSORT 6 Mon Nov 21, 2016 12:54 pm
No new posts How to convert the VBM file to VB or... Sulabh Agrawal JCL & VSAM 4 Fri Nov 18, 2016 1:04 pm
No new posts Sort records based on numeric field. Alks SYNCSORT 2 Wed Oct 19, 2016 10:14 pm
No new posts How to delete second instance from Fl... Gunapala CN DFSORT/ICETOOL 6 Tue Oct 18, 2016 11:42 pm
No new posts abend sort based on count records in ... anatol DFSORT/ICETOOL 5 Mon Oct 17, 2016 10:10 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us