conditional display in form (urgent)

[shafee212]

hi ,

I have a requirement . I have to display few variables in form ,

for eg cmmt1 skip
cmmt2 skip
cmmt3 skip
cmmt4 skip .

all these variables get assigned form mster comments ie cd_det of mfg pro

My requirement is that if any of teh values remain blank .., it should not occupy the line ,
ie it should not be like

cmmt1

cmmt3
cmmt4

if cmmt2 is blank

it should be
cmmt1
cmmt3
cmmt4

its urgent

 

[nicholas421]

def var cmmt like cd_cmmt.

form
cmmt[1]
cmmt[2]
cmmt[3]
... etc

when assigning cmmt only assign it if cd_cmmt is not blank:

k = 1.
do i = 1 to 15:
if cd_cmmt ne "" then
assign cmmt[k] = cd_cmmt
k = k + 1.
end.

 

[shafee212]

But with this patch ....the blank space will come in the form .

 

[nicholas421]

Run this code as an example. You should not see any blank lines in your form.

def var cmmt like cd_cmmt.
def var i as integer.
def var k as integer.
for each cd_det no-lock:
cmmt = "".

k = 1.
do i = 1 to 15:
if cd_cmmt ne "" then
assign cmmt[k] = cd_cmmt
k = k + 1.
end.

display cmmt with frame a with width 80 no-labels.
pause.
end.

 

[katiecat]

This thread really saved this baby programmer's bacon today.
Thanks very much for the postings!