![]() | |
#1
| |||
| |||
|
#2
| |||
| |||
|
#3
| |||
| |||
|
|
Frans, What you need is a multi-valued list of the field (dict?) names you want to insert - if your equates are being built by a program, just have it create a "real string" as well, so ENTRY.LIST = "" EQU ENTRY.NAME TO 1 ENTRY.LIST<1,ENTRY.NAME> = "ENTRY.NAME" EQU ENTRY.TITLE TO 2 ENTRY.LIST<1,ENTRY.TITLE> = "ENTRY.TITLE" ..... ..... EQU ENTRY.DT TO 10 ENTRY.LIST<1,ENTRY.DT> = "ENTRY.DT" .... .... read SO.ITEM form file.so, so.id else so.item='' * VAR.TO.DISPLAY = ITEM.SO<LAYOUT.FIELD LOCATE(LAYOUT.FIELD,ENTRY.LIST,1;POS) THEN VAR.TO.DISPLAY = ITEM.SO<POS END ELSE GOTO ERROR.HANDLER END HTH Ross Ferris Stamina Software Visage - speaks YOUR language! |
![]() |
| Thread Tools | |
| Display Modes | |
| |