$PBExportHeader$bitmap.sra $PBExportComments$Generated Application Object forward global type bitmap from application end type global transaction sqlca global dynamicdescriptionarea sqlda global dynamicstagingarea sqlsa global error error global message message end forward global variables w_main gw_frame Integer gi_window end variables global type bitmap from application string appname = "bitmap" boolean toolbartext = true string toolbarframetitle = "Toolbar" string toolbarsheettitle = "Toolbar" boolean toolbarusercontrol = false end type global bitmap bitmap on bitmap.create appname="bitmap" message=create message sqlca=create transaction sqlda=create dynamicdescriptionarea sqlsa=create dynamicstagingarea error=create error end on on bitmap.destroy destroy(sqlca) destroy(sqlda) destroy(sqlsa) destroy(error) destroy(message) end on event open;Open(w_main) end event
File: bitmap.sra
Size: 933
Date: Mon, 04 Nov 2019 19:18:20 +0100
Size: 933
Date: Mon, 04 Nov 2019 19:18:20 +0100
- application bitmap(sra)