$PBExportHeader$runandwait.sra forward global transaction sqlca global dynamicdescriptionarea sqlda global dynamicstagingarea sqlsa global error error global message message end forward global type runandwait from application end type global runandwait runandwait on runandwait.create appname = "runandwait" message = create message sqlca = create transaction sqlda = create dynamicdescriptionarea sqlsa = create dynamicstagingarea error = create error end on on runandwait.destroy destroy( sqlca ) destroy( sqlda ) destroy( sqlsa ) destroy( error ) destroy( message ) end on event open;Open(w_main) end event
- Sources
- TopWiz
- runandwait
- PB8
- runandwait.sra
File: runandwait.sra
Size: 651
Date: Mon, 31 Dec 2018 21:14:39 +0100
Size: 651
Date: Mon, 31 Dec 2018 21:14:39 +0100
- application runandwait(sra)