Quantcast
Channel: Visual COBOL
Viewing all articles
Browse latest Browse all 5819

Forum Post: RE: File IO Counts

$
0
0
Here's how it worked for me: C:\fh type *.cbl test.cbl        select a-file assign "file.dat".        fd a-file.        01 a-rec pic x.        move "x" to a-rec        open output a-file        write a-rec        close a-file C:\fh cobol test.cbl int() ; Micro Focus COBOL Version 2.2.00244 Copyright (C) Micro Focus 1984-2013. All rights reserved. * Checking complete with no errors - starting code generation * Generating test * Data:         984     Code:         768     Literals:         408 C:\fh run test.int C:\fh cobfhrepro3  /d Session is 0000000000 I/O     Sess  Op  Opcode   Act   Exp   Filename                       O Number    Id  Code Desc     Stat  Stat                                 K -------- ---- ---- -------- ----- ----- ------------------------------ - 00000001 0001 FA01 Open      /    0/0   file.dat 00000002 0001 FAF3 Write     /    0/0   file.dat 00000003 0001 FA80 Close     /    0/0   file.dat Session 000 finished C:\fh type extfh.cfg [file.dat] trace=on C:\fh

Viewing all articles
Browse latest Browse all 5819

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>