View previous topic :: View next topic
|
Author |
Message |
ramankapoor
New User
Joined: 27 Feb 2006 Posts: 23 Location: delhi
|
|
|
|
How can i convert fixed block data set to a variable block data set |
|
Back to top |
|
|
nuthan
Active User
Joined: 26 Sep 2005 Posts: 146 Location: Bangalore
|
|
Back to top |
|
|
ramankapoor
New User
Joined: 27 Feb 2006 Posts: 23 Location: delhi
|
|
|
|
what is the meaning of the line
INREC FIELDS=(01:01,06,07:4Z,88:2620,1)
how we are puting fields information in this card. pls suggest..
i am having a problem while submitting the job . the problem its showing in spool is
-->open error sysin.
pls suggest.
the control card i m using is -->
SYSUT1 DD *
INREC FIELDS=(01:01,06,07:4Z,88:2620,1)
SORT FIELDS = COPY
OUTREC FIELDS=(01:07,82),CONVERT
END |
|
Back to top |
|
|
rajesh_1183
Active User
Joined: 24 Nov 2005 Posts: 121 Location: Tadepalligudem
|
|
|
|
Hi
try this...
Code: |
//FBVB JOB .......
//S1 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SORTIN DD DSN=A123456.SORT.SAMPIN,DISP=SHR
//VBOUT DD DSN=A123456.SORT.VSAMP,DISP=(NEW,CATLG,DELETE),
// UNIT=3390,SPACE=(CYL,(5,5))
//SYSIN DD *
OPTION COPY
OUTFIL FNAMES=VBOUT,FTOV
/*
|
If the LRECL of SORT.SAMPIN is 100 bytes, each VB record in SORT.VSAMP is 104 bytes (the FB record length of 100 plus 4 for the RDW) and SORT.VSAMP is given an LRECL of 104
corrections welcomed..........
Thanks,
Rajesh |
|
Back to top |
|
|
ramankapoor
New User
Joined: 27 Feb 2006 Posts: 23 Location: delhi
|
|
|
|
Its Giving Error like this :
ICE005A 0 STATEMENT DEFINER ERROR
OUTFIL FNAMES=VBOUT,FTOV
$
ICE005A 0 STATEMENT DEFINER ERROR
ICE010A 0 NO SORT OR MERGE CONTROL STATEMENT
ICE052I 3 END OF DFSORT |
|
Back to top |
|
|
rajesh_1183
Active User
Joined: 24 Nov 2005 Posts: 121 Location: Tadepalligudem
|
|
|
|
did u gave space before the sort stmts |
|
Back to top |
|
|
ramankapoor
New User
Joined: 27 Feb 2006 Posts: 23 Location: delhi
|
|
|
|
NO. I was actuly not ending it properly. well thanks |
|
Back to top |
|
|
rajesh_1183
Active User
Joined: 24 Nov 2005 Posts: 121 Location: Tadepalligudem
|
|
|
|
did u got that.......... |
|
Back to top |
|
|
ramankapoor
New User
Joined: 27 Feb 2006 Posts: 23 Location: delhi
|
|
|
|
Yes I got That .Thanks a lot |
|
Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
|
|
For information on FB to VB conversion with DFSORT, see:
www.ibm.com/servers/storage/support/software/sort/mvs/tricks/srtmst03.html#t09
Quote: |
what is the meaning of the line
INREC FIELDS=(01:01,06,07:4Z,88:2620,1)
how we are puting fields information in this card |
01:01,06 - put input positions 1-6 in output positions 1-6
07:4Z - put four binary zeros (4X'00') in output positions 7-10
88:2620,1 - put blanks in output positions 11-87 and put input position 2620 in output position 88.
Quote: |
am having a problem while submitting the job . the problem its showing in spool is
-->open error sysin.
pls suggest.
the control card i m using is -->
SYSUT1 DD *
INREC FIELDS=(01:01,06,07:4Z,88:2620,1)
SORT FIELDS = COPY
OUTREC FIELDS=(01:07,82),CONVERT
END |
You're getting the open error because you're using //SYSUT1 DD * for the control statements instead of //SYSIN DD *. |
|
Back to top |
|
|
|