Outrec - move 12 byte data to occupy 13 bytes

In this Mainframe Forum - You can post your queries on DFSORT, ICETOOL , SyncSort & JCL Utilities

Moderators: Frank Yaeger, Moderator Group

Post Reply
svnsk1056
Member
Posts: 1
Joined: Tue Sep 13, 2016 7:52 pm

Outrec - move 12 byte data to occupy 13 bytes

Post by svnsk1056 » Tue Sep 13, 2016 8:13 pm

Hi,

I have a input data field which is PIC 9(10)V99. This value needs to be populated in output file with 13 bytes.

Input file is

9999991000014000001272098060276000000000000000186718771

OUTREC FIELDS=(1:C'AB',
3:C'XXXXXXXX',
11:9X,
20:6X,
26:C'A',
27:14,8,
35:32,12,
48:44,12,
61:10Z)

I need output as below:

ABXXXXXXXX A0000012700000000000000000186718771

Can you please help me?

magesh_j
Member
Posts: 16
Joined: Wed Aug 31, 2016 8:32 am

Post by magesh_j » Wed Sep 14, 2016 4:37 am

svnsk1056,

From which position 9(10)V99 starts in your input to be copied into output ?

9999991000014000001272098060276000000000000000186718771 ?

Thanks
Magesh

Post Reply

FREE TUTORIALS

Tutorials
Free tutorials from mainframegurukul
  • JCL Tutorial
    Covers all important JCL concepts.
  • Cobol Tutorial
    This tutorials covers all Cobol Topics from STRING to COMP-3.
  • DB2 Tutorial
    DB2 Tutorial focuses on DB2 COBOL Programming.
  • SORT Tutorial
    This Tutorial covers all important aspects of DFSORT with examples
  • CICS Tutorial
    This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions



Other References
Mainframe Tools and others