Clicky
Skip to Content
Custom Search

Reply to comment

Alan.R.Wynne
Offline
Joined: 07/07/2011
Variable record size

Haven't tried this myself so not sure if it will work!

FILE SECTION.

FD REPORT-FILE
RECORD IS VARYING IN SIZE FROM 1 TO 10000
DEPENDING ON REPORT-SIZE.

01 REPORT-RECORD PIC X(10000).

WORKING-STORAGE SECTION.

77 REPORT-SIZE PIC 9(4) COMP-5.

After reading the record you could examine the contents of the field in working storage called REPORT-SIZE and it will hopefully contain the record length!

Reply

  • Allowed HTML tags:
      1. Lines and paragraphs break automatically.

    More information about formatting options

    CAPTCHA
    This question is for testing whether you are a human visitor and to prevent automated spam submissions.

Navigation

Click the +1 button  below to share it with your friends and colleagues

 

Share this if you liked it!

 

Disclaimer



Number of Registered users 713
Theme by Dr. Radut.