` Detect if Procedure is Browse or Form (Alexander) - Icetips Article
Icetips - Templates, Tools & Utilities for Clarion Developers

Templates, Tools and Utilities
for Clarion Developers

Icetips Article

Back to article list   Search Articles     Add Comment     Printer friendly     Direct link  

Templates: Detect if Procedure is Browse or Form
2004-02-24 -- Alexander
 
Newsgroups: softvelocity.clarion.templates Hi Alvin We use this method in some of our VIVID templates. It appears as being OK. Ironically the group is called %FormOrBrowse :-) It analyses procedure tempaltes and works in c5-c6 (and maybe in c4) Regards Alexander www.vividhelp.com ---------------------------------------------------------------------------- #! decalrations.................................. #ATSTART #DECLARE(%IsForm) #DECLARE(%ProcType) #ENDAT #! group def. .................................. #GROUP(%FormOrBrowse) #CLEAR(%IsForm) #FOR(%ActiveTemplate) #IF(INSTRING('RecordValidation',%ActiveTemplate,1,1)) #SET(%IsForm,%TRUE) #SET(%ProcType,'Form') #BREAK #ENDIF #ENDFOR #IF(%IsForm) #ELSE #FOR(%ActiveTemplate) #IF(INSTRING('BrowseBox',%ActiveTemplate,1,1)) #SET(%ProcType,'Browse') #BREAK #ENDIF #ENDFOR #ENDIF #! calling group ........................................... #INSERT(%FormOrBrowse) #IF(%ProcType = 'Browse') ............................. #ENDIF ---------------------------------------------------------------------------- -- "Alvin" wrote in message news:A921.1077250650.8915@discuss.softvelocity.com... > Hi Experts, > > In template writing, how do we determine whether it is a form window or a > browse window? > > Currently, I m using this method for checking: > WHERE(LEFT(%Procedure, 5) <> 'Browse') > > But if naming of my browse window does not starts with 'Browse..., I will > have a problem. > > Thank you in advance

Today is April 27, 2024, 10:21 am
This article has been viewed 35108 times.
Google search has resulted in one hit on this article since January 25, 2004.


Back to article list   Search Articles   Add Comment   Printer friendly

Login

User Name:

Password:


Gold Subscription
Buy Now
Silver Subscription
Buy Now
Solo Subscription
Buy Now
Multiple Copy Pricing
Renew Subscription