|
of_getregistered
|
|
Full name
|
pfc_n_cst_mru.of_getregistered
|
Access
|
public
|
Extend of
|
integer
|
Return value
|
integer
|
Prototype
|
public function integer of_getregistered(string)
|
Name
|
Datatype
|
li_count
|
Integer
|
li_index
|
Integer
|
li_rc
|
Integer
|
public function integer of_getregistered (string as_id);//////////////////////////////////////////////////////////////////////////////
//
// Function: of_GetRegistered
//
// Access: public
//
// Arguments:
// as_id id to be checked for registration
//
// Returns: Integer
// > 0 = index of id in the registered array (it's been registered)
// <=0 = Not registered.
//
// Description:
// Returns the index of the id in the register array
//
//////////////////////////////////////////////////////////////////////////////
//
// 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.
//
//////////////////////////////////////////////////////////////////////////////
Integer li_count, li_index, li_rc
if IsNull(as_id) or (as_id = "") then
return -1
end if
// Trim and Convert the ID to lower case.
as_id = Trim(Lower(as_id))
li_count = upperbound(inv_register)
// loop through register array
For li_index = 1 to li_count
if as_id = inv_register[li_index].is_id then
li_rc = li_index
exit
end if
end for
return li_rc
end function
Name
|
Owner
|
systemfunctions.isnull |
systemfunctions
|
systemfunctions.lower |
systemfunctions
|
systemfunctions.trim |
systemfunctions
|
systemfunctions.upperbound |
systemfunctions
|