Login
`
Templates, Tools and Utilities
|
||
Icetips Article
Back to article list
Search Articles
Add Comment
Printer friendly
Direct link
Par2: A template to return the current procedure name 1998-09-21 -- Craig Ransom Note that it's for CW 2003 but
the same rules apply, but in C4/C5 you will have to add FAMILY() to it
and check to make sure that the embed points are still there!
#TEMPLATE(ThisProcTPL,'Save Procedure Name TPL')
#!-------------------------------------------------------------
#EXTENSION(ThisProc,'Save Procedure Name TPL')
#AT(%GlobalData)
CurrentProcedureName STRING(64)
#ENDAT
#AT(%ProcedureSetup),FIRST
CurrentProcedureName = '%Procedure'
#ENDAT
Populate this at the GLOBAL level in your app, and it will "hook" itself
into _all_ the procedures
Today is November 21, 2024, 7:38 am This article has been viewed 35197 times.
|
|