retrieveend

pfcmain.pbl   >   pfc_n_ds   >   retrieveend   

Full name pfc_n_ds.retrieveend
Access public
Extend of
Return value
Prototype event retrieveend()

Name Datatype
No Data

Name Datatype
ls_sqlspyheading string
ls_sqlspymessage string 

event retrieveend;//////////////////////////////////////////////////////////////////////////////
//
//	Event:  RetrieveEnd
//
//	Description:  Allow for SQLSpy service
//
//////////////////////////////////////////////////////////////////////////////
//	
//	Revision History
//
//	Version
//	6.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.
//
//////////////////////////////////////////////////////////////////////////////

string 	ls_sqlspyheading
string	ls_sqlspymessage

//If available trigger the SQLSpy service.
If IsValid(gnv_app.inv_debug) Then
	If IsValid(gnv_app.inv_debug.inv_sqlspy) Then

		//Create the heading and message for the SQLSpy.
		ls_sqlspyheading = 'RetrieveEnd - ' + this.ClassName() 
		ls_sqlspymessage = "Rows Retrieved = "+ string(rowcount)
		
		//Send the information to the service for processing.
		gnv_app.inv_debug.inv_sqlspy.of_sqlSyntax  &
			(ls_sqlspyheading, '/*** ' + ls_sqlspymessage + ' ***/')
		
	End If
End If

end event

     
Name Owner
No Data

     
Name Owner
powerobject.classname powerobject
systemfunctions.isvalid systemfunctions
systemfunctions.string systemfunctions
pfc_n_cst_sqlspy.of_sqlsyntax pfc_n_cst_sqlspy

     
Full name
demopfc

     
Name Scope
No Data