Cobol und VARGRAPHIC

[kaym]

Hallo,

Ich möchte/muss in einem SQL-ILE CobolPgm Vargraphic-Felder befüllen. Die Definition der VG-Felder erfolgt über Copy DDR in der PROCESS OPTION ist PICGGRAPHIC eingestellt, so das sie als
PIC G(n) definiert werden.

die Quelle

01 ADRVNAM pic x(10).

Das Ziel

01 VORNAME.
49 VORNAME-LENGTH pic s9(4) comp-4.
49 VORNAME-DATA pic g(10) display-1.

bei

MOVE ADRVNAM TO VORNAME-DATA.

gibt der ILE-Compiler ( V5R2M0) folgende fehlermeldung.

Nachricht . . . : Empfangsdatenelement 'VORNAME-DATA OF DB-ADRESSE'
und Sendedatenelement 'ADRVNAM' in Anweisung MOVE unverträglich.
Anweisung ignoriert.

wo denke ich falsch, bzw was hab vergessen.....
für tips und einen guten rat wäre ich dankbar

kaym

[Fuerchau]

Graphic sind DBCS-Felder !
Man kann nur gleichartige Zeichen-Felder übertragen !

Entweder sind die Quelldaten bereits DBCS oder nicht, eine Codewandlung kann nicht durchgeführt werden.
Versuch es mal mit SQL:

exec sql
set :VORNAME-DATA = :ADRVNAM
end-exec

Was machst du mit DBCS ????

[kaym]

Java und DB2 Spezi's haben bei uns eine Datenbank aufgebaut, in der alle Zeichenketten in unicode abgelegt sind. Soll angeblich die Geschw. der JavaPgms steigern, da diese intern damit arbeiten.

ich bin nun dabei eine Datenpumpe zu erstellen, da das entsprechende JavaPgm noch nicht die Performance bietet die wir benötigen

gruss
kaym


PS: auch nochmal danke, der tip funktioniert.. :)

[Fuerchau]

Funktioniert der Tipp auch zur Laufzeit ?
Der Compiler interressiert sich an dieser Stelle noch nicht für die unterschiedlichen Code-Sets.