Cobol Printer File INFDS

[Fuerchau]

Als ob ich mich persönlich angegegriffen fühlte.
Birgitta wirft mir indirekt ja auch immer wieder Unwissen vor;-).
Und in meiner Signatur betreibe ich ja auch aktiv Werbung für mich und meine Firma, die mir auch tatsächlich die eine oder andere Nachfrage beschert.

[camouflage]

Da misch ich mich doch auch noch ein:

Wie wäre es mit dem?
SELECT *
FROM QSYS2.OUTPUT_QUEUE_ENTRIES
where ...

Nur so als Idee! Möglicherweise lieg ich jedoch damit falsch. Die Frage lautete ja nach einem geöffneten Spool.

[E305GL]

... diesen feinsinnigen Humor hätte ich Dir gar nicht zugetraut, dass ausgerechnet Du Baldur angreifst wg. Schleichwerbung.

D*B

Nun gut, dass mit dem Humor werte ich als Kompliment.
Baldur hat ja auch sehr korrekt geantwortet, ohne emotionalen "Schnickschnack" was ich ihm sehr hoch anrechne. Er ist sicher nicht auf eine D*B-Unterstützung, in dieser Form, angewiesen. Nur gleiches Recht für alle: Prüfe meine Beiträge der letzten Jahre wo Lösungen durch fehlende IBM-Funktionen nicht möglich waren und meine Beiträge als Spam klassifiziert und mit Antworten "unter der Gürtellinie" bedacht wurden. Möglicherweise waren auch D*B-Antworten dabei. Wenn jemand mehr als 55 Jahre Erfahrung im Projektmanagement und SW-Entwicklung hat darf er gerne den Finger heben....

[camouflage]

Ergänzung: Die SQL Abfrage gibt es ab V7.1 TR11. Da hast Du alles, auch bei geöffnetem Spoolfile.

