How to change label position in forms

[ivanBCN]

Hi,
We have a FORM whit to char fields on it. We´re trying to change the position and width of the first column. We just change the FORMAT property of this char variable and its LABEL in order to fit perfectly with the new format. The troubles come when we move the COLUMN position of the second field, because the field moves perfectly but its LABEL doesn´t.
I post you all the code we´re using as an example in order to show you want´s the problem. If anyone knows how to position column labels on its correct places when they´re are moved, please post the solution.
Thanks for your help.
Best regards.


DEF VAR char1 AS CHAR FORMAT "X(10)" LABEL "first-char" INIT "aaabbbcccdddeeefff".
DEF VAR char2 AS CHAR FORMAT "X(10)" LABEL "second-char" INIT "aaabbbcccdddeeefff".
FORM
char1 char2 SKIP
WITH FRAME f03 WIDTH 80 OVERLAY WITH
TITLE "title".
DISPLAY
char1 char2 WITH FRAME f03.
ASSIGN char1:FORMAT IN FRAME f03 = "x(20)"
char1:LABEL IN FRAME f03 = "first-char "
char2:COLUMN IN FRAME f03 = 24.

 

[mpowell_esq]

The attribute you require to set here is the column-label. Appropriate syntax would be similar to;
ASSIGN
objName:COLUMN-LABEL = "STRING LABEL HERE"
.

 

[ivanBCN]

I´m afraid the attribute COLUMN-LABEL is not setable in this case. If you try to change this attribute, progress returns error 4052 telling that COLUMN-LABEL is not a setable atribute.
:-(

 

[barnesat]

Try This:

DEF VAR char1 AS CHAR FORMAT "X(10)" LABEL "first-char" INIT "aaabbbcccdddeeefff".
DEF VAR char2 AS CHAR FORMAT "X(10)" LABEL "second-char" INIT "aaabbbcccdddeeefff".
FORM
char1 char2 SKIP
WITH
FRAME f03
WIDTH 80 OVERLAY
TITLE "title".
DISPLAY
char1 char2 AT 24
WITH FRAME f03.