This program runs a Report-IV report from Basic. It puts the report name in REPORT$[1] and calls OOR, the method behind CONNECT REPORT.
.HOFF! Example of how use CONNECT REPORT from Basic! This example uses the sampel data from the UT library.!00010 REM &REM&00100 CALL "IDPUB4",]6$,]7$,]8$,]9$ ! Set Idol-IV System Variables00110 CALL "8ZPSYS",]SYSV$ !00120 DIM REPORT$[10] ! Dimension REPORT$ for call00130 LET REPORT$[1] = "UTXRAR01" ! Menu Name00140 CALL "OOR",REPORT$[ALL] ! Call CONNECT REPORT00150 RUN "ID" ! Program to run after Report00200 ENDNotes
- The example uses report UTXRAR01 from the UT sample library. The comment on line 00130 calls it a menu name, but REPORT$[1] holds the report name.
- Line 00150 runs the program ID after the report finishes. Change it to the program your application should return to.