Description
Initializes an action before the PCF screen is displayed and saves the results.
Properties, Procedures and Functions
Procedure InitPCF
Function SavePCF
Example
Dim Debug
Dim Debugging
sub
InitDebug
set
Debug = Application.IsahForms.DebugForm
Debug.Show
Debug.Caption = "
Debug test script
"
Debugging = True
end sub
Sub
InitPCF
Call InitDebug
End Sub
function
SavePCF
' Determines whether to save the results
SavePCF = (Application.IsahForms.BoxYesNo(
"Save answers?"
) = 6)
end function