of_populatebeforeclose

pfcutil.pbl   >   pfc_w_sqlspyinspect   >   of_populatebeforeclose

Name	Datatype
acb_pressed	commandbutton

Name	Datatype
li_rc	integer

protected subroutine of_populatebeforeclose (commandbutton acb_pressed);//////////////////////////////////////////////////////////////////////////////
//
//	Function:  		of_populatebeforeclose
//
//	Access:  		protected
//
//	Arguments:
//	acb_pressed		The command button pressed.
//
//	Returns:  		(None)
//	
//	Description:	Close this window after updating the SQLspy service of all
//						relevant information.
//
//		Note:			Close with return values-
//						0 caller's processing should continue as normal.
//						1 If functionality available, caller's proccessing should stop.
//						2 Caller's processing should skip this request and
//						  execute the next request (if available).
//						-1 if an error occurs.
//
//////////////////////////////////////////////////////////////////////////////
//
//	Revision History
//
//	Version
//	5.0   Initial version
//
//////////////////////////////////////////////////////////////////////////////
//
//	Copyright © 1996-1997 Sybase, Inc. and its subsidiaries.  All rights reserved.
//	Any distribution of the PowerBuilder Foundation Classes (PFC)
//	source code by other than Sybase, Inc. and its subsidiaries is prohibited.
//
//////////////////////////////////////////////////////////////////////////////

integer li_rc = -1

//Notify the SQLSpy service of any updates
gnv_app.inv_debug.inv_sqlspy.of_SetCurrentHeading(mle_currentheading.Text)
gnv_app.inv_debug.inv_sqlspy.of_SetCurrentSyntax(mle_currentsyntax.Text)

//Set the return code.
If acb_pressed = cb_cancel Then
	li_rc = 2
ElseIf acb_pressed = cb_cancelall Then
	li_rc	= 1
ElseIf acb_pressed = cb_step Then
	li_rc = 0
ElseIf acb_pressed = cb_resume Then
	//Change the BatchMode in the SQLspy service.
	gnv_app.inv_debug.inv_sqlspy.of_SetBatchMode (True)
	li_rc	= 0
End If

//Close this window with the appropriate return code.
CloseWithReturn (this, li_rc)

Return
end subroutine

Name	Owner
pfc_w_sqlspyinspect.cb_step.clicked	cb_step
pfc_w_sqlspyinspect.cb_cancel.clicked	cb_cancel
pfc_w_sqlspyinspect.cb_cancelall.clicked	cb_cancelall
pfc_w_sqlspyinspect.cb_resume.clicked	cb_resume

Name	Owner
systemfunctions.closewithreturn	systemfunctions
pfc_n_cst_sqlspy.of_SetCurrentSyntax	pfc_n_cst_sqlspy
pfc_n_cst_sqlspy.of_setbatchmode	pfc_n_cst_sqlspy
pfc_n_cst_sqlspy.of_SetCurrentHeading	pfc_n_cst_sqlspy

Full name
pfc_w_sqlspyinspect
demopfc