Helptext = "".
    FOR EACH LiBild USE-INDEX LiBild-k1
                    WHERE LiBild.Sprcd = GVSprcd
                    AND   LiBild.Prog  = LiDruck.Listprog
                    AND   LiBild.Tenr  > 0 NO-LOCK ix = 1 TO 20:
        Helptext[ix] = LiBild.Litext.
    END.
    Breite = INTEGER(SUBSTRING(Helptext[01],02,03)).