Kbase P20766: How to label fields from the values of an extent field in an
Autor |
  Progress Software Corporation - Progress |
Acesso |
  Público |
Publicação |
  25/11/2003 |
|
Status: Unverified
GOAL:
How to label fields from the values of an extent field in an SDO.
FIX:
DEF VAR labelholder AS CHARACTER EXTENT 10.
ASSIGN labelholder = DYNAMIC-FUNCTION('rowValues':U IN h_dbudprof,
INPUT "Table" /* CHARACTER */,
INPUT "CHARACTER" /* CHARACTER */,
INPUT "" /* CHARACTER */).
misc-field1:LABEL IN FRAME {&FRAME-NAME} = labelholder[1].
misc-field2:LABEL IN FRAME {&FRAME-NAME} = labelholder[2].
misc-field3:LABEL IN FRAME {&FRAME-NAME} = labelholder[3].
misc-field4:LABEL IN FRAME {&FRAME-NAME} = labelholder[4].
misc-field5:LABEL IN FRAME {&FRAME-NAME} = labelholder[5].
misc-field6:LABEL IN FRAME {&FRAME-NAME} = labelholder[6].
misc-field7:LABEL IN FRAME {&FRAME-NAME} = labelholder[7].
misc-field8:LABEL IN FRAME {&FRAME-NAME} = labelholder[8].
misc-field9:LABEL IN FRAME {&FRAME-NAME} = labelholder[9].
misc-field10:LABEL IN FRAME {&FRAME-NAME} = labelholder[10].