Page 1 of 1

File layouts & their import methods

Posted: Mon Mar 07, 2011 12:55 am
by Akhobare
Hi,
Below is layout we were provided. I need some details on it. May be helpful for everyone here.

RecordDef('RecordLevel1', Ref=RecordLevel1 );
Field('PathRidCode','X(1)', Ref=PathRidCode );
Field('PathRidCode','X(1)', Ref=PathRidCode );
Field('TicketNo','X(13)', Ref=TicketNo );
Field('TicketNoFiller','X(2)');
Field('CouponNo','X(2)', Ref=CouponNo );
Field('PathEquivBBR','S99V999999999',options=BCH_SIGN_SEPARATE | BCH_SIGN_LEADING, Ref=PathEquivBBR);
EndDef;
.
.
.
RecordDef('GFP', Occurs=4, Ref=l_GFPSubLayout, OccursRefs=GFP );
l_GFPSubLayout.DefineLayout(Process);
EndDef;
RecordDef('ConnectionsString', Ref=ConnectionsString);
RecordDef('Connections', occurs=10, Ref=l_ConnectionsSubLayout, OccursRefs=Connections );
l_ConnectionsSubLayout.DefineLayout(Process);
EndDef;
RecordDef('FopArray', Ref=FopArray);
RecordDef('Fop', Occurs=14, Ref=l_FopSubLayout, OccursRefs=Fop );
l_FopSubLayout.DefineLayout(Process);
.
.
.
.
.
.
.
.
.
.
.
.
.

EndDef;

Q. What is this layout? Is this multi-record file layout? If anyone can shed some light on RecordDef() syntax details (like occurs clause etc) , that would be very useful.
How to import it? I tried every way in DS , but couldn't import it.

I have couple of more different types of layout , i would update here them later.

Posted: Mon Mar 07, 2011 3:04 am
by ray.wurlod
Yes, from what you've provided, there is more than one RecordDef.

It looks like someone has re-organized a COBOL copybook, though I'd be concerned about the duplicate appearance of PathRidCode.