The problem appears at printing large tables. We have a table of 200-300 lines.

I try to print it with the help of "ADDTABLE". The text of the program used is as follows:

declare function Set_Printer, RGB

DECLARE SUBROUTINE Set_Printer

$insert OIPRINT_EQUATES

***

Font10=^Academy":@FM:10:@FM:"L":@FM:0:@FM:0:@FM:0:@FM:0:@FM:0

Font10G=^Academy":@FM:10:@FM:"L":@FM:1:@FM:0:@FM:0:@FM:0:@FM:0

* Start the OIPI report with the INIT message

STAT=Set_Printer("START32")

Set_Printer("INIT","","","",1,2)

STAT=Set_Printer("FONT", Font10G)

TEXT=   "

Set_Printer("ADDTABLE",'<_12000',"",TEXT,,,,0, 0) colFormat=<_1500':@vm:'<_1500':@vm:'<_1500':@vm:'<_1500':@vm:'<_1500':@vm:'<_1500':@vm:'<_1500':@vm:'<_1500' colHeader=Column 1':@vm:'Column 2':@vm:'Column 3':@vm:'Column 4':@vm:'Column 5':@vm:'Column 6':@vm:'Column 7':@vm:'Column 8' data=' Set_Printer("ADDTABLE",colFormat,colHeader,data,,,, 0, 7)

FOR I=1 TO 10

STAT=Set_Printer("FONT", Font10G)

head="

table=I:" 1111111 111111111111 11111111":@vm:"66666666666666666666666666666666666666666666666666666666666666666666666666666"

stat=Set_Printer("ADDTABLE", "^4500":@VM:"^7500", head, table, "", "", 0, 7)

FOR J=1 TO 30

 STAT=Set_Printer("FONT", Font10)

 head="

 table=J:"   11111 ":@vm:"222222222":@vm:"3333333333":@vm:"4444444444 ":@vm:"555555555555":@vm:"66666666666":@vm:"777777":@vm:"8888888888"

 stat=Set_Printer("ADDTABLE", "^1500":@VM:"^1500":@VM:"^1500":@VM:"^1500":@VM:"^1500":@VM:"^1500":@VM:"^1500":@VM:"^1500", head, table, "", "", 0, 7)

NEXT J

NEXT I

TEXT=END PRINT"

Set_Printer("ADDTABLE",'<_12000',"",TEXT,,,'',0, 0)

stat=Set_Printer("TERM")

RETURN 0

The program starts to work and after a while in the course of operation hangs,

Without any notification.

OpenInsight 9.1 is used.

Thanks for helping                          [email protected]

remove - STAT=Set_Printer("START32") not used anymore.

I ran your code (with the start32) and it worked for me. (from the system monitor)

View this thread on the Works forum...