Size of label sin Def Frame

melmckee72

New Member
Is there a limit to the size of the label when defining a frame layout? I'm creating a report layout in which I have 3 frames defined (so far). The first two are done with side-labels. My problem is that the second frame is cutting off the label to align the colons between the 1st and second frame display.

My code looks like this:

DEF FRAM HEAD
f4camp label "Campaign # " format "X(4)"
f4proj label "Project # " format "X(10)"
f4prdnme label "Product Name " format "X(40)"
f4prd label "Product Code " format "X(8)"
f4ctyp label "Promotion Type" format "X(10)" skip
WITH 1 COLUMN SIDE-LABELS DOWN width 230.

def fram panelhead
f4camp label "Campaign # :" format "x(8)"
f4panel label "Panel # :" format ">>>>"
f4pdsc label "Panel Description :" format "X(40)"
f4vendor label "Vendor :" format "X(10)"
f4wave label "Select from [Wave 1,2,3, etc]:" format ">>>>"
f4inkjet label "Inkjet Message/Station Code :" format "X(100)"
f4output label "Method of Shipping :" format "X(10)"
F4campnotes label "Special Notes :"
f4keyline no-label format "X(40)"
with 1 column side-labels WIDTH 230.

def fram panel
f4keycde label "BLR Key" format "X(12)"
f4w1qty column-label "Wave 1!Output Qty" format ">>>>>>>>>>"
f4w2qty column-label "Wave 2!Output Qty" format ">>>>>>>>>>"
f4w3qty column-label "Wave 3!Output Qty" format ">>>>>>>>>>"
f4wtot column-label "Total!Quantity" format ">>>>>>>>>>"
f4w1output column-label "Wave 1!Select Qty" format ">>>>>>>>>>"
f4w2output column-label "Wave 2!Select Qty" format ">>>>>>>>>>"
f4w3output column-label "Wave 3!Select Qty" format ">>>>>>>>>>"
f4wouttot column-label "Total!Selected" format ">>>>>>>>>>"
f4per column-label "Percent!Selected" format ">>>.99"
f4nkeycde column-label "BackEnd!Keys" format "X(12)"
f4rte column-label "Rate!Code" format "X(6)"
f4tslug column-label "Title Slug" format "X(40)".

for each fout4 no-lock break by f4proj by f4camp by f4src by f4effort.
accumulate F4W1QTY (TOTAL BY F4CAMP BY F4PROJ).
accumulate F4W2QTY (TOTAL BY F4CAMP BY F4PROJ).
accumulate F4W3QTY (TOTAL BY F4CAMP BY F4PROJ).
accumulate F4WTOT (TOTAL BY F4CAMP BY F4PROJ).
accumulate F4W1OUTPUT (TOTAL BY F4CAMP BY F4PROJ).
accumulate F4W2OUTPUT (TOTAL BY F4CAMP BY F4PROJ).
accumulate F4W3OUTPUT (TOTAL BY F4CAMP BY F4PROJ).
accumulate F4wouttot (TOTAL BY F4CAMP BY F4PROJ).
if first-of (f4proj) then do:
display F4CAMP F4PROJ F4PRDNME F4PRD F4CTYP WITH FRAM HEAD down.
END.
IF FIRST-OF (F4CAMP) THEN DO:
DISPLAY f4camp F4PANEL F4PDSC F4VENDOR F4WAVE
F4INKJET F4OUTPUT F4CAMPNOTES
F4KEYLINE WITH FRAM PANELHEAD down.
END.
DISPLAY F4KEYCDE F4W1QTY F4W2QTY F4W3QTY F4WTOT F4W1OUTPUT F4W2OUTPUT
F4W3OUTPUT F4WOUTTOT F4PER F4NKEYCDE F4RTE F4TSLUG WITH FRAM PANEL DOWN.
DOWN WITH FRAM PANEL.
IF LAST-OF (F4CAMP) THEN DO:
DISPLAY
"TOTAL"
accumulate total by f4camp f4w1qty
accumulate total by f4camp f4w2qty
accumulate total by f4camp f4w3qty
accumulate total by f4camp f4wtot
accumulate total by f4camp f4w1output
accumulate total by f4camp f4w2output
accumulate total by f4camp f4w3output
accumulate total by f4camp f4wouttot with fram subtot down.
end.
end.
end procedure.

My output on the first two frames looks like this:

Campaign # : E342
Project # : 6412
Product Name : OSHA Compliance Advisor Newsletter
Product Code : OCA
Promotion Type: I

Campaign # : E342
Panel # :
Panel Descriptio:
Vendor :
Select from [Wav:
Inkjet Message/S:
Method of Shippi:
Special Notes :

Any help would be appreciated.

Thanks
 

laa

Member
Your problem is that you are specifying 1 column. This causes Progress to truncate the labels.

n COLUMNS

Formats data fields into a specific number (n) of columns. Truncates labels to 16, 14, and 12 characters when the number of columns is 1, 2, or 3, respectively. Progress reserves a fixed number of positions in each column for labels. For n = 1, 16 positions are allowed for a label; for n = 2, 14 positions are allowed; and for n = 3, 12 positions are allowed. Label positions include room for a colon and a space after the label. Labels are right justified if they are short, and truncated if they are too long. By default, Progress wraps fields across the frame for as many lines as required, placing labels above the fields.

When you use this option, it implies SIDE-LABELS and overrides any AT, COLON, TO, or SPACE options you might have used in the same Frame phrase.
 
Top