Progress
ADM 2 Reference


addLink (smart.p)

Adds a link between two objects by setting property values in each.

Parameters:

INPUT phSource AS HANDLE

Source procedure handle.

INPUT pcLink AS CHARACTER

Link name.

INPUT phTarget AS HANDLE

Target procedure handle.

Returns: Nothing (procedure)

Notes:

Examples:

/*  This example will define a dynamic link from MyWindow to the  
    SDOdCust. If the link type SpecialEvent is not defined as a SupportedLink 
    for either SmartWindows or SmartDataObjects, then addLink will do a 
    single SUBSCRIBE in hdCust to ‘SpecialEvent’ in hMyWindow. This means 
    that when code in MyWindow does ‘PUBLISH ‘SpecialEvent’." The  
    user-defined internal procedure named SpecialEvent in dCust will be 
    executed.*/ 
RUN addLink (INPUT hMyWindow, INPUT ‘SpecialEvent’:U, INPUT hdCust). 
/*  This example will add an instance of the SupportedLink ‘Navigation’ 
    from a SmartPanel to an SDO. Normally this link would be defined at 
    design time and the call to addLink generated automatically by the 
    if the SmartPanel were run after startup by application code, if  
    response to some application event, then the link would need to be  
    created by application code also. AddLink will SUBSCRIBE the SDO to 
    fetchFirst, fetchNext, fetchPrev, and fetchLast in the SmartPanel,  
    because these events are listed in the SmartPanel property 
    NavigationSourceEvents in the SDO. */ 
RUN addLink (INPUT hSmartPanel, INPUT ‘Navigation’:U, INPUT hdCust). 


Copyright © 2004 Progress Software Corporation
www.progress.com
Voice: (781) 280-4000
Fax: (781) 280-4095