vfoGRCompareParams

vfoGRCompareParams(
g_obj
d_inst1
d_inst2
) 
=> t / nil

Description

Checks the equality of FGR instances. You override this function and can define its new equality for FGR instances. By default, it checks the value of the following parameters: verticalPitch, horizontalPitch, verticalSegWidth, and horizontalSegWidth. This function is called by the Merge command. For the Merge command to succeed, this function should return t for the two FGR instances being compared.

Arguments

g_obj	An instance of the vfoAdvGuardRing SKILL++ class or any of its subclasses.
d_inst1 d_inst2	The database ID of the two FGR instances that need to be compared.

Value Returned

t	The values of the following four parameters are equal for the two specified FGR instances: verticalPitch, horizontalPitch, verticalSegWidth, and horizontalSegWidth.
nil	The values of the four parameters mentioned above are not equal for the two specified FGR instances.

Example

defmethod(vfoGRCompareParams

    ((obj vfoAdvGuardRing) inst1 inst2)

    let(()

    if( ((vfoGetParam(inst1 "verticalPitch") ==

        vfoGetParam(inst2 "verticalPitch")) &&

        (vfoGetParam(inst1 "horizontalPitch") ==

        vfoGetParam(inst2 "horizontalPitch")) &&

        (vfoGetParam(inst1 "horizontalSegWidth") ==

        vfoGetParam(inst2 "horizontalSegWidth")) &&

        (vfoGetParam(inst1 "verticalSegWidth") ==

        vfoGetParam(inst2 "verticalSegWidth"))) t nil)

    )

)

Return to top