of_unregister

pfcdwsrv.pbl   >   pfc_n_cst_dwsrv_multitable   >   of_unregister

Name	Datatype
li_cnt	integer
li_registeredcount	integer
ls_empty	string[]

public function integer of_unregister (string as_table);//////////////////////////////////////////////////////////////////////////////
//
//	Function:  		of_UnRegister
//
//	Access:    		Public
//
//	Arguments: 
//  as_table: 			A string containing the table to unregister.
//
//	Returns:  		Integer
// 1 - success
// -1 - error
//
//	Description: 	
//	Unregister the passed in table.
//
//////////////////////////////////////////////////////////////////////////////
//
//	Revision History
//
//	Version
//	6.0   Initial version
//
//////////////////////////////////////////////////////////////////////////////
//
//	Copyright © 1996-1999 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_registeredcount
integer	li_cnt
string	ls_empty[]

// Validate the datawindow reference.
If IsNull(idw_Requestor) Or Not IsValid(idw_Requestor) Then Return -1

// Get the upper value for registered objects.
li_registeredcount = UpperBound ( inv_newupdate ) 
For li_cnt = 1 to li_registeredcount
	If Trim(inv_newupdate[li_cnt].s_updatetable) = Trim(as_table) Then
		// The table to be unregisterd has been found. 
		inv_newupdate[li_cnt].s_updatetable = ''
		inv_newupdate[li_cnt].i_whereoption = 0
		inv_newupdate[li_cnt].b_keyupdateinplace = False
		inv_newupdate[li_cnt].s_updatecolumns = ls_empty
		inv_newupdate[li_cnt].s_keycolumns = ls_empty
		Return 1
	End If
Next

// Not registered.
Return -1
end function

Name	Owner
systemfunctions.isnull	systemfunctions
systemfunctions.isvalid	systemfunctions
systemfunctions.trim	systemfunctions
systemfunctions.upperbound	systemfunctions