ozo ‘SPUF Tutorial - mainframesgurucem mainframesguru.com ‘Search this ste SPUFI Tutorial AboutUs Sewices Courses. Case Studies Mainframe Forum Mainframe Jobs Contact Us Tutors [lespratonal Quotes and] ‘Db2 Tutorial SPUFI (SQL processor using file input) Pere CICS Tutorial Tutorial: SAM Tutorial ‘COBOL Tutorals 1. Take 9 2F pri . Take 9 option from ISPF primary option menu eLTutoral to go to IBM products panel Tools: Xpediter for Batch File Aid Tutorial Menu Utilities Compilers Options Status sep Utities: . ICL Utilities ~ ‘Sor Utiity ISPF Primary option Commie JCk's Nenu option ‘Abend Codes 53 File Status Codes JCLABEND Codes © Settings Terminal and user parameters CICS ABEND Codes User 10. + 1ND777 DBY/SOL Retum Codes 1 view Display source data or Listings time. . : 07:34 Questions: 2 edit Create o£ change source data (COBOL FAQ Terminal. : 3278 Ics FAQ. 3 Utilities Perform utility functions CLEAQ Screen. vt i VSAM FAQ. 3 Fovegeound Interactive language processing D2 FAQ Language. : ENGLISH 5 Batch Submit job for language processing appl ID. : ISR 6 Connand Enter 180 or Workstation commands TSO logon : IND777 7 Dialog Test Perform dialog testing SO prefix: IND777 9 TBM Products Additional 12M Program Products System 1D : INDUS 10 ScLM SW Configuration Library Manager Mus acct. : GENERAL Li Workplace —_ISPF Object/action Workplace Release . : ISPF 6.1 Enter X to Terminate using log/list defaults Fistelp aesplit — F3eExit Fasretura PSerfing — P6-¥ehange Fi=Backward F8=Forvard £9=Swap. Flieright Fl2=Cancel 2. Take DI option to invoke DB2I (ab2 interactive) primary option menu ip:stes googl-comstefcebcimatrialsp-taoratmoors SSPUFI Tutorial -maitrameagucuicam Menu Utilities Compilers options status help Additional IBM Program Products 1 option Dr 1 1 > DITTO Data Interfile Tranefer, Testing and operations Utility 1 S. SDSF System Display and Search racilicy 1 30 DFSORT Data Pacility/SORT 1 DI pp2t pez eo ome Query Management racility 1 1 H 1 FicHelp Fo~split FacExit, Pasretusn P5erfind H Fo=rchange -Fi=Backward — Fe=Formard Fo-swap, Fileactions | Enter X to Terminate using log/list defaults FicHelp Foesplit F-Exit FSerfind Fé=rchange Py=Backward F8=Forward F9=Swap Fileright — Fl?=cancel 3. From DB2I ( DB2 Interactive ) primary option menu take the option 1 to invoke SPUFI DB2I PRIMARY OPTION MENU ‘COMMAND 1 2 DSN Select one of the following DB2 functions and press ENTER. 1 SPUFI (recess soL statements) pss googia.comiitelcobelmatrialsput-uoralmoors 'SPUFI Tutorial -aintramesgurticom 2 perceN (Generate Sg and source language declarations) 3. PROGRAM PREPARATION (Prepare a DB2 application program to run) 4 PRECOMPILE (Invoke 082 precompiler) 5. BIND/RESIND/PREs, (BIND, REBIND, or FREE plans er packages) 6 RUN (RUN an SQL program) 7 DB2 COMMANDS (rssu0 052 commands) 8 UTILITIES (Invoke 052 utilities) D DB2I DEEAULES (Set global parameters) x EXIT (Leave pB2r) Fieditte — F2esPuIT — FS-ExLt TURN F5eREind —F6=RCHANGE F7=Up FB=Down Fo=Swap, Pileeight — Fl2-cancel Fill the details in the SPUFT panel. 1. Enter the inut data set information, input data set can be sequential or partitioned 2. Enter the output data set information to browse the output and this must be sequential data set 3. Specify the processing options and press enter to navigate to the processing panels spurt SSID: DSN Enter the input data set name: (Can be sequential or partitioned) 1 DATA SET NAME 2. = ‘ENDU777.. INDUS .DB2 (SAMP1) * 2 VOLUME SERIAL ... = (Enter if not cataloged) 3 DATA SET PASSWORD ~ (unter if password protected) Enter the output data set name: (mst be a sequential data set) 4 DATA SET NAME... *XNDUT77. INDUS. OUPUT' specify processing options 5 CHANGE DEFAULTS SPUFI defavits panel?) 6 EDIT INPUT .. statements?) 7 EXECUTE .. statements?) 8 AUTOCOMMET successful run?) 9 BROWSE OUTPUT .. (G/N ~ display (Y/N - Enter sox (Y/N ~ Execute sol (Y/N ~ commit after (YIN ~ Browse. pss googia.comiitelcobelmatrialsput-uoralmoors output data set?) For remote SOL processing: 20 CONNECT LocATION Pisin F2csPLIT —F3END FS=RFIND F6=RCHANGE PI-UP Fa=Doaw Fo=swaP FLLRIGHT — F12“RETRIEVE select lines (ex: 200) etc . DEFAULTS su 1 SQL TERMINATOR Terminator) 2. ISOLATION LEVEL Read, CS=Cursar Stability) 3. MAX SBLECT LINES aines to be > cs > 20000, seLEcr) output daca set characteristics: 4 RECORD LENGTH .. zecora length) 5 Buock Size .... biock) 6 RECORD FORMAT . Vy VB, oF VBA) 7 DEVICE TYPE . name) Output format characteristics 8 MAX NUMERIC FIELD numeric fields) 9 MAK CEAR FIELD character fields) 20 COLUMN HEADING . Nawes er BOTs) FLSHELP F2=sPLIT F5eRFIND —F6=RCHANGE. ET=UB 8=DoAN POSSWAP FLI-RIGHT — F12-RETRIEVE than one query at a time File bast psu googia.comisitelcobelmatrialsput-tuoral Bait settings Mena vsilities SSPUFI Tutorial -maitrameagucuicam PeoRETURN Fi0=LEeT, Enter the SPUFI defaults details like max CURRENT SPOFT Enter the following to control your SPUFT (SQL Statement (R-Repeatable (Maximum number of returned from a (LRECL=Logical (size of one (RECRY 1 FB, PBA, (Must be DASD unit (Maximum width for (Maximum width for (UAHES, LABELS, ANY F4=RETURN F10-LEET Editing the queries, in SPUFI we can run more compilersmoors SSPUFI Tutorial -maitrameagucuicam Test Help OZAOS8. INDUS.DB2(SAMPL) Columns 00001 09072 Command scroll car, settee sacessauessssesseeasseeennne Top of Data 000100 CREATE TABLE cust_taB 00200 (cust_xo CHAR(4) NOT wuLL, 9090300 cuST_NAME —CHAR(10) NOP WULL, 000400 cusT_ADDR —CHAR(10)__ NOT NULL) 190500 Iw npuDs. rNDUTS; ‘990802 000810 INSERT INTO CUST_tAB VALUBS ("1111", "JOHN", *CALTFORNTA') ; 990520 000520 INSERT INTO cUST_TAB VRLUES (*2222", "JUDE", "NEWYORK") ; 00840 000550 INSERT INTO CUST_TAB VALUES ("3333", JANES", "NEW JERSEY"); 000360 000600 SELECT + FROM cust_tas; sesire eetseeecseeteseressseetesere Bottom of Data FlsHelp PIExit PeeRfind, P6-Rchange Fe Floskest © FLL=Right. piz-cancel Press enter to continue the processing .... sPurT SSID: DSN Enter the input data set name: (an be sequential er partitioned) 1 DATA SET NAME “INDUT77. 1NDUS.-.DB2 (SAMPL) + 2 VOLUME SERTAL cataloged) 3. DATA SET PASSWORD protected) (Enter if not, (enter if password Enter the output data set nane: sequential data set) 4 DATA SEP NAME .. *xNp0777, DUS. OUPUT! (Must be a Specify processing options 5 CHANGE DEFAULTS . (u/N ~ Display pss googia.comiitelcobelmatrialsput-uoralmoors SSPUFI Tutorial -maitrameagucuicam SPUFT defaults panel?) 6 eprn INPUT statements?) 7 BKECUTE « statements?) 8 AUTOCOMET succesaful ran?) 9 BROWSE OUTPUT output data set?) (Y/N ~ Enter soL (YIN ~ Bxecute son (XIN = Commit after (Y/N = Browse For remote Sol processing 20 CONNECT LocATION | DSNEGOBA EDIT SESSION HAS COMPLETED. PRESS ENTER 70 CONTINUE | Pini + + HANGE Ive Fa=Domw FOSSWAP © FLOSLEFT L-RIGHT —FI2“RETRIEVE Query resutls can be seen in the output data sel as below Menu Usilities Compilers BROWSE OZA0S8. INDUS. OUPUT Line 00900000 col 001 980 command Seroll ===> page serrsseatnenmneseeteanawseaseees Top of Data cust_taB 0010000 (cost_wo cHAR(4) NOT NULL, 0020000 cUST_NAME — CHAR(20) NOT NULL, 90030000 COST_ADDR —CHAR(20) NOT NULL 0040000 nN OZAGENDB.o7AGENTS 0080000 DSNE616I STATEMENT SXECUTION WAS SUCCESSFUL, SQLCODE 18 ° 0050200 INSERT INTO CUST_TAB VALDES ("1111", "JOHN", "CALTFORNIA"); 0051000 DSNEGISI NUMBER OF ROWS AFFECTED 15 pss googia.comiitelcobelmatrialsput-uoralmoors 'SPUFI Tutorial -aintramesgurticom a DSNEG1EI STATEMENT EXECUTION WAS SUCCESSFUL, SQLCODE 18 ° 0052000 INSERT INTO CUST_TAB VALUES ("2222", ' JUDE", *NEWYORK') ¢ 00053000 Fleditto | F29sPLIT FS: P4=REDURN F5=Reind —FO=RCHANGE. F7-Up Pe-Down Poe Pio-Left FlisRight Flz=Cancel page down screen: continuation of the output Menu Help compilers BROWSE —OZAOSB.TNDUS. OUPUT Line 00000028 col 001 O80 Command PAGE DSNE6ISI NUMBER OF ROWS AFFECTED 15 1 DSNEG16I STATEMENT EXECUTION WAS SUCCESSFUL, SQLCODE 18 ° 0054000 INSERT TNTO CUST_TAB VALUES('3333", "JAMES" , ‘NEW JERSEY") 90085000 DSNE615I NUMBER OF ROWS AFFECTED 1 1 DSNE61EI STATEMENT EXECUTION WAS SUCCESSFUL, SQLCODE 18 ° 0056000 SELECT * FROM cust_taB: oo06d00 cUST_NO CUST_NAME cusT_appa 2222 JUDE NERYORK all goKW (CALIFORNIA 3333, JANES NEW JERSEY Fleditto — FZesPLIT F42REDURN PSeReind —FEMRCHANGE, F7=Up F Pl0=Left pss googia.comiitelcobelmatrialsput-uoral 8moors Comments SSPUFI Tutorial -maitrameagucuicam FitsRight Fl2-cancel Page down screen : continuation of the output Menu Urait: Help compilers BROWSE —_OZAOSB. INDUS. OUUT hane 0000036 col ac] 98: Command scroll PAGE DSNE610I NUMBER OF ROWS DISPLAYED IS a DSNEGI6I STATEMENT EXECUTION WAS SUCCESSFUL, SQLCODE 1s 100 DSNE6172 COMMIT PERFORMED, SoLCODE IS ° DSNE616I STATEMENT EXECUTION WAS SUCCESSFUL, SOLCODE 18 ° DSNE6OII SQL STATEMENTS ASSUMED TO BE BETAEEN COLUMNS 1 and 72 DSNE620r NUMBER OF SQL STATEMENTS PROCESSED IS 5 DSNE621T NUMBER OF INPUT RECORDS READ 15 a DSNE622T NUMBER OF OUTPUT RECORDS WRITTEN TS 46 serresestteanesesessssenneeneees Bottom of Date FLSHELP F2=SPLIT —FS=END Pe=RETURN FSeRFIND —F6=RCHANGE. FT-UP Fa=DoaN POSSWAP © FLOSLEFT FLLRIGHT — FI2“RETRIEVE Slanin | Racont Sto Activ | Rapori Abuse | Prnt Page | Powered 8y Google Sites hpsistes goog. comisitelcobelmatrialsput-tuoral