NAME: findtopid
PURPOSE: retrouve a partir d''un Id de widget l'Id du widget qui est
"the top-level base" (i.e., it has no parent)
CATEGORY: aide pour les widgets
CALLING SEQUENCE: res=findtopid(Widget_ID)
INPUTS: Widget_ID: this argument should be the widget ID of the
widget for which information is desired.
KEYWORD PARAMETERS:
OUTPUTS: l'Id du widget qui est "the top-level base"
COMMON BLOCKS:
SIDE EFFECTS:
RESTRICTIONS:
EXAMPLE: