gnucobol-users
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[open-cobol-list] Difference in version 2 versus 1.1?


From: Michael D. Setzer II
Subject: [open-cobol-list] Difference in version 2 versus 1.1?
Date: Fri, 26 Feb 2016 12:01:36 +1000

Recently upgraded my classroom to use the 2 version of gnu cobol, and just 
ran into a difference.

In 1.1 I could send escape character to the output file, but with 2 it fails 
when 
writing to the file. Found if I removed the escape it would write and run fine? 
Eventually, found that I removed the Organization is line sequention it would 
work just fine. Not sure why that would limit the use of escape?

            SELECT REPORT-OUT ASSIGN TO "SCN".
      *            ORGANIZATION IS LINE SEQUENTIAL.


Record sent to file was just to set the printer mode?

        01  HP-SETUP.
      *  Reset Printer
            05 filler           pic x value X"1B".
            05 filler           pic x value 'E'.
      *  Landscape, top margin 1,60 lpp, 8 lines per inch
            05 filler           pic x value X'1B'.
            05 filler           pic x(11) value '&l1o1e60f8D'.
      *  Left margin 0, Right margin 132
            05 filler           pic x value X'1B'.
            05 filler           pic x(8) value '&a0l132M'.
      *  13 point font
            05 filler           pic x value X'1B'.
            05 filler           pic x(5) value '(s13H'.

Easy to fix, but wondering why it does this in version 2, but it had no issue 
in 
1.1.  Also, not sure why removing the line sequential fixes it?

Thanks.




+----------------------------------------------------------+
  Michael D. Setzer II -  Computer Science Instructor      
  Guam Community College  Computer Center                  
  mailto:address@hidden                            
  mailto:address@hidden
  Guam - Where America's Day Begins                        
  G4L Disk Imaging Project maintainer 
  http://sourceforge.net/projects/g4l/
+----------------------------------------------------------+

http://setiathome.berkeley.edu (Original)
Number of Seti Units Returned:  19,471
Processing time:  32 years, 290 days, 12 hours, 58 minutes
(Total Hours: 287,489)

address@hidden CREDITS
ABC         16613838.513356   |   EINSTEIN    88650200.285695
ROSETTA     40612200.678824   |   SETI        75411180.292144



reply via email to

[Prev in Thread] Current Thread [Next in Thread]