4GL Error

The code below, gives me the following error

** Invalid character unit value 1002, Changed to 320. (4132)
**FILL-IN Character03 will not fit in FRAME in PROGRAM . (4028)

Any ideas?


INPUT FROM VALUE(SEARCH("c:\tva.txt")).

REPEAT:
PROMPT-FOR orderhed.ordernum
OrderHed.Number02
OrderHed.Character03
OrderHed.Character06
OrderHed.Character05
OrderHed.Character01.
FIND orderhed USING INPUT orderhed.ordernum.
ASSIGN OrderHed.Number02.
ASSIGN OrderHed.Character03.
ASSIGN OrderHed.Character06.
ASSIGN OrderHed.Character05.
ASSIGN OrderHed.Character01.
END.
INPUT CLOSE.

Thanks
Rich