isCOBOL Evolve : Appendices : Library Routines : CBL_WRITE_SCR_N_CHATTR
CBL_WRITE_SCR_N_CHATTR
The CBL_WRITE_SCR_N_CHATTR library routine writes a specified character and attribute to a string of positions on the screen.
This routine is implemented for compatibility with other COBOLs in order to facilitate migrations. Using this routine in new programs is not suggested; you should rely on DISPLAY and ACCEPT verbs instead.
Syntax:
 CALL "CBL_WRITE_SCR_N_CHATTR" USING screenPosition 
                                     character
                                     attributeBuffer
                                     stringLength
                              GIVING returnCode
Parameters:
screenPosition
Group Item
Group item defined as follows:
 
01  screenPosition.
    03  rowNumber      PIC X COMP-X.
    03  columnNumber   PIC X COMP-X.
 
It specifies the screen position at which to start writing. The top left corner is row 0, column 0.
character
PIC X COMP-X
It specifies the character to write to the screen.
attributeBuffer
PIC X(n)
It specifies the character attributes.
stringLength
PIC XX COMP-X
On entry, contains the length of the character string.
Return code:
returnCode can be any numeric data item and provides additional information:
1
Operation successful.
0
Operation failed.