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
 

 

Regarding Sorting a PS file of VB format

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

Active User


Joined: 01 Feb 2007
Posts: 120
Location: USA

PostPosted: Sun Jun 24, 2007 3:30 pm    Post subject: Regarding Sorting a PS file of VB format
Reply with quote

Hi,

I had a query related to sort.

First i had unloaded the entire table to a file. It is creating a PS file of VB format and record length 569. The table has one field of type varchar.

The file that is generated in the unload job is input for my other job which is doing sorting. When i am submitting the job it is giving abend as S000 U0222.

Should i need to consider anything related to this varchar field. My input and output file will be as follows:

Input file that is generated during unload job:
DSN=Sortin.input.file
Storage class . . . : STANDARD
Volume serial . . . : T0Q1C4 +
Data class . . . . . : COMPRESS
Organization . . . : PS
Record format . . . : VB
Record length . . . : 569
Block size . . . . : 27993
1st extent cylinders: 1
Secondary cylinders : 100
Data set name type : EXTENDED

Output file to be created:
DSN=Sortout.output.file,
DISP=(,CATLG,DELETE),SPACE=(CYL,(500,500),RLSE),
RECFM=FB,LRECL=569,
BLKSIZE=0

It is displaying error as follows:
RECORD TYPE IS V - DATA STARTS IN POSITION 5
INVALID DATA SET ATTRIBUTES SPECIFIED OUDMCSTA RECFM

Tell me what to do in this regard. Is this because i had a varchar field in my table.

Regards,
Bhaskar
Back to top
View user's profile Send private message

expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Sun Jun 24, 2007 4:12 pm    Post subject:
Reply with quote

Please post the sort cards being used and the output from the failing step.
Back to top
View user's profile Send private message
0d311

Guest





PostPosted: Sun Jun 24, 2007 4:27 pm    Post subject: Re: Regarding Sorting
Reply with quote

Hi Bhaskar,

I think you have with your //SYSIN control statements. You may have started the sorting job at position 0 of your file, which is actually still a part of RDW for VB files. I think this problem was already posted in this forum. You may try searching for more info.

BTW, here's an example:

sort fields=copy
outrec fields=(4,565)

Let me know if it worked. Oh, and I don't think the varchar had anything to do with your problem. icon_smile.gif
Back to top
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Sun Jun 24, 2007 6:09 pm    Post subject:
Reply with quote

Despite what od311 has said, we still need to see your sort control cards.

You are creating an FB file from a VB input, which will need extra attention.

Please do not code BLKSIZE=0, because unless you SMS environment is correctly set up this can actually cause some datasets to really have a BLKSIZE of 0, which then causes problems for DFSMShsm and other ILM software products. Just leave the BLKSIZE= paramter off and let the OS determine the best BLKSIZE for you.
Back to top
View user's profile Send private message
bhaskar_kanteti

Active User


Joined: 01 Feb 2007
Posts: 120
Location: USA

PostPosted: Mon Jun 25, 2007 8:58 am    Post subject: Re: Regarding Sorting a PS file of VB format
Reply with quote

This is the sort job i am telling. Here input is in VB format.

//SORTJOB JOB 1,CLASS=6,MSGCLASS=0,NOTIFY=&SYSUID
//*
//STEP010 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=C
//SYSPRINT DD SYSOUT=*
//*INPUT FILE
//INPUT DD DSN=INPUT.FILE.BEFORE.SORT,DISP=SHR
//*OUTPUT FILE
//OUTPUT DD DSN=OUTPUT.FILE.AFTER.SORT,
// DISP=(,CATLG,DELETE),SPACE=(CYL,(500,500),RLSE),
// RECFM=FB,LRECL=569
//TOOLIN DD *
COPY FROM(INPUT) TO(OUTPUT) USING(CTL1)
/*
//CTL1CNTL DD *
SORT FIELDS=(1,7,PD,A,40,3,CH,A)
OUTFIL FNAMES=OUDMCSTA,REMOVECC,
OUTREC=(1:1,569)
/*
//CHECKIT IF (STEP010.RC NE 0) THEN
//STEP015 EXEC @SPWARN
//CHECKIT ENDIF
//*

This is my sort job. Here input file is in VB format. When i submit the job it is showing the following error....
END OF STATEMENTS FROM CTL1CNTL - PARAMETER LIST STATEMENTS FOLLOW
DEBUG NOABEND,ESTAE
OPTION MSGDDN=DFSMSG,LIST,MSGPRT=ALL,RESINV=0,SORTDD=CTL1,SORTIN=OUDMC
ST,SORTOUT=OUDMCSTA,DYNALLOC
SORT FIELDS=COPY
RECORD TYPE IS V - DATA STARTS IN POSITION 5
C5-K90007 C6-K90007 C7-K90000 C8-K90007 E9-K90007 C9-BASE E5-K14794
Back to top
View user's profile Send private message
ibmmainframesyntel

Active User


Joined: 26 Feb 2007
Posts: 126
Location: Chennai

PostPosted: Mon Jun 25, 2007 11:45 am    Post subject: Re: Regarding Sorting a PS file of VB format
Reply with quote

To copy data from VB to FB,
u have to change the control card like this,

OUTFIL FNAMES=OUDMCSTA,REMOVECC, VTOF,
OUTREC=(1:5,569)

Output file LRECL=565


Then it will work.......
Back to top
View user's profile Send private message
prasadvrk

Active User


Joined: 31 May 2006
Posts: 200
Location: Netherlands

PostPosted: Mon Jun 25, 2007 3:20 pm    Post subject:
Reply with quote

Quote:

SORT FIELDS=(1,7,PD,A,40,3,CH,A)


You have to change this to SORT FIELDS=(5,7,PD,A,44,3,CH,A)

Please try this and let me know if it worked

First four bytes of the variable record are used to store the length and other info, so you have to leave them while sorting.
Back to top
View user's profile Send private message
bhaskar_kanteti

Active User


Joined: 01 Feb 2007
Posts: 120
Location: USA

PostPosted: Mon Jun 25, 2007 3:38 pm    Post subject: Re: Regarding Sorting a PS file of VB format
Reply with quote

Thank You So Much.
Its working.
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 Converting Variable block file to Fix... bhavana yalavarthi DFSORT/ICETOOL 10 Tue May 16, 2017 2:20 pm
No new posts Getting error while opening a variabl... apandey1 COBOL Programming 5 Fri May 05, 2017 12:22 pm
No new posts Issue with NDM process to transmit ES... chetanambi All Other Mainframe Topics 6 Wed May 03, 2017 10:52 am
No new posts File processing vishwakotin Mainframe Interview Questions 9 Fri Apr 28, 2017 11:38 am
No new posts Occurrence of various strings within ... TS70363 JCL & VSAM 1 Thu Apr 27, 2017 8:18 pm


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