Parameterübergabe in Prozedur -> Compiler schmiert ab

[malzusrex]

hallo sascha!

bist du dir wirklich sicher, das in der DB das feld mit 6S 0 angegeben ist ?!?!
ich habe an hand deines bsp. folgendes kleine proggie gemacht

h dftactgrp(*no)                         
                                         
d True            c                   *On
d Datum1          s              6s 0    
d WriteXXX        pr                     
d  dat1                          6s 0    
                                         
 /Free                                   
   WriteXXX( Datum1 );                   
   *InLr  =  True;                       
 /End-Free                               
                                         
p WriteXXX        b                      
d WriteXXX        pi                     
d  Dat1                          6s 0    
 /Free                                   
   Dat1 = Dat1;                          
 /End-Free                               
p WriteXXX        e 

diese kann ich wandeln, wenn Datum1 mit 6S 0 angegeben ist.
wenn es mit 6 0 oder 6p 0 def. ist, dann kann ich es nicht umwandeln. schau doch noch mal uff den db-feld

tschau ronald

[Fuerchau]

Wenn der Feldname in einer anderen Datei auch definiert ist, nimmt RPG ggf. die optimierte Definition, also gepackt, an.
Prüfe auch, ob das Feld ggf. mehrfach definiert ist (Compiler-Liste).

Für den Parameter kannst du ach Option "value" nehmen, dann ist das fast egal.

[JonnyRico]

mmm...das ist alles komisch.

Wenn ich noch einmal ein Feld in der D-Karte angebe das auch 6S 0 ist und dann

Feld = Datum1;
WriteXXX(Feld);

mache dann funktioniert es.
Kann ich denn keinen Feldnamen direkt der Prozedur übergeben?

[JonnyRico]

Juhu,

damit hast du mir jetzt den Feierabend gerettet. Das hätte mich heute Nacht noch beschäftigt. Der "Value" war's. Danke Baldur.

Gruß

Sascha

[B.Hauser]

mmm...das ist alles komisch.

Wenn ich noch einmal ein Feld in der D-Karte angebe das auch 6S 0 ist und dann

Feld = Datum1;
WriteXXX(Feld);

mache dann funktioniert es.
Kann ich denn keinen Feldnamen direkt der Prozedur übergeben?

Wenn es sich um input only Felder handelt kannst Du das Schlüssel-Wort VALUE oder CONST verwenden. In diesem Fall wird ein temporäres Feld mit der erwarteten Feld-Definition generiert. Dann ist es egal, ob das Feld gepackt, gezont oder integer ist.

In RPG werden gezonte Felder soweit möglich in gepackte Felder umgesetzt. Eine Möglichkeit gezonte Datei-Felder zu erhalten ist, die Datei als externe Datenstruktur anzugeben.
Felder in Datenstrukturen werden nicht konvertiert, sondern das Format beibehalten.
Damit wird dann auch das gezonte Feld an die Prozedur übergeben.

Felder, die in den D-Bestimmungen definiert sind, werden ebenfalls nicht konvertiert.

Werden gepackte Datei-Felder in Datenstrukturen ohne Angabe einer Definition hinterlegt, also nur aufgelistet, werden sie in gezonte Felder umgesetzt.

Birgitta