OCL36 Anweisung Datumsabfrage

[jojoschluckfirma]

hallo,

ich hoffe Ihr könnt uns helfen.
Wir haben auf unserer AS/400 noch eine /36 Umgebung
für unsere Tochter in Holland.
Hier unser OCL36-Anweisung:

...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+..
// EVALUATE P1=?DATE?
// LOAD #GSORT
// FILELIB NAME-QS36F,LIBL-YES
// FILE NAME-INPUT,LABEL-U.AUP02,DISP-SHR
// FILE-NAME-OUTPUT,LABEL-ADR?WS?,RETAIN-T,RECORDS-?F'A,U.AUP02'?
// RUN
HSORTA 09A 3 N
*
OOC 18 23NEC?1?
*

Jeweils am 01 - 09 Tag eines Monats ist der Parameter mit dem Datum falsch gefüllt nämlich 10905 und nicht 010905 so wie es in unserer Datei steht also wird die Schnittstelle falsch gefüllt da er sich keine Datensätze ziehen kann.
Leider habe ich kein OCL36 Handbuch und hoffe Ihr könnt mir aus patsche helfen.

Im voraus vielen Dank

Jojo

[jajonowak]

Hi Jojo

das liegt daran, das die führende null verschwindet.

datum vorher in uds speichern und diverse prüfungen/änderungen vornehmen oder eben mit einem rpg-pgm den local mit datum füllen und anschließend das sort NEC-statement auf ?L'x,6'? (oder so ähnlich) ändern.


lg
hans-Joachim

[jojoschluckfirma]

Hallo Hans Joachim,

Vorweg danke für die Antwort, hast Du zufällig ein Link im Kopf damit ich mir für die Zukunft das OCL Handbuch runter laden kann

Gruß
Jojo

[jajonowak]

Hallo Jojo

hoffentlich findest du da was du brauchst:



http://www.rlpforen.de/showthread.php?t=6277&highlight=OCL



lg
Hans-Joachim