Q5/ws_objects/Ew_mainfunc.pbl.src/ljerp_mainfunc.sra

$PBExportHeader$ljerp_mainfunc.sra
$PBExportComments$Generated Application Object
forward
global type ljerp_mainfunc from application
end type
global transaction sqlca
global dynamicdescriptionarea sqlda
global dynamicstagingarea sqlsa
global error error
global message message
end forward

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

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

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