CHKDLO versus WRKLNK / DSPLNK

[E305GL]

Hallo zusammen,
gibt es ein Pendant CHKDLO für den /Root-Bereich.
Quasi WRKLNK / DSPLNK ohne anzeigen und drucken.
LG

[B.Hauser]

Wie wäre es mit SQL Services?
IFS_OBJECT_STATISTICS
IFS_OBJECT_PRIVILEGES

Beispiel:

   WITH OBJS AS (SELECT PATH_NAME 
                   FROM TABLE (QSYS2.IFS_OBJECT_STATISTICS(START_PATH_NAME => '/....'))) 
   SELECT * FROM OBJS cross join TABLE(QSYS2.IFS_OBJECT_PRIVILEGES(PATH_NAME));

[Fuerchau]

Wenn du wohl CLP/CLLE meinst, sind das CHKOUT und CHKIN, wobei allerdings zusätzlich auch die Sperre gesetzt wird.
Wenn also CHKOUT klappt, sollte CHKIN nicht vergessen werden.

https://www.ibm.com/docs/en/i/7.4.0?...cl/chkout.html

Anhand von MONMSG kannst du den Fehler ja prüfen, z.B. CPFA0A9 = nicht vorhanden.
Was nicht heißt, dass du auch berechtigt CPFA09C bist;-).

[E305GL]

Wenn du wohl CLP/CLLE meinst, sind das CHKOUT und CHKIN, wobei allerdings zusätzlich auch die Sperre gesetzt wird.
Wenn also CHKOUT klappt, sollte CHKIN nicht vergessen werden.

https://www.ibm.com/docs/en/i/7.4.0?...cl/chkout.html

Anhand von MONMSG kannst du den Fehler ja prüfen, z.B. CPFA0A9 = nicht vorhanden.
Was nicht heißt, dass du auch berechtigt CPFA09C bist;-).

---------------------------------------------------------------------------------------------
Danke für den Tipp.
Eine Sperre, nur um eine Existenzprüfung vorzunehmen, könnte ein Problem darstellen da meherer 100 User permanent produktiv zugreifen.
Wie effizient war/ist doch das QDLS...!!!
Vielleich hat jemand einen heißen Draht nach Rochester und die könnten "behirnen" dass z.B.
ein WRKLNK-Parameter DSPOPT(*NONE) oder ein DSPLNK-Parameter *OUTPUT(*NONE) auch eine OS400-native Lösung sein könnte.
LG

[Fuerchau]

Dann nimm SQL, so wie Birgitta vorgeschlagen hat. Da allerdings intern wieder API's verwendet werden ist die Funktion langsamer als der CHKOUT.
Die Wartezeit für die Sperre beträgt default 60 Sekunden.
Ein CHKOUT/CHKIN-Paar liegt weit unter 1 Sekunde, sollte also kein Problem darstellen.

[BenderD]

... ich würde da nach einem API schauen. Für die CL-Hardliner geht vielleicht: https://www.ibm.com/support/pages/si...ing-cl-program

D*B

[camouflage]

Naja, ein SQL Aufruf produziert auch wieder einen Overhead, aber vermutlich der einzigste Weg ohne irgendwelche File Locks oder Systemmeldungen zu generieren. Dieters Lösungsvorschlag habe ich noch nie verwendet, die anderen schon. Alternativ über die QSH.
Dann empfehle ich sonst noch als Studium (ist halt schon älter):
https://www.scottklement.com/rpg/ifs_ebook/

Ausserdem kann jeder bei IBM Verbesserungen einbringen, bei genügend Supportern und Sinnhaftigkeit wird der Vorschlag dann auch evtl. realisiert - nur das dauert halt.

[E305GL]

[QUOTE=Fuerchau;125852]Dann nimm SQL, so wie Birgitta vorgeschlagen hat. Da allerdings intern wieder API's verwendet werden ist die Funktion langsamer als der CHKOUT.
Die Wartezeit für die Sperre beträgt default 60 Sekunden.
Ein CHKOUT/CHKIN-Paar liegt weit unter 1 Sekunde, sollte also kein Problem darstellen.[/
QUOTE]

Dank für Dein Bemühen, werdens mit CHKOUT/CHKIN versuchen.
Andere SW-Krücken sind uns zu aufwendig, sind vergleichbar mit Assembler anno 1970.

[BenderD]

Naja, ein SQL Aufruf produziert auch wieder einen Overhead, aber vermutlich der einzigste Weg ohne irgendwelche File Locks oder Systemmeldungen zu generieren. Dieters Lösungsvorschlag habe ich noch nie verwendet, die anderen schon. Alternativ über die QSH.
Dann empfehle ich sonst noch als Studium (ist halt schon älter):
https://www.scottklement.com/rpg/ifs_ebook/

Ausserdem kann jeder bei IBM Verbesserungen einbringen, bei genügend Supportern und Sinnhaftigkeit wird der Vorschlag dann auch evtl. realisiert - nur das dauert halt.

... einfach mal die Nase in die Doku stecken! Stichwort QC2LE API access(). Verglichen damit, sind alle anderen Vorschläge komplizierter und Murks!

D*B

PS: Beispiel findet man hier: http://bender-dv.de/Sourcen/QRPGLEH.ACCESS und http://bender-dv.de/Sourcen/QRPGLESRC.OUTSTREAM - habe ich mal vor 22 Jahren auf meine Open Source Seite gestellt!

[Fuerchau]

Ja, aber API's sind doch sowas von gestern;-). Funktionierte bestimmt auch bei DLO.

Hatten wir das Thema Legacy nicht erst?

Danach ist auch eine Schubkarre eben legacy, uralt und es gibt modernere Werkzeuge.
Trotzdem verkauft sich das Gerät wohl noch gut, steht zumindest auf den meisten Baustellen rum und wird gerne am Kran aufgehängt, wegen Diebstahlschutz.
Vorteil: sie braucht keinen Strom oder ein USB-Ladekabel und sie explodiert nicht, wenn sie einen Riss hat.

[BenderD]

Ja, aber API's sind doch sowas von gestern;-). Funktionierte bestimmt auch bei DLO.

Hatten wir das Thema Legacy nicht erst?

Danach ist auch eine Schubkarre eben legacy, uralt und es gibt modernere Werkzeuge.
Trotzdem verkauft sich das Gerät wohl noch gut, steht zumindest auf den meisten Baustellen rum und wird gerne am Kran aufgehängt, wegen Diebstahlschutz.
Vorteil: sie braucht keinen Strom oder ein USB-Ladekabel und sie explodiert nicht, wenn sie einen Riss hat.

... das ist sogar ein wenig (2 Jahre) älter als mein letztes CL/CLLE, das ich geschrieben habe. Das geht mit APIs und einem SRVPGM als Wrapper viel einfacher und besser.

@Schubkarren: Warum haben moderne Autos meist 2 Auspuffrohre? Hats Du schon mal einen Schubkarren mit einem Holm gesehen?

[Fuerchau]

Du hattest doch 22 Jahre geschrieben;-).
Aber wie schrieb schon eines der Forenmitglieder?
In etwa: "Das Alte, was gut war, ist heute immer noch gut!"
Und was perfect war, kann nicht mehr verbessert werden.