1	OUTPUT_QUEUE_NAME	VARCHAR	10	0	Nein	OUTPUT_QUEUE_NAME
2	OUTPUT_QUEUE_LIBRARY_NAME	VARCHAR	10	0	Nein	OUTPUT_QUEUE_LIBRARY_NAME
3	CREATE_TIMESTAMP	TIMESTAMP	26	6	Nein	CREATE_TIMESTAMP
4	SPOOLED_FILE_NAME	VARCHAR	10	0	Nein	SPOOLED_FILE_NAME
5	USER_NAME	VARCHAR	10	0	Nein	USER_NAME
6	USER_DATA	VARCHAR	10	0	Ja	USER_DATA
7	STATUS	VARCHAR	15	0	Nein	STATUS
8	SIZE	INTEGER	10	0	Nein	SIZE
9	TOTAL_PAGES	INTEGER	10	0	Nein	TOTAL_PAGES
10	COPIES	INTEGER	10	0	Nein	COPIES
11	FORM_TYPE	VARCHAR	10	0	Nein	FORM_TYPE
12	JOB_NAME	VARCHAR	28	0	Nein	JOB_NAME
13	DEVICE_TYPE	VARCHAR	10	0	Nein	DEVICE_TYPE
14	OUTPUT_PRIORITY	INTEGER	10	0	Nein	OUTPUT_PRIORITY
15	FILE_NUMBER	INTEGER	10	0	Nein	FILE_NUMBER
16	SYSTEM	VARCHAR	8	0	Nein	SYSTEM
17	ACCOUNTING_CODE	VARCHAR	15	0	Nein	ACCOUNTING_CODE
18	EXPIRATION_DATE	DATE	10	0	Ja	EXPIRATION_DATE
19	SAVE_AFTER_WRITE	VARCHAR	4	0	Nein	SAVE_AFTER_WRITE
20	PAGE_LENGTH	INTEGER	10	0	Nein	PAGE_LENGTH
21	LINES_PER_INCH	DECIMAL	5	1	Nein	LINES_PER_INCH
22	PAGE_WIDTH	INTEGER	10	0	Nein	PAGE_WIDTH
23	CHARACTERS_PER_INCH	DECIMAL	5	1	Nein	CHARACTERS_PER_INCH
24	PRINT_FIDELITY	VARCHAR	8	0	Nein	PRINT_FIDELITY
25	PAGE_ROTATION	VARCHAR	5	0	Nein	PAGE_ROTATION
26	PRINT_BOTH_SIDES	VARCHAR	7	0	Nein	PRINT_BOTH_SIDES
27	FILE_AVAILABLE	VARCHAR	8	0	Nein	FILE_AVAILABLE
28	STARTING_PAGE	VARCHAR	10	0	Nein	STARTING_PAGE
29	ENDING_PAGE	VARCHAR	10	0	Nein	ENDING_PAGE
30	DEVICE_FILE_LIBRARY	VARCHAR	10	0	Nein	DEVICE_FILE_LIBRARY
31	DEVICE_FILE_NAME	VARCHAR	10	0	Nein	DEVICE_FILE_NAME
32	PROGRAM_THAT_OPENED_FILE_LIBRARY	VARCHAR	10	0	Ja	PROGRAM_THAT_OPENED_FILE_LIBRARY
33	PROGRAM_THAT_OPENED_FILE_NAME	VARCHAR	10	0	Ja	PROGRAM_THAT_OPENED_FILE_NAME
34	FORM_DEFINITION_LIBRARY	VARCHAR	10	0	Ja	FORM_DEFINITION_LIBRARY
35	FORM_DEFINITION_NAME	VARCHAR	10	0	Ja	FORM_DEFINITION_NAME
36	PAGE_DEFINITION_LIBRARY	VARCHAR	10	0	Ja	PAGE_DEFINITION_LIBRARY
37	PAGE_DEFINITION_NAME	VARCHAR	10	0	Ja	PAGE_DEFINITION_NAME
38	FRONT_OVERLAY_LIBRARY	VARCHAR	10	0	Ja	FRONT_OVERLAY_LIBRARY
39	FRONT_OVERLAY_NAME	VARCHAR	10	0	Nein	FRONT_OVERLAY_NAME
40	BACK_OVERLAY_LIBRARY	VARCHAR	10	0	Ja	BACK_OVERLAY_LIBRARY
41	BACK_OVERLAY_NAME	VARCHAR	10	0	Nein	BACK_OVERLAY_NAME
42	CHARACTER_SET_LIBRARY	VARCHAR	10	0	Ja	CHARACTER_SET_LIBRARY
43	CHARACTER_SET_NAME	VARCHAR	10	0	Nein	CHARACTER_SET_NAME
44	CODE_PAGE_LIBRARY	VARCHAR	10	0	Ja	CODE_PAGE_LIBRARY
45	CODE_PAGE_NAME	VARCHAR	10	0	Ja	CODE_PAGE_NAME
46	CHARACTER_SET_POINTSIZE	DECIMAL	5	1	Ja	CHARACTER_SET_POINTSIZE
47	CODED_FONT_LIBRARY	VARCHAR	10	0	Ja	CODED_FONT_LIBRARY
48	CODED_FONT_NAME	VARCHAR	10	0	Nein	CODED_FONT_NAME
49	CODED_FONT_POINTSIZE	DECIMAL	5	1	Ja	CODED_FONT_POINTSIZE
50	MULTIBYTE_DATA	VARCHAR	4	0	Nein	MULTIBYTE_DATA
51	DBCS_CODED_FONT_LIBRARY	VARCHAR	10	0	Ja	DBCS_CODED_FONT_LIBRARY
52	DBCS_CODED_FONT_NAME	VARCHAR	10	0	Nein	DBCS_CODED_FONT_NAME
53	DBCS_CODED_FONT_POINTSIZE	DECIMAL	5	1	Ja	DBCS_CODED_FONT_POINTSIZE

[camouflage]

.... bin auch der Meinung ohne CL wird's nicht gehen zumal dort bis auf die Spoolnummer mit RTVJOBA die übrigen Felder bereitstellbar sind.

Eines muss ich doch noch jetzt los werden. Weiterbildung hilft ungemein, auch wenn mein Post sich auf V7.1 bezieht. Dafür brauch ich nicht 55 Jahre und den Finger muss ich schon gar nicht erheben. Sorry, es läuft doch immer auf das Gleiche raus und da muss man sich auch nicht über entsprechende Antworten wundern.