IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

How to define Undefined records in Assembelr


IBM Mainframe Forums -> PL/I & Assembler
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
sakrish

New User


Joined: 05 Nov 2008
Posts: 21
Location: chennai

PostPosted: Mon Nov 24, 2008 6:50 pm
Reply with quote

hi

I never use any new code..we need that extracted bundles to get processed in server side

can we copy RECFM=U to RECFM=FB ? if so, i can use sort to extract bundles from my file..

thanks,
sai
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix

PostPosted: Mon Nov 24, 2008 10:52 pm
Reply with quote

Hello,

In the Easytrieve code you could change the definition of
Code:
FILE INFILE3 U 32004
to
Code:
FILE INFILE3 FB 32004 32004
and change this:
Code:
//INFILE3  DD  DSN=XCIT.ACH.TEST.OUTPUT1,
//        DISP=(NEW,CATLG,DELETE),       
//        SPACE=(CYL,(150,1500),RLSE),   
//        DCB=(DSORG=PS,RECFM=U)       
to this:
Code:
//INFILE3  DD  DSN=XCIT.ACH.TEST.OUTPUT1,
//        DISP=(NEW,CATLG,DELETE),       
//        SPACE=(CYL,(150,1500),RLSE),   
//        DCB=(DSORG=PS,RECFM=FB)       

This should produce an FB file (but it will have lots of trailing spaces). I'd suggest a limited test to see if this will do what you want.
Back to top
View user's profile Send private message
sakrish

New User


Joined: 05 Nov 2008
Posts: 21
Location: chennai

PostPosted: Tue Nov 25, 2008 9:11 am
Reply with quote

hi,

I dont want trailing spaces leaving x'40' where there is nothing in input file.

In another topic which I posted, Arun told about using file-aid to convert Recfm=U to recfm =FB.. but its also leaving x'00' at nothing

which makes both files differ..

using file-aid..we can select records either first n records, last..but we dont have option to select records between specific limit.

Anyways..thanks for all your help..who helped me till now.

Thanks,
sai
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix

PostPosted: Tue Nov 25, 2008 9:26 am
Reply with quote

Hello,

Quote:
we can select records either first n records, last..
You can do this with the sort. Which sort product is used on your system? You can also do this with IDCAMS.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> PL/I & Assembler Goto page Previous  1, 2

 


Similar Topics
Topic Forum Replies
No new posts combine multiple unique records into ... DFSORT/ICETOOL 2
No new posts To Omit records based n SORT condition DFSORT/ICETOOL 6
No new posts To fetch records that has Ttamp value... DFSORT/ICETOOL 5
No new posts ICETOOL returns no records JCL & VSAM 1
No new posts Compare 2 files and retrive records f... DFSORT/ICETOOL 3
Search our Forums:

Back to Top