PDA

View Full Version : COBOL embedded SQL



Seiten : 1 2 [3]

Fuerchau
27-12-14, 11:37
Hier sind verschiedene Sachen vermischt.
PIC 9(04) kann nicht verwendet werden, da SQL aus irgendwelchen Gründen kein Unsigned mag.
PIC S9(04) währe gegangen.
Allerding liefert die Funktion HEX eine Zeichenkette doppelter Länge!
Ein CAST(... char(4)) führt zum Abschneiden, was ohne NULL-Anzeiger zu einem negativen SQL-Code führt. Mit Nullanzeiger entspricht dies eher einem LEFT(HEX(...), 4).
Ob du das gewollt hast?

Und das Ergebnis von HEX(: SQL-WERT-9) ist nun auch 8 Bytes lang:).

KingofKning
27-12-14, 11:58
Nein, gewollt habe ich es nicht, wie aber immer an Weihnachten bekommt man auch Dinge die man nicht will ;-)

Habe nun substr benutzt und schlußendlich nach dem Motto: Du wiilst es, Du kriegst es doch meinen Wert bekommen...

GG