OpenDir, ReadDir, CloseDir

[malzusrex]

Pikachu war schneller...

Liegt an der Definition

D opendir         PR              *   EXTPROC('opendir')       
D  dirname                        *   VALUE options(*string) 

Gruß
Ronald

[Frank ter Duis]

Treffer! DANKE!

Das VALUE zusammen mit dem x'00' funktioniert. Verstehe die Zusammenhänge zwar nicht, komme so aber erstmal weiter.

D OPENDIR         PR              *   EXTPROC('opendir')           
D  DIRNAME                        *   VALUE OPTIONS(*STRING)       

C                EVAL      PATH = %trim('/bin') + x'00'

Nochmal Danke für die schnelle Hilfe!

[malzusrex]

Also bei mir geht das auch ohne den x'00'

Gruß
Ronald

[Frank ter Duis]

Gerade noch mal getestet. Mit x'00' klappts super, ohne bekomme ich den Fehler 3486 "A path name is too long"..... aber keine Zeit mehr daran verschwenden bitte.

[B.Hauser]

Ich nehme an dass PATH ein Feld mit fixer Länge definiert ist

Birgitta

[Fuerchau]

Wenn du mit C-Routinen und Parametern vom Typ *String umgehst, so solltest du alle Felder als Varying definieren oder per %trim(MyField) an die Routine übergeben.
Durch Options(*string) wird das x'00' sowieso automatisch drangehängt.

Dies wird dir auch bei weiteren C-Routinen begegnen.

[Fuerchau]

Also bei CHAR*-Parametern unterscheidet sich Value und Const nicht wirklich.
Es wird immer ein Pointer übergeben.
Allerdings kannst du durch Const/Value dann auch Konstanten als Parameter übergeben.

%trim() auf eine Konstante macht übrigens keinen Sinn.