$PBExportHeader$getfolder.sra $PBExportComments$Generated Application Object forward global type getfolder from application end type global transaction sqlca global dynamicdescriptionarea sqlda global dynamicstagingarea sqlsa global error error global message message end forward global variables end variables global type getfolder from application string appname = "getfolder" end type global getfolder getfolder on getfolder.create appname="getfolder" message=create message sqlca=create transaction sqlda=create dynamicdescriptionarea sqlsa=create dynamicstagingarea error=create error end on on getfolder.destroy destroy(sqlca) destroy(sqlda) destroy(sqlsa) destroy(error) destroy(message) end on event open;Open(w_main) end event
File: getfolder.sra
Size: 784
Date: Sun, 19 May 2019 23:27:44 +0200
Size: 784
Date: Sun, 19 May 2019 23:27:44 +0200
- application getfolder(sra)