42 COURSE LIMBURG AN DER LAHN 13 15
42. COURSE - LIMBURG AN DER LAHN 13. -15. MAI 2012
ELVMKI 02: 05 ELVUEBMK ELVRDI 02: 07 ELVUEBRD HEIMWERKERKARTEN 03: 55 HWKUMSPC MKARTVO 04: 02 MKARTFTP MKPEK 04: 10 MKPEKFTP MKPVK 04: 15 MKPVKFTP EP: CSV-IMPORT 06: 06 PC. 182 MKART 06: 35 CMARTFTP
* $$ JOB JNM=PRINTLOG, CLASS=Y * $$ PRT CLASS=Y, DEST=(*, USER), RBS=0, EXPDAYS=1 // JOB PRINTLOG // EXEC PRINTLOG, PARM='F 2, 03/05/2012' /* /& * $$ EOJ
IESBQUR READER QUEUE 1 = DISPLAY 2 = CHANGE OPT JOBNAME NUMBER Page 4 = COPY TO PRIMARY LIBRARY S PR DIS CLASS CARDS 5 = DELETE FROM 1 of 7 = RELEASE RUN TIME _ CPGPRILS 03894 3 K M 8 . SYSCICSB 05: 15 04/05 _ CPGPRILS 09996 3 K M 8 . SYSCICSB 07: 00 04/05 _ CPGPRILS 45096 3 K M 9 . SYSCICSB 22: 00 04/05 _______________________________________ * $$ JOB JNM=CPGPRILS, CLASS=M, DUETIME=0515, DUEDAY=(MON-FRI) * $$ PRT CLASS=Y, DEST=(*, OPE), RBS=0, EXPHRS=1 // JOB CPGPRILS PRINTLOG STARTEN // EXEC BACEMT, SIZE=AUTO BCEF 2 INIT QCFH 00 T 000. 010. 238. 006. 155: 01414 - C: PROGRAMMEQIT. EXE /C=C /F=PRINTLOJ /K=F 2 LOG /* /* /& starten um 5. 15, 7. 00 und 22. 00 Uhr 1
-c. edit datum '. ' replc '/' datum 'PRDR' list printloj -o. field datum. cpgdat edit y ( // EXEC PRINTLOG, PARM='F 2, 03/05/2012' )
* $$ JOB JNM=CPGPRINT, CLASS=M * $$ PRT CLASS=Y, DEST=(*, OPE), RBS=0, EXPDAYS=1 // JOB CPGPRINTLOG F 2 // EXEC PRINTLOG, PARM='F 2, §datum^' /* /& * $$ EOJ * $$ JOB JNM=CPGPRILA, CLASS=M * $$ PRT CLASS=Y, DEST=(*, OPE), RBS=0, EXPDAYS=1 // JOB CPGPRILA PRINTLOG ABHOLEN // EXEC BACEMT, SIZE=AUTO BCEF 2 INIT QCFH 00 T 000. 010. 238. 006. 155: 01414 - C: PROGRAMMEQIT. EXE - /C=P /F=CPGPRINT /CL=Y LOG /CI=4 - /U=xxx /P=xxx DEL BWAIT 0015 BCEF 2 INIT QCFH 00 T 000. 010. 238. 006. 155: 01414 - C: PROGRAMMEQIT. EXE /C=W /F=PRINTLOG /CI=4 /I=C: PROGRAMMEQITPOWERCPGPRINT. TXT /* /& * $$ EOJ -
-c. when opcode = 'O'. * Programmstart dokum = 'PRINTLOG' libr = 'TAB' : i = i + 1. fgs(i) = 'QPGERROR'. i = i + 1. fgs(i) = 'NICHT EROEFFNET' i = i + 1. fgs(i) = '*** SECURITY VIOLATION' i = i + 1. fgs(i) = 'STORAGE VIOLATION'. when opcode = 'N'. : fgs(i) scan zeile gefu var. if gefu > 0. write qtfserv. endif. * Daten empfangen
41 F 2 0142 * 17. 999 BYTES üBERTRAGEN. ELVMKI * 02: 05: 16 02/04/2012 44 F 2 0142 * 77. 999 BYTES üBERTRAGEN. ELVRDI * 02: 07: 15 02/04/2012 * 03: 55: 17 02/04/2012 * 04: 15: 27 02/04/2012 * 06: 43 02/04/2012 70 F 2 0142 * 78 F 2 0142 * 1. 507 HEIMWERKERKARTEN-UMSATZSäTZE üBERTRAGEN 54 SäTZE üBERTRAGEN. MKPVK 90 F 2 0142 * EP: CSV-IMPORT IN '10. 238. 2. 182WEBEP' ERFOLGREICH! 788 F 2 0142 QPGERROR PROGN=EDM 0230 PRLIB=PROE CPGTIS=600013 D 8 11: 02: 14 02/04/2012 2206 F 2 0142 * 8 SäTZE üBERTRAGEN. MKPEK * 13: 39: 41 02/04/2012 2212 F 2 0142 * 507. 389 SäTZE üBERTRAGEN. MKART * 13: 47: 29 02/04/2012 4338 F 2 0142 03501 MDE DATEN ? >: >: ; 0 - 402863 21: 03: 09 02/04/2012 9 F 2 0147 * 7. 999 BYTES üBERTRAGEN. ELVMKI * 02: 05: 16 03/04/2012 12 F 2 0147 * 29. 999 BYTES üBERTRAGEN. ELVRDI * 02: 07: 16 03/04/2012 * 03: 55: 37 03/04/2012 21 F 2 0147 * 423 HEIMWERKERKARTEN-UMSATZSäTZE üBERTRAGEN 27 F 2 0147 MKARTVO GESTARTET -> CA. 1 MIN 04: 02: 36 03/04/2012 29 F 2 0147 MKARTVO SCHREIBT 04: 02: 36 03/04/2012 31 F 2 0147 * 527 SäTZE üBERTRAGEN. MKARTVO * 04: 02: 36 03/04/2012 35 F 2 0147 * 20. 156 SäTZE üBERTRAGEN. MKPEK * 04: 10: 57 03/04/2012 38 F 2 0147 * 2 SäTZE üBERTRAGEN. MKPVK * 04: 15: 26 03/04/2012 49 F 2 0147 * EP: CSV-IMPORT IN '10. 238. 2. 182WEBEP' ERFOLGREICH! * 06: 07: 05 03/04/2012 58 F 2 0147 * * 06: 40: 47 03/04/2012 507. 509 SäTZE üBERTRAGEN. MKART 3156 F 2 0147 03446 MDE DATEN ? 46316? 52 - 405762 17: 31: 24 03/04/2012 3157 F 2 0147 01858 MDE DATEN ? 5108064? 12 - 405763 17: 31: 24 03/04/2012 184 F 2 0147 * 5. 999 BYTES üBERTRAGEN. ELVMKI * 02: 05: 17 04/04/2012 187 F 2 0147 * 25. 999 BYTES üBERTRAGEN. ELVRDI * 02: 07: 15 04/04/2012 * 03: 55: 37 04/04/2012 431 F 2 0147 * 448 HEIMWERKERKARTEN-UMSATZSäTZE üBERTRAGEN 433 F 2 0147 MKARTVO GESTARTET -> CA. 1 MIN 04: 02: 35 04/04/2012 435 F 2 0147 MKARTVO SCHREIBT 04: 02: 36 04/04/2012 437 F 2 0147 * 3. 023 SäTZE üBERTRAGEN. MKARTVO * 04: 02: 37 04/04/2012 445 F 2 0147 * 6. 478 SäTZE üBERTRAGEN. MKPEK * 04: 10: 58 04/04/2012 448 F 2 0147 * 2 SäTZE üBERTRAGEN. MKPVK * 04: 15: 27 04/04/2012 526 F 2 0147 * EP: CSV-IMPORT IN '10. 238. 2. 182WEBEP' ERFOLGREICH! * 06: 12 04/04/2012 553 F 2 0147 * * 06: 40: 41 04/04/2012 507. 819 SäTZE üBERTRAGEN. MKART
Vielen Dank!
- Slides: 12