` Printed Icetips Article

Icetips Article



Par2: Template modification to pass parameters - C5
1999-03-30 -- Ken Wagner
 
A big tip of the hat (not dunce either) to Arnor, David, Russell, Steve, et.al.

The Update Form procedure overloading with amnesia in the calling browse may be 
solved.

ABBrowse.TPW

At line #1903 change:

  #PROMPT('&Update Procedure',PROCEDURE),%UpdateProcedure

to

  #PROMPT('&Update Procedure',PROCEDURE),%UpdateProcedure
  #PROMPT('Parameters:',@s255),%UpdateProcedureParameters  !(Add this line)


At line #1931 change:

  #IF(%UpdateProcedure)
    #ADD(%ProcsCalled,%UpdateProcedure)
    #IF(~%EditInPlace)
%ManagerName.AskProcedure = %(INSTANCE(%ProcsCalled))
    #ENDIF
  #ENDIF

to

  #IF(%UpdateProcedure)
    #IF (%UpdateProcedureParameters)
        #ADD(%ProcsCalled,%UpdateProcedure&%UpdateProcedureParameters)
!New line for Parms with "&"
    #ELSE
        #ADD(%ProcsCalled,%UpdateProcedure)            !If no parms passed by browse
    #ENDIF
    #IF(~%EditInPlace)
%ManagerName.AskProcedure = %(INSTANCE(%ProcsCalled))
    #ENDIF
  #ENDIF

Thanks Arnor, for the C4 template patch to use as a guide. As Arnor stated: "You now 
have a parameter prompt below the update combodrop where you can specify the 
parameters in the normal format"

e.g. (CustCode,StartDate,EndDate), remember to include the parentheses.

Amazin'. Works.

Does the code look right to you? Corrections & improvements welcome.

G'day, mates.



Printed November 21, 2024, 6:39 am
This article has been viewed/printed 35194 times.