Empfängerwert zu klein

[kuempi von stein]

Hallo,

wie's aussieht, wird in dem CL das Programm CBLABRANCH aufgerufen. Darin scheint es eine arithmetische Operation zu geben, bei der das Ergebnisfeld zu klein definiert ist.

Gruß,

Thomas

hello,

ich frage mich gerade ob das typisch Cobol ist?
Weil in RPG wüsste ich gar nicht wie ich die Meldung produzieren könnte...
Wenn ich da mehr reinpacke in ein Feld als reingeht, dann findet ja ein Überlauf ins NIL statt...

k.

[RobertMack]

Hallo,

wenn ich mich richtig erinnere, hat sich mit V5 die Anzahl der möglichen *LIBL-Einträge geändert (vgl. CHGLIBL, F4) und man konnte diese durch einen Entrag in einem Datenbreich manuell wieder auf 50 reduzieren.

... ADDLIBLE Nr. 51? ...sollte es das wirklich geben?

Gruß,
Robert

[ThomasB]

Hallo,

ich meine RPG. Diese Fehlermeldung kenne ich seit - bin nicht sicher - R4.4 oder R5.1.,
auf jeden Fall aber in Verbindung mit dem "eval" Befehl.

Wenn Du folgendes ausprobierst, müsstest Du diese Meldung auch sehen :

d count s 2 0 inz(99)

c eval count = count + 1

Bei

c add 1 count

passiert nix.

Gruß,

Thomas.

[mmaschke]

hello,

ich frage mich gerade ob das typisch Cobol ist?
Weil in RPG wüsste ich gar nicht wie ich die Meldung produzieren könnte...
Wenn ich da mehr reinpacke in ein Feld als reingeht, dann findet ja ein Überlauf ins NIL statt...

k.

Hallo ThomasB
richtig,wir haben jetzt bei uns jetzt Programme von einer Softwarefirma laufen,die in Cobol programmiert sind.
Und so ein Programm läuft zwischen dem addlible und rmvlible.
Ich nehme dies Programm mal aus der Prozudur rausnehmen und mich an diese Softwarehaus wenden.
Danke erstmal

[mmaschke]

Entschuldigung mit Cobol war natürlich kuempi von stein.
Danke

Hallo RobertMack,
das mit addlible Nr. 51 könnte es auch sein, denn das passiert nur bei einem Benutzer, der ständig diese Prozedur aufruft, und die Fehlermeldung kommt auch erst im laufe des Tages. Aber wie verhindere ich dieses?

Gruß,
Manfred