-
printerfile wird geschlossen
Hallo,
ich habe ein Problem, das nervt langsam !
Programm A ruft mehrfach Programm B.
Programm B soll beim ersten Aufruf die Printerfile öffnen uns beim
letzten Aufruf die Printerfile schliessen (alles auf eine Seite).
Programm B schliesst leider die Printferfile nach jedem Aufruf
automatisch, obwohl :
Die printerfile mit UC definiert wurde
Die printerfile ohne close das Programm verlässt
kein rclrsc dazwischenfunkt
Programm B mit retrn verlassen wird.
Was läuft falsch ?
Gruss
-
Läuft das Programm etwa in einer eigenen Aktivierungsgruppe, die geschlossen wird?
Birgitta
-
Hallo Frau Hauser,
nein, keine Aktivierungsgruppe.
Zwischen beiden Programmen laufen lediglich 2 CLs.
Im debugger : Auf dem retrn ist der Spool noch offen. Auf dem ersten Statement im CL nach Programm B ist der Spool zu und wird gedruckt.
Grüsse
-
Weise explizit *INLR=*OFF zu.
-
Hallo Herr Fuerchau,
Habe ich soeben gemacht, leider negativ.
Immer noch einzelne Spools pro Aufruf.
Gruss
-
... glaube mich an OVRPRTF SHARE(*YES) zu erinnern.
-
Hallo Herr Mack,
habe das Printerfile hart auf share(*yes) umgestellt. Leider ohne Erfolg.
Grüsse
-
... hab's wiedergefunden:
1) im steuernden CL: OVRPRTF FILE(PGMXYZP) SHARE(*YES) OPNSCOPE(*JOB)
2) in den RPG-Programmen: kein UC/USROPN
-
Hallo Herr Mack,
habe es sofort probiert.
In der Tat übernimmt der Job die Steuerung für den Druck, aber leider immer noch viele Spools statt einer einzigen .......
Gruss
-
Schau doch mal (sicherheitshalber) nach in welcher Aktivierungsgruppe Programm B läuft:
PHP-Code:
DSPPGM PGM(LIBPGMB/PGMB)
Auf der 1. Seite unter Attribut der Aktivierungsgruppe siehst Du welche Aktivierungsgruppe verwendet wird.
Ich könnte fast wetten, dass bei Programm B die Aktivierungsgruppe *NEW verwendet wird.
Birgitta
-
Hallo Frau Hauser,
es ist leider kein ILE Programm.
Trotzdem mal die Parameter.
Informationen zur Programmerstellung:
Programmerstellungsdatum/-zeit . . . . . . . . . . . . . : 21.07.08 16:22:36
Programmart . . . . . . . . . . . . . . . . . . . . . . : OPM
Quellendatei . . . . . . . . . . . . . . . . . . . . . . : QRPGSRC
Bibliothek . . . . . . . . . . . . . . . . . . . . . . : TRULLALIB
Quellenteildatei . . . . . . . . . . . . . . . . . . . . : FHBD03
Datum/Uhrzeit der Quellendateiänderung . . . . . . . . . : 21.07.08 16:22:31
Überwachbare Daten . . . . . . . . . . . . . . . . . . . : *ALL
Benutzerprofil . . . . . . . . . . . . . . . . . . . . . : *USER
Übernommene Berechtigung verwenden . . . . . . . . . . . : *YES
Festkommadaten . . . . . . . . . . . . . . . . . . . . . : *NO
Für Teraspace aktiviert . . . . . . . . . . . . . . . . : *NO
Textbeschreibung . . . . . . . . . . . . . . . . . . . . : Drucken Dispoliste
Programmstatistik:
Anzahl der Parameter . . . . . . . . . . . . . . . . . . : 0 19
Programmgröße (Byte) . . . . . . . . . . . . . . . . . . : 290816
Größe des zugeordneten Speicherbereichs (Byte) . . . . . : 0
Größe des festen Speichers (Byte) . . . . . . . . . . . : 26480
Größe des dynamischen Speicherbereichs (Byte) . . . . . : 0
Anzahl der MI-Instruktionen . . . . . . . . . . . . . . : 2212
Anzahl der ODT-Einträge . . . . . . . . . . . . . . . . : 3583
Programmstatus . . . . . . . . . . . . . . . . . . . . . : *USER
Programmdomäne . . . . . . . . . . . . . . . . . . . . . : *USER
Compiler . . . . . . . . . . . . . . . . . . . . . . . . : 5722WDS V5R4M0
Niedrigstes Release für Programmausführung . . . . . . . : V5R4M0
Umsetzung erforderlich . . . . . . . . . . . . . . . . . : *NO
Sortierfolge . . . . . . . . . . . . . . . . . . . . . . : *HEX
Sprachen-ID . . . . . . . . . . . . . . . . . . . . . . : *JOBRUN
Informationen zur Programmleistung:
Optimierung . . . . . . . . . . . . . . . . . . . . . . : *NOOPTIMIZE
Seitenwechselpool . . . . . . . . . . . . . . . . . . . : *USER
PASA aktualisieren . . . . . . . . . . . . . . . . . . . : *NOUPDPASA
PASA-Inhalt löschen . . . . . . . . . . . . . . . . . . : *CLRPASA
Seitenauslagerungsanzahl . . . . . . . . . . . . . . . . : *BLOCK
-
Hallo,
wir wissen jetzt zumindest schon mal, dass es sich bei dem aufgerufenen Programm um ein altes RPGIII OPM-Programm handelt. Solche Kleinigkeiten sind nicht ganz unerheblich.
Handelt es sich bei den anderen Programmen um OPM- (CL, RPG, SQLRPG) oder ILE- (CLLE, RPGLE, SQLRPGLE) Programme?
Wie wird der erste/letzte Aufruf festgestellt?
Durch einen bestimmten Parameter-Wert.
Wird vielleicht irgendwo ein Schalter (Beginn/Ende PrinterFile) verwendet, der beim nächsten Aufruf nicht initialisiert wird und somit bei jedem Aufruf ein Ende der Printerfile feststellt und diese dann auch schließt?
Birgitta
Similar Threads
-
By Anna in forum NEWSboard Programmierung
Antworten: 8
Letzter Beitrag: 20-09-05, 16:27
-
By brightshadow in forum NEWSboard Programmierung
Antworten: 3
Letzter Beitrag: 16-09-05, 13:36
-
By RaMai in forum IBM i Hauptforum
Antworten: 1
Letzter Beitrag: 05-08-05, 08:31
-
By malzusrex in forum IBM i Hauptforum
Antworten: 2
Letzter Beitrag: 13-07-05, 10:12
-
By JonnyRico in forum IBM i Hauptforum
Antworten: 1
Letzter Beitrag: 19-01-05, 10:22
Berechtigungen
- Neue Themen erstellen: Nein
- Themen beantworten: Nein
- You may not post attachments
- You may not edit your posts
-
Foren-Regeln
|
Erweiterte Foren Suche
Google Foren Suche
Forum & Artikel Update eMail
AS/400 / IBM i
Server Expert Gruppen
Unternehmens IT
|
Kategorien online Artikel
- Big Data, Analytics, BI, MIS
- Cloud, Social Media, Devices
- DMS, Archivierung, Druck
- ERP + Add-ons, Business Software
- Hochverfügbarkeit
- Human Resources, Personal
- IBM Announcements
- IT-Karikaturen
- Leitartikel
- Load`n`go
- Messen, Veranstaltungen
- NEWSolutions Dossiers
- Programmierung
- Security
- Software Development + Change Mgmt.
- Solutions & Provider
- Speicher – Storage
- Strategische Berichte
- Systemmanagement
- Tools, Hot-Tips
Auf dem Laufenden bleiben
|
Bookmarks