$PBExportHeader$indirect_variable.sra $PBExportComments$Generated Application Object forward global type indirect_variable from application end type global transaction sqlca global dynamicdescriptionarea sqlda global dynamicstagingarea sqlsa global error error global message message end forward global type indirect_variable from application string appname = "indirect_variable" end type global indirect_variable indirect_variable on indirect_variable.create appname="indirect_variable" message=create message sqlca=create transaction sqlda=create dynamicdescriptionarea sqlsa=create dynamicstagingarea error=create error end on on indirect_variable.destroy destroy(sqlca) destroy(sqlda) destroy(sqlsa) destroy(error) destroy(message) end on event open;Open(w_main) end event
File: indirect_variable.sra
Size: 821
Date: Sat, 09 Feb 2019 21:55:36 +0100
Size: 821
Date: Sat, 09 Feb 2019 21:55:36 +0100
- application indirect_variable(sra)