Very similar to my way:
In the <DEFINES> trigger, I place
#include <$componentname>
after the first compile of a component:
- I start a Cleanup
- I collect all entities / fields / UCOMPSTAMP etc.
- -and write it as a set of #defines to include proc <$componentname>
- compile to component a 2nd time to have all that info hardcoded in the FRM
A typical MYFORM1 include looks like:
#define UCOMPSTAMP = dd-mm-yyy
#define entities = ENT_1,Ent_2,Ent_3
#define fields_ENT_1=fielda,fieldb
#define fields_ENT_2=field2a,field2b
#define fields_ENT_3=x_test
using #for loops we get a much better performance than using uniface lists to do the job
and you can access all fields by:
#for entity = (<entities>)
#for field = (fields_<entity>)
<field>.<entit<> = ""
#endfor ; field
#endfor ; entity
#undefine field
#undefine entity
Success, Uli
Author: ulrich-merkel (
ulrichmerkel@web.de)