DFSORT of VB file

rohitpb · New User Joined: 04 Jan 2006 Posts: 5

I have input file of Length 25004 and want Selective Fields from the files.
I have following SYSIN coded

//SYSIN DD *
SORT FIELDS=COPY

OUTFIL FNAMES=SOUT0,
INCLUDE=(875,2,PD,EQ,+004),
OUTREC=(1:153,40,2X,60,4)

Need to check Packed decimal value 4 at position 871.
The include condition is coded after adding four (VB file requirement).
However not a single record satisfying the condition is obtained though the file contains such records. I feel the problem is in Packed Decimal format (PD) comparisson. It would be great and helpful if anybody can provide a solution.

prabs2006 · Active User Joined: 12 Jan 2006 Posts: 103

Hi,

Can you please provide us the Pic clause of that variable?
S9(X)v9(X) comp-3 ..provide the value of X here.

T & R
Prabs

prabs2006 · Active User Joined: 12 Jan 2006 Posts: 103

Hi,

On the second thought I wanted you to check with 04 rather than 004.

T & R
Prabs

rohitpb · New User Joined: 04 Jan 2006 Posts: 5

pkmainframe · New User Joined: 14 Jun 2005 Posts: 16 Location: India

Hi Rohit,

I ran teh same condition on a sample VB file with the below code

SORT FIELDS=COPY
INCLUDE COND=(14,2,PD,EQ,+004)
Its working fine my dataset looks like below

----+----1----+----2

aaaaaaaa .<
88888888404
1111111100C
-------------------
bbbbbbbb .*
88888888405
2222222200C [/img]

in case if it doesn't then you have to check your data !
dump few records into a vb file and browse !

Thanks
Kumar

Frank Yaeger · Posted: Fri Feb 10, 2006 9:16 pm

Something's wrong here. You say you have a VB input file, but you show your OUTFIL statement as:

rajandhla · Posted: Fri Feb 10, 2006 10:31 pm

hi,

here i have got small doubt, if i have a VSAM file has record length
has minimun 87 and maximum has 1000 bytes.

so whether i should treat as variable file or fixed file.

if it is variable file then i should include 4 bytes to every position used in the include control card.

regards
jai

Frank Yaeger · Posted: Fri Feb 10, 2006 10:48 pm

jai,

In the future, please start a new thread for a different topic rather than adding it to an unrelated topic.

If the record lengths can vary from 87 to 1000 bytes, then you should treat the VSAM data set as variable. For more information on using VSAM data sets with DFSORT, see:

publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICE1CA10/1.8.3.4?SHELF=&DT=20050222160456&CASE=

rajandhla · Posted: Fri Feb 10, 2006 11:46 pm

Hi,

Sorry, i will see next time it won't be repeated.

U mean for the sortin input file we need to specify(add) 4 bytes to the positions that we want to check the conditions like in include control card. sort won't add 4 bytes automatically to positions during comarision/checking condition.

Please confirm me.

Thanks
Jai

Frank Yaeger · Posted: Sat Feb 11, 2006 1:28 am

Jai,

Did you read the doc at the link I gave above. It answers your questions. I'll quote the relevant section here:

rohitpb · New User Joined: 04 Jan 2006 Posts: 5

rajandhla · Posted: Thu Feb 16, 2006 3:56 pm

Hi,

Iam using VSAM file for my input which has got min length as80 bytes and maximun of around 900 bytes.

when i use that file has input file at dd name sortin it taking as fixed length file insted if treating variable length file. any specific reason reason to treat as FB. If i included 4 bytes to length iam zero records i.e treating as variable, if i treat as fixed len file iam getting 5lac records.

the following control stmts are for fixed len file:

find below my control card used for sort. and the spool messages
OUTREC FIELDS=(18X,15,4,19,3,22,1,23,2)
SORT FIELDS=COPY
INCLUDE COND=(((23,2,PD,EQ,300,AND,19,3,PD,GE,50041),AND,
(23,2,PD,EQ,300,AND,19,3,PD,LE,51219)),OR,
((23,2,PD,EQ,300,AND,1,3,PD,GE,50041),AND,
(23,2,PD,EQ,300,AND,19,3,PD,LE,50041)))

spool messages:
12K BYTES OF EMERGENCY SPACE ALLOCATED
SORTIN : RECFM=F ; LRECL= 1000; CISIZE = 16384
OUTREC RECORD LENGTH = 28
SORTOUT : RECFM=FB ; LRECL= 28; BLKSIZE= 27972

please let me know the reason

thanks in advance,
jai

rajandhla · Posted: Thu Feb 16, 2006 5:13 pm

I am exepcting the reason is because of the sort treats as

V if SORTIN is VSAM and SORTOUT is VSAM; otherwise F.

correct me if iam wrong,

regards
jai

Frank Yaeger · Posted: Thu Feb 16, 2006 9:15 pm

Jai,

The messages you show indicate you're using Syncsort, not DFSORT, so I can't help you.