n_ToolTip 	inv_ToolTip ,  inv_TooltipSupplier ,inv_ToolTipRest

//////////////////////////////////////////////////////////
inv_Tooltip.of_SetTipTitle( inv_Tooltip.TTI_INFO, "Ïðèìå÷àíèå" )
inv_Tooltip.of_SetMaxWidth(  1000  )
inv_Tooltip.of_SetDelayTime( inv_Tooltip.TTDT_RESHOW, 1200  )
inv_Tooltip.of_SetDelayTime( inv_Tooltip.TTDT_AUTOPOP,  120  )
inv_Tooltip.of_SetDelayTime( inv_Tooltip.TTDT_INITIAL,  60  )

ii_DwTabular = inv_ToolTip.of_AddTool(tab_page.tp_rest. dw_customer_waiting, "" , inv_ToolTip.TTF_SUBCLASS )	//+ inv_ToolTip.TTF_ABSOLUTE + inv_ToolTip.TTF_TRACK 


inv_TooltipSupplier.of_SetTipTitle( inv_TooltipSupplier.TTI_INFO, "Ïðèìå÷àíèå" )
inv_TooltipSupplier.of_SetMaxWidth(  1000  )
inv_TooltipSupplier.of_SetDelayTime( inv_TooltipSupplier.TTDT_RESHOW, 1200  )
inv_TooltipSupplier.of_SetDelayTime( inv_TooltipSupplier.TTDT_AUTOPOP,  120  )
inv_TooltipSupplier.of_SetDelayTime( inv_TooltipSupplier.TTDT_INITIAL,  60  )

ii_DwTabular = inv_TooltipSupplier.of_AddTool(tab_page.tp_rest. dw_Supplier_waiting, "" , inv_TooltipSupplier.TTF_SUBCLASS )	//+ inv_TooltipSupplier.TTF_ABSOLUTE + inv_TooltipSupplier.TTF_TRACK 

Integer 	li_X, li_Y, li_Id
string 	ls_Text, ls_Type
try
	
	If ii_DwTabular =  0  Then Return  0 
	If row =  0  Then
		il_Row = - 1 
		is_ColNameTabular = ""
		inv_Tooltip.of_SetTipText( This, ii_DwTabular, "" )
		Return  0 
	End If
	
	ls_Type = dwo.Type
	
		
		If dwo.Type = "column" Then
			
		//	If String( dwo.Name ) = 'vtext'  /*Or il_Row <> row*/ Then
				li_X = UnitsToPixels( Integer( dwo.X ),XUnitsToPixels! )
				li_Y = UnitsToPixels( Integer( dwo.Y ), YUnitsToPixels! )
				is_ColNameTabular = String( dwo.Name )
		//		li_Id = Integer( this.Describe( is_ColNameTabular + ".id" ) )
		       if not isNUll(String( This.Object.vground[row] ) ) then 
					ls_Text = String( This.Object.vground[row] ) 
				else 
					ls_text = ''
				end if
				ls_text += string( this.object.place_name[row] ) 
										
				
				inv_Tooltip.of_SetTipText( This, ii_DwTabular, ls_Text )
				il_Row = Row
		//	End If
		Else
			inv_Tooltip.of_SetTipText( This, ii_DwTabular, "" )
			il_Row = - 1 
			is_ColNameTabular = ""
		End If
catch 	( RunTimeError err )
	
end try 
Return  0