Differences

ACUCOBOL-GT contains certain differences from ICOBOL, even when you are using ICOBOL compatibility mode. These differences are:

ASSIGN TO DISPLAY and KEYBOARD

ICOBOL allows an ASSIGN clause to use the word DISPLAY to refer to the user's screen and KEYBOARD to refer to the user's input device. ACUCOBOL-GT allows these terms, but when they are used a file name must be specified. This allows (as ICOBOL does) the specification of a text file. However, ACUCOBOL-GT does not support the direct assignment to the user's screen or keyboard. To do this, you will have to add code to identify the device name of the user's terminal and ASSIGN to that name. You can use the ACCEPT FROM SYSTEM-INFO verb to return the user's station id.

ACCEPT FROM LINE NUMBER

This form of the ACCEPT statement returns a 3-digit number corresponding to the console device that is controlling the executing program. Because most of the machines that run ACUCOBOL-GT do not use device numbers, but use alphanumeric names instead, ACUCOBOL-GT computes the device number by the following procedure. First, the device name is converted to uppercase and hyphens are converted to underscores (on UNIX systems, the initial /dev/ is removed). This name is then searched for in the environment (including the configuration file). If it is found, then the value of the name is returned. If it is not found, a number is constructed from any digits found in the device name. If no digits are present, the value "0" is used.

ACCEPT FROM EXCEPTION

This statement, which returns the reason the last CALL statement failed, is not supported. A similar function can be coded using the C$CALLERR library routine described in Appendix I of the ACUCOBOL-GT Manual Set.

Library Routines

ICOBOL contains several library routines that can be called. These routines start with a "#" character. ACUCOBOL-GT does not support these routines and will ignore them if you call them with the CALL PROGRAM verb. You will have to rename the routines and code them in C or COBOL if you want to use them.