Echo bei SNDRCVF mit Displayfile...?

[ebschubert]

Hallo an alle

Habe folgendes Problem:

Einfaches CL-PGM für Ja-/Nein-Abrage
/***********************************************
PGM PARM(&TITLE &QTXT &ANSWER)

DCLF FILE(QUESTION) RCDFMT(QUEST)
SNDRCVF RCDFMT(QUEST)

END: ENDPGM

Und die DDS dazu:

A DSPSIZ(24 80 *DS3)
A CA12

A R QUEST
A INZRCD
A KEEP
A BLINK
A ALARM
A MSGALARM
A WINDOW(7 14 3 51 *NOMSGLIN)
A WDWBORDER((*COLOR BLU) (*DSPART RI) (*CHAR ' '))
A WDWTITLE((*TEXT &TITLE))
A WDWTITLE((*TEXT 'F12=Abbruch') *LEFT *BOTTOM )

A TITLE 49A P
A QTXT 40A O 2 2
A ANSWER 1A B 2 45

A R ASSUME
A ASSUME
A 24 2' '

Wenn ich das DSPF mit STRSDA Option(3) teste ist alles iO.

Wenn ich aber das CL mit call MyCl('Titeltext' 'Fragetext' '' ) aufrufe, erscheinen meine Felder doppelt und versetzt (QTXT kommt mit in der Titelzeile) ???!!!!

Wer hat einen Tipp???

Vielen Dank vorab und viele Grüße
Andreas

[Pikachu]

Dein CL-Programm erwartet die entsprechenden Parameter in den angegebenen Längen. Der Befehl CALL kennt diese Längen jedoch nicht und übergibt Zeichenketten die weniger als 32 Zeichen besitzen in 32 Zeichen Länge und längere Zeichenketten in genau der Länge wie sie angegeben wurden. Näheres siehe beim Befehl CALL.

[ebschubert]

Das war's!!!!

Danke
Andreas