File: resize_response.sra
Size: 803
Date: Wed, 13 Feb 2019 02:31:06 +0100
$PBExportHeader$resize_response.sra
$PBExportComments$Generated Application Object
forward
global type resize_response from application
end type
global transaction sqlca
global dynamicdescriptionarea sqlda
global dynamicstagingarea sqlsa
global error error
global message message
end forward

global type resize_response from application
string appname = "resize_response"
end type
global resize_response resize_response

on resize_response.create
appname="resize_response"
message=create message
sqlca=create transaction
sqlda=create dynamicdescriptionarea
sqlsa=create dynamicstagingarea
error=create error
end on

on resize_response.destroy
destroy(sqlca)
destroy(sqlda)
destroy(sqlsa)
destroy(error)
destroy(message)
end on

event open;Open(w_main)

end event