` Printed Icetips Article

Icetips Article



ABC: Template change to allow parameter passing to forms
1999-03-30 -- Ken Wagner
 
Newsgroups: topspeed.products.c5ee

GentleCoders:

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.

Ken Wagner



Printed May 3, 2024, 7:32 am
This article has been viewed/printed 35120 times.
Google search has resulted in 19 hits on this article since January 25, 2004.