Reporting Techniques -------------------- This sample code illustrates the examples shown in the 1995 NOMAD Training Conference presentation "Reporting Techniques". All the procedures were designed and tested with NOMAD running under VM/CMS and MVS/Session Manager. They should work with current NOMAD releases in both MVS and VM environments. They DO require that you load a database .. so they will not run with Reporter NOMAD, and you will need to modify the SCHEMA if you wish to have the database be a DB2, Teradata, SQL/DS database. There are 28 NOMAD procedures, one SCHEMA, and this RME file, all prefixed with "TEK". To run the examples, you will need to: 1. Transfer the 30 files to your host. 2. Issue a SCHEMA NEW command for the TEK database. (In MVS, allocate space as you normally would. I used 72 2K blocks for TEK). 3. Run the NOMAD procedure TEKLOAD, which loads data into the TEK database. Now you can run any of the examples by executing the named procedure, or you can be prompted through running all the examples by running the procedure TEK. In most cases, the procedure will perform one or more LIST requests and then issue a WINDOW READ on LIST to allow you to browse the results before proceeding with the next LIST. The procedures work best with WINDOWS ON. Solutions to the "homework" problem are also included. To run them, you must run TEKSICK (to load additional instances into the database), and then TEKSICK1, TEKSICK2, and TEKSICK3. You can restore the database for the other reports by re-running TEKLOAD. Look at the code! Procedure Technique --------- ------------------------------ Missing data TEKFBY Forced by w/merge TEKZERO1 Zeros, using overlay TEKZERO2 Zeros, using create TEKFBY2 Force 2 bys w/merge TEKIFTHN Force 2 bys: if-then-else TEKFLAG Flag (*) missing values Arrays TEKBYOVR By/over, using array TEKBYLIN By/over, using bylines TEKPCT Pct calc w/create array TEKPCT2 Pct calc w/if-then-else Byline, byhead, and byfoot TEKNOPAG Nopage on page 1 TEKPAGE Page totals TEKPAGEX Start on page 10 TEKSKIP New page if group is big Multi-column lists TEK3UP1 3-up list: across fastest TEK3UP2 3-up list: down fastest TEK3UPX 3-up list using array Weaving reports TEKWOV Woven (by1-by2) steps TEKWOV2 Woven (by1-by2) final Homework problem TEKSICK1 First solution (see answer sheets) TEKSICK2 Second solution TEKSICK3 Verbose version of TEKSICK2 The other support files are: TEKSET NOMAD setup tek demo (da & defines) TEKLOAD NOMAD Reload the database TEKSICK NOMAD Load additional instances for the homework problem TEK NOMAD Prompted run of all techniques TEKPROC NOMAD Interactive procedure for experimenting (WPROC) TEKASK NOMAD Prompt used by TEK and TEKPROC TEK SCHEMA Database for demo TEK.RME This description.