UVdemos2.doc - Contents by Part#

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

UVdemos2 - Contents continued

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

UVdemos2 - Contents continued

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

Part_0 UVdemos2.doc - Vancouver Utilities for Unix/Linux users

UVdemos2 - Introduction & Overview

This document is intended to make you aware of the most useful utilities supplied in the Vancouver Utilities package. You can run various tutorials using pre-programmed jobs with supplied test data files.

We will illustrate Vancouver Utility capabilities that are not possible with the standard unix/linux system utilities & we hope you can see how these capabilities could apply to your particular data processing projects.

These utilities are 'GENERAL PURPOSE' - they can be used with any data-file & can process all files in a directory. For our demos, we will use files such as FTP scripts, SQL scripts,& JCL, but we hope you can realize how these utilities could apply to your files (data, scripts,& programming languages).

We will minimize using JCL as testdata (used in mainframe conversion demos) and maximize the use testdata such as FTP & SQL scripts, which are familiar to most data processing professionals.

The intention here is to give you a short (1 or 2 page) introduction to the various utilities available, and then give you a link to the complete documentation which could be in various other books.

If you have a problem with your files & are wondering how it could be solved with Vancouver Utilities, we invite you to email us, explain the problem, and we will help you solve it (as our time allows).

UVdemos1 - Preliminary to UVdemos2

Also see uvsoftware.ca/uvdemos1.htm, a subset of this 'UVdemos2', an easier way to become familiar with the Vancouver Utilities and using unix/linux on the command line. UVdemos1 was inspired by my grandson. I wanted to allow him to login to my website with a userid/password & run the C compiler & simpler UV demos without having to download & install the Vancouver Utilities.

I selected some demos that should interest any unix/linux user:

• C program educational games: helloworld.c lotto1.c insult2.c
• C programs testing integer limits: test64a.c test64b.c test64c.c
• learn C programming - compile & execute.
• learn about unix/linux profiles, directories/files, etc
• IMPORTANT stuff that all unix/linux users need to understand.

UVdemos1 - On-Line Availability

After an evaluation or partnership agreement has been signed, UV Software can provide you with a userid & password, so you can login & run the demos before you download, install,& compile the Utilities on your machine. This saves you having to setup the directories & profiles on your machine.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

Part_1 UVdemos2.doc - Vancouver Utilities for Unix/Linux users

Part 1 - Contents

Install Vancouver Utilities

Before you begin these Vancouver Utility UVdemos tutorials, you must install the package as documented at www.uvsoftware.ca/install.htm. Here are important pages:

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

1A1. UVdemos2 - Vancouver Utilities for Unix/Linux users

Vancouver Utilities homedir contents

 /home/uvadm           <-- $UV
 :-----bin               - binaries (uvcopy,uvsort,uvcp,uvhd,uvlist,etc)
 :-----ctl               - control files for various purposes
 :-----dat1              - test data files to demo various Vancouver Utilities`
 :-----doc               - Vancouver Utilities documentation (text)
 :-----dochtml           - documentation in HTML (same as on www.uvsoftware.ca)
 :-----demo            <-- demo files for this TestDemo tutorial
 :     :                 - to be copied to your $HOME/demo/...
 :     :-----dat1        - data files for uvsort,uvcopy,uvcp,etc
 :     :-----jcl0        - mainframe JCL samples (8)
 :     :-----jcl2        - JCLs cleaned up, lower cased
 :     :-----jcl3        - JCLs after conversion to Korn shell scripts
 :     :-----ftps        - SYSIN control cards for various purposes
 :     :-----pf          - Parameter Files for uvcopy
 :     :-----rpts        - reports created by various demos (selects,etc)
 :     :-----sf          - Script Files for bash or ksh
 :     :-----sqls        - SQL scripts for demo table analysis
 :     :-----stats       - outputs from table3d table summaries
 :     :-----tf          - Test Files (similar to dat1/...)
 :     :-----tmp         - temporary files, outputs from demos
 :     :-----tmp1        - may clear tmp files before demos to see only new outputs
 :-----env             <-- profiles for users, PATHs to utilities & other software
 :-----hdr               - hdr files for C compiles
 :-----htmlcode          - merged into dochtml when text converted to HTML
 :-----lib               - libraries for C compiles (subfunctions,DISAM,etc)
 :-----mvstest           - test/demos for MVS JCL/COBOL MainFrame conversions
 :-----mf              <-- small versions of MainFrame testdata files
 :-----pf              <-- Parameter Files for uvcopy & uvqrpg
 :     :-----adm         - administrative jobs
 :     :-----demo        - demo jobs
 :     :-----IBM         - IBM mainframe conversion jobs
 :     :-----util        - utility jobs
 :-----sf              <-- Script Files
 :     :-----adm         - administrative scripts
 :     :-----demo        - demo scripts
 :     :-----IBM         - IBM mainframe conversion scripts
 :     :-----util        - utility scripts
 :-----sfun              - ksh functions used in converted JCL/scripts
 :-----src             <-- Vancouver Utilities C source code
 :-----srcf              - C source for various sub-functions
 :-----tf                - test files for various examples in doc
 :-----tmp               - tmp subdir (test/demo outputs)
 :-----vsetest           - test/demos for VSE JCL/COBOL MainFrame conversions

Note that the uvadm subdirs for 'sf' (Script Files) & 'pf' (uvcopy Parameter Files or uvcopy jobs) are further sub-directoried as shown above.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

1A2. UVdemos2 - Installing Vancouver Utilities

Before you can run the UVdemos2 tutorials, you must install the Vancouver Utilities (if not already installed). See instructions at uvsoftware.ca/install.htm, but here is a brief summary.

Installing Vancouver Utilities - Summary

1. Setup user account 'uvadm' to serve as Vancouver Utilities administrator. Usual home directory is /home/uvadm, but could be elsewhere if you change the environmental variable 'export UV=/home/uvadm' in the common_profile.
   
   
2. We have suggested setting up group 'apps' for uvadm & other users who will be working with Vancouver Utilities.
   
   
3. Download the Vancouver Utilities from the UV Software website into the uvadm home directory,& unzip or untar (from archives uvadm.zip or uvadm.tar.gz).
   
   
4. You may need to modify the profiles as required for your site. We recommend setting up user 'appsadm' to store your modified versions of the profiles, so you do not lose them if you install a new version of Vancouver Utilities.
   
   
5. Setup user 'appsadm' & copy /home/uvadm/env/* to /home/appsadm/env Then modify .profiles or .bash_profiles to call the common_profile from /home/appsadm/env/common_profile. See the bash_profile & common_profile listed on the following pages.
   
   
6. The common_profile gives you (the system administrator) 1 place to control program & data-file paths for all users on your system.
   
   
7. You should rename the supplied common_profile_uv to common_profile_xxx where 'xxx' identifies your organization (company ID).
   
   
8. Setting up 'appsadm' (separate from uvadm) saves your customized version of the common_profile from being lost or over-written when you install new versions of 'uvadm'. All stub_profiles (.bash_profile or .profile) should call the common_profile from /home/appsadm/env/common_profile (not from /home/uvadm/env/common_profile).
   
   
9. The C source utility programs are stored in $UV/src & are compiled into $UV/bin. You may need to recompile the C source programs for some versions of Linux (see uvsoftware.ca/install.htm#C1 - C7).
   
   

See complete install & compile instructions at uvsoftware.ca/install.htm.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

1B1. 'profiles' provided in /home/uvadm/env

'profiles' provided in /home/uvadm/env

 /home/uvadm/env         <-- profiles provided here
 :-----bash_profile_uv     - copy/rename to .profile (ksh) or .bash_profile (bash)
 :                         - defines RUNLIBS/RUNDATA for programmers & operators
 :-----common_profile_uv <-- common profile (called by bash_profile)
 :                         - defines PATH's etc using $RUNLIBS/$RUNDATA

 /home/appsadm/env       <-- setup user 'appsadm' & copy from /home/uvadm/env/*
 :-----bash_profile_ABC    - customize & copy to homedirs .profile or .bash_profile
 :-----common_profile_ABC  - common profile (called by bash_profile)

We recommend setting up an application administrator 'appsadm', copying /home/uvadm/env/* to /home/appsadm/env, and customizing the profiles there depending on the site locations of libraries & data.

Do NOT customize profiles in /home/uvadm/env/... because they would be overwritten when a new version of Vancouver Utilities is installed.

We recommend the concept of 'stub' & 'common' profiles. The shell profile in each user's homedir is a 'stub' that calls 'common_profile' which are stored in /home/appsadm/env/...

1. The supplied 'bash_profile' is copied to homedirs, renamed as '.bash_profile' for bash shell (Linux) & '.profile' for Korn shell (Unix), and then modified depending on whether the user is a programmer or operator. - defines RUNLIBS as testlibs for programmers OR prodlibs for operators - defines RUNDATA as testdata for programmers OR proddata for operators
   
   
2. 'common_profile' then defines the 'PATH's using $RUNLIBS,$COBDIR,$UV,etc For example: export PATH=$PATH:$RUNLIBS/jcls (converted JCL/scripts). Defines software superdirs (uvadm, COBDIR, ORACLE_BASE, ORACLE_HOME, etc)
   
   
3. '$RUNDATA' determines data-file locations indirectly as follows: $RUNDATA defines the superdir housing all data-files.
   
   

Note that stub profiles must call 'common_profile' using '.' (dot execution), which means the 'export's made in the common_profile will still be effective on return to the users profile.

This system is a big advantage for any site with multiple users, it means the sysadmin can update common_profile once in 1 place & those changes are effective for all users.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

1B2. 'profiles' provided in /home/uvadm/env

bash_profile_uv (stub profile)

 # bash_profile_uv - bash_profile for Vancouver Utilities
 # .bash_profile <-- must be copied/renamed to '.bash_profile' in your homedir
 #                 - a 'stub_profile' that calls a 'common_profile'
 #                 - by Owen Townsend, update Dec 2020
 #
 # bash_profile_ABC - users should copy/rename their version of bash_profile
 #                    store their master copy in /home/appsadm/env/...
 #                    copy to user homedirs, renaming .profile or .bash_profile
 # common_profile_ABC - copy/rename their common_profile to /home/appsadm/env/...
 #                      called by their bash_profiles from $APPSADM/env/...
 #
 # bash_profile & common_profile - distributed in $UV/env/...
 # - copy to $APPSADM/env/... (/home/appsadm/env/...) & modify for your site
 # - do not modify profiles in $UV because new versions of uvadm would overwrite
 # - see bash/common profile listings at uvsoftware.ca/install.htm#A6 & A7
 #
 #           ** define RUNLIBS/RUNDATA/CNVDATA before call to common_profile **
 #
 # bash_profile defines RUNLIBS/RUNDATA/CNVDATA for common_profile to define PATHs to LIBS & DATA
 #  - Modify definitions below depending on self-training or Conversion/Production
 #
 # Mainframe JCL/COBOL/DATA Migrations - libs/data in homedir for testing/training
 export RUNLIBS=$HOME/testlibs1 RUNDATA=$HOME/testdata1 CNVDATA=$HOME/cnvdata1
 #=============================================================================
 #
 # Alternante Mainframe JCL/COBOL/DATA conversion/production in separate file systems
 #   export RUNLIBS=/p1/apps/ABClibs1 RUNDATA=/p2/apps/ABCdata1 CNVDATA=/p3/apps/ABCcnvdata1
 #   ======================================================================================
 #   - better to use larger file systems for production (p1,p2,p3/apps/ABC... vs $HOME)
 #   - appended digit '1' for future possible alternates ...libs2/...data2/...cnvdata2,etc
 #   - could have multi-companies/systems on same machine, example for ABC company
 #   - RUNDATA could be defined differently for different programmers for testing
 #   - see uvsoftware.ca/jclcnv1demo.htm#1B3 RUNLIBS/RUNDATA defines for migrations
 #
 # Vancouver Utilities Demos/Tutorials & QuizGame for self training Linux Command Line Tools
 export UVDEMOS=$HOME/demo QUIZFILES=$HOME/demo/quiz2f QF=$QUIZFILES
 #==================================================================
 #  - the $UV/demo/... directory can be copied to user's homedir for self-training
 #    Linux Command Line Tools, vi/vim, C programming, uvcopy, & play quizgame (quiz2c)
 #  - $HOME/demo/... already setup for guest login users (no need to download/install VU)
 #    if you have downloaded/installed VU --> cp -r $UV/demo to $HOME/demo <--
 #  - see demo files at uvsoftware.ca/uvdemos.htm#1B5
 #
 #                      ** aliases for easy navigation **
 #
 # The following aliases are defined in the common_profile & in .bashrc for easy navigation
 #  - quick changes between the various directories which could have long path names
 #
 #  alias cdc='cd $CNVDATA'   <-- cd to data conversion super directory
 #  alias cdd='cd $RUNDATA'   <-- cd to data testing/production super directory
 #  alias cdl='cd $RUNLIBS'   <-- cd to JCL/COBOL/script conversion/testing/production libraries
 #  alias cdm='cd $HOME/demo' <-- cd to self-training Linux Tools, C programming, games, uvcopy
 #

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

 #             ** 'profile_uv' (GUI logins) vs 'bash_profile_uv' (text logins) **
 #
 # .bash_profile executed by text based command line logins (ctl-alt-functions F3-6 on Ubuntu)
 # .profile executed by GUI logins on Ubuntu (default .profile would not call our common_profile)
 # If you want GUI logins to call our common_profile & setup PATHs to utilities (as above)
 # - could copy $APPSADM/env/bash_profile_uv to .profile in home-dirs of GUI logins
 # - we also provide *THIS* $APPSADM/env/profile_uv for copy to .profile of GUI logins
 # - also see $APPSADM/env/Xresources_uv to be copied to homedirs of GUI logins
 #
 export APPSADM=/home/appsadm #Jan2020 APPSADM def in .profile_bash (for WSL Windows Subsystem on Linux)
 # CALLER=$(cat /proc/$PPID/comm)
 echo "Executing--> .bash_profile (copied/renamed from \$APPSADM/env/bash_profile_uv)"
 echo " - Vancouver Utilities bash_profile in login homedir, will call common_profile"
 echo " - LOGNAME=$LOGNAME HOME=$HOME PWD=$PWD APPSADM=$APPSADM"
 echo "Calling--> . $APPSADM/env/common_profile_uv"
 #
 . /home/appsadm/env/common_profile_uv   # common_profile called from /home/appsadm/env/...
 #====================================   # - NOT from /home/uvadm/env/...
 # - must setup appsadm to store common_profile, so not lost when uvadm updated
 # - see more at www.uvsoftware.ca/install.htm#A4
 echo "HOSTNAME=$HOSTNAME LOGNAME=$LOGNAME APPSADM=$APPSADM UV=$UV"
 echo "RUNLIBS=$RUNLIBS RUNDATA=$RUNDATA"
 #
 #       ** misc items that user may need to override common_profile defs **
 # export TERM=linux       # TERM - modify depending on your terminal
 # stty erase '^?'         # erase char - modify depending on your terminal
 # stty intr '^C'          # interrupt ^C, (probably already default ?)
 # export UVLPDEST="-dlp0" # default destination for uvlp(uvlist) scripts
 #                         # change to a printer near you & un-comment
 #
 #                       ** user aliases, etc **
 # alias l='ls -l'         # save keystrokes on very often used commands
 # - see common_profile for several more aliases
 # - add more here depending on user preferences
 #
 #                     ** TEST or PRODuction **
 # export TESTPROD=P000   # P___ for PRODuction
 export TESTPROD=T000     # T___ for TEST
 # - PRODuction profiles TESTPROD=P*, developer TEST profiles TESTPROD=T*
 # - JCL/scripts can test $TESTPROD to control various differences desired
 # - used to determine if programmer 'T'esting or 'P'roduction
 # - bytes 2,3,4 of P/T___ reserved for future use as required
 #   if [[ "$TESTPROD" == P* ]]  <-- test only 1st byte for Test/Prod
 #   if [[ "$TESTPROD" != T* ]]  <-- assume Production if not Test
 #Note - Test/Prod code relevant only to mainframe migration JCL/scripts sites
 #     - migration sites would move this code up prior to calling common_profile
 #       so common_profile could modify PATH,etc depending on Test/Production
 #

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

 #                   ** Console Logging - optional **
 # - uncomment 9 '##' lines below to activate console logging
 # - must setup subdirs matching $LOGNAME in $LOGDIR/log1/...,log2/...,log3/...
 #   (usually LOGDIR=$APPSADM in common_profile)
 # - subdirs log1,log2,log3 hold logfiles for: current file, month, lastmonth
 # - see details at www.uvsoftware.ca/admjobs.htm#Part_6
 # - console logging for production operators to capture entire logon session
 # - programmers can use the 'joblog1' script to capture log for 1 job at a time
  ## login1 || exit 2          # exit here if 2nd login
  ## if [[ ! -f .bashrc ]]; then
        ## echo "logging requires .bashrc (copy/rename from $AA/env/bashrc)"; read reply; exit 99; fi
  ## logfixA $LOGNAME          # process log1 file to log2 (to allow read/print)
  ## echo "--> logview   <-- execute logview script to see prior console logs"
  ## echo "logging requires .bashrc/.kshrc with PS1='<@$HOST1:$LOGNAME:$PWD >'"
  ## echo "logging requires $LOGNAME subdirs in \$LOGDIR/log1 & log2"
  ## if [[ -d $LOGDIR/log1/$LOGNAME && ( -f .kshrc || -f .bashrc) ]]; then
  ##    echo "script $LOGDIR/log1/$LOGNAME/$(date +%y%m%d_%H%M%S)"
  ##    exec script $LOGDIR/log1/$LOGNAME/$(date +%y%m%d_%H%M%S)
  ## fi
 # 'exec script' must be the last non-comment line in the profile
 # 'script' disables aliases & umask 002 - put in .bashrc/.kshrc to be effective
 # ==============================
 # cp $APPSADM/env/bashrc .bashrc  # copy to your homedir restoring correct name
 # ==============================
 # After uvadm installed at $UV (/home/uvadm or /opt/uvsw/uvadm)
 # - setup appsadm at $APPSADM (/home/appsadm or /opt/uvsw/appsadm)
 # - copy $UV/env/* $APPSADM/env
 # - modify $APPSADM/env/common_profile & bash_profile for your site
 # - copy $APPSADM.env/bash_profile to user .profiles
 # Then all user profiles call common_profile from $APPSADM/env/...
 # to prevent loss of customized common_profile when new version uvadm installed
 #
 #             ** seldom used definitions stored at bopttom of profile **
 # 5. Programmer testing/development projects, Example track US Election candidates
 #    export RUNLIBS=$HOME/demo/election1 RUNDATA=$HOME/demo/election1 CNVDATA=$HOME/demo/election1
 #    =============================================================================================
 #    - 1st demo election1/, then election2/, then election3, See uvsoftware.ca/uvdemos.htm#Part_9

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

1B3. 'profiles' provided in /home/uvadm/env

common_profile_uv

 #*common_profile_uv      - common_profile for UV Software's offline machines
 #                        - complete Vancouver Utilities
 #                        - by Owen Townsend, Oct 2020
 # common_profile_uv_web1 - for uvsoft webfaction sublogins uvsoft01-uvsoft19
 #                        - complete Vancouver Utilities including bin/... & src/...
 # common_profile_uv_web2 - for uvsoft webfaction sublogins uvsoft20-uvsoft29
 #                        - empty bin/... & src/... for uvsoft20-29
 #                        - bin PATH /home/uvsoft00/uvadm/bin/...
 #Note - do not confuse 'common_profile_uv_web1/2' with 'common_profile_uv'
 #     - clients will use 'common_profile_uv" when they install on their machines
 # common_profile_ABC - users should copy/rename their version of common_profile
 #                      & store their version in /home/appsadm/env/...
 # bash_profile_uv  - also copy BASH/STUB profile to $APPSADM/env (/home/appsadm/env)
 #                    for site customizations
 # bash_profile_ABC - might append suffix to identify your customized versions
 #                  - then copy to user homedirs & renamed as .profile or .bash_profile
 #  - bash stub profile defines RUNLIBS/RUNDATA/CNVDATA for common_profile to modify PATHs
 #  - users may define depending on their current project (migrations,testing,development)
 #    export RUNLIBS=$HOME/testlibs RUNDATA=$HOME/testdata CNVDATA=$HOME/cnvdata
 #    export RUNLIBS=$HOME/demo RUNDATA=$HOME/demo CNVDATA=$HOME/demo
 #
 # common_profile & bash_profile - distributed in $UV/env/... (usually /home/uvadm/env)
 # - copy to $APPSADM/env/... (/home/appsadm/env/...) & modify for your site
 # - do not modify profiles in $UV because new versions of uvadm would overwrite
 # - see stub/common profile listings at uvsoftware.ca/install.htm#A6 & A7
 #
 #                  ** begin code for common_profile **
 #
 export UV=/home/uvadm           # UV homedir symbol used below
 # export APPSADM=/home/appsadm  # APPSADM defined in .bash_profile
 export LOGDIR=$APPSADM          # console logging subdirs log1,log2,log3
 export FPATH=$APPSADM/sfun      # Function FPATH here for echo displaays
 # CALLER=$(cat /proc/$PPID/comm)
 echo " "
 echo "Executing--> \$APPSADM/env/common_profile_uv (APPSADM=$APPSADM)"
 echo "LOGNAME=$LOGNAME BASHPID=$BASHPID process=$$"
 echo "HOME=$HOME APPSADM=$APPSADM UV=$UV FPATH=$FPATH"
 #
 # setup PATH for Vancouver Utilities programs & scripts (uvadm & appsadm)
 # - append onto system PATH, using symbols defined above ($UV, $APPSADM, etc)
 export PATH=$PATH:./sf:$HOME/sf:$HOME/bin:$APPSADM/sf:$APPSADM/bin
 export PATH=$PATH:$UV/sf/adm:$UV/sf/demo:$UV/sf/util:$UV/sf/IBM
 export PATH=$PATH:$UV/bin:$UV/help:./bin
 #Note - Search Priority for scripts & programs in subdirs sf/... & bin/...
 #     - #1=current directory, #2=$HOME, #3=$APPSADM, $4=$UV
 #     - #5=$UV/sf subdirectoried to adm,demo,util,IBM
 # setup PATH for JCL/scripts converted from mainframe Vancouver Utils
 # - see www.uvsoftware.ca/jclcnv1demo.htm or www.uvsoftware.ca/vsejcl.htm
 export PATH=$PATH:$RUNLIBS/sf:$RUNLIBS/jcls:$RUNLIBS/jts:$RUNLIBS/db2s/
 #
 #Note Re 'FPATH' - defined prior to 'echo's above for console display
 # FPATH - defines directory of Korn shell functions (called by VU JCL/scripts)
 #       - jobset51,exportgen0,exportgen1,jobend51,jobabend51,testcc,logmsg,etc
 # export FPATH=$UV/sfun       # functions distributed in /home/uvadm/sfun/...
 # export FPATH=$APPSADM/sfun  # copied to /home/appsadm/sfun/... for customization
 # export FPATH=$RUNLIBS/sfun  # OR to $RUNLIBS for more flexibility if required
 #
 # setup 'PFPATH' for uvcopy & uvqrpg interpreter to find Parameter Files (jobs)
 export PFPATH=./pf,$RUNLIBS/pf,$RUNLIBS/pfs
 export PFPATH=$PFPATH,$HOME/pf,$UV/pf/adm,$UV/pf/demo,$UV/pf/util,$UV/pf/IBM
 # - UV/pf/... follows RUNLIBS,APPSADM,HOME to allow user duplicate names
 # - uvcopy accepts ',' delimiters as well as ':' in case of SFU on Windows
 #
 # define 'GDGCTL' location of gdgctl51I.dat/.idx
 # - see doc at www.uvsoftware.ca/jclcnv4gdg.htm#5G1
 if [[ -z "$GDGCTL" ]]; then export GDGCTL=$RUNDATA/ctl; fi #<-- set default
 # - see GDG control file discussed at www.uvsoftware.ca/jclcnv4gdg.htm#5A2
 #
 # Define CTLMAPDIR for uvhdcob (display COBOL copybook fieldnames beside data fields)
 export CTLMAPDIR=$HOME/mf/maps  #<-- uvhdc1 demos /home/uvadm/dat1/... & /home/uvadm/maps/...
 # export CTLMAPDIR=$RUNLIBS/maps #<-- comment out above defaults this for uvhdc2
 export COBMAPDIR=$RUNLIBS/maps  # for uvhdcob (display data with fieldnames)
 export UVHDCOBROP=m45           # uvhdcob display 45 lines
 # export UVHDROP=l64            # uvhd display 64 chars/line, Changed to 100 Dec2020
 # export UVHDROP=l100           # uvhd display 100 chars/line, default in uvhd.c
 #
 # Indexed file extension controls for Vancouver Utilities
 export ISDATEXT=".dat" # .dat/.idx Indexed files for uvsort,uvcopy,uvcp,etc
 #                      # uvsort,etc expects .dat on data partition of ISAM files
 #                      # COBOL equivalent is 'IDXNAMETYPE=2' in $EXTFH/extfh.cfg
 #                      # ISDATEXT new way to control DISAM .dat extension Apr2010
 export DISAMEXT="dat"  # DISAMEXT old way prior to Apr2010
 #                      # - omit both or set null if you want NO .dat extension
 #
 # printer destinations for VU laser printing scripts
 # - modify UVLPDEST to the network printer closest to you
 export UVLPDEST="-dMS610USB"    # default dest for uvlp(uvlist) scripts
 export UVLPOPTN="-onobanner"    # for unix/linux (SFU does not allow)
 export UVHDPRINT=uvlp16         # script for uvhd 'i' immediate print command
 export UVHDPWIDE=uvlp14L        # script for uvhd 'iprint' Landscape 100 chs/line
 #-----------------------------------------------------------------------------
 #
 #                  ** TERM, erase, interupt, etc **
 # stty erase '^?'           # erase char - modify depending on your terminal
 #                         #  '^?' for linux/at386, '^H' for vt100,ansi,xterm
 # stty -icrnl             # ensure CR x'0D' omitted & only LF x'0A' inserted
 # stty intr '^C'          # interrupt ^C, (probably already default ?)
 #
 #                 ** UV Recommended items **
 umask 002                     # permissions 775 dirs, 664 files
 set -o ignoreeof              # disallow logoff via control D (use exit)
 export HOSTNAME               # should already be set
 export HOST=${HOSTNAME%%.*}   # extract 1st segment of $HOSTNAME
 devtty=$(tty)                 # capture terminal (might add to PS1 prompt)
 export tty=${devtty#/dev/}    # remove prefix /dev/
 export PS1='<@$HOST:$LOGNAME:$tty:\D{%H%M}:$PWD> '
 export EDITOR=vi              # for Korn shell history
 export VISUAL=vi              # for Korn shell history
 export HISTSIZE=3000;         # Korn shell history file size
 export TD8=$(date +%Y%m%d)
 export TD6=$(date +%y%m%d)
 export EM=$HOME/em            # convenience for Owen (EMail directory)
 export EMTD6=$HOME/em/$TD6    # convenience for Owen (EMail directory)
 export AA=$APPSADM            # convenience since $APPSADM often used
 export RL=$RUNLIBS            # convenience since $RUNLIBS often used
 export RD=$RUNDATA            # convenience since $RUNDATA often used
 export UVBAK=/home2/uvbak     # convenience for backup scripts & alias
 export QJS=$RUNLIBS/qjs       # uvcopy jobs to replace QIKJOB
 export EZTS=$RUNLIBS/ezts     # uvcopy jobs to replace EASYTRIEVE
 export LOGMSGACK=n            # disable ACK option in logmsg2 in JCL/scripts
 export LC_ALL=C               # disable UTF8 in errmsgs for C compiler
 #                             # sort alpha ABC-Zabc-z vs AaBbCc-Zz
 export SPELLDIR=$APPSADM/admin/spell  # vim spellfiles for all users
 # - see script $UV/sf/adm/updatespellfile
 # - sorts spellfile.adds into $SPELLDIR/en-utf-8.add & overwrites existing
 export TBFR=/home7/owen/.thunderbird/3io8dews.default/ImapMail/mail.webfaction.com
 # vi $TBFR/msgFilterRules.dat # easy access to Thunderbird filters (as root)
 #
 #                      ** aliases **
 # alias commands to prompt for overwrite (highly recommended)
 # - use option '-f' when you have many files  (rm -f tmp/*, etc)
 alias rm='rm -i'              # confirm removes
 alias mv='mv -i'              # confirm renames
 alias cp='cp -i'              # confirm copy overwrites
 alias l='ls -l'               # save keystrokes
 alias lsd='ls -l $1 | grep ^d'   # list directories only
 alias vi='vim'                # use vim for Linux
 alias more='less'             # alias to 'less' if preferred
 alias df='df -BM'             # df report sizes in MegaBytes
 alias du='du -sBM'            # du Block size MegaBytes
 alias grep='grep -nHd skip'   # ensure filename & line# on matching lines
 alias uname='uname -a'        # ensure -a on uname (All info)
 alias cdb='cd $UVBAK'         # UV Software backup superdir
 alias cdl='cd $RUNLIBS'       # quick access to LIBS superdir
 alias cdlc='cd $RUNLIBS/ctl'  # quick access to LIBS/control-files
 alias cdd='cd $RUNDATA'       # DATA superdir
 alias cdc='cd $CNVDATA'       # data CONVERSION superdir
 alias cdk='cd $CMPDATA'       # data COMPARISON superdir
 alias cdm='cd $HOME/demo'     # quick access to $HOME/demo/... self-training
 alias cdqd='cd $HOME/demo/quiz2d' # see www.uvsoftware.ca/uvdemos1.htm#3H1
 alias rmtmp='rm -f tmp*/*'    # often used to clear tmp/* tmp1/* tmp2/*
 alias tree='tree -F'          # append '/' on dirs & '*' on executables
 alias h='history'             # see all history commands
 alias h40='history 40'        # see last 40 comamnds
 alias ping='ping -c3'         # stop after 3 pings
 alias dig='dig +short'        # find IP# for domain, dig -x find domain for IP#
 alias cde='cd $EM'            # EMail directory
 alias cdem='cd $EM/$TD6'      # EMail directory for today
 alias mkem='mkdir $EM/$TD6; cd $EM/$TD6; touch ${TD6}a; vi ${TD6}a;'
 # aliases - ineffective if console logging activated (in user stub profile)
 #         - ifso, place aliases in .bashrc (or .kshrc, for ksh)
 #-------------------------------------------------------------------------
 # Verify that critical environmental variables have been defined
 # (by stub_profile or this common_profile)
 if [[ "$UV" = "" || "$APPSADM" = "" ]]; then
    echo "UV=$UV or APPSADM=$APPSADM not defined"
    echo "- enter to continue"; read $reply; fi
 if [[ "$RUNLIBS" = "" || "$RUNDATA" = "" ]]; then
    echo "RUNLIBS=$RUNLIBS or RUNDATA=$RUNDATA not defined"
    echo "- enter to continue"; read $reply; fi
 #-------------------------------------------------------------------------
 # keep logins with last 50 logins (mostly for SSH logins on UVSW website)
 test -d .login || mkdir .login  # make directory if not already present
 CLIENT=${SSH_CLIENT%% *}        # get SSH_CLIENT (IP#)
 echo "$LOGNAME $CLIENT $(date +%Y%m%d_%H%M)" >>.login/logins
 tail -n 50 .login/logins >.login/loginstmp
 mv -f .login/loginstmp .login/logins
 #-------------------------------------------------------------------------
 #        ** Micro Focus COBOL 2.2 update2 Eclipse on RHEL 7 June2015 **
 # export COBDIR=/opt/microfocus/VisualCOBOL
 # export JAVA_HOME=/usr/local/java32
 # export PATH=$COBDIR/bin:$JAVA_HOME/bin:$PATH
 # export LD_LIBRARY_PATH=$LD_LIBRARY_PATH:$COBDIR/lib:$JAVA_HOME/lib
 # export COBCPY=$COBDIR/cpylib
 # export CLASSPATH=$COBDIR/lib/mfcobol.jar:$COBDIR/lib/mfcobolrts.jar:$COBDIR/lib/mfsqljvm.jar
 # export COBMODE=64
 # export EXTFH=$UV/ctl/extfh.cfg   # file handler options IDXNAMETYPE=2 FILEMAXSIZE=8
 # export CBLX=$RUNLIBS/cblx    # path for loading COBOL programs
 #                       ** AIX COBOL **
 # set default file type for JCL converter to AIX COBOL
 # - other code at http://www.uvsoftware.ca/admjobs.htm#1C3 or $UV/env/archive/
 # export COBRTOPT=FILESYS=QSAM
 # converted JCL/scripts allow override via cft=XXX, for example:
 # exportfile CUSTMAS data1/ar.custmas.master #cft=QSAM  <-- as generated
 # exportfile CUSTMAS data1/ar.custmas.master cft=STL    <-- uncomment & change type
 #                  ** Microsoft SQL Server **
 # see www.uvsoftware.ca/sqldemo.htm#Part_6
 # export PATH=$PATH:/opt/mssql-tools/bin
 # export LD_LIBRARY_PATH=$LD_LIBRARY_PATH:/opt/microsoft/msodbcsql/lib64
 # export ODBCSQL="ODBC Driver 13 for SQL Server"
 # export DATABASE=testdb   # $(DATABASE) used in table create & load scripts

 # export ODBCINI=/etc/odbc.ini
 # export ODBCSYSINI=/etc/  #<-- Directory with ODBC config (not File odbcinst.ini)
 #            ** GNU COBOL testing Oct 2019 **
 # export GCHOME=/home/gcobol
 # export GCDIR=/home/gcobol/cob
 #         ** optional for WSL (Windows Subsystem for Linux) **
 #  Example#1 - export WINUSER using wslpath to get windows %USERPROFILE% (in C:\USERS\...)
 ## WINUSER=$(wslpath $(cmd.exe /C "echo %USERPROFILE%"))
 ## export WINUSER=$(echo $WINUSER | tr -d '\r')
 ## echo "WINUSER=$WINUSER"
 # Example#2 - setup variables for Both Windows & Linux using 'WSLENV' (translates path differences)
 ## C:\uvadm> set UVADM=C:\uvadm    <-- set variable in windows
 ##           set WSLENV=UVADM/p    <-- WSLENV sets up variable UVADM for Both Windows & Linux
 #  C:\uvadm> echo %UVADM%          --> shows value "C:\uvadm" as expected
 #  C:\uvadm> wsl                   <-- run WSL (or bash)
 #  /mnt/c/uvadm>                   <-- now running Linux, prompt changed as per common_profile
 #  /mnt/c/uvadm> echo $UVADM       <-- test, see if same variable now shows Linux path
 #  /mnt/c/uvadm> /mnt/c/uvadm      --> proves $UVADM on Linux equivalent of %UVADM% on Windows
 #             ** define directories for uvcopy mailx1 or mutt1 **
 # export MAILDATA=maildata        #<-- input data files
 # export MAILMSGS=mailmsgs        #<-- MSG files created for input to mailx utility
 # export MAILSCRIPTS=mailscripts  #<-- scripts created to execute mailx utility
 #            ** optional software **
 # - Micro Focus COBOL, AIX COBOL, GNU COBOL, COBOL-IT
 # - Microsoft SQL Server Oracle mySQL Morada RPG
 # - WSL (Windows Subsystem for Linux)
 #Note - code removed for seldom used items, Feb 2016
 # - but prior version saved in $UV/env/archive/common_profile_uv_20160215
 # - contains items that may need to be recovered, such as:
 # - Micro Focus COBOL, COBOL-IT, Oracle, MySQL, Morada RPG, SQL Server
 # - see listings at www.uvsoftware.ca/admjobs.htm#1C1 & 1C2,1C3,etc
 #------------------------- end of common_profile ---------------------------

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

1B4. Vancouver Utilities Installation Guide

.vimrc - set options for vim

.vimrc file contents

 " vimrc - setups for vi/vim, stored in /home/uvadm/env/vimrc
 "       - copy to your homedir & rename as .vimrc
 "
 " set HighLighting for search matches & current cursor line
 set hlsearch     "<-- HighLights search words (yellow)
 set cursorline   "<-- Highlights cursor line (light blue)
 "
 " restore cursor to previous position when reopening a file
 if has("autocmd")
   au BufReadPost * if line("'\"") > 0 && line("'\"") <= line("$")
     \| exe "normal! g'\"" | endif
 endif
 "
 " increase yank max lines per buffer a-z, from default (50 lines) to 1000 lines
 set viminfo='20,<1000   "note max 20 files & max 1000 lines
 " -------------------- end of .vimrc ----------------------

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

1B5. profiles for Vancouver Utilities on Unix/Linuxs

Advantages of $RUNLIBS/$RUNDATA defined in profiles

1. You never need to change scripts between TESTING & PRODUCTION.
   
   
2. Programmers can execute scripts/programs from $TESTLIBS/scripts/... that access data from $TESTDATA/data/... because their profiles define RUNLIBS/RUNDATA as TESTLIBS/TESTDATA.
   
   
3. Operators & schedulers execute scripts/programs from $PRODLIBS/scripts that access data from $PRODDATA/data/... because their profiles define RUNLIBS/RUNDATA as PRODLIBS/PRODDATA.
   
   
4. This system could allow testing & production on the same machine. They are usually on separate machines, but this system provides great flexibility
   
   
5. Different programmers can have their own set of TESTDATA simply by changing the definition of RUNDATA in their profile.
   
   
6. On production machines, operators & schedulrers could operate on different sets of data for different companies on the same machine, using the same scripts & programs with no changes required.
   
   
7. The system administrator (appsadm) can make changes in 1 place to affect all users vs having to update profiles in all user homedirs.
   
   
8. The sysadmin would control any updates to common_profile. On test systems the programmers would control updates to their bash_profile.
   
   
9. Programmers have the flexibility required. They can select different sets of testdata by redefining RUNDATA in their profile
   
   
10. GDG files provided by functions exportgen0 to get the current generation for reading & exportgen1 to determine the next generation for writing.
    
    
11. Run JCL/scripts with the 'joblog' script to capture console logs, for example: --> joblog jobname <-- captures the log into $RUNDATA/joblog/jobname.log
    
    
12. You can run scripts from anywhere, because 'jobset51' (function at begining of JCL/scripts) changes directory to $RUNDATA (the superdir for subdirs of data, joblogs, jobmsgs, jobtimes, sysouts).
    
    
13. Restart at any step, to restart at step2, run the job as follows: --> joblog jobname STEP=S0020 <--
    
    
14. KEYWORDS=VALUES on the command line are automatically available as $KEYWORD anywhere in your scripts, for example: --> joblog jobname DATE=20200512 <-- makes $DATE available in the script
    
    
15. Critical messages (job start,step start,job end Normal/ABnormal,errmsgs) are date/time stamped & captured by the 'logmsg2' function into --> $RUNDATA/jobmsgs/yyyymmdd/yyyymmdd_jobname <--
    
    
16. The 'testcc' function tests the status of each step with 1 line of code. Failure will display the status code & error messages & abort the job. 'testcc' failure ensures that any new generation GDG files are not committed.
    
    

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

1B6. Recommended Command Line Working Procedures

Working-Directory - Best Practices

For these UVdemos2, you will be asked to copy $UV/demo/* to your $HOME/demo/... & change into demo/ which will be your 'working-directory' for the demos. Here are a few subdirs/files to illustrate Working-Directory Best-Practices.

 /home/uvadm/demo/              <-- demo files supplied
 /home/userxx/demo/             <-- demo files copied to your homedir
 |-- dat1/                      <-- data files (just 2 for illustration)
 |   |-- CanadaMPs
 |   `-- UScongress
 |-- sf/                        <-- scripts (just 2 for illustration
 |   |-- select_CanadaMPs
 |   |-- select_UScongress
 |-- selects/                   <-- output files from selection exercises
 |   |-- dat1_CanadaMPs_BC
 |   `-- dat1_UScongress_AK
 |-- tmp/                       <-- misc output files from various exercises
 |   |-- CanadaMPs_sorted_Prov
 |   |-- SORTtmptest

1. A working-directory with all files in subdirs keeps your working sapce clean & well organized - your subdirs will probably fit on 1 screen, which makes it easy for you to review your project.
   
   
2. You should stay in the working directory - do not change into the subdirs to investigate/edit your files.
   
   
3. Don't waste time by changing into a subdir, looking at 1 file,& changing back out. Of course OK, if you intend to inspect/edit multiple files, but not for 1 or 2.
   
   
4. Staying in your working-directory protects your files, even the infamous 'rm *' will do no harm when all files are in subdirs.
   
   
5. Working-Directory with subdirs allows you to use the same filename for applications that process the same datafile thru multiple stages. For example JCL & COBOL conversions require multi-step processing.
   
   
6. Many utilities automatically write their output to the tmp/... directory & will make ./tmp/ if it does not exist.
   
   
7. uvsort defaults to using ./tmp for merge files & tests presence & write access by writing tmp/SORTtmptest before attempting the sort (you can export SORTDIR=... in the common_profile to change the default).
   
   
8. Garbage files (accidentally created) in the working-direcotry, rather then the intended subdir will stand out, so you will notice them, investigate the reason & correct the problem.
   
   
9. Files created in the working directory can occur when there is a mistake in assigning a logical $VARIABLE filename to the physical subdir/filename. You would not notice if you were operating in the subdir with hundreds of files.
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

1B7. Recommended Command Line Working Procedures

tmp/ subdir in Working-Directory

A 'tmp/' subdir in in our working-directory has many uses & benefits. Do not confuse our ./tmp/ subdir in our working-directory with the unix system '/tmp/' at the top of the root file system.

1. Several Vancouver Utility programs & scripts expect a tmp subdir and some will make it if not present.
   
   
2. 'uvsort' expects a ./tmp/ subdir for merge files unless you define an alternate in the common_profile via 'export SORTDIR=...'
   
   
3. 'uvhd' will make a tmp/ dir (if not present) to store an index for variable length & text files, so you can directly access any record by its record#. uvhd also uses the tmp/ dir for outputs from record write or print selections.
   
   
4. Several Vancouver utility scripts output to the tmp/ subdir. For example 'alldiff2' runs the unix 'diff' command for all files in 2 directories, and writes the output to tmp/... using the 2nd directory-name.dif. Then you can use the editor to investigate the diff report (more flexible than cat/more).
   
   
5. Redirecting large outputs of unix utilities such as 'grep' & then investigating with 'vi' is much more flexible than piping to more or less.
   
   
6. You can use the tmp/ dir for cut & paste between files - edit the 1st file, write out the desired lines to tmp/xxx. Then edit the 2nd file & read the tmp/xxx file into the desired location.
   
   
7. You can use the tmp/... directory like the unix system '|' command that pipes the output of 1 comamnd directly into a 2nd command, when you want to inspect or modify the 1st output before inputting to the 2nd command.
   
   
8. Using a tmp/ subdir for any misc file outputs keeps your working-directory clean & well organized - no garbage file clutter, your subdirs can probably fit on 1 screen.
   
   
9. Any files showing up on your working-directory list will signal an error to be investigated & removed. For example an incorrect variable assignment (export LOGICALNAME=subdir/filename) will cause a program to write the file into the working-directory rather than the intended subdir.
   
   
10. We suggest your clean out your tmp/* dir frequently (at least daily) so you can easily see your current tmp/files vs yesterdays.
    
    
11. These concepts protect your files, even the infamous 'rm *' will do no harm - because you stay in the working directory which has no files.
    
    

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

1C1. UVdemos2 - Vancouver Utilities for Unix/Linux users

setup user account to run demos

Here are instructions to setup a user account to run the demos. You could run the demos in the Vancouver Utilities admin account /home/uvadm/... But it is better to setup a user account & copy the demo files into your directories.

 #1. login as 'root'

 #2a. useradd -m -g apps -s /bin/bash userxx
      ======================================
      - use option '-s' to specify login shell as 'bash'
        OR use #2b. below for 'ksh'

 #2b. useradd -m -g apps -s /bin/ksh userxx
      =====================================
      - use option '-s' to specify login shell as 'ksh' (Korn shell)

 #3. passwd userxx           <-- setup password desired
     ==============

 #4. chmod 755 /home/userxx  <-- allow copying between your user accounts
     ======================    - optional

 #5. cp $UV/env/bash_profile_uv /home/userxx/.bash_profile
     =====================================================
     - copy supplied profile to homedir renaming to '.bash_profile'
     - calls the common profile from $APPSADM/env/common_profile_uv
     - see profiles listed above on pages '1B2' & '1B3'

 #6. exit    - exit from root
     ====

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

1C2. UVdemos2 - Vancouver Utilities for Unix/Linux users

update 'RUNDATA/RUNLIBS' for UVdemos vs JCL conversions

RUNLIBS & RUNDATA are environmental variables defined in the .bash_profile that must be changed to switch from JCL Conversions to the UVdemos (or vice-versa). The usual default is for the Demos but we may have changed when we know the recipients are more interested in the JCL conversions than in the UVdemos.

If you need to switch, you can edit .bash_profile to activate the desired "export" & #comment the other "export" - about line 25 & line 40. Here are the relevant lines.

 #1. vi .bash_profile    <-- edit the .bash_profile
     ================      - showing lines 26 - 41 (line#s inserted)

 024 # 1. Mainframe JCL/COBOL/DATA Migrations - libs/data in homedir for testing/training
 025 #    export RUNLIBS=$HOME/testlibs1 RUNDATA=$HOME/testdata1 CNVDATA=$HOME/cnvdata1
 026 #    =============================================================================
 027 #
 028 # 2. Mainframe JCL/COBOL/DATA Migrations - conversion/production, separate file systems
 029 #    export RUNLIBS=/p1/apps/ABClibs1 RUNDATA=/p2/apps/ABCdata1 CNVDATA=/p3/apps/ABCcnvdata1
 030 #    ======================================================================================
 031 #    - better to use larger file systems for production (p1,p2,p3/apps/ABC... vs $HOME)
 032 #    - appended digit '1' for future possible alternates ...libs2/...data2/...cnvdata2,etc
 033 #    - could have multi-companies/systems on same machine, example for ABC company
 034 #    - RUNDATA could be defined differently for different programmers for testing
 035 #    - see uvsoftware.ca/jclcnv1demo.htm#1B3 RUNLIBS/RUNDATA defines for migrations
 036 #
 037 # 3. Vancouver Utilities Demos/Tutorials - libs/data in $HOME/demo (use #1 for JCL conversions)
 038 export RUNLIBS=$HOME/demo RUNDATA=$HOME/demo CNVDATA=$HOME/demo
 039 #===============================================================
 040 #    - may define RUNLIBS/RUNDATA/CNVDATA the same for small projects (not major migrations)
 041 #    - see uvsoftware.ca/uvdemos.htm#1B5 more about RUNLIBS/RUNDATA stub/common profiles

 If Line# 25 is uncommented (for JCL Conversions) & Line# 38 is #commented out
 - you need to REVERSE for UVemos, COMMENT out line# 25 & UNCOMMENT line# 38 as follows:

 025 #    export RUNLIBS=$HOME/testlibs1 RUNDATA=$HOME/testdata1 CNVDATA=$HOME/cnvdata1
 026 #    =============================================================================

 038 export RUNLIBS=$HOME/demo RUNDATA=$HOME/demo CNVDATA=$HOME/demo
 039 #===============================================================

Listings of .bash_profile & common_profile

• bash_profile listed at uvdemos2.htm#1B2 or install.htm#A6
• common_profile listed at uvdemos2.htm#1B3 or install.htm#A7

OR see your actual profiles using the editor as follows:

 #2a. vi $HOME/.bash_profile  - copied/renamed from $APPSADM/env/bash_profile_uv
      ======================               - calls 1 of following common_profiles
 #2b. vi $APPSADM/env/common_profile_uv    - download/install on user machines
 #2c. vi $APPSADM/env/common_profile_web1  - logins to UV Software uvadm in $HOME
 #2d. vi $APPSADM/env/common_profile_web2  - logins to UV Software uvadm elsewhere

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

1C3. UVdemos - Vancouver Utilities for Unix/Linux users

Alternative - setup demo/ dir in existing home dir

Alternatively (to setting up new user to run demos), you could use your existing login account - Make sub-directory $HOME/demo & copy $UV/demo/* to your $HOME/demo/...

 #1. login your_existing_userid --> your homedir
     ==========================

 #2. mkdir demo                <-- make demo/ dir in your homedir
     ==========                  - /home/userxx/demo

copy demo files to your $HOME/demo

• common to either setting up new user or subdir in existing login account

 #3. cp -r $UV/demo/* demo  <-- copy $UV/demo/* files to your demo/...
     =====================

 #4. tree2 demo    <-- investigate demo directories/files using tree2 script
     ==========      - calls the 'tree' utility to draw diagrams
                       illustrating the directory/files structure

See the 'tree' diagram on the next page showing relevant files for demos.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

1C4. UVdemos2 - Vancouver Utilities for Unix/Linux users

demo directories/files illustrated by 'tree2'

 demo
 |-- 1README
 |-- archive
 |-- backup
 |   |-- dat0,dat1,dat2, see files below
 |   `
 |-- bin                         <-- compiled/executable C programs
 |   |-- helloworld*               -
 |   |-- insult2*
 |   |-- lotto1*
 |   ~-- test64a*
 |   |
 |-- dat0                        <-- demo files captured from internet
 |   |-- CanadaMPs.csv             - before reformatting in dat1/...
 |   |-- custmas0
 |   |-- UScities.tab
 |   |-- UScongress.csv
 |   |-- USstates.csv
 |   |-- vendormas0
 |-- dat1                        <-- demo files set1
 |   |-- CanadaMPs                 - Canadian MPs
 |   |-- CanadaProvinces
 |   |-- nameadrs1
 |   |-- UScandidates            <-- US Democratic 2020 candidates
 |   |-- UScandidateups
 |   |-- UScities
 |   |-- UScongress              <-- US congress house members
 |   |-- USstates1
 |   |-- USstates2
 |-- dat2                        <-- demo files set2
 |   |-- accents1                  - various files for various demos
 |   |-- ar.custmas
 |   |-- ar.custmas.tellist
 |   |-- ar.sales.items
 |   |-- ar.sales.products
 |   |-- custmas1
 |   |-- custmas2
 |   |-- IPreplace.tbl
 |   |-- nameadrs2
 |   |-- namesadrs0e
 |   |-- namesadrs1f
 |   |-- namesadrs2t
 |   |-- py.payroll.master
 |   |-- sales2
 |   |-- sales3
 |   |-- sales3.cpy
 |   |-- sales4
 |   |-- tabtest1
 |   |-- trt256
 |   |-- vendormas2
 |   |-- vendormas3

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

 |-- election1                  <-- election1 for quick test project
 |   |-- candidates               - with no plan for future sustainability
 |   |-- candidateups
 |   |-- sf                     <-- see 'Part_9' demo files
 |   |   |-- loadcandidates       - based on US elections 2020
 |   |   |-- sortcandidates
 |   |   |-- sortloadcandidates
 |   |   |-- unloadcandidates
 |   |-- tmp
 |   |
 |-- election2                   <-- election2 well planned test/develop project for
 |   |-- data1                     - ongoing flexibility & plans for other projects
 |   |   |-- candidates          <-- demo files based on US 2020 elections
 |   |   |-- candidates.dat
 |   |   |-- candidates.idx
 |   |   |-- candidatesun
 |   |   |-- candidateups
 |   |   |-- candidateups.fixed
 |   |   `
 |   |-- pf                      <-- uvcopy jobs (Parameter Files)
 |   |   |-- fixcandidateups
 |   |-- sf                      <-- Script Files for Korn/Bash shells
 |   |   |-- loadcandidates
 |   |   |-- sortcandidates
 |   |   |-- sortloadcandidates
 |   |   |-- unloadcandidates
 |   |-- slogs                   <--logs captured by 'slog' script
 |   |   |-- ...                    executing target scripts
 |   |   `
 |-- src/                 <---- C source programs
 |   |-- helloworld.c       <-- traditional C learner's 1st C program
 |   |-- insult1.c          <-- generate Shakespearean insults
 |   |-- insult2.c            - same, using a data file that you can update
 |   |-- lotto1.c           <-- random number generator
 |   |-- test64a.c          <-- test 64 bit limits, multiply 1 by 16, repeat to limit
 |   |-- test64b.c            - same as test64a & accepts initial value & multiplier
 |   `-- test64c.c            - solicits 1 value & shows short,int,long conversions
 |   |-- tmp

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

 |-- errs
 |   |-- jclunix51.err
 |   |-- jclunix51.ERR
 |   |-- parmNF.rpt
 |-- ftps                        <-- ftp scripts
 |   |-- ftpdemo1a
 |   |-- ftpdemo1b
 |   |-- ftpget1
 |   |-- ftpput1
 |-- jcl2                        <-- mainframe JCLs before conversion
 |   |-- jar100.jcl
 |   |-- jar200.jcl
 |   |-- jgl100.jcl
 |   |-- jgl200.jcl
 |   |-- jgl230.jcl
 |   |-- jgl232.jcl
 |   |-- jgl320.jcl
 |-- jcl3                        <-- scripts converted from mainframe JCLs
 |   |-- jar100.ksh
 |   |-- jar200.ksh
 |   |-- jgl100.ksh
 |   |-- jgl200.ksh
 |   |-- jgl230.ksh
 |   |-- jgl232.ksh
 |   |-- jgl320.ksh
 |-- jcl3.old                    <-- used for 'alldiff2' script to diff
 |   |-- jar100.ksh                  all files in 2 directories
 |   |-- jar200.ksh                - confirm changes as desired & no unwanted
 |   |-- jgl100.ksh
 |   |-- jgl200.ksh
 |   |-- jgl230.ksh
 |   |-- jgl232.ksh
 |   |-- jgl320.ksh

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

 |-- pf                          <-- uvcopy jobs (Parameter Files)
 |   |-- CanadaMPsfix              - convert .csv file to fixed field text
 |   |-- CanadaMPsfixUTF8          - etc
 |   |-- removeCR_uvcopy
 |   |-- UScitiesfix
 |   |-- UScongressfix
 |   |-- USstatesfix1
 |   |-- USstatesfix2
 |   |
 |-- rptcmp                      <-- comparison reports for packed/binary files
 |   |-- ...                         (cannot use diff)
 |-- rpts                        <-- misc reports
 |   |-- ...
 |-- selects                     <-- outputs from various record select utilities
 |   |-- ...
 |-- sf                          <-- Script Files for Korn/Bash shells
 |   |-- copyjcl3
 |   |-- fixaccents2
 |   |-- fixaccents2x
 |   |-- llsx
 |   |-- llsx.bak
 |   |-- llsy
 |   |-- select_CanadaMPs
 |   |-- select_nameadrs1
 |   |-- select_UScongress
 |   |-- table2_CanadaMPs
 |   |-- table2_UScongress
 |-- sql0                        <-- mainframe SQL scripts before conversion to Linux
 |   |-- 'SELECT.CUSTOMERS.ALL'
 |   |-- 'SELECT.CUSTOMERS.BASIC'
 |   |-- 'SELECT.CUSTOMERS.SALES10000'
 |   |-- 'SELECT.CUSTOMERS.SALES20000'
 |   |-- 'SELECT.EMPLOYEE.DEPT123'
 |   |-- 'SELECT.EMPLOYEE.SEATTLE'
 |   |-- 'SELECT.ORDERS.BIG'
 |   |-- 'SELECT.PATIENTS.OVER70'
 |   |-- 'SELECT.PATIENTS.OVER80'
 |   |-- 'SELECT.PATIENTS.OVER90'
 |   |-- 'SELECT.STUDENTS.FAILING'
 |-- sqls                        <-- SQL scripts after conversion to Linux
 |   |-- select_customers_all.sql
 |   |-- select_customers_basic.sql
 |   |-- select_customers_sales10000.sql
 |   |-- select_customers_sales20000.sql
 |   |-- select_employee_dept123.sql
 |   |-- select_employee_seattle.sql
 |   |-- select_orders_big.sql
 |   |-- select_patients_over70.sql
 |   |-- select_patients_over80.sql
 |   |-- select_patients_over90.sql
 |   |-- select_students_failing.sql
 |-- stats
 |-- tmp
 |-- tmp1
 |-- tmp2

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

1D1. Demo files for Tutorials

dat1/nameadrs1 - test/demo file for SelectJobs

 Owen Townsend       4667 Hoskins Rd     North Vancouver, BC Canada V7K2R3
 Jenny Townsend      21 Canada Place     Vancouver, BC       Canada V5P3V8
 John Horgan         123 Townsend Ave.   Townsend City, BC   Canada V1P2G3
 John Townsend       2121 Owen Drive.    St. John, NB        Canada M5W1E6
 John Owens          24 Owen Avenue      Owenville, ON       Canada M5K3B3
 Donald Trump        1600 Pennsylvania   Washingtom, DC      USA 00001
 Bill Gates          1 Microsoft Way     Seattle, WA         USA 98052-6399
 Peter Townsend      24 Johnson Road     London, England     UK EC1A 1HQ

dat1/CanadaMPs - 334 members - samples of all parties

 010  Anderson           David           Cypress Hills/Grasslands      SK Conservative     2015
 011  Angus              Charlie         Timmins/James Bay             ON NDP              2015
 023  Barsalou-Duval     Xavier          Pierre-Boucher/Les Patriotes/ QC Bloc Quebecois   2015
 032  Bernier            Maxime          Beauce                        QC People's Party   2015
 202  May                Elizabeth       Saanich/Gulf Islands          BC Green Party      2015
 328  Wilson-Raybould    Jody            Vancouver Granville           BC Independent      2015

dat1/CanadaProvinces

      01  AB  Alberta
      02  BC  British Columbia
      03  MB  Manitoba
      04  NB  New Brunswick
      05  NL  Newfoundland and Labrador
      06  NT  Northwest Territories
      07  NS  Nova Scotia
      08  NU  Nunavut
      09  ON  Ontario
      10  PE  Prince Edward Island
      11  QC  Quebec
      12  SK  Saskatchewan
      13  YT  Yukon

dat1/UScongress - 1st & last 3 of 539 members

 001  Abraham             Ralph          19540916  M  LA  rep  Republican
 002  Adams               Alma           19460527  F  NC  rep  Democrat
              ---------- omitting 535 lines ----------
 538  Young               Todd           19720824  M  IN  sen  Republican
 539  Zeldin              Lee            19800130  M  NY  rep  Republican

dat1/USstates2 - 1st 3 & last 3 of 50 states

      abr,state,capital,population,
      AL,Alabama,Montgomery,205764,
      AK,Alaska,Juneau,31275,
        -------- omitting 46 records --------
      abr                 state               capital             population
      AL                  Alabama             Montgomery          205764
      AK                  Alaska              Juneau              31275

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

1D2. Demo files for Tutorials

dat2/sales2 - sales file with zone signs

          1         2         3         4         5         6
 1234567890123456789012345678901234567890123456789012345678901234
 CUST#    SLM  DATE   INV#     PROD#     QTY   PRICE    AMOUNT

 130140    21 990802 IN111001  HAM001  000020 0000101 000002020
 130140    21 000802 IN111001  SCR012  000021 0001001 000021021
 130140    21 010802 IN111001  CHR001  000022 0010001 000220022
 139923    35 980802 IN111002  TAB013  000023 0000201 000004623
 139923    35 990807 IN111002  VAR200  000024 0002001 000048024
 150825    44 010804 IN1122    HAM001  000025 0020001 000500025
 150825    44 020804 IN1122    HAX129  000026 0000301 000007826
 201120    44 030807 CR5234    BBQ001  000027 0003001 000081027
 223240    65 010816 CR955     HAM001  000028 0030001 000840028
 223240    65 020816 IN441     BBQ001  000029 0000101 000002929
 308685    21 020812 IN6605    SAW051  00001p 0000101 00000101p
 308685    21 030812 IN6605    BIT075  00001q 0001001 00001101q
 308685    21 040812 CR8835    TAB013  00001r 0010001 00012001r
 315512    44 040805 IN2251    HAM001  00001s 0000201 00000261s
 315512    44 050805 IN2251    SAW051  00001t 0002001 00002801t
 315512    44 060805 IN2255    BIT075  00001u 0020001 00030001u
 400002    85 990812 CR245     HAX129  00001v 0000101 00000161v
 406082    35 010815 IN33001   BBQ001  00001w 0001001 00001701w
 406082    35 020815 IN33001   TAB013  00001x 0010001 00018001x
 406082    65 030816 IN441     VAR200  00001y 0000101 00000191y

dat2/sales3 - sales file with separate signs

          1         2         3         4         5         6
 1234567890123456789012345678901234567890123456789012345678901234
 CUST#    SLM  DATE   INV#     PROD#     QTY   PRICE    AMOUNT

 130140    21 940802 IN111001  HAM001  00020+ 0000001 00000020+
 130140    21 940803 IN111001  SCR012  00021+ 0001001 00021021+
 130140    21 940804 IN111001  CHR001  00022+ 0002001 00044022+
 139923    35 950802 IN111002  TAB013  00023+ 0003001 00069023+
 139923    35 950807 IN111002  TAB013  00024+ 0004001 00096024+
 150825    44 960804 IN1122    HAM001  00025+ 0005001 00125025+
 150825    44 960805 IN1122    HAX129  00026+ 0006001 00156026+
 201120    44 970807 CR5234    BBQ001  00027+ 0007001 00189027+
 223240    65 980816 CR955     HAM001  00028+ 0008001 00224028+
 223240    65 980817 IN441     BBQ001  00029+ 0009001 00261029+
 308685    21 990812 IN6605    SAW051  00010- 0000001 00000010-
 308685    21 990813 IN6605    BIT075  00011- 0001001 00011011-
 308685    21 990814 CR8835    TAB013  00012- 0002001 00024012-
 315512    44 000805 IN2251    HAM001  00013- 0003001 00039013-
 315512    44 000806 IN2251    SAW051  00014- 0004001 00056014-
 315512    44 000807 IN2255    BIT075  00015- 0005001 00075015-
 400002    85 010812 CR245     HAX129  00016- 0006001 00096016-
 406082    35 020815 IN33001   BBQ001  00017- 0007001 00119017-
 406082    35 020816 IN33001   TAB013  00018- 0008001 00144018-
 406082    65 020816 IN441     HAM001  00019- 0009001 00171019-

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

1D3. Demo files for Tutorials

 cat ftps/*      <-- show FTP demo input files
 ===========

      # ftps/ftpdemo1a
      open 192.168.0.4
      user user01 user01pw
      lcd data1
      get /home/userxx/ar/sales.items
      get /home/userxx/gl/account.tran1
      quit

      # ftps/ftpdemo1b
      open 192.168.0.5
      user user02 user02pw
      lcd data1
      put ar.sales.items   C:\AR\SALES.ITEMS
      put gl.account.tran1 D:\GL\ACCOUNT.TRAN1
      quit

      # ftps/ftpget1
      open 192.168.0.6
      user user03 user03pw
      lcd data1
      binary
      cd  /home/userxx/gl
      get gl.acnt.master
      get gl.acnt.trans
      quit

      # ftps/ftpput1
      open 192.168.0.6
      user user03 user03pw
      binary
      lcd data1
      cd /home/userxx/data1
      put gl.acnt.master
      put gl.acnt.trans
      quit

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

1D4. Demo files for Tutorials

demo input files - SQL scripts

 cat sqls/*      <-- show SQL demo input files
 ==========

      /* customers_all */
         SELECT * FROM Customers;

      /* customers_basic */
         SELECT Name, Phone, Address, City, Zip
                FROM Customers;

      /* customers_sales10000 */
         SELECT custno, Name, Phone, Address, City, Zip,
         TYsales, LYsales, FROM
         Customers WHERE LYsales >10000;

      /* customers_sales20000 */
         SELECT custno, Name, Phone, Address, City, Zip,
         TYsales, LYsales, FROM
         Customers
         WHERE LYsales >20000;

      /* employee_dept123 */
         SELECT EMP_ID, NAME, ADDRESS, CITY, ZIP, DEPT FROM
         EMPLOYEE WHERE DEPT = '123' AND STATUS = 'FULL';

      /* employee_seattle */
         SELECT EMP_ID, LAST_NAME FROM EMPLOYEE
         WHERE CITY = 'Seattle' ORDER BY EMP_ID;

      /* orders_big */
         SELECT item FROM Orders
         WHERE quantity > 500;

      /* patients_over70 */
         SELECT Name, Age FROM Patients WHERE Age > 70
         GROUP BY Age ORDER BY Name;

      /* patients_over80 */
         SELECT Name, Age FROM Patients WHERE Age > 80
         GROUP BY Age ORDER BY Name;

      /* patients_over90 */
         SELECT Name, Age FROM Patients
         WHERE Age > 90 GROUP BY Age ORDER BY Name;

      /* students_failing */
         CREATE VIEW Failing_Students AS
         SELECT S_NAME, Student_ID FROM
         STUDENT WHERE GPA < 30;

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

1D5. Demo files for Tutorials

demo input files - sf

 cat sf/llsx     <-- show BAD script for uvhd demo
 ===========

      #!/bin/bash
      # llsx - List files in directory, in Size order, Biggest 1st
      echo "llsx - list directory sorted by file-size (biggest files 1st)"
      if  [[ -z "$1" ]] ; then dir="."; else dir=$1; fi
      ls -lS $dir | more
      #=================
      exit 0
      #Note - 'llsx' is a BAD script, But 'vi' will not show the problem !

 cat sf/llsy     <-- show GOOD script for uvhd demo
 ==========

      #!/bin/bash
      # llsy - List files in directory, in Size order, Biggest 1st
      echo "llsy - list directory sorted by file-size (biggest files 1st)"
      if  [[ -z "$1" ]] ; then dir="."; else dir=$1; fi
      ls -lS $dir | more
      #=================
      exit 0
      #Note - 'llsy' is the GOOD script vs 'llsx' the BAD script

demo input files - pf

 # removeCR_uvcopy - copy a file removing any CR's
 #                 - by Owen Townsend, UV Software, Feb 21/2019
 # - documented at uvsoftware.ca/uvdemos2.htm
 # - demo Vancouver Utilities usefulness to any unix/linux user
 #
 # uvcopy removeCR_uvcopy    <-- execution command
 # ======================
 opr='$jobname - copy a file removing any Carriage Returns'
 fili1=?sf/llsx,rcs=256,typ=LST        #<-- declare input file
 filo1=?tmp/llsx,rcs=256,typ=LSTtp775  #<-- declare output file
 @run
         opn     all                    open files
 # begin loop to read/process/write records until EOF
 man20   get     fili1,a0               get next record into area 'a'
         skp>    man90                  (cc set > at EOF)
         mvc     b0(256),a0             copy input area 'a' to output area 'b'
         rep     b0(256),x'0D',''       remove CRs
         put     filo1,b0               write record to output file
         skp     man20                  return to get next record
 # EOF - close files & end job
 man90   cls     all
         eoj

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

1D6. Demo files for Tutorials

demo input files - JCL

 cat jcl2/jar200.jcl   <-- sample JCL
 ===================

 //JAR200   JOB  (1234),'TEST/DEMO MVS JCL CONVERT'
 //* SORT AR.SALES.ITEMS BY PRODUCT CODE FOR LISTING
 //STEP010  EXEC PGM=SORT,REGION=2048K
 //SORTIN   DD DSN=AR.SALES.ITEMS,DISP=SHR
 //SORTOUT  DD DSN=&&jar200_TEMPSLS,DISP=(NEW,PASS),
 //            DCB=(LRECL=64,BLKSIZE=6400,RECFM=FB),
 //            SPACE=(TRK,(50,50),RLSE),UNIT=DISK
 //SYSIN    DD *
 SORT FIELDS=(31,6,CH,A,1,6,CH,A)
 OMIT COND=((11,2,CH,EQ,C'65'),OR,(COND=(11,2,CH,EQ,C'85'))
 /*
 //* LIST AR.SALES.ITEMS IN PRODUCT CODE SEQUENCE
 //STEP020  EXEC PGM=CAR200,COND=(4,LT,STEP010),PARM=2006
 //SALEDTL  DD DSN=&&jar200_TEMPSLS,DISP=(OLD,PASS)
 //CUTMAS  DD DSN=AR.CUSTOMER.MASTER.INDEXED,DISP=SHR
 //SALELST  DD DSN=AR.SALES.LIST,DISP=(,CATLG,DELETE),
 //            UNIT=DISK,SPACE=(TRK,(25,25),RLSE),
 //            DCB=(MODEL.DSCB,LRECL=133,BLKSIZE=6118,RECFM=FBA)

 cat jcl2/jar200.jcl   <-- sample JCL for SelectJobs
 ===================     - find SORTs with Both AND & OR CONDitions

 //JGL232   JOB  'alt version of jgl230 to test selectlgfd1 AND 7 OR in same sort'
 //* SORT TRANS, UPDATE GLMASTER,& list GLMASTER
 //* SORT GL TRANSACTIONS BEFORE UPDATING ACCOUNT MASTER
 //*May21/2018 - correct INCLUDE column 55 to 56 to match data
 //STEP010  EXEC PGM=SORT
 //SORTIN   DD DSN=GL.ACCOUNT.TRAN1,DISP=OLD
 //SORTOUT  DD DSN=GL.ACCOUNT.TRANS(+1),DISP=(,CATLG,DELETE),
 //            DCB=(LRECL=80,BLKSIZE=8000,RECFM=FB),
 //            SPACE=(TRK,(50,50),RLSE),UNIT=DISK
 //SYSIN    DD *
 SORT FIELDS=(1,8,CH,A,69,12,CH,A)
 INCLUDE COND=(((9,1,CH,EQ,C'T'),OR,(COND=(9,1,CH,EQ,C'X'))),
                                 AND,(COND=(56,2,CH,EQ,C'AB')))
 /* (only 1st step of jgl232)

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

1E1. UVdemos2 - Vancouver Utilities for Unix/Linux users

Hard-copy guide to work thru tutorials

We suggest you print this documentation to guide you as you work your way thru the tutorials. This will leave your screen free to enter the commands & compare your results to the expected results shown in the hard-copy. Also useful to highlight the commands you intend to enter & make notes in the margins.

If you have a laser printer that is Duplex capable, you can use the 'uvlp13D' script to print Duplex at 13 cpi, which allows 95 characters across on 8 1/2 paper with margins to allow for 3 hole punched paper for mounting in a 3 ring binder.

 #1. login userxx --> /home/userxx (or login uvadm if you have password)

 #2. cd $UV --> /home/uvadm

 #3. export UVLPDEST=-dlaserxx  <-- set destination to a printer near you
     =========================

 #4. uvlp13D doc/UVdemos2.doc    <-- print documentation at 13 cpi Duplex (180 pages)
     =======================

Note that we have provided Parts 3,4,5 as separate documents, since we think these may be the sections that many sites will find most useful & that can be used immediately without a lot of study.

 uvlp13D doc/SelectJobs.doc  <-- Part3 SelectJobs (28 pages)
 ==========================

 uvlp13D doc/TableJobs.doc   <-- Part3 SelectJobs (32 pages)
 =========================

 uvlp13D doc/UVscripts.doc   <-- Part3 SelectJobs (33 pages)
 =========================

If interested, see uvsoftware.ca/uvlist.htm for many more scripts to print text files on laser printers at various cpi,lpi,simplex,duplex,margins. For example, mainframe conversions use 'uvlp13LD' to print 132 columns wide by 66 lines deep Landscape & Duplex on 8 1/2 paper.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

Part_2. UVdemos Vancouver Utility Programming Aids

Part 2 - Basic Vancouver Utilities

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

Part 2 - Basic Utilities Contents Continued

suggest - could do demos in Parts 3,4,5 before Part 2

If you are new to these utilities, you might want to initially skim Part 2 and first do the demos in Parts 3,4,5 - because the tutorials in Parts 3,4,5 demonstrate scripts that any unix/linux user will find very useful immediately. (Selecting Files, Creating Table Summaries, Counting Files,Lines,KB in directories).

Suggest you start with Part_5 since that extends the Unix knwoledge you already have re listing & counting files & directories.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

2A1. Basic Vancouver Utilities - Brief Descriptions

These brief descriptions of uvhd,uvcp,uvsort,& uvlist, will be followed by examples/tutorials illustrating how they might help you solve data problems.

uvhd

'uvhd' - file investigation utility that displays any file in vertical hexadecimal, and prompts for commands to browse,search,replace,update,select,print,count,etc. uvhd allows you to see characters not shown by text editors (control characters & high-bit characters that can cause problems in text files). uvhd is interactive with 25 help screens, and is the favorite utility of all my customers. See uvhd documentation at https://www.uvsoftware.ca/uvhd.htm.

uvcp

'uvcp' - command line data utility that can copy files, converting record formats between: fixed, variable, sequential, indexed, text, RDW, etc). uvcp provides record select, reformat, translate, etc. uvcp (& uvsort,uvcopy,etc) are compatible with Micro Focus COBOL & AIX COBOL fixed & variable length sequential, Indexed,& Relative file formats. See uvcp documentation at https://uvsoftware.ca/uvcp.htm.

uvsort

 'uvsort' - sort utility for Unix/Linux with mainframe capabilities. The Unix
 system sort can not sort mainframe type files that do not have Linefeeds & may
 have packed decimal sort fields. uvsort has the functionality of mainframe SORT
 - INCLUDE,OMIT,INREC,BUILD,OVERLAY,REFORMAT,FINDREP,SUM,OUTFIL,FNAMES,OUTREC.
 Up to 30 named input files or unlimited via all files in a directory
 Max 60 named output files (with different record selections & reformats)
 or unlimited output files by control break on sort key fields.
 See full doc at uvsoftware.ca/uvsort.htm.

uvlist

'uvlist' - utility for listing text files on laser printers. uvlist scripts are provided to print files at various cpi,lpi,margins,etc. For example, 'uvlp13LD' will print mainframe reports (132 cols x 66 lines) on 8 1/2 by 11 at 13 cpi, 8 lpi, Landscape, Duplex with margins for 3 hole paper. uvlist is great for listing scripts, programs, etc, because the page headings tell you vital info such as: filename, date, userid, filesize, page#, etc. See uvlist documentation at uvsoftware.ca/uvlist.htm.

6. uvcopy

'uvcopy' - the most powerful Vancouver Utility. It is a 'general purpose' (can do anything) data manipulation utility. It gives you the power of assembler without the complexity. It interprets the instruction files for pre-programmed jobs such as SelectJobs & TableJObs. You do not need to know the uvcopy instruction language to run the pre-programmed jobs. But if you want to use it for your own customized applications, you can see the over 100 instructions at uvcopy3.htm. And be sure to see scripts uvfix1 & uvfixA in Part_7, the easy way to use the power of uvcopy instructions without writing uvcopy jobs. See uvcopy documentation at uvsoftware.ca/uvcopy3.htm.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

2B1. Basic Vancouver Utilities

uvhd - file investigation utility

uvhd is a file investigation utility that displays any file in vertical hexadecimal, and prompts for commands to browse,search,replace,update,select,print,count,etc. uvhd allows you to see characters not shown by text editors (control characters & high-bit characters that can cause problems in text files). uvhd is interactive with 25 help screens, and is the favorite utility of all my customers. See uvhd documentation at uvsoftware.ca/uvhd.htm.

uvhd demo#1 - find/fix problem CR's in scripts

CR's (Carriage Returns) can cause scripts to fail - a baffling problem, because you can not see anything wrong with the usual unix tools (vi,cat,more,etc). We will demo the problem using the 'llsx' script provided in /home/uvadm/demo/sf/llsx. We assume you have already copied the demo files to your homedir /home/userxx/demo/... as directed on page '1C3'.

 #0a. login userxx --> /home/userxx
 #0b. cd demo      --> /home/userxx/demo

 #0c. cp backup/sf/llsx sf  <-- ensure the bad version of llsx is in demo/sf/...
      ====================      (might have already been fixed by a prior demo)

 #1. sf/llsx sf   <-- execute the demo script (to list files in sf/...)
     ==========     - get following error:

     "bash: sf/llsx: /bin/bash^M: bad interpreter: No such file"
     ===========================================================
      - 1st instinct is to investigate script with 'vi' as follows:

 #2. vi sf/llsx   <-- investigate with 'vi' to see what's wrong
     ==========     - or could use 'cat' or 'more'

      #!/bin/bash
      # llsx - List files in directory, in Size order, Biggest 1st
      ls -lS "$1" | more

      We can not see anything wrong using unix tools, so let's try uvhd.

 #3. uvhd sf/llsx t   <-- using option 't' (for Text files)
     ==============
      rec#=1 rsize=13 fptr=0 fsize=244 records=7
                      10
      r#   1 0123456789012
           0 #!/bin/bash..
             2226662667600
             31F29EF2138DA

You can see the x'0D' (in horizontal hex vs the 'vertical hex' of uvhd) This is the equivalent of the '^M' shown in the error message above. We could now fix the problem using uvhd as shown on the next page.

 #3a. --> q       <-- reply 'q' to quit
          ===       - need to rerun with option 'u' for update

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

2B2. uvhd demo#1 - find/fix problem CR's in scripts

Fix problem - Remove Carriage Returns from scripts

 #4. uvhd sf/llsx tu  <-- run with option 't' & 'u' to allow Update
     ===============
      r#    1 0123456789012
            0 #!/bin/bash..
              2226662667600
              31F29EF2138DA

 #4a. --> v99 x'0D',x'20'  <-- search/replace x'0D' with x'20' (space)
          ===============
          v99 x'0D',' '    <-- could code space as ' ' vs x'20'

 #4b. --> 1  <-- enter 1 to return to 1st record in file (to compare)
          ===
      r#    1 012345678901
            0 #!/bin/bash.
              2226662667620  <-- Note CR x'0D' replaced with x'20' (space)
              31F29EF21380A

 #4c. --> q       <-- reply 'q' to quit
          ===

 #5. sf/llsx sf   <-- retry llsx (after removing CR's x'0D's)
     ==========

# llsx - list directory sorted by file-size (biggest files 1st) -rwxrwxr-x 1 uvadm apps 566 Aug 21 14:31 fixaccents2 -rwxrwxr-x 1 uvadm apps 489 Aug 21 14:31 copyjcl3 -rwxrwxr-x 1 uvadm apps 296 Aug 21 14:31 llsy -rwxrwxr-x 1 uvadm apps 244 Aug 21 14:31 llsx

Notes re Updating with uvhd

1. Must enter option 'u' on the command line if intent to update
   
   
2. 'v' is command to search/replace, 99 of 'v99' is the number of records to process, but '99' has special meaning to process the entire file, resets file pointer to 1st record & processes all records until EOF.
   
   
3. You could remove the CR by replacing with null as follows:
   
   

 #4a. --> v99 x'0D',''   <-- search/replace x'0D' with null ''
          ============

4. Replacing with null works in this case, but should normally be avoided, because uvhd updates "in place", so rewritten records will be shifted left, inserting a blank at the end of the record, following the LineFeed x'0A', so we will get a blank ' ' at the begining of all records after the update - not a problem for scripts, because scripts bypass blanks, But could be a problem for data files.
   
   

 #5. This is the short version of the in-depth version on pages '20B1' - 20B11, which
     gives full explanations & multiple ways to correct the problems for 1 script or
     all scripts in a directory.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

2C1. uvhd demo#2 - finding High-Bit characters in text files

high-bit characters may cause problems for old applications

Files with high-bit characters may cause problems for older applications. For Example - files with UTF-8 characters input to legacy applications, not designed to handle them. This demo will show you how to identify them with uvhd & convert them to unaccented characters with uvhd or uvcp.

Brief Intro here, More demos later

The original documentation of High-Bit Accented character conversions was moved to '20C1' in Part 20, because it was too long & complex for presentation early in the UVdemos documentation. Here is a quick demo of using 'uvhd' to see the hex coding of some French accents, see all French accents later in Part_20.

dat2/accents3 - UTF-8 accents, short test file

 #0a. login userxx --> /home/userxx
      ============
 #0b. cd demo      --> /home/userxx/demo
      =======      OR use alias 'cdm' to save keystrokes as below:
 #0c. cdm --> /home/uvsoftxx/demo (alias cdm='cd $HOME/demo)
      ===

 #1. cat dat2/accents3      <-- display short test file with French accents
     =================

      déjà vu Thérèse

 #2. uvhd dat2/accents3 t   <-- use uvhd to see hex chars of French accents
     ====================

 rec#=1 rsize=20 fptr=0 fsize=20 records=1
                      10        2
 r#        1 01234567890123456789
           0 d..j.. vu Th..r..se.
             6CA6CA277256CA7CA760
             439A300650483923835A

uvhd shows the French accents are coded in 2 bytes (UTF-8 coding). Here are hte hex codes using horizontal hex vs uvhd vertical hex:

      accent grave a ---> à ---> x'C3A0' (vs unaccented a x'61')
      accent acute e ---> é ---> x'C3A9' (vs unaccented e x'65')
      accent grave e ---> è ---> x'C3A8' (vs unaccented e x'65')

If you have a printed copy of this documentation, you will probably see that the UTF-8 accented chars print differently than the screen display, probably because the printer is not setup for UTF-8 characters.

See the full documentation converting French Accents to unaccented equivalents later in Part_20.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

2D1. Basic Vancouver Utilities

uvhd demo#3 - investigating unknown files

'uvhd' should be the 1st tool you think of when you receive a file of unknown format. This example assumes that your organization has both mainframes & unix/linux. Someone sends you a mainframe file in EBCDIC & you attempt to investigate with vi. We have provided such a file in demo/dat2/namesadrs0e. Try the following:

 #0a. login userxx --> /home/userxx
 #0b. cd demo      --> /home/usrxx/demo

 #1. vi dat2/namesadrs0e
     ===================

 ðððñðð@@@@Ö¦…•@㖦•¢…------ etc, 'vi' display all garbage ----->

Now let's try uvhd. 'uvhd' expects you to specify file-type options following the filename. But we do not yet know the file-type & the default is to assume ASCII with record-size 256.

 #2. uvhd dat2/namesadrs0e
     =====================

                  10        20        30        40        50        60
 r#    1 0123456789012345678901234567890123456789012345678901234567890123
       0 ......@@@@....@........@@@@@@@....@.......@..@@@@@.....@........
         FFFFFF4444DA894E9A9A8984444444FFFF4C9A989A4D844444D99A84E8989AA8
         0001000000665503665255400000004667086229520940000056938051536455

uvhd displays in 'vertical hexadecimal' 3 line groups with characters on 1st line, hex zones on the 2nd line, & hex digits on the 3rd line. Here we are showing only the 1st 64 bytes (vs actual 256 bytes in 4 groups of 3 lines of 64 bytes each).

The display is still garbage, but we can see that it is an EBCDIC file. The 1st byte is x'F0' (here in horizontal-hex vs vertical-hex above) & x'F0' should be recognized by most professionals as an EBCDIC zero. And bytes 6-9 are x'40's which are EBCDIC blanks.

uvhd display record & line length defaults

 #2a. uvhd dat2/namesadrs0e r256l64  <-- same as #2 above
      =============================    - option 'r' Record length default 256
                                       - option 'l' Display length default 64

The default record length is 256 bytes if you do not specify option 'r###' or option 't' for text files (lines terminated by LineFeed x'0A'). The default display line length is 64 bytes if you do not specify option 'l###'

You can change the defaults by exporting UVHDROP in the profile, for example:

 export UVHDROP=r500l100  <-- change uvhd Run OPtions for record lth to 500
 =======================      & for display line lth to 100

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

2D2. uvhd demo - investigating unknown files

uvhd option 'a' translate EBCDIC to ASCII

The next step should be option 'a' which tells uvhd to translate the character line to ASCII (but uvhd will still display EBCDIC codes for zone & digit lines).

 #3. uvhd dat2/namesadrs0e a    <-- option 'a' translates EBCDIC to ASCII
     =======================

                  10        20        30        40        50        60
 r#    1 0123456789012345678901234567890123456789012345678901234567890123
       0 000100    Owen Townsend       4667 Hoskins Rd     North Vancouve
         FFFFFF4444DA894E9A9A8984444444FFFF4C9A989A4D844444D99A84E8989AA8
         0001000000665503665255400000004667086229520940000056938051536455

      64 r     BC V5P3V8 Canada    000200    John Horgan         1234 Gov
         944444CC4EFDFEF4C898884444FFFFFF444499894C99889444444444FFFF4C9A
         9000002305573580315141000000020000001685086971500000000012340765

     128 ernment St. Victoria            BC V1P2G3 Canada    000300    Ju
         899989A4EA44E88A9988444444444444CC4EFDFCF4C898884444FFFFFF4444DA
         5954553023B05933699100000000000023051727303151410000000300000014

     192 stin Trudeau      24 Sussex Drive     Ottawa              ON K1Y
         AA894E9A888A444444FF4EAAA8A4C98A844444DAA8A844444444444444DD4DFE
         2395039445140000002402422570499550000063316100000000000000650218

Now you should be able to see that the record-size is 90 bytes because data repeats at 90 bytes - 1st record id# 000100 & 2nd record id# 00020 is 90 bytes higher (64 on 1st line + 26 on 2nd line) (scales are zero-relative).

1. uvhd option 'a' translates the character line of the 3 line vertical hexadecimal groups from EBCDIC to ASCII, so you can read it before actual data translated.
   
   
2. The actual data is unchanged, the zones & digits lines are still EBCDIC. Example#1 1st byte is '0' & below you see the zone/digit as x'F0' (in horizontal hex vs vertical hex in display above). Example#2 'O' of Owen Townsend is x'D6' in EBCDIC (would be x'4F' in ASCII).
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

2D3. uvhd demo - investigating unknown files

uvhd options a=EBCDIC->ASCII, r=RecordLth, l=LineLth

From the above uvhd investigations using the default record length of 64, we have determined the the actual record length is 90 bytes, so we can now give uvhd the correct record-size as option 'r90' & the display size as option 'l90'.

 #4. uvhd dat2/namesadrs0e ar90l90
     =============================

 rec#=1 rsize=90 fptr=0 fsize=450 records=5
                 10        20        30        40        50        60        70        80        9
 r#   1 012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789
      0 000100    Owen Townsend       4667 Hoskins Rd     North Vancouver     BC V5P3V8 Canada
        FFFFFF4444DA894E9A9A8984444444FFFF4C9A989A4D844444D99A84E8989AA8944444CC4EFDFEF4C898884444
        000100000066550366525540000000466708622952094000005693805153645590000023055735803151410000
 rec#=2 rsize=90 fptr=90 fsize=450 records=5
                 10        20        30        40        50        60        70        80        9
 r#   2 012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789
     90 000200    John Horgan         1234 Government St. Victoria            BC V1P2G3 Canada
        FFFFFF4444D9894C99889444444444FFFF4C9A899989A4EA44E88A9988444444444444CC4EFDFCF4C898884444
        000200000016850869715000000000123407655954553023B05933699100000000000023051727303151410000
 rec#=3 rsize=90 fptr=180 fsize=450 records=5
                 10        20        30        40        50        60        70        80        9
 r#   3 012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789
    180 000300    Justin Trudeau      24 Sussex Drive     Ottawa              ON K1Y2L6 Canada
        FFFFFF4444DAAA894E9A888A444444FF4EAAA8A4C98A844444DAA8A844444444444444DD4DFEFDF4C898884444
        000300000014239503944514000000240242257049955000006331610000000000000065021823603151410000
 rec#=4 rsize=90 fptr=270 fsize=450 records=5
                 10        20        30        40        50        60        70        80        9
 r#   4 012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789
    270 000400    Donald Trump        1600 Pennsylvannia  Washington          DC 00001 USA
        FFFFFF4444C998984E9A9944444444FFFF4D899AA9A8998844E8A8898A994444444444CC4FFFFF4EEC44444444
        000400000046513403944700000000160007555283515591006128957365000000000043000001042100000000
 rec#=5 rsize=90 fptr=360 fsize=450 records=5
                 10        20        30        40        50        60        70        80        9
 r#   5 012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789
    360 000500    Bill Gates          1 Microsoft Way     Redmond             WA 98052 USA
        FFFFFF4444C8994C8A8A4444444444F4D8899A98A4E8A44444D8899984444444444444EC4FFFFF4EEC44444444
        000500000029330713520000000000104939626630618000009544654000000000000061098052042100000000

Now that we know the record size of our file, we can process with 'uvcp' (as on page '2E1').

updating packed/binary files with uvhd

 Also see page '5M3' for another uvhd demo to update packed/binary files with uvhd
 - hard to do with 'vi' & dangerous because it is too easy to add or delete bytes
 with 'vi', which would destroy these fixed length packed/binary files.

The 'u' update command for 'uvhd' will never update outside the field defined & never shift records as is possible with 'vi' or with the 'v' command for uvhd shown in #4a. on page '2B2'.

Page '5M3' updated custmas2 to make a few bytes different in record #10 of 32 records before comparing with custmas1 to demo 'uvcmpFA1' compare packed/binary files (not possible with unix 'diff').

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

2E1. Basic Vancouver Utilities

uvcp demo - translate to ASCII (& insert LineFeeds)

 #5. uvcp "fili1=dat2/namesadrs0e,typ=RSF,rcs=90,filo1=tmp1/namesadrs1f,tra=0(90)"
     =============================================================================
      - copies dat2/namesadrs0e to tmp1/namesadrs1f, translating EBCDIC to ASCII

• 'tra' TRanslates to Ebcdic to Ascii, ('tre' would TRanslate Ascii to Ebcdic)
  See the 'tra' instruction documented at https://uvsoftware.ca/uvcp.htm#M4

• We will not show the output from only translating to ASCII because it makes
  more sense to combine translation with inserting LineFeeds.

• Most linux users would like to work with text files (records ended with LineFeeds)
  because just about all unix utilities & editors expect text records with LineFeeds.

uvcp - translate to ASCII & insert LineFeeds at same time

 #6. uvcp "fili1=dat2/namesadrs0e,typ=RSF,rcs=90,tra=0(90),filo1=tmp1/namesadrs2t,typ=LSTt"
     ======================================================================================

 #7. uvhd tmp1/namesadrs2t t
     =======================
     rec#=1 rsize=87 fptr=0 fsize=427 records=5
                 10        20        30        40        50        60        70        80
 r#   1 012345678901234567890123456789012345678901234567890123456789012345678901234567890123456
      0 000100    Owen Townsend       4667 Hoskins Rd     North Vancouver     BC V7K2R3 Canada.
        333333222247662567676662222222333324676667256222224677625666677672222244253535324666660
        0001000000F75E04F7E35E40000000466708F3B9E302400000EF248061E3F565200000230650368031E141A
     rec#=2 rsize=87 fptr=87 fsize=427 records=5
                 10        20        30        40        50        60        70        80
 r#   2 012345678901234567890123456789012345678901234567890123456789012345678901234567890123456
     87 000200    John Horgan         1234 Government St. Victoria            BC V1P2G3 Canada.
        333333222266662467666222222222333324676766667257225667676622222222222244253534324666660
        0002000000AF8E08F271E000000000123407F652ED5E4034E06934F291000000000000230610273031E141A

Notes re translate to ASCII & insert LineFeeds

1. We are showing only 1st 2 records in the ASCII file with LineFeeds inserted. Compare to the original EBCDIC file shown on the previous page '2D3'.
   
   
2. Confirm that this is ASCII, a zero is now x'30' in ASCII vs x'F0' in EBCDIC, letter 'O' of 'Owen' is now x'4F' in ASCII vs x'D6 in EBCDIC.
   
   
3. Note that records are terminated with a LineFeed x'0A' after the last nonblank, vs the original EBCDIC file records exactly 90 bytes with no terminators.
   
   
4. Input file 'typ=RSF' means 'Record Sequential Fixed' & Output file 'typ=LST' means 'Line Sequential Termianted'.
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

2F1. uvsort demo - sort with record selection

'uvsort' is a sort utility for Unix/Linux with mainframe capabilities. The Unix system sort can not sort mainframe type files that do not have Linefeeds & may have packed decimal sort fields. uvsort has the functionality of mainframe SORT (record select,reformat,etc). Full doc at uvsoftware.ca/uvsort.htm.

We will demo sorting dat2/sales3 on salesman & product, selecting records with sales amount over $1000 (amount field cols 54-62 8 digits & sign).

dat2/sales3 - input file

          1         2         3         4         5         6
 1234567890123456789012345678901234567890123456789012345678901234
 CUST#    SLM  DATE   INV#     PROD#     QTY   PRICE    AMOUNT

 130140    21 940802 IN111001  HAM001  00020+ 0000001 00000020+
 130140    21 940803 IN111001  SCR012  00021+ 0001001 00021021+
 130140    21 940804 IN111001  CHR001  00022+ 0002001 00044022+
 139923    35 950802 IN111002  TAB013  00023+ 0003001 00069023+
 139923    35 950807 IN111002  TAB013  00024+ 0004001 00096024+
 150825    44 960804 IN1122    HAM001  00025+ 0005001 00125025+
 150825    44 960805 IN1122    HAX129  00026+ 0006001 00156026+
 201120    44 970807 CR5234    BBQ001  00027+ 0007001 00189027+
 223240    65 980816 CR955     HAM001  00028+ 0008001 00224028+
 223240    65 980817 IN441     BBQ001  00029+ 0009001 00261029+
 308685    21 990812 IN6605    SAW051  00010- 0000001 00000010-
 308685    21 990813 IN6605    BIT075  00011- 0001001 00011011-
 308685    21 990814 CR8835    TAB013  00012- 0002001 00024012-
 315512    44 000805 IN2251    HAM001  00013- 0003001 00039013-
 315512    44 000806 IN2251    SAW051  00014- 0004001 00056014-
 315512    44 000807 IN2255    BIT075  00015- 0005001 00075015-
 400002    85 010812 CR245     HAX129  00016- 0006001 00096016-
 406082    35 020815 IN33001   BBQ001  00017- 0007001 00119017-
 406082    35 020816 IN33001   TAB013  00018- 0008001 00144018-
 406082    65 020816 IN441     HAM001  00019- 0009001 00171019-

 uvsort "fili1=dat2/sales3,rcs=64,typ=LST,filo1=tmp/s3,key1=10(2),key2=30(6),sel1=53(6)>001000"
 ==============================================================================================

tmp/s3 - output file

 406082    35 020815 IN33001   BBQ001  00017- 0007001 00119017-
 406082    35 020816 IN33001   TAB013  00018- 0008001 00144018-
 201120    44 970807 CR5234    BBQ001  00027+ 0007001 00189027+
 150825    44 960804 IN1122    HAM001  00025+ 0005001 00125025+
 150825    44 960805 IN1122    HAX129  00026+ 0006001 00156026+
 223240    65 980817 IN441     BBQ001  00029+ 0009001 00261029+
 406082    65 020816 IN441     HAM001  00019- 0009001 00171019-
 223240    65 980816 CR955     HAM001  00028+ 0008001 00224028+

 Keys & field selection locations are specified as zero relative displacements.
 For example 1st sort key in columns 11-12 is specified as 'key1=10(2)'
 - displacement 10 & length 2.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

2F2. uvsort demo - sort with record selection

 uvsort "fili1=dat2/sales3,rcs=64,typ=LST,filo1=tmp/s3,key1=10(2),key2=30(6),sel1=53(6)>001000"
 ==============================================================================================
  - uvsort demo

 sort -key=1.11,1.12 -key=1.31,1.36 dat2/sales3 -o tmp/s3
 ========================================================
  - unix sort equivalent, without record selection

uvsort advantages vs unix system sort

1. uvsort has the functionality of mainframe SORT (record select,reformat,etc). (unix sort has no record selection or record reformat capability).
   
   
2. We think the uvsort key syntax is more intuitive 'key1=10(2)' vs '-key=1.11,1.12'
   
   
3. uvsort can sort several file types: text, fixed length with no LineFeeds, variable (RDW/VSAM 4 byte header with record length in binary), STL (STandard Language file system used by AIX COBOL).
   
   
4. Note that unix sort can sort only text files (with LineFeeds).
   
   
5. uvsort allows for 20 input files &/or all files in a directory Unix sort also allows multi file input & all files in directory
   
   
6. uvsort allows up to 60 output files (with different record selections)
   
   
7. uvsort allows sorting on packed decimal fields
   
   
8. uvsort provides an extensive instruction set to reformat record fields - mvc,mvn,clr,add,sub,mpy,div,rep,sqz,cmc,cmn,skp
   
   
9. uvsort provides translate options (ASCII,EBCDIC,UPPER,lower)
   
   

See full documentation at uvsoftware.ca/uvsort.htm.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

2G1. uvlist - Program Description

uvlist will list ascii text files (stdout by default) but with the main intention of piping to a laser printer. Many scripts/options are provided for laser printers. For example you can list 132 column reports on 8 1/2 width paper using the 'uvlp18' script which includes the option to print at 18 characters per inch. Script 'uvlp13LD' will print 132 columns across & 66 lines down Landscape & Duplex.

uvlist will help you get organized & stay organized by allowing you to file your important listings in standard 8 1/2 x 11 3 ring binders & by ensuring that all listings have page headings that identify the file name & the last modification date.

Uvlist saves you the frustration that can occur when you pick up a listing without page headings to identify where it came from & when it was created.

My preference for printing scripts, programs, parameter files, etc is 'uvlp13D' which prints Duplex at 13 cpi, which allows 95 characters across on 8 1/2 paper with margins to allow for 3 hole punched paper. For example, I would print the uvlist documentation as follows & note the page headings created:

 uvlp13D doc/uvlist.doc  <-- print uvlist documentation at 13 cpi Duplex
 ======================    - 1st page headings shown below

 /home/uvadm/doc/uvlist.doc now=190822:1606 uvadm pg#  1
 =======================================================

 Note that the page headings include the vital information
 - filename, date:time printed, userid, page#

'uvlp13D' is just 1 of over 40 scripts with various option combinations. The actual 'uvlist' command coded in the uvlp13D script is as follows:

 uvlist $1 p60$2 a2d1c13n-220$3 | lp $UVLPOPTN $UVLPDEST
 #======================================================

You can see the options described at uvsoftware.ca/uvlist.htm

Note the 'lp' destination option '$UVLPDEST', which is defined in the common_profile & you can override in your .bash_profile defining a network printer near your location.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

2G2. uvlist - Vancouver Utility for Laser Printing

'uvlist' scripts available

Best way to see the various uvlp... scripts available is to use the 'uvhelp' menu & the 'v31' sub-menu as follows:

 #1. Login userxx --> /home/userxx

 #2. uvhelp   <-- uvhelp menu (documented in Part_6), shows many sub-menus
     ======     - v11,v12,v13,v14,v15, v21-v26, v31,v32,etc,... v92
                - scroll down to find desired sub-menu & quit main menu

 #3. v31      <-- sub-menu for uvlist, uvlp... scripts,& listall1
     ===

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

2G3. uvlist - Vancouver Utility for Laser Printing

listall1 - print multiple small files - demo

 listall1 archive/uvbriefs    <-- Example #1 (no report shown)
 =========================
  - list ALL LINES of ALL files in directory: archive/uvbriefs/
  - options default to omit directory file list & print all lines

 listall1 archive/uvbriefs 'uv*' d1f3l3  <-- Example#2 (with report)
 ======================================
  - list files in archive/uvbriefs/ (arg1) with prefix 'uv' (arg2)
  - arg3 option 'd1' print directory, option 'f3' print 1st 3 files,
    & option 'l3' print only 1st 3 lines of each file

output report - in tmp1/archive_uvbriefs_uv_d1f3l3

 File#   Lines Directory/Filename
     1       8 archive/uvbriefs//uvcopy
     2       6 archive/uvbriefs//uvcp
     3       6 archive/uvbriefs//uvhd
     4       7 archive/uvbriefs//uvlist
     5       8 archive/uvbriefs//uvsort
     5 files,      35 total lines in  files in directory archive/uvbriefs/

 FILE# 1 - archive/uvbriefs//uvcopy
 'uvcopy' - the most powerful Vancouver Utility. It is a 'general purpose'
 (can do anything) data manipulation utility. It gives you the power of assembler
 without the complexity. It interprets the instruction files for pre-programmed
           --- 3 lines printed of 8 total ---

 FILE# 2 - archive/uvbriefs//uvcp
 'uvcp' - command line data utility that can copy files, converting record
 formats between: fixed, variable, sequential, indexed, text, RDW, etc).
 uvcp provides record select, reformat, translate, etc.
           --- 3 lines printed of 6 total ---

 FILE# 3 - archive/uvbriefs//uvhd
 'uvhd' - file investigation utility that displays any file in vertical hexadecimal,
 and prompts for commands to browse,search,replace,update,select,print,count,etc.
 uvhd allows you to see characters not shown by text editors (control characters
           --- 3 lines printed of 6 total ---

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

2H1. uvcopy - most powerful Vancouver Utility

'uvcopy' is the most powerful Vancouver Utility. It is a 'general purpose' (can do anything) data manipulation utility. It gives you the power of assembler without the complexity. It interprets the instruction files for pre-programmed jobs such as SelectJobs & TableJObs. You do not need to know the uvcopy instruction language to run the pre-programmed jobs. But if you want to use it for your own customized applications, you can see the over 100 instructions at uvcopy3.htm. And be sure to see scripts uvfix1 & uvfixA in Part_7, the easy way to use the power of uvcopy instructions without writing uvcopy jobs.

uvcopy demo - removing CRs from scripts

Page '2B1' explained the problem of Carriage Returns causing scripts to fail, and a simple solution using uvhd. Here is the uvcopy job equivalent.

      # removeCR_uvcopy - copy a file removing any CR's
      #                 - by Owen Townsend, UV Software, Feb 21/2019
      # uvcopy pf/removeCR_uvcopy    <-- execution command
      # =========================
      opr='$jobname - copy a file removing any Carriage Returns'
      fili1=?sf/llsx,rcs=256,typ=LST        #<-- declare input file
      filo1=?tmp/llsx,rcs=256,typ=LSTtp775  #<-- declare output file
      @run
              opn     all                    open files
      # begin loop to read/process/write records until EOF
      man20   get     fili1,a0               get next record into area 'a'
              skp>    man90                  (cc set > at EOF)
              mvc     b0(256),a0             copy input area 'a' to output area 'b'
      #===============================
              rep     b0(256),x'0D',''       remove CRs
      #===============================
              put     filo1,b0               write record to output file
              skp     man20                  return to get next record
      # EOF - close files & end job
      man90   cls     all
              eoj

The solution is only the 1 line --> rep b0(256),x'0D','' <--, but uvcopy requires the framework of file definitions & get/put instruction loop.

We provide a pre-programmed uvcopy job 'uvfix1' that prompts for instructions & saves you from having to write the uvcopy file I/O framework. So you would enter only the 'rep' instruction at the prompt:

 --> rep b0(256),x'0D',''
     ====================

See the over 100 uvcopy instructions documented at uvcopy3.htm.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

Part_3. Vancouver Utility Programming Aids - SelectJobs

SelectJobs Benefits to Programmers & Analysts

SelectJobs are invaluable to IT professionals at any Unix/Linux/Windows site because:

1. They are much more powerful than grep because they can search for multiple patterns with 1 pass, using AND & OR relationships.
   
   
2. You can specify a series of up to 9 patterns that must be present or not present (AND relationships) and you can have multiple such series (OR relationships).
   
   
3. You can specify that the multiple patterns must be found or not found on the same line or on any line in the file, or on 1 or any line between a begining & ending line, that are themselves identified by 1 or multiple patterns.
   
   
4. You can use these tools to investigate problems in text files of any kind: data files, scripts (SQLs, JCLs, FTPs, etc),& any programming language.
   
   
5. You can use Selectjobs to research the impacts of planned changes to your scripts & programs.
   
   
6. SelectJobs create reports in subdir selects/... of the current working directory, automatically named from the file or directory concatenated with patterns used. This allows you to review past searches & easily modify & repeat the search.
   
   
7. The search reports include all relevant info (files,dirs,search patterns,date/time, user,host,etc) to help you document problems & plan proposed changes.
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

SelectJobs (UVdemos2 Part 3) - Contents

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

Part 3 SelectJobs - Contents (continued)

SelectJobs same as UVdemos2 Part 3

SelectJobs.htm is the same as UVdemos2.htm#Part_3. SelectJobs was duplicated as a separate document because it is 1 of the most useful parts of UVdemos2.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3A1. Vancouver Utility Programming Aids - Selectjobs

SelectJobs - Introduction & Overview

Select Jobs (selectlf1,selectlfd1,selectlgfd1,etc)are pre-programmed uvcopy jobs to select lines from 1 or all files in a directory, lines identified by up to 9 patterns, matching and/or not-matching datafile contents.

You may prefix patterns with '+' for presence & '-' for absence. You may specify multiple patterns for 1 selection via a sequence#, for example:

 arg1=+1@Townsend:+2@Canada,-3@Owen   <-- multi conditions +present & -absent
 ==================================

You may restrict the search area by displacement[length], for example:

 arg1=+1@0[20]Townsend:+2@20[60]Owen  <-- Townsend in cols 1-20 & Owen in 21-80
 ===================================

This document provides demo files & several suggested search patterns. Please run the demos & check your results to the expected.

We think you will appreciate that these select jobs are much more powerful than 'grep' because they can search for multiple conditional patterns with 1 pass. After the demos & understanding how the patterns & conditions are specified, please try out these select jobs on your files.

You might have a directory of thousands of scripts & you need to select some scripts (for investigation & correction) based on some combination of patterns which may be on the same line or on any line in the script.

Use 'selectlfd1' if the multiple patterns must be on the same line, or use 'selectlgfd2' if the multiple patterns could be anywhere in the file, or if the patterns must be between 2 other lines - start search & stop search lines which can also be identified by up to 9 patterns

For example, we can use selectlgfd2 to search SQL 'SELECT' statements which can be multi-lines, but known to end with a ';' semi-colon. arg1=SELECT,arg2=; & arg3=desired search patterns between arg1 & arg2 (begin & end).

If you have a problem with your files & are wondering how it could be solved with Vancouver Utilities, we invite you to email us, explain the problem, and we will help you solve it (as our time allows).

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3A2. SelectJobs - Introduction & Overview

Example to Illustrate SelectJob Capabilities vs grep

JCL conversions of complex SORTs with INCLUDE/OMIT AND/OR conditions may need manual corrections & need to be inspected. I wanted to scan hundreds of JCLs extracting only the SORT SYSIN parameters with both "AND" & "OR" CONDitions.

'grep' can not do this because the ANDs & ORs could be on different lines. Here is the command for 'selectlgfd2' which can look for //SYSIN to /* groups with both "AND" & "OR" in between.

 uvcopy selectlgfd2,fild1=jcl2,arg1=@//SYSIN,arg2=/*,arg3=1@COND:2@AND:3@OR%
 ============================================================================
  - scan for //SYSIN to /* line groups with "AND", "OR", "CONDitions"
  - creates report in subdir selects/... named from directory + patterns as shown below:

 # Report: selects/jcl2_SYSIN_1@COND:2@AND:3@OR%
 # ---> uvcopy selectlgfd2,fild1=jcl2,arg1=//SYSIN,arg2=/*,arg3=1@COND:2@AND:3@OR%
 #      =========================================================================
 # format: uvcopy selectlgfd2,fild1=directory,arg1=...,arg2=...,arg3=...,arg4=...,uop=abcdgi
 # arg1 patterns identify begin-group line, arg2 patterns identify end-group line
 # arg3 patterns qualify group selection, arg4 patterns qualify lines to output/print
 #  - code '^' circumflex for ' ' spaces and '%' percent for ',' commas in patterns
 #  - may prefix patterns: '-' for absence, '+' for presence (default)
 #  - may restrict search area: arg2=@0[2]/*  <-- "/*" must be in 1st 2 bytes
 #  - multiple-condition-series: arg3=1@SORT:2@COND:3@AND:4@OR <-- ALL patterns must match
 # Date=2019/06/09_10:29:01, Site=UV_Software, Host=uvsoft5, User=uvadm, Options=
 #===============================================================================
 //SYSIN    DD *
 SORT FIELDS=(1,8,CH,A,69,12,CH,A)
 INCLUDE COND=(((9,1,CH,EQ,C'T'),OR,(COND=(9,1,CH,EQ,C'X'))),
                                 AND,(COND=(56,2,CH,EQ,C'AB')))
 /*
                          EOG: #1, 5 lines selected from jcl2/jgl232
                          EOF:     5 selected from 35 in jcl2/jgl232
 EOD: 7 files, 168 lines, selected 1 groups, 5 lines to selects/jcl2_SYSIN_1@COND:2@AND:3@OR%

SelectJob Advantages

1. Can select lines based on up to 9 patterns that must be present or absent.
   
   
2. Can select groups of lines (identified by patterns on a start-line & an end-line), that include multiple patterns on any line between the start & end lines.
   
   
3. SelectJobs create reports in subdir selects/... automatically named from the file or directory concatenated with patterns used. This allows you to review your past searches & see the command used for easy modify & repeat.
   
   
4. You may restrict pattern searches to record areas, for example "arg1=1@0[20]Owen,2@40[40]Vancouver" searches for "Owen" anywhere in 1st 20 bytes and "Vancouver" anywhere in columns 41-80. For the JCL/SORT example we could have "arg1=@0[7]//SYSIN,arg2=@0[2]/*" since we know these patterns start in column 1.
   
   
5. SelectJobs can use '>' & '<' conditions, but only if the field is in a fixed position. See examples later in this documentation on page '3E3'.
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3B1. Vancouver Utility Programming Aids - Selectjobs

Vancouver Utilities - subdirs relevant to SelectJobs

Here is the Vancouver Utilities homedir showing only the most relevant subdirs required for the SelectJob demos documented in this section of UVdemos2.htm.

You could run the demos logged in as 'uvadm', but if you are sharing the system with other uvadm users, it would be better to copy the demo/subdirs/files to your own homedir. See the copy instructions below & an expanded view of the demo/... files on the next page.

 /home/uvadm             <-- $UV
 :-----bin                 - UV binaries (uvcopy,uvsort,uvcp,uvhd,uvlist,etc)
 :-----dat1                - test data files to demo various Vancouver Utilities
 :     :-----...         <-- 200 testdata files for all uvcopy job demos
 :     :                   - SelectJobs testdata files copied to demo/dat1/...
 :-----doc                 - Vancouver Utilities documentation (text)
 :     :----UVdemos2.doc    - this documentation (1 of 150 files)
 :     :----SelectJobs.doc - Part3 of UVdemos2 duplicated as a separate document
 :-----dochtml             - documentation in HTML (uploaded to www.uvsoftware.ca)
 :-***-demo              <-- demo files for TestDemo tutorials, copy to your homedir -->
 :     :                   - copy /home/uvadm/demo/* to your /home/userxx/demo/...
 :     :-----dat1          - data files for SelectJob demos, see details on next page
 :     :-----ftps          - SYSIN control cards for various purposes
 :     :-----jcl2          - mainframe JCL samples (8)
 :     :-----sqls          - SQL scripts for SelectJob demos, see next page -->
 :-----pf                <-- Parameter Files for uvcopy
 :     :-----util              - uvcopy SelectJobs
 :     :     :-----selectlf1     - select Lines from 1 File
 :     :     :-----selectlfd1    - select Lines from all Files in a directory
 :     :     :-----selectlgfd1   - select Line Groups from all Files in directory
 :     :     :-----selectlgfd2   - select Line Groups from all Files in directory
 :     :     :-----selectfdd1    - select Files from 1 Directory to a 2nd Directory
 :     :-----adm               - uvcopy jobs for uvadm admin
 :     :-----demo              - uvcopy jobs for various demos
 :     :-----IBM               - uvcopy jobs for Mainframe conversions
 :-----sf                <-- Script Files (bash or Korn shell)
 :     :-----adm               - scripts for uvadm admin
 :     :-----demo              - demo scripts
 :     :-----util              - utility scripts
 :     :-----IBM               - scripts for mainframe conversions
 :-----src               <-- Vancouver Utilities C source code (uvcopy,uvsort,etc)
 :-----tf                  - test files for various demos (similar to dat1/...)
 :-----tmp                 - tmp subdir (test/demo outputs)
 :-----tmp1                - misc, outdir for some utility scripts (like listall1)
 :-----tmp2

Please copy the demo/... files to your homedir to avoid conflict with other users of Vancouver Utilities & to avoid losing your files when new versions of Vancouver Utilities are installed.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3B2. Vancouver Utility Programming Aids - Selectjobs

copy $UV/demo to your $HOME/demo/...

 #1. Login userxx --> /home/userxx
 #2. mkdir demo   <-- make directory for copy of demo files in your homedir

 #3. cp -r /home/uvadm/demo/* demo/   <-- copy demo files to your homedir
     ==============================
 #4. cd demo    <-- change into demo/ directory
     =======

SelectJobs demo files copied to your homedir

Here is an expanded view of the most relevant subdirs/files required for the SelectJob demos (omitting subdirs/files used for other parts of UVdemos2.doc).

 /home/userxx/demo/              - copy to your homedir, cd demo/ & run jobs there
 :-----dat1                    <-- testdata files for demos
 :     :-----nameadrs1           - 8 line testdatafile to demo pattern rules
 :     :-----CanadaMPs.csv       - CAnadian Members of Parliament Names & constituencies
 :     :-----CanadaMPs           - text files in fixed fields extracted from .csv file
 :     :-----UScongress.csv
 :     :-----UScongress
 :     :
 :-----jcl2                    <-- JCLs to demo selectlgfd1/2
 :     :-----jar200.jcl
 :     :-----...etc...
 :-----pf                      <-- uvcopy job Parameter Files, see note below
 :     :-----                    - you could create your own uvcopy jobs here
 :     :
 :-----selects                 <-- output directory for select job reports
 :     :-----dat1_nameadrs1_+1@Townsend:+2@Canada:-3@Owen
 :     :-----...                 - sample above from selectlf1 1st demo
 :     :-----...                 - concatenation of directory_file_patterns
 :-----sqls                    <-- SQL scripts for SelectJob demos
 :     :-----select_Customers_all
 :     :-----select_Customers_sales
 :     :-----...etc...
 :-----tmp
 :-----tmp1                    <-- tmp dirs for temp files, sorts, etc
 :-----tmp2

uvcopy job Locations

 uvcopy selectlf1,fili1=dat1/nameadrs1,arg1=+1@Townsend:-2@Owen
 ==============================================================
 - sample uvcopy execution of 'selectlf1' Parameter File (uvcopy job)
 - How does uvcopy know where to find its Parameter File of instructions ?

uvcopy looks for the Parameter/Instruction File via $PFPATH, similar to scripts using $PATH. The SELECT jobs are stored in /home/uvadm/pf/util/... (as shown on the previous page) & the common_profile includes:

 export PFPATH=$UV/pf/demo:$UV/pf/IBM:$UV/pf/util:$HOME/pf:---etc---
 ====================================================================

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3B3. Vancouver Utility Programming Aids - Selectjobs

Setup check-list - Ready to run test/demos ?

We will present a 'setup check-list' here, since you may be reading this in the separate SelectJobs.doc vs UVdemos2.doc which includes SelectJobs as Part3.

See UVdemos2.htm for the complete setup procedures, but here is a check-list of the steps required before you can execute these test/demos.

1. Install Vancouver Utilities. See complete documenation at install.htm. Also see the install summary at UVdemos2.htm#1A3.
   
   
2. Setup your user login account if not already done. See UVdemos2.htm#1C1.
   
   
3. Setup subdir demo/ in your homedir & copy $UV/demo/* to your $HOME/demo/... See the short version here on page '3B2' &/or the long version with file-lists file-lists at UVdemos2.htm#1C4 & file-contents at UVdemos2.htm#1D1 - 1D6.
   
   

   testdata file contents

Here in SelectJobs, we will usually show just a sample of the relevant testdata before each test/demo execution. See UVdemos2.htm#1D1 - 1D6 to see all files & all contents of the testdatafiles.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3C1. Programming Aids - SelectJobs

dat1/nameadrs1 - testdata file for 1st demo

          1         2         3         4         5         6         7         8
 12345678901234567890123456789012345678901234567890123456789012345678901234567890

 Owen Townsend       4667 Hoskins Rd     North Vancouver, BC Canada V7K2R3
 Jenny Townsend      21 Canada Place     Vancouver, BC       Canada V5P3V8
 John Horgan         123 Townsend Ave.   Townsend City, BC   Canada V1P2G3
 John Townsend       2121 Owen Drive.    St. John, NB        Canada M5W1E6
 John Owens          24 Townsend Dr.     Owenville, ON       Canada M5K3B3
 Donald Trump        1600 Pennsylvannia  Washingtom, DC      USA 00001
 Bill Gates          1 Microsoft Way     Seattle, WA         USA 98052-6399
 Peter Townsend      24 Johnson Road     London, England     UK EC1A 1HQ

selectlf1 - 1st Example for Pattern Rules following

 #0b. Login uvadm  --> /home/uvadm  <-- could use uvadm if you are only user
 #0a. Login userxx --> /home/userxx <-- better/safer to copy files to your homedir
 #1.  cd demo            <-- change into demo/ directory
 #2a. rm -f selects/*    <-- remove old selection reports
 #2b. rm -f tmp*/*       <-- remove old temporary files (from tmp/, tmp1/, tmp2/)

 #2. uvcopy selectlf1,fili1=dat1/nameadrs1,arg1=+1@Townsend:+2@Canada:-3@Owen
     ========================================================================
     - select lines from dat1/nameadrs1 with "Townsend" & "Canada", but NOT "Owen"

 #2a. cat    <-- End of Job prompt for command to view output file
      ===      - enter command only (cat,more,vi,etc), no need for filename
               - Result (2 lines) as follows:

 Jenny Townsend      21 Canada Place     Vancouver, BC       Canada V5P3V8
 John Horgan         123 Townsend Ave.   Townsend City, BC   Canada V1P2G3

 #3a. vi selects/dat1_nameadrs1_+1@Townsend:+2@Canada:-3@Owen  <-- using 'vi'
      =======================================================

 #3b. cat selects/dat1_nameadrs1_+1@Townsend:+2@Canada:-3@Owen  <-- using 'cat'
      ========================================================
      - 'cat' is convenient when you know the result is less than a screenfull

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3C2. Programming Aids - SelectJobs

Output Report from selectlf1

The prior page showed only the 2 lines selected from the 8 line input file.

Actually, selectlf1 creates a Report with command parameters used, which are useful when you need to review the results or rerun the selection with different parameters. Here is the full report, with the selected lines & stats at the end

selects/dat1_nameadrs1_+1@Townsend:+2@Canada:-3@Owen

 # Report: selects/dat1_nameadrs1_+1@Townsend:+2@Canada:-3@Owen
 # ---> uvcopy selectlf1,fili1=dat1/nameadrs1,arg1=+1@Townsend:+2@Canada:-3@Owen
 #      =========================================================================
 #format: uvcopy selectlf1,fili1=inputfile,arg1=pattern1:pattern2,etc,uop=i0/i1
 # arg1 - line selection conditions (up to 9 patterns to match or not-match)
 # - code '^' circumflex for ' ' spaces and '%' percent for ',' commas in patterns
 # - may prefix patterns with '-' for absence, '+' for presence (default)
 # - may restrict search area, example: arg1=@0[20]Townsend:@20[60]Owen
 # - multiple conditions: arg1=+1@Townsend:+2@Canada,-1@Owen,-2@BC
 # - if no seq#s (+1,+2,etc) default selects if any +pattern & no -pattern
 # - combination ex: arg1=+1@0[20]Townsend:+2@60[60]Canada:-@0[20]Owen
 # Date=2019/05/12_16:14:14, Site=UV_Software, Host=uvsoft5, User=uvadm, Options=
 #===============================================================================
 Jenny Townsend      21 Canada Place     Vancouver, BC       Canada V5P3V8
 John Horgan         123 Townsend Ave.   Townsend City, BC   Canada V1P2G3
 # EOF - 2 lines selected from dat1/nameadrs1

Report Format for SelectJobs

1. 1st line identifies the report filename (in selects/... subdir by default)
   
   
2. 2nd line shows the uvcopy SelectJob command line arguments
   
   
3. Lines 3-11 are SELECT job format rules & help info
   
   
4. Line 12 shows current date, sitename, hostname, username,& options
   
   
5. Lines 14+ are the selected data lines (only 2 lines in this example)
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3D1. Select Jobs - selectlf1, selectlfd1, selectlgfd1

Test/Demos to illustrate Pattern Rules

The Pattern Rules are common to all Select Jobs (selectlf1,selectlfd1,selectlgfd1), but we will use selectlf1 for most examples below. You may run the commands below & confirm your results match our documented selection counts.

Patterns may be entered on the command line via arg1=... OR at the prompt, They are best entered on the command line for easy rerun from command history.

dat1/nameadrs1 - compare demo outputs to these 8 records

          1         2         3         4         5         6         7         8
 12345678901234567890123456789012345678901234567890123456789012345678901234567890
 Owen Townsend       4667 Hoskins Rd     North Vancouver, BC Canada V7K2R3
 Jenny Townsend      21 Canada Place     Vancouver, BC       Canada V5P3V8
 John Horgan         123 Townsend Ave.   Townsend City, BC   Canada V1P2G3
 John Townsend       2121 Owen Drive.    St. John, NB        Canada M5W1E6
 John Owens          24 Townsend Dr.     Owenville, ON       Canada M5K3B3
 Donald Trump        1600 Pennsylvannia  Washingtom, DC      USA 00001
 Bill Gates          1 Microsoft Way     Seattle, WA         USA 98052-6399
 Peter Townsend      24 Johnson Road     London, England     UK EC1A 1HQ

 #1. uvcopy selectlf1,fili1=dat1/nameadrs1,arg1=Townsend:Owen
     ========================================================
     - select lines with "Townsend" OR "Owen" anywhere on the line

      --> enter patterns if not on command line arg1=...
      selects/dat1_nameadrs1_Townsend:Owen default filo02 -->     <-- null accept
      default command null, OR enter: vi,cat,more,etc     --> cat <-- enter cat

           ---------------- 6 of 8 lines are selected --------------
     Owen Townsend       4667 Hoskins Rd     North Vancouver, BC Canada V7K2R3
     Jenny Townsend      21 Canada Place     Vancouver, BC       Canada V5P3V8
     John Horgan         123 Townsend Ave.   Townsend City, BC   Canada V1P2G3
     John Townsend       2121 Owen Drive.    St. John, NB        Canada M5W1E6
     John Owens          24 Townsend Dr.     Owenville, ON       Canada M5K3B3
     Peter Townsend      24 Johnson Road     London, England     UK EC1A 1HQ

 #1. uvcopy selectlf1,arg1=Townsend:Owen  <-- can omit fili1=dat1/nameadrs1 (default)
     ===================================
     - select lines with "Townsend" OR "Owen" anywhere on the line

      dat1/nameadrs1 = default fili01                     -->     <-- null accept
      --> enter patterns if not on command line arg1=...
      selects/dat1_nameadrs1_Townsend:Owen default filo02 -->     <-- null accept
      default command null, OR enter: vi,cat,more,etc     --> cat <-- enter cat

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3D2. Select Jobs - Test/Demos to illustrate Pattern Rules

 #2. uvcopy selectlf1,arg1=+Townsend:+Canada:-Owen
     =============================================
     - select lines with "Townsend" OR "Canada", but NOT "Owen"   <-- ERROR, INVALID

You may code 1st byte of pattern as '+' (default) to indicate the pattern must be present and '-' to indicate the pattern must be absent (NOT found). But, this example is INVALID, cannot mix '+' & '-' conditions, unless the '-' conditions are at the end of a conditional series, for example: +1...,+2...,-3...,-4...

 #3. uvcopy selectlf1,arg1=+1@Townsend:+2@Canada:-3@Owen <-- CONDITION SERIES
     ===================================================
     - select lines with "Townsend" AND "Canada", but NOT "Owen"
           ---------------- 2 of 8 lines are selected --------------
     Jenny Townsend      21 Canada Place     Vancouver, BC       Canada V5P3V8
     John Horgan         123 Townsend Ave.   Townsend City, BC   Canada V1P2G3

The '+1' indicates the First condition & '+2' the Second condition of a series (9 max). Match assumed if any '+' pattern found, then negated if any '-' pattern found. You must code '+' patterns prior to any '-' patterns in a series 1/2/3. You could omit the '+' condition prefixes since that is the default

 #4. arg1=+1@0[60]Townsend:+2@60[20]Canada:-3@0[20]Owen  <-- RESTRICTED SEARCH AREAS
     ==================================================
     - match if "Townsend" in 0-59 & "Canada" in 60-79, But not if "Owen" in 0-19.
           ---------------- 3 of 8 lines are selected --------------
     Jenny Townsend      21 Canada Place     Vancouver, BC       Canada V5P3V8
     John Horgan         123 Townsend Ave.   Townsend City, BC   Canada V1P2G3
     John Townsend       2121 Owen Drive.    St. John, NB        Canada M5W1E6

You may specify "Restricted Search Areas" by coding the Displacement[Length] following the '@' identifier.

 #5. arg1=+1@Townsend:+2@Canada:-3@Owen:+1@Townsend:+2@UK:-3@Owen <-- MULTI-SERIES 1,2,3,1,2,3
     ===========================================================
     - match if "Townsend" AND "Canada" & NOT "Owen"
     - AND   if "Townsend" AND "UK" & NOT "Owen"
           ---------------- 2 of 8 lines are selected --------------
     Jenny Townsend      21 Canada Place     Vancouver, BC       Canada V5P3V8
     John Horgan         123 Townsend Ave.   Townsend City, BC   Canada V1P2G3
     Peter Townsend      24 Johnson Road     London, England     UK EC1A 1HQ

 #6. uvcopy selectlf1,arg1=-Townsend           <-- NOT present
     ===============================
     - select lines WITHOUT "Townsend" (anywhere in record)
           ---------------- 3 of 8 lines are selected --------------
     John Owens          24 Townsend Dr.     Owenville, ON       Canada M5K3B3
     Donald Trump        1600 Pennsylvannia  Washingtom, DC      USA 00001
     Bill Gates          1 Microsoft Way     Seattle, WA         USA 98052-6399

 #7. uvcopy selectlf1,arg1=-1@Townsend:-2@Owen  <-- SERIES NOT present
     =========================================
     - select lines WITHOUT "Townsend" & without "Owen"
           ---------------- 3 of 8 lines are selected --------------
     Donald Trump        1600 Pennsylvannia  Washingtom, DC      USA 00001
     Bill Gates          1 Microsoft Way     Seattle, WA         USA 98052-6399

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3D3. Select Jobs - Test/Demos to illustrate Pattern Rules

script to run 11 selectlf1 test/demos

 # select_nameadrs1 - script stored at $UV/demo/sf/select_nameadrs1
 #                  - to test uvcopy $UV/pf/util/selectlf1
 #                  - by Owen Townsend, UV Software, May13/2019
 # - run selectlf1 with various selection patterns, reports collected in ./selects/...
 #              --------- testdatafile -----------
 # Owen Townsend       4667 Hoskins Rd     North Vancouver, BC Canada V7K2R3
 # Jenny Townsend      21 Canada Place     Vancouver, BC       Canada V5P3V8
 # John Horgan         123 Townsend Ave.   Townsend City, BC   Canada V1P2G3
 # John Townsend       2121 Owen Drive.    St. John, NB        Canada M5W1E6
 # John Owens          24 Owen Avenue      Owenville, ON       Canada M5K3B3
 # Donald Trump        1600 Pennsylvannia  Washingtom, DC      USA 00001
 # Bill Gates          1 Microsoft Way     Seattle, WA         USA 98052-6399
 # Peter Townsend      24 Johnson Road     London, England     UK EC1A 1HQ
 #
 export UVCOPYROP=q0i7r0  # inhibit prompts
 # default fili1=dat1/nameadrs1 (omitted here to save space)
 uvcopy selectlf1,arg1=Townsend:Owen                  #1 - any match
 uvcopy selectlf1,arg1=+1@Townsend:+2@Canada:-3@Owen  #2 - multi-condition match
 uvcopy selectlf1,arg1=+1@0[20]Townsend:+2@60[20]Canada:-3@0[60]Owen #3(1) - restricted areas
 uvcopy selectlf1,arg1=+1@0[20]Townsend:+2@60[20]Canada:-3@0[60]Owen\
 :+1@0[20]Townsend:+2@60[20]UK:-3@0[60]Owen           #5 - multi-condition-series
 uvcopy selectlf1,arg1=-Townsend                      #6 - NOT condition
 uvcopy selectlf1,arg1=-1@Townsend:-2@Owen            #7 - NOT multi-conditions
 uvcopy selectlf1,arg1=@0[4]>Owen                     #8 - > or < condition
 # following will be rejected with errmsgs
 uvcopy selectlf1,arg1=+Townsend:+Canada:-Owen        #1 ERR: mixed +/-, - not end series
 uvcopy selectlf1,arg1=-Townsend:+Owen                #2 ERR: mixed #1 '-' & any '+'
 uvcopy selectlf1,arg1=-Townsend:-owen                #3 ERR: multi #1 '-'s
 uvcopy selectlf1,arg1=-1@Townsend:+2@Owen            #4 ERR: #1 '-' with any '+'

executing sf/adm/select_nameadrs1

 #0b. Login uvadm  --> /home/uvadm  <-- could use uvadm if you are only user
 #0a. Login userxx --> /home/userxx <-- better/safer to copy files to your homedir

 #1. rm -f selects/*    <-- remove old selection reports

 #2. select_nameadrs1      <-- execute script (no arguments required)
     ================        - will get multiple prompts for input file accept/change

      dat1/nameadrs1 = default fili01                     -->     <-- null accept
      --> enter patterns if not on command line arg1=...
      selects/dat1_nameadrs1_Townsend:Owen default filo02 -->     <-- null accept
      default command null, OR enter: vi,cat,more,etc     --> cat <-- enter cat

For each of the 11 runs in the script, you can reply null to accept the default filenames and then reply "cat" to see the output records selected.

OR, you could reply null to all prompts & then inspect output reports in selects/...

 #3. vi selects/*       <-- view all 11 output reports
     ============

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3D4. Select Jobs - Test/Demos to illustrate Pattern Rules

Special Characters in arg1 patterns

1. You can not code ' ' spaces in the arg1 patterns (for testsst2 & select jobs below), because these jobs convert spaces to tildes when storing patterns in the table, & because the uvcopy command line does not allow embedded spaces. BUT, you may code ' ' spaces as '^' circumflexes, which will be converted to ' ' spaces.
   
   
2. You can not code ',' commas in arg1 patterns, because the uvcopy command line uses ',' commas to separate arguments. BUT, you may code commas as '%' percents, which will be converted to ',' commas.
   
   

   reports written to selects/... subdir

3. By default, the SELECT jobs create their output reports in ./selects/... (subdir in the current directory).
   
   
4. The output report filename defaults to a concatenation of the input directory, and the arg1/2/3 patterns, with '/'s converted to '_' underscores. Note in the above example, the report is 'selects/jcl2_SYSIN_1@cond:2@and:3@or'.
   
   
5. If desired, you could specify an alternate output report filename, but the default is very convenient & creates unique filenames identifying the directory searched & the search patterns used.
   
   
6. Note the 14 line report prefix which includes the Report: filename, the uvcopy command that created it, several lines of "help" information, and the current date=..., Site=..., Host=..., User=...,& Options=...
   
   

   Try selectlf1 with YOUR PATTERNS

Please try out selectlf1 with your own patterns, You might vary the suggested patterns listed on the previous page in the 'select_nameadrs1' script. See if you can find a pattern that does not give the expected results.

 uvcopy selectlf1,fili1=dat1/nameadrs1,arg1=...YOURPATTERNS...
 =============================================================

Try selectlf1 with YOUR DATA files & PATTERNS

Then try out selectlf1 with your own files & patterns.

 #1. cd your working directory (above your directory of files)

 #2. mkdir selects   <-- make directory for output reports
     =============

 #3. uvcopy selectlf1,fili1=yourdir/YOURDATAFILE,arg1=...YOURPATTERNS...
     ===================================================================

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3E1. Select Jobs - *selectlf1, selectlfd1, selectlgfd1

dat1/CanadaMPs - larger test file to demo Select Jobs

$UV/dat1/CanadaMPs is the CAnadian Members of Parliament data file that we can use for tutorials & you can use for self training using these Select Jobs.

We downloaded a spreadsheet, extracted a csv file (dat1/CanadaMPs.csv) & converted to a fixed layout so we could define specific fields required for some selections. See '20D1' if you are interested to see the uvcopy job (demo/pf/CanadaMPsfix).

Here are the samples of the 335 records with a column scale in case you wish to test select job searches with restricted areas.

samples of Canadian MPs .csv converted to fixed fields

 Title,First Name,Last Name,Constituency,Province/Territory,Political Affiliation,Start Date
 ,Ziad,Aboultaif,Edmonton Manning,Alberta,Conservative,10/19/2015
 ,Dan,Albas,Central Okanagan/Similkameen/Nicola,British Columbia,Conservative,10/19/2015
          1         2         3         4         5         6         7         8         9       100
 1234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890
               ----------------- First 2 of 335 MP's ------------------
 001  Aboultaif          Ziad            Edmonton Manning              AB Conservative     2015
 002  Albas              Dan             Central Okanagan/Similkameen/ BC Conservative     2015
               --------------- samples of all parties --------------
 010  Anderson           David           Cypress Hills/Grasslands      SK Conservative     2015
 011  Angus              Charlie         Timmins/James Bay             ON NDP              2015
 023  Barsalou-Duval     Xavier          Pierre-Boucher/Les Patriotes/ QC Bloc Quebecois   2015
 032  Bernier            Maxime          Beauce                        QC People's Party   2015
 202  May                Elizabeth       Saanich/Gulf Islands          BC Green Party      2015
 328  Wilson-Raybould    Jody            Vancouver Granville           BC Independent      2015
               ----------------- Last of 335 MP's ------------------
 335  Zimmer             Bob             Prince George/Peace River/Nor BC Conservative     2015

sample selection from CAnadian Members of Parliament

 uvcopy selectlf1,fili1=dat1/CanadaMPs,arg1=1@AB:2@Liberal
 ========================================================
  - select "Liberal" party members from "AB" (Alberta)
  - report created in selects/... named by concatenating directory + patterns

 # Report: selects/dat1_CanadaMPs_1@AB:2@Liberal
 # ---> uvcopy selectlf1,fili1=dat1/CanadaMPs,arg1=1@AB:2@Liberal
 #      =========================================================================
 #format: uvcopy selectlf1,fili1=inputfile,arg1=pattern1:pattern2,etc,uop=i0/i1
 # arg1 - line selection conditions (up to 9 patterns to match or not-match)
 # - code '^' circumflex for ' ' spaces and '%' percent for ',' commas in patterns
 # - may prefix patterns with '-' for absence, '+' for presence (default)
 # - may restrict search area, example: arg1=@0[20]Townsend:@20[60]Owen
 # - multiple conditions: arg1=+1@Townsend:+2@Canada,-1@Owen,-2@BC
 # - combination ex: arg1=+1@0[20]Townsend:+2@60[60]Canada:-@0[20]Owen
 # Date=2019/07/06_16:32:34, Site=UV_Software, Host=uvsoft5, User=uvadm, Options=
 #===============================================================================
 042  Boissonnault       Randy           Edmonton Centre               AB Liberal          2015
 140  Hehr               Kent            Calgary Centre                AB Liberal          2015
 294  Sohi               Amarjeet        Edmonton Mill Woods           AB Liberal          2015
 # EOF - 3 lines selected from dat1/CanadaMPs

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3E2. Select Jobs - *selectlf1, selectlfd1, selectlgfd1

suggested patterns for searching dat1/CanadaMPs

Here are some suggested search patterns you might run on the CAnadian Members of Parliament file (for tutorials & self training on Select Jobs).

Here are 1st 3 of the 335 records with a column scale in case you wish to test select job searches with restricted areas. Note scale is 1 relative, but you must code the zero relative values for restricted area searches.

          1         2         3         4         5         6         7         8         9       100
 1234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890
 001  Aboultaif          Ziad            Edmonton Manning              AB Conservative     2015
 002  Albas              Dan             Central Okanagan/Similkameen/ BC Conservative     2015
 003  Albrecht           Harold          Kitchener/Conestoga           ON Conservative     2015

search CanadaMPs MP file for Liberals in Vancouver

 uvcopy selectlf1,fili1=dat1/CanadaMPs,arg1=1@70[2]BC:2@Liberal:3@Vancouver
 ==========================================================================
 - select MP's from "BC" who are "Liberal"s from "Vancouver" --> result 5 records

 117  Fry                Hedy            Vancouver Centre              BC Liberal          2015
 128  Goldsmith-Jones    Pamela          West Vancouver/Sunshine Coast BC Liberal          2015
 223  Murray             Joyce           Vancouver Quadra              BC Liberal          2015
 272  Sajjan             Harjit S.       Vancouver South               BC Liberal          2015
 327  Wilkinson          Jonathan        North Vancouver               BC Liberal          2015
 # EOF - 5 lines selected from dat1/CanadaMPs

Other searches showing only number of matches expected

 uvcopy selectlf1,fili1=dat1/CanadaMPs,arg1=AB
 =============================================
 - select all 'MP's from Alberta --> result = 34 records
 - see if you get the same result ?

 uvcopy selectlf1,fili1=dat1/CanadaMPs,arg1=@70[2]AB
 ===================================================
 - restrict search for "AB" to columns 71-72 (in case AB occurring elsewhere)
 - we got the same number of records (34), so "AB" did not occur elsewhere
 - Next, let's try case insensitive to see if "ab" does occur elsewhere

 uvcopy selectlf1,fili1=dat1/CanadaMPs,arg1=ab
 =============================================
 - search for "ab" vs "AB", will not work, since default is case sensitive
 --> gets 15 unrelated records with "ab" as parts of names

 uvcopy selectlf1,fili1=dat1/CanadaMPs,arg1=ab,uop=s1  - case insensitive option 's1'
 ====================================================  - "ab" same as "AB"
 - option 's1' (case insensitive) gets --> 52 records (18 more)

 uvcopy selectlf1,fili1=dat1/CanadaMPs,arg1=...
 ==============================================
 - continue testing with your own patterns

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3E3. Select Jobs - *selectlf1, selectlfd1, selectlgfd1

searching with > & < conditions

Searching for > & < can only be used on fields with fixed-positions. We will demo using dat1/CanadaMPs which has the year elected in columns 91-94 (zero relative 90-93). Here are 1st 3 of 335 records with a column scale.

          1         2         3         4         5         6         7         8         9       100
 1234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890
 001  Aboultaif          Ziad            Edmonton Manning              AB Conservative     2015
 002  Albas              Dan             Central Okanagan/Similkameen/ BC Conservative     2015
 003  Albrecht           Harold          Kitchener/Conestoga           ON Conservative     2015

 #1. uvcopy "selectlf1,fili1=dat1/CanadaMPs,arg1=1@Conservative:2@90[4]>2015"
     ========================================================================
     - search for Conservatives elected since 2015
     - must enclose command in quotes when '<' or '>' used

 #2. cat selects/dat1_CanadaMPs_1@Conservative:2@90[4]_2015
     ======================================================
     - display output report (or could have replied just 'cat' at the prompt)

 022  Barrett            Michael         Leeds/Grenville/Thousand Isla ON Conservative     2018
 030  Benzen             Bob             Calgary Heritage              AB Conservative     2017
 074  Davidson           Scot            York/Simcoe                   ON Conservative     2019
 102  Falk               Rosemarie       Battlefords/Lloydminster      SK Conservative     2017
 164  Kusie              Stephanie       Calgary Midnapore             AB Conservative     2017
 182  Lloyd              Dane            Sturgeon River/Parkland       AB Conservative     2017
 197  Martel             Richard         Chicoutimi/Le Fjord           QC Conservative     2018
 222  Motz               Glen            Medicine Hat/Cardston/Warner  AB Conservative     2016
 # EOF - 8 lines selected from dat1/CanadaMPs

Try some other commands such as:

 uvcopy "selectlf1,fili1=dat1/CanadaMPs,arg1=1@Green:2@90[4]>2015:1@NDP:2@90[4]>2015"
 ====================================================================================
 195  Manly              Paul            Nanaimo/Ladysmith             BC Green Party      2019
 293  Singh              Jagmeet         Burnaby South                 BC NDP              2019

 uvcopy "selectlf1,fili1=dat1/CanadaMPs,arg1=1@Green:2@90[4]>2015:3@90[4]<2020"
 ==============================================================================
 195  Manly              Paul            Nanaimo/Ladysmith             BC Green Party      2019

Notes

1. You must enclose command in quotes when '<' or '>' used
   
   
2. Output files (named from filename & arg1 concatenated) will have any '>' & '<' replaced by '_' underscores
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3F1. SelectJobs: *selectlf1* ,selectlfd1,selectlgfd1,selectlgfd2,selectfdd1

selectlfd1 - SELECT from all files in a directory

'selectlfd1' will select lines from all files in a directory, vs 'selectlf1' which selects lines for only 1 file at a time. We will demo using a directory of SQL scripts $UV/demo/sqls/... (copied to /home/userxx/demo/sqls/...)

4 SQL "customer" scripts in sqls/...

/* select_customers_all */ SELECT * FROM Customers;

 /* select_customers_basic */
     SELECT Name, Phone, Address, City, Zip
            FROM Customers;

/* select_customers_sales10000 */ SELECT custno, Name, Phone, Address, City, Zip, TYsales, LYsales, FROM Customers WHERE LYsales >10000;

/* select_customers_sales20000 */ SELECT custno, Name, Phone, Address, City, Zip, TYsales, LYsales, FROM Customers WHERE LYsales >20000;

select "customer" references from all scripts in directory

 uvcopy selectlfd1,fild1=sqls,arg1=1@SELECT:2@FROM:3@Customers,uop=s1
 ====================================================================
 - select lines with "SELECT","FROM",& "Customers" from all files in sqls/*
 - best to use option 's1' case insensitive

 # Report: selects/sqls_1@SELECT:2@FROM:3@Customers
 # ---> uvcopy selectlfd1,fild1=sqls,arg1=1@SELECT:2@FROM:3@Customers,uop=s1
 #      ====================================================================
 #format: uvcopy selectlf1,fili1=inputfile,arg1=pattern1:pattern2,etc,uop=i0/i1
 # Date=2019/06/03_17:06:11, Site=UV_Software, Host=uvsoft5, User=uvadm, Options=s1
 #=================================================================================
     SELECT * FROM Customers;
                               EOF - 1 lines selected from sqls/select_customers_all
 # EOD - 1 lines selected from 11 files in directory sqls

PROBLEM Notes

1. File#1 was the only file with all 3 words on the same line (as required by selectlfd1). It would be better to select the Multi-Line SQL statement vs 1 matching line.
   
   
2. See alternative jobs 'selectlgfd1' on the next page to select line groups from arg1="SELECT" until arg2=";" ending SQL statements qualified by arg3 match to 1 or multiple words on 1 line. Or see 'selectlgfd2' which can qualify by matching multiple words on any line between arg1 & arg3.
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3G1. SelectJobs: selectlf1,selectlfd1, *selectlgfd1*, selectlgfd2,selectfdd1

selectlgfd1 - Multi-Condition-Series on any ONE line

'selectlgfd1' will select line groups from arg1=... until arg2=... qualified by arg3 matches to 1 or multiple words on 1 line. Here is an example where arg1=SELECT, & arg2=; (begin & end of SQL SELECT statement), qualified by "Customers" & "LYsales", which must appear on the same line for selectlgfd1 (vs selectlgfd2 any line).

 uvcopy "selectlgfd1,fild1=sqls,arg1=SELECT^,arg2=;,arg3=1@Customers:2@LYsales,uop=s1"
 =====================================================================================

 # # Report: selects/sqls_SELECT_1@Customers:2@LYsales
 # # ---> uvcopy selectlgfd1,fild1=sqls,arg1=SELECT,arg2=;,arg3=1@Customers:2@LYsales
 # #      ===========================================================================
 # # format: uvcopy selectlgfd1,fild1=directory,arg1=...,arg2=...,arg3=...,arg4=...,uop=abcdgi
 # # arg1 patterns identify begin-group line, arg2 patterns identify end-group line
 # # arg3 patterns qualify group selection, arg4 patterns qualify lines to output/print
 # #  - code '^' circumflex for ' ' spaces and '%' percent for ',' commas in patterns
 # #  - may prefix patterns: '-' for absence, '+' for presence (default)
 # #  - may restrict search area: arg2=@0[2]/*  <-- "/*" must be in 1st 2 bytes
 # #  - multiple-condition-series: arg3=1@SORT:2@COND:3@AND:4@OR <-- ALL patterns must match
 # # Date=2019/06/03_12:40:18, Site=UV_Software, Host=uvsoft5, User=uvadm, Options=
 # #===============================================================================
 #     SELECT custno, Name, Phone, Address, City, Zip,
 #     TYsales, LYsales, FROM
 #     Customers WHERE LYsales >10000;
 #                          EOG: #1, 3 lines selected from sqls/select_customers_sales10000
 #                          EOF:     3 selected from 4 in sqls/select_customers_sales10000
 # EOD: 11 files, 36 lines, selected 1 groups, 3 lines to selects/sqls_SELECT_1@Customers:2@LYsales_s1

Notes Re: *selectlfgfd1 (& selectlgfd2) vs prior selectlf1/selectlfd1

1. This 'selectlgfd1' shows the complete SQL statement (from "SELECT" to ending ";") (vs 'selectlf1' & 'selectlfd1' which showed only the lines with the search argument)
   
   
2. 'selectlgf1' qualifies the group selection by arg3 patterns, but multiple conditional series patterns (1,2,3,etc) must appear on the same line.
   
   
3. For the 'selectlgfd1' above, we get only 1 of 4 statements (SELECT FROM Customers) because only file#3 had both "Customers" & "LYsales" on the same line.
   
   
4. See next page example 'selectlgfd2', which can qualify the group selection by arg3 conditional series patterns (1,2,3,etc) using multiple words that can appear on "ANY LINE between the arg1/arg2 begin/end patterns".
   
   
5. Note difference between selectlgfd1 & selectlgfd2: 'selectlgfd1' arg3 qualifiers must appear on SAME LINE between arg1/arg2 patterns. 'selectlgfd2' arg3 qualifiers can appear on ANY LINE between arg1/arg2 patterns.
   
   
6. Note that we need to enclose the uvcopy "selectlgfd1...arg2=;,..." command in quotes when the arguments include characters such as ';'
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3G2. SelectJobs: selectlf1,selectlfd1,selectlgfd1, *selectlgfd2*, selectfdd1

selectlgfd2 - Multi-Condition-Series on MULTI lines (vs 1 line)

'selectlgf2' will select line groups from arg1=... until arg2=... qualified by arg3 matches to 1 or multiple words on ANY line in the Group. Here is an example where arg1=SELECT, & arg2=; (begin & end of SQL SELECT statement), qualified by "Customers" & "LYsales", which may appear on ANY line (vs selectlgfd1 one line).

 uvcopy "selectlgfd2,fild1=sqls,arg1=SELECT^,arg2=;,arg3=1@Customers:2@LYsales,uop=s1"
 =====================================================================================

 # # Report: selects/sqls_SELECT_1@Customers:2@LYsales
 # # ---> uvcopy selectlgfd2,fild1=sqls,arg1=SELECT,arg2=;,arg3=1@Customers:2@LYsales,uop=s1
 # #      ==================================================================================
 # # format: uvcopy selectlgfd2,fild1=directory,arg1=...,arg2=...,arg3=...,arg4=...,uop=abcdgi
 # # arg1 patterns identify begin-group line, arg2 patterns identify end-group line
 # # arg3 patterns qualify group selection, arg4 patterns qualify lines to output/print
 # #  - code '^' circumflex for ' ' spaces and '%' percent for ',' commas in patterns
 # #  - may prefix patterns: '-' for absence, '+' for presence (default)
 # #  - may restrict search area: arg2=@0[2]/*  <-- "/*" must be in 1st 2 bytes
 # #  - multiple-condition-series: arg3=1@SORT:2@COND:3@AND:4@OR <-- ALL patterns must match
 # # Date=2019/06/03_12:43:54, Site=UV_Software, Host=uvsoft5, User=uvadm, Options=
 # #===============================================================================
 #     SELECT custno, Name, Phone, Address, City, Zip,
 #     TYsales, LYsales, FROM
 #     Customers WHERE LYsales >10000;
 #                          EOG: #1, 3 lines selected from sqls/select_customers_sales10000
 #                          EOF:     3 selected from 4 in sqls/select_customers_sales10000
 #     SELECT custno, Name, Phone, Address, City, Zip,
 #     TYsales, LYsales, FROM
 #     Customers
 #     WHERE LYsales >20000;
 #                          EOG: #1, 4 lines selected from sqls/select_customers_sales20000
 #                          EOF:     4 selected from 5 in sqls/select_customers_sales20000
 # EOD: 11 files, 36 lines, selected 2 groups, 7 lines to selects/sqls_SELECT_1@Customers:2@LYsales_s1

Notes Re: *selectlfgfd2 (& selectlgfd1) vs prior selectlf1/selectlfd1

1. Both selectlgfd1 & *selectlgfd2 shows complete SQL statements ("SELECT" to ending ";") (vs 'selectlf1' & 'selectlfd1' which showed only the lines with the search argument).
   
   
2. 'selectlgf1' qualifies the group selection by arg3 patterns, but multiple conditional series patterns (1,2,3,etc) must appear on the SAME line. For 'selectlgfd1', we got only 1 of 4 statements because only file#3 had both "Customers" & "LYsales" on SAME line.
   
   
3. This 'selectlgfd2' can qualify the group selection by arg3 conditional series patterns using multiple words that can appear on ANY line between the arg1/arg2 begin/end patterns.
   
   
4. Note difference between selectlgfd1 & selectlgfd2: 'selectlgfd1' arg3 qualifiers must appear on SAME LINE between arg1/arg2 patterns. 'selectlgfd2' arg3 qualifiers can appear on ANY LINE between arg1/arg2 patterns.
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3H1. SelectJobs: selectlf1,selectlfd1, *selectlgfd1*, selectlgfd2,selectfdd1

selectlgfd1 - select JCL SYSINs with AND & OR conditions

We need to inspect SORT INCLUDE/OMIT CONDitions with both "AND"s & "OR"s which may need manual corrections. Here is the command line, followed by the report.

 uvcopy selectlgfd1,fild1=jcl2,arg1=//SYSIN,arg2=/*,arg3=1@COND:2@AND:1@COND:2@OR
 ================================================================================

 # Report: selects/jcl2_SYSIN_1@COND:2@AND:1@COND:2@OR%
 # ---> uvcopy selectlgfd1,fild1=jcl2,arg1=//SYSIN,arg2=/*,arg3=1@COND:2@AND:1@COND:2@OR%
 #      =========================================================================
 # format: uvcopy selectlgfd1,fild1=directory,arg1=...,arg2=...,arg3=...,arg4=...,uop=abcdgi
 # arg1 patterns identify begin-group line, arg2 patterns identify end-group line
 # arg3 patterns qualify group selection, arg4 patterns qualify lines to output/print
 #  - code '^' circumflex for ' ' spaces and '%' percent for ',' commas in patterns
 #  - may prefix patterns: '-' for absence, '+' for presence (default)
 #  - may restrict search area: arg2=@0[2]/*  <-- "/*" must be in 1st 2 bytes
 #  - multiple-condition-series: arg3=1@SORT:2@COND:3@AND:4@OR <-- ALL patterns must match
 # Date=2019/06/09_10:26:58, Site=UV_Software, Host=uvsoft5, User=uvadm, Options=
 #===============================================================================
 //SYSIN    DD *
 SORT FIELDS=(31,6,CH,A,1,6,CH,A)
 OMIT COND=((11,2,CH,EQ,C'65'),OR,(COND=(11,2,CH,EQ,C'85'))
 /*
                          EOG: #1, 4 lines selected from jcl2/jar200
                          EOF:     4 selected from 23 in jcl2/jar200
 //SYSIN    DD *
 SORT FIELDS=(1,8,CH,A,69,12,CH,A)
 INCLUDE COND=((9,1,CH,EQ,C'T'),
           AND,(COND=(56,2,CH,EQ,C'BC'))
 /*
                          EOG: #1, 5 lines selected from jcl2/jgl230
                          EOF:     5 selected from 34 in jcl2/jgl230
 //SYSIN    DD *
 SORT FIELDS=(1,8,CH,A,69,12,CH,A)
 INCLUDE COND=(((9,1,CH,EQ,C'T'),OR,(COND=(9,1,CH,EQ,C'X'))),
                                 AND,(COND=(56,2,CH,EQ,C'AB')))
 /*
                          EOG: #1, 5 lines selected from jcl2/jgl232
                          EOF:     5 selected from 35 in jcl2/jgl232
 EOD: 7 files, 168 lines, selected 3 groups, 13 lines to selects/jcl2_SYSIN_1@COND:2@AND:1@COND:2@OR

Notes re tts & selectlgfd1 demo

1. demo/jcl2/* contains 7 demo JCLs with 5 SYSINs (3 of them sorts). 'arg1=//SYSIN' defines the group starting line & arg2=/*' defines the group ending line.
2. 'arg3=1@COND:2@AND:1@COND:2@OR' defines the select group conditions. This arg3 selects groups with lines that contain ("COND" & "AND") OR ("COND" & "OR"). The pattern rules are the same as for the 'sst' instruction (preceding).
3. Better if we could select ONLY the groups with BOTH AND & OR, since it is only those that need correction, But 'selectlgfd1' (using 'tts' instruction) can not do this, Because its multi conditions apply to single lines & not to all lines in the group
4. See 'selectlgfd2 (using the 'ttx' instruction), which searches for all lines in the group to satisfy multi condition series patterns (1,2,3,etc).
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3H2. SelectJobs: selectlf1,selectlfd1,selectlgfd1, *selectlgfd2*, selectfdd1

selectlgfd2 - select JCL SYSINs with AND & OR conditions (BETTER)

'selectlgfd2' can do a BETTER job of selecting ONLY the SYSINs with BOTH ANDs & ORs (vs 'selectlgfd1 which could only select SYSINs with EITHER AND or OR)

 uvcopy selectlgfd2,fild1=jcl2,arg1=1@//SYSIN,arg2=/*,arg3=1@COND:2@AND:3@OR%
 ============================================================================

 # Report: selects/jcl2_SYSIN_1@COND:2@AND:3@OR%
 # ---> uvcopy selectlgfd2,fild1=jcl2,arg1=//SYSIN,arg2=/*,arg3=1@COND:2@AND:3@OR%
 #      =========================================================================
 # format: uvcopy selectlgfd2,fild1=directory,arg1=...,arg2=...,arg3=...,arg4=...,uop=abcdgi
 # arg1 patterns identify begin-group line, arg2 patterns identify end-group line
 # arg3 patterns qualify group selection, arg4 patterns qualify lines to output/print
 #  - code '^' circumflex for ' ' spaces and '%' percent for ',' commas in patterns
 #  - may prefix patterns: '-' for absence, '+' for presence (default)
 #  - may restrict search area: arg2=@0[2]/*  <-- "/*" must be in 1st 2 bytes
 #  - multiple-condition-series: arg3=1@SORT:2@COND:3@AND:4@OR <-- ALL patterns must match
 # Date=2019/06/09_10:29:01, Site=UV_Software, Host=uvsoft5, User=uvadm, Options=
 #===============================================================================
 //SYSIN    DD *
 SORT FIELDS=(1,8,CH,A,69,12,CH,A)
 INCLUDE COND=(((9,1,CH,EQ,C'T'),OR,(COND=(9,1,CH,EQ,C'X'))),
                                 AND,(COND=(56,2,CH,EQ,C'AB')))
 /*
                          EOG: #1, 5 lines selected from jcl2/jgl232
                          EOF:     5 selected from 35 in jcl2/jgl232
 EOD: 7 files, 168 lines, selected 1 groups, 5 lines to selects/jcl2_SYSIN_1@COND:2@AND:3@OR%

Notes re ttx vs tts & selectlgfd2 vs selectlgfd1

1. Compare this selectlgfd2 (using the 'ttx' instruction) search result to the previous selectlgfd1 (using the 'tts' instruction).
   
   
2. selectlgfd1/tts selection was 'arg3=1@COND:2@AND:1@COND:2@OR', which selected groups with (COND & AND) or (COND & OR). The result would include extra groups that do not need correction - ONLY groups with BOTH (AND & OR) may need correction.
   
   
3. selectlgfd2/ttx selection is 'arg3=1@COND:2@AND:3@OR', which selects ONLY groups with BOTH ("AND" & "OR"), ie only those that may need correction.
   
   
4. The 'tts' instruction), bases multi condition series patterns (1,2,3,etc) only on patterns found on any 1 line in the group.
   
   
5. The 'ttx' instruction), bases multi condition series patterns (1,2,3,etc) on patterns found on any line in the group.
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3I1. SelectJobs: selectlf1,selectlfd1,selectlgfd1,selectlgfd2, *selectfdd1*

select ENTIRE FILE to a 2nd directory - arg1=patterns on 1 line

You could use 'selectfdd1' to select the entire SQL script. 'selectfdd1' selects entire files from the input directory to an output directory.

 'selectfdd1' can be use with BOTH multi-pattern-conditional-series-selection methods
 - based on arg1=multi-patterns on any 1 line AND/OR on arg2=multi-patterns on any line
   in the entire file.

Example#1 will test the arg1 method which selects multi-patterns on ONE line. (Also see Ex#2 on the next page which selects multi-patterns on any line in the file)

selectfdd1 Example#1 - multi-patterns on 1 line (arg1)

 #1. mkdir tmp2 OR rm -f tmp2/*   <-- make an output dir OR clear existing dir
     ==========================

 #2. uvcopy "selectfdd1,fild1=sqls,fild2=tmp2,arg1=1@Customers:2@LYsales,uop=s1t1"
     =========================================****================================
      - select files from sqls/* referencing "Customers" & "LYsales"
        (appearing on ONE line in the file)

stats Report written to selects/...

 # Report: selects/sqls_tmp2_sqls_1@customers:2@lysales
 # ---> uvcopy selectfdd1,fild1=sqls,fild2=tmp2,arg1=1@customers:2@lysales,uop=s1t1
 #      ===========================================================================
 #format: uvcopy selectfdd1,fild1=indir,fild2=outdir,arg1=LinePatterns,arg2=FilePatterns
 # Date=2019/06/03_20:56:02, Site=UV_Software, Host=uvsoft5, User=uvadm, Options=s1t1
 #============----===================================================================
   EOF - 4 lines written to tmp2/select_customers_sales10000
 **EOD Input  - 36 lines  read from 11 files in directory sqls
 **EOD Output - 4 lines written to 1 files in directory tmp2

 #3. cat tmp2/*     <-- display output files
     ==========

/* select_customers_sales10000 */ SELECT custno, Name, Phone, Address, City, Zip, TYsales, LYsales, FROM Customers WHERE LYsales >10000;

Notes Re selectfdd1 selections by *arg1 or arg2

1. Using "arg1=1@Customers:2@LYsales" we get only 1 of the 2 files that have both "Customers" & "LYsales" - because the other file has these patterns on different lines.
   
   
2. See Ex#2 on the next page which selects multi-patterns on any line in the file. - coding search args on arg2=... finds multi-patterns on any line in the file (vs arg1=... which looks for multi-patterns on the same line).
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3I2. SelectJobs: selectlf1,selectlfd1,selectlgfd1,selectlgfd2, *selectfdd1*

select ENTIRE FILE to a 2nd directory - arg2=patterns on ANY line

 'selectfdd1' can be use with BOTH multi-pattern-conditional-series-selection methods
 - based on arg1=multi-patterns on any 1 line AND/OR on arg2=multi-patterns on any line
   in the entire file.

Example#1 (on previous page) used 'arg1=...' which looks for multi-patterns on ONE line. This Example#2 uses 'arg2=...' which looks for multi-patterns on any line in the file.

selectfdd1 Example#2 - multi-patterns on ANY line (arg2)

 #1. mkdir tmp2 OR rm -f tmp2/*   <-- make an output dir OR clear existing dir
     ==========================

 #2. uvcopy "selectfdd1,fild1=sqls,fild2=tmp2,arg2=1@select:2@customers:3@lysales,uop=s1t1"
     =========================================****=========================================
      - select files from sqls/* referencing "Customers" & "LYsales"
        (appearing on ANY line in the file)

stats Report written to selects/...

 # Report: selects/sqls_tmp2_sqls_1@select:2@customers:3@lysales
 # ---> uvcopy selectfdd1,fild1=sqls,fild2=tmp2,arg2=1@select:2@customers:3@lysales,uop=s1t1
 #      ====================================================================================
 #format: uvcopy selectfdd1,fild1=indir,fild2=outdir,arg1=LinePatterns,arg2=FilePatterns
 # Date=2019/06/03_20:34:37, Site=UV_Software, Host=uvsoft5, User=uvadm, Options=s1t1
 #===================================================================================
   EOF - 4 lines written to tmp2/select_customers_sales10000
   EOF - 5 lines written to tmp2/select_customers_sales20000
 **EOD Input  - 36 lines  read from 11 files in directory sqls
 **EOD Output - 9 lines written to 2 files in directory tmp2

 #3. cat tmp2/*     <-- display output files
     ==========

/* select_customers_sales10000 */ SELECT custno, Name, Phone, Address, City, Zip, TYsales, LYsales, FROM Customers WHERE LYsales >10000;

/* select_customers_sales20000 */ SELECT custno, Name, Phone, Address, City, Zip, TYsales, LYsales, FROM Customers WHERE LYsales >20000;

Notes selections by arg1 or *arg2 & options 's1t1'

1. Example#2 using arg2=..., gets both the files that have "Customers" & "LYsales" vs prior Example#1 which got only 1 file with "Customers" & "LYsales" on same line.
   
   
2. To use option s1 with selectlgfd2, you need to also specify option 't1' which translates the data file to lower case when loaded into memory.
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3J1. Vancouver Utility Programming Aids - Selectjobs

Select Demos using dat1/UScongress

$UV/dat1/UScongress is a data file of US Governament Representatives & Senators that we will use for demos & that you can use for self training using SelectJobs.

We downloaded a spreadsheet, extracted a csv file (dat1/UScongress.csv) & converted to a fixed layout so we could define specific fields required for some selections. See '20E1' if you are interested to see the uvcopy job (demo/pf/UScongressfix).

Here are the samples of the 539 records with a column scale in case you wish to test select job searches with restricted areas.

samples US Reps & Senators .csv converted to fixed field

 Abraham,Ralph,,,,Ralph Lee Abraham,1954-09-16,M,rep,LA,5,,Republican,
 Adams,Alma,,,,Alma S. Adams,1946-05-27,F,rep,NC,12,,Democrat,
 Aderholt,Robert,B.,,,Robert B. Aderholt,1965-07-22,M,rep,AL,4,,Republican,
          1         2         3         4         5         6         7         8
 12345678901234567890123456789012345678901234567890123456789012345678901234567890
 001  Abraham             Ralph          19540916  M  LA  rep  Republican
 002  Adams               Alma           19460527  F  NC  rep  Democrat
 003  Aderholt            Robert         19650722  M  AL  rep  Republican
              ---------- omitting 533 lines ----------
 537  Young               Don            19330609  M  AK  rep  Republican
 538  Young               Todd           19720824  M  IN  sen  Republican
 539  Zeldin              Lee            19800130  M  NY  rep  Republican

sample selection from UScongress testfile

 uvcopy selectlf1,fili1=dat1/UScongress,arg1=1@57[3]sen:2@53[2]OH
 ================================================================
  - select "senators" from OHio
  - report created in selects/... named by concatenating file + patterns

 # Report: selects/dat1_UScongress_1@57[3]sen:2@53[2]OH
 # ---> uvcopy selectlf1,fili1=dat1/UScongress,arg1=1@57[3]sen:2@53[2]OH
 #      =========================================================================
 #format: uvcopy selectlf1,fili1=inputfile,arg1=pattern1:pattern2,etc,uop=i0/i1
 # arg1 - line selection conditions (up to 9 patterns to match or not-match)
 # - code '^' circumflex for ' ' spaces and '%' percent for ',' commas in patterns
 # - may prefix patterns with '-' for absence, '+' for presence (default)
 # - may restrict search area, example: arg1=@0[20]Townsend:@20[60]Owen
 # - multiple conditions: arg1=+1@Townsend:+2@Canada,-1@Owen,-2@BC
 # - if no seq#s (+1,+2,etc) default selects if any +pattern & no -pattern
 # - combination ex: arg1=+1@0[20]Townsend:+2@60[60]Canada:-@0[20]Owen
 # Date=2019/07/07_10:29:30, Site=UV_Software, Host=uvsoft5, User=uvadm, Options=
 #===============================================================================
 050  Brown               Sherrod        19521109  M  OH  sen  Democrat
 384  Portman             Robert         19551219  M  OH  sen  Republican
 # EOF - 2 lines selected from dat1/UScongress

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3J2. Select Demos using selectlf1 & UScongress file

suggested patterns for searching dat1/UScongress

Here are some suggested search patterns you might run on the UScongress testfile for tutorials & self training on Select Jobs.

Here are 1st 3 of the 539 records with a column scale in case you wish to test select job searches with restricted areas. Note scale is 1 relative, but you must code the zero relative values for restricted area searches.

 #        1         2         3         4         5         6         7         8
 #2345678901234567890123456789012345678901234567890123456789012345678901234567890
 001  Abraham             Ralph          19540916  M  LA  rep  Republican
 002  Adams               Alma           19460527  F  NC  rep  Democrat
 003  Aderholt            Robert         19650722  M  AL  rep  Republican

search UScongress file for Female Democrats from teXas

 uvcopy selectlf1,fili1=dat1/UScongress,arg1=1@50[1]F:2@62[15]Democrat:3@53[2]TX
 ===============================================================================
 - select Female Democrats from TeXas

 # Report: selects/dat1_UScongress_1@50[1]F:2@62[15]Democrat:3@53[2]TX
 # ---> uvcopy selectlf1,fili1=dat1/UScongress,arg1=1@50[1]F:2@62[15]Democrat:3@53[2]TX
 #      =========================================================================
 # --- omitting 9 lines of HELP info & Date,Site,Host,User (same as prior page) ---
 #===============================================================================
 149  Escobar             Veronica       19690915  F  TX  rep  Democrat
 160  Fletcher            Lizzie         19750213  F  TX  rep  Democrat
 174  Garcia              Sylvia         19500906  F  TX  rep  Democrat
 237  Jackson Lee         Sheila         19500112  F  TX  rep  Democrat
 242  Johnson             Eddie          19351203  F  TX  rep  Democrat
 # EOF - 5 lines selected from dat1/UScongress

search UScongress file for Male Replublicans from CAlifornia

 uvcopy selectlf1,fili1=dat1/UScongress,arg1=1@50[1]M:2@62[15]Republican:3@53[2]CA
 =================================================================================
 - select Male Republicans from CAlifornia

 # Report: selects/dat1_UScongress_1@50[1]M:2@62[15]Republican:3@53[2]CA
 # ---> uvcopy selectlf1,fili1=dat1/UScongress,arg1=1@50[1]M:2@62[15]Republican:3@53[2]CA
 #      =========================================================================
 # --- omitting 9 lines of HELP info & Date,Site,Host,User (same as prior page) ---
 #===============================================================================
 061  Calvert             Ken            19530608  M  CA  rep  Republican
 098  Cook                Paul           19430303  M  CA  rep  Republican
 232  Hunter              Duncan         19761207  M  CA  rep  Republican
 275  LaMalfa             Doug           19600702  M  CA  rep  Republican
 318  McCarthy            Kevin          19650126  M  CA  rep  Republican
 320  McClintock          Tom            19560710  M  CA  rep  Republican
 358  Nunes               Devin          19731001  M  CA  rep  Republican
 # EOF - 7 lines selected from dat1/UScongress

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

3J3. Select Demos using selectlf1 & UScongress file

more examples searching dat1/UScongress

Here are 1st 3 of the 539 records with a column scale so you can verify the field locations specified in the examples below. Note scale is 1 relative, but you must code the zero relative values for restricted area searches.

 #        1         2         3         4         5         6         7         8
 #2345678901234567890123456789012345678901234567890123456789012345678901234567890
 001  Abraham             Ralph          19540916  M  LA  rep  Republican
 002  Adams               Alma           19460527  F  NC  rep  Democrat
 003  Aderholt            Robert         19650722  M  AL  rep  Republican

search UScongress file for Female Democrats born after 1983

 uvcopy "selectlf1,fili1=dat1/UScongress,arg1=1@50[1]F:2@40[4]>1983"
 ===================================================================
 - select Female Democrats born after 1983

 # Report: selects/dat1_UScongress_1@50[1]F:2@40[4]_1983
 # ---> uvcopy selectlf1,fili1=dat1/UScongress,arg1=1@50[1]F:2@40[4]>1983
 #      =========================================================================
 # --- omitting 9 lines of HELP info & Date,Site,Host,User (same as prior page) ---
 #===============================================================================
 156  Finkenauer          Abby           19881227  F  IA  rep  Democrat
 219  Hill                Katie          19870825  F  CA  rep  Democrat
 359  Ocasio-Cortez       Alexandria     19891013  F  NY  rep  Democrat
 492  Torres Small        Xochitl        19841115  F  NM  rep  Democrat
 497  Underwood           Lauren         19861004  F  IL  rep  Democrat
 # EOF - 5 lines selected from dat1/UScongress

search UScongress file for Male Republicans born after 1983

 uvcopy "selectlf1,fili1=dat1/UScongress,arg1=1@50[1]M:2@40[4]>1983"
 ===================================================================
 - select Male Republicans born after 1983

 # Report: selects/dat1_UScongress_1@50[1]M:2@40[4]_1983
 # ---> uvcopy selectlf1,fili1=dat1/UScongress,arg1=1@50[1]M:2@40[4]>1983
 #      =========================================================================
 # --- omitting 9 lines of HELP info & Date,Site,Host,User (same as prior page) ---
 #===============================================================================
 112  Crenshaw            Dan            19840314  M  TX  rep  Republican
 170  Gallagher           Mike           19840303  M  WI  rep  Republican
 182  Gonzalez            Anthony        19840919  M  OH  rep  Republican
 485  Timmons             William        19840430  M  SC  rep  Republican
 # EOF - 4 lines selected from dat1/UScongress

Notes

1. You must enclose command in quotes when '<' or '>' used
   
   
2. Output files (named from filename & arg1 concatenated) will have any '>' & '<' replaced by '_' underscores since >/< are invalid in filenames.
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

Part_4. Vancouver Utility Programming Aids - TableJobs

TableJobs Benefits to Programmers & Analysts

TableJobs are invaluable to IT professionals at any Unix/Linux/Windows site because:

1. TableJobs build summary tables of counts & values to be dumped to a report file at EOF. There are various TableJobs for various file-types (text,fixed,variable), but we think you will find 'table3d' for text files most useful to supply you with statistics from directories of programs, scripts, parameter files, etc.
   
   
2. You specify a Key-Word preceding the Target-Word to be table summarized. For example, given a directory of JCLs, you could specify KeyWord "PGM" preceding the program name in statements such as "// EXEC PGM=programxx".
   
   
3. For FTP scripts, you could table the IP#s following the KeyWord "OPEN", or table the userids & passwords following the KeyWord "USER". For SQL scripts you could table the table-name following the KeyWord "FROM".
   
   
4. You can also create table summary reports from fixed or variable length data-files which may have packed/binary fields (which can be tabled).
   
   
5. You can use Tablejobs to research the impacts of planned changes to your scripts & programs.
   
   
6. TableJobs create reports in subdir stats/... of the current working directory, automatically named from the file or directory concatenated with Keywords used. This allows you to review table history & easily modify & repeat.
   
   
7. The table reports include all relevant info (files,dirs,Keywords,date/time, user,host,etc) to help you document problems & plan proposed changes.
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

TableJobs - Contents

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

TableJobs - Contents (continued)

TableJobs same as UVdemos2 Part 4

TableJobs.htm is the same as UVdemos2.htm#Part_4. TableJobs was duplicated as a separate document because it is 1 of the most useful parts of UVdemos2.

SelectJobs.htm (same as UVdemos2.htm#Part_3) is also a separate document.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4A1. TableJobs - create Table Summaries via Keywords/Targetwords

TableJobs build summary tables of counts & values to be dumped to a report file at EOF. There are various TableJobs for various file-types (text,fixed,variable), but we think you will find 'table3d' most useful to quickly supply you with statistics from directories of programs, scripts, parameter files, etc.

For example, 'table3d' can read all files in the ftps/ directory, searching for KeyWord "open" & count occurrences of the following TargetWord (the IP#).

Example#1 - table summarize all IP#s in FTP scripts

 uvcopy table3d,fild1=ftps,arg1=open
 ===================================
  - read ftps/* search for "open" & count occurrences of following IP#
  - output report created in subdir stats/... & automatically named by concatenating
    directory + keywords separated by underscores

table3d report created in stats/...

 #Report: /home/uvadm/demo/stats/table3d_ftps_open
 # uvcopy table3d,fild1=ftps,arg1=open
 # =====================================================================
 # - scan all files in directory for a keyword & table counts of following word
 # InDir=ftps  Keyword=open  Qual1=   Qual2=
 # WordSepsBlank=  Options=q1a0b3c0d0f0j0l0m0p1s0t0x0w1
 # - default selects following word, use option w2 to table 2nd word, etc
 # - specify arg1=Keyword,arg2=Qualifier-present,arg2=Qualifier-absent
 # &\,$=/>-<:(.');_*[|]"<--- arg4=punctuation to blank for word separation
 # abcdefghjklpqrsuALPRQ<--- equivalents, easier to enter, may enter "all"
 # Date=2019/06/17_12:18:57, Site=UV_Software, Host=uvsoft5, User=uvadm
 #===============================================================================
 #---> uvcopy table3d,fild1=ftps,arg1=open
 table3d  2019/06/17_12:19:01  Counts by Targetword following specified Keyword
 tbl#0001  tblt1f7 e0(48)         argument
 line#   1strec#  %      count  target-word
     1         2  25         1   192.168.0.4
     2         2  25         1   192.168.0.5
     3         2  50         2   192.168.0.6
                 100         4*  *TOTAL*

Notes, Benefits of table3d reports

1. Output reports are automatically created in subdir stats/... named by concatenating the input directory & keywords separated by '_' underscores. The filename is coded on the 1st line of the report.
   
   
2. The uvcopy command used to create the report is coded on the 2nd line, so you can look back at previous runs & repeat them (with modifications as desired).
   
   
3. The reports are date/time stamped with all relevent info (site,host,user,options).
   
   
4. See other examples in the tutorials ahead - userids & passwords in FTP ftps, programs called by all JCLs, table-names used by all SQL scripts, etc.
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4B1. Vancouver Utility Programming Aids - TableJobs

Setup check-list - Ready to run TableJob test/demos ?

We will present a 'setup check-list' here, since you may be reading this in the separate TableJobs.doc vs UVdemos2.doc which includes TableJobs as Part4.

See UVdemos2.htm for the complete setup procedures, but here is a check-list of the steps required before you can execute these test/demos.

1. Install Vancouver Utilities. See complete documenation at install.htm. Also see the install summary at UVdemos2.htm#1A3.
   
   
2. Setup your user login account if not already done. See UVdemos2.htm#1C1. Setup your user profile (.bash_profile or .profile for ksh). User profile in homedir calling common_profile in /home/appsadm/env/...
   
   
3. Setup subdir demo/ in your homedir & copy $UV/demo/* to your $HOME/demo/... See instructions on page '4B3'
   
   
4. Here we list only the datafiles from $UV/dat1/... relevant to TableJobs You can see all the demo/dat1/... files at UVdemos2.doc#1C4.
   
   

   testdata file contents

5. Here in TableJobs, we will usually show just a sample of the relevant testdata files before each test/demo execution. See UVdemos2.htm#1D1 - 1D6 to see all files & all contents of the testdatafiles.
   
   
6. The next page '4B2' will show files in $UV (usually /home/uvadm) that are relevant to TableJobs.
   
   
7. Page '4B3' gives instructions to copy TableJob testfiles to your $HOME/demo/... (shown here as: /home/userxx/demo/...)
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4B2. Vancouver Utility Programming Aids - TableJobs

Vancouver Utilities - subdirs relevant to TableJobs

Here is the Vancouver Utilities homedir showing only the most relevant subdirs required for the TableJob demos documented in this section of UVdemos2.htm.

You could run the demos logged in as 'uvadm', but if you are sharing the system with other uvadm users, it would be better to copy the demo/subdirs/files to your own homedir. See the copy instructions below & an expanded view of the demo/... files on the next page.

 /home/uvadm             <-- $UV
 :-----bin                 - UV binaries (uvcopy,uvsort,uvcp,uvhd,uvlist,etc)
 :-----dat1                - test data files to demo various Vancouver Utilities
 :     :-----...         <-- 200+ testdata files for all uvcopy job demos
 :     :                   - files for TableJobs already copied to demo/dat1/...
 :     :                   - see next page --->
 :-----doc                 - Vancouver Utilities documentation (text)
 :     :-----UVdemos2.doc   - this documentation (1 of 150 files)
 :     :----TableJobs.doc  - Part4 of UVdemos duplicated as a separate document
 :-----dochtml             - documentation in HTML (uploaded to www.uvsoftware.ca)
 :-***-demo              <-- demo files for TestDemo tutorials, copy to your homedir -->
 :     :                   - copy /home/uvadm/demo/* to your /home/userxx/demo/...
 :     :-----dat1          - data files for TableJob demos, see details on next page
 :     :-----jcl2          - mainframe JCL samples (8)
 :     :-----ftps         - SYSIN control cards for various purposes
 :     :-----sqls          - SQL scripts for TableJob demos, see next page -->
 :-----pf                <-- Parameter Files for uvcopy
 :     :-----util            uvcopy TableJobs
 :     :     :-----table1    - table field# in a delimited file
 :     :     :-----table2    - table fixed position field by dsplcmnt(length)
 :     :     :-----table3    - table Target-Word following specified Key-Word for 1 file
 :     :     :-----table3d   - table Target-Word following specified Key-Word
 :     :     :-----            for ALL files in a Directory
 :     :-----adm             - uvcopy jobs for uvadm admin
 :     :-----demo            - uvcopy jobs for various demos
 :     :-----IBM             - uvcopy jobs for Mainframe conversions
 :-----sf                <-- Script Files (bash or Korn shell)
 :     :-----adm             - scripts for uvadm admin
 :     :-----demo            - demo scripts
 :     :-----util            - utility scripts
 :     :-----IBM             - scripts for mainframe conversions
 :-----src               <-- Vancouver Utilities C source code (uvcopy,uvsort,etc)
 :-----tf                  - test files for various demos (similar to dat1/...)
 :-----tmp                 - tmp subdir (test/demo outputs)
 :-----tmp1                - misc, outdir for some utility scripts (like listall1)
 :-----tmp2

Please copy the demo/... files to your homedir to avoid conflict with other users of Vancouver Utilities & to avoid losing your files when new versions of Vancouver Utilities are installed.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4B3. Vancouver Utility Programming Aids - TableJobs

copy $UV/demo to your $HOME/demo/...

 #1. Login userxx --> /home/userxx

 #2. mkdir demo   <-- make directory for copy of demo files in your homedir

 #3. cp -r /home/uvadm/demo/* demo/   <-- copy demo files to your homedir
     ==============================

 #4. cd demo    <-- change into demo/ directory
     =======

TableJobs demo files copied to your homedir

Here is an expanded view of the most relevant subdirs/files required for the TableJob demos (omitting subdirs/files used for other parts of UVdemos2.doc).

 /home/userxx/demo/              - copy to your homedir, cd demo/ & run jobs there
 |-- dat1/                      <-- testdata files for demos
 |   |-- 1README_uvdemos_dat1
 |   |-- CanadaMPs
 |   |-- CanadaProvinces
 |   |-- UScandidates
 |   |-- UScandidateups
 |   |-- UScities
 |   |-- UScongress
 |   |-- USstates1
 |   `-- USstates2
 :-----ftps                    <-- FTP scripts
 :     :ftpdemo1a
 :     :ftpdemo1b
 :     :ftpget1
 :     :ftpput1
 :-----jcl2
 :     :-----jar200.jcl
 :     :-----...etc...
 :-----pf                      <-- uvcopy job Parameter Files, see note below
 :     :-----                    - you could create your own uvcopy jobs here
 :     :
 :-----stats                   <-- output directory for TableJob Reports
 :     :-----ftps_open          - table summary of IP#s in FTP scripts
 :     :-----ftps_user          - userids & passwords in FTP scripts
 :     :-----sqls_FROM           - Table-Names in SQL scripts
 :     :-----CanadaMPs_Province  - Canadian MPs tabled by Province
 :     :-----...                 - Report-Names created from Directory + Keyword
 :     :-----...
 :-----sqls                    <-- SQL scripts for TableJob demos
 :     :-----customers_all
 :     :-----customers_basic
 :     :-----...etc...
 :-----tmp
 :-----tmp1                    <-- tmp dirs for temp files, sorts, etc

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4C1. TableJobs - Table Summary Counts from Keywords/Targetwords

table3d options

The 1st example on page '4A1' did not show the options screen displayed before table3d is executed & the report written to the stats/ directory. Here are the options which we will omit from following examples.

 uvcopy table3d,fild1=dir,arg1=keyword,arg2=qual1,arg3=qual2,arg4=chars2blank,uop=...
 ====================================================================================
 uop=a0b3c0d0f0j0l0m0p1s0t0x0w1 - option defaults
     a1                     - "&" variable end "#", insert space after "#" force endword
     a2                     - discard variables not ending with "#"
       b3                   - assume 1 blank before & after keyword (default)
       b1                   - assume 1 blank before & no blank after
       b2                   - assume no blank before & 1 blank after
       b0                   - assume no blank before or after
         c1                 - bypass comments in COBOL programs (* column 7)
         c2                 - bypass comments in shell scripts (# column 1)
         c4                 - bypass comments in JCL //* cols 1-3
           d1               - insert blank before "$", allow arg1=$
             f0             - do not prepend/append table entry with filename
             f1             - prepend table argument with filename
             f2             - append table argument with filename
               j1           - insert blank before search word in data
               j2           - insert blank after search word in data
               j3           - insert blank & after search word in data
                 l0         - translate lower case before matching patterns
                   m1       - look for multiple keywords on 1 line
                   m2       - look for multiple keywords & prepend targetword
                   m4       - look for multiple keywords & append targetword
                     p1     - qualifier#1 present & qualifier#2 absent
                     p2     - qualifier#1 present & qualifier#2 present
                     p4     - qualifier#1 absent  & qualifier#2 absent
                       s1   - case insensitive translate patterns to lowercase
                         t1 - translate data to lower-case (to match patterns)
                         t2 - translate data to UPPER-case
                     w1     - target word is 1st word following keyword
                     w2     - target word is 2nd word following keyword
                     w0     - target word is same as keyword (partial def)
                   x1       - table w# word (search will ignore keyword)
                            - specified keyword will be inserted in outfilename
                 y#         - table multiple target words (4 max)
                 y3         - would table target word + following 2 words
               z1           - convert x"A3" to "@" in data for keyword "@"
 arg4 special chars to separate words, use with option w# offset from search word
 ------> &\,$=/>-<:(.`);_*[|]" <--- arg4 punctuation chars to blank
 ------> abcdefghjklpqrsuALPRQ <--- OR enter equivalents OR enter "all"
 User OPtion defaults=q1a0b3c0d0f0j0l0m0p1s0t0x0w1 (null accept or enter overrides)
 enter arg1 search keyword ------------>  <-- prompt inhibited if arg1 on cmdline
 enter arg2 qualifier#1 (or null) ----->
 enter arg3 qualifier#2 (or null) ----->
 enter arg4 chars to blank before word sep (comma,equal,etc) -->
 EOJ, Output File written to: stats/ftps_open
 default command = null, OR enter: vi,cat,more,lp,uvlp12,etc -->

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4D1. TableJobs - Table Summary Counts from Keywords/Targetwords

most useful options - option 'w#'

Option 'w' is probably the most useful options you are likely to need. Option w specifies the word# offset of the TargetWord from the KeyWord. It defaults to 'w1' meaning the TargetWord to be tabled & counted is the 1st word following the search KeyWord specified by arg1=...

Here is an example using option w2 (2nd word following search KeyWord) to table summarize the output filenames on FTP 'put' commands. First we will show the relevant FTP script (parm file)

# ftps/ftpdemo1b open 192.168.0.5 user user02 user02pw lcd data1 put ar.sales.items C:\AR\SALES.ITEMS put gl.account.tran1 D:\GL\ACCOUNT.TRAN1

Example#2 - option 'w#' TargetWord offset from KeyWord

 #2. uvcopy table3d,fild1=ftps,arg1=put,uop=w2
     ==========================================
      - search ftps/* for keyword 'put' & table 2nd word following

      ---> cat <-- reply 'cat' to display report

 #2a. vi stats/report3d_ftps_put_w2  <-- OR, enter separate command if job already ended
      =============================

 #Report: /home/uvadm/demo/stats/table3d_ftps_put_w2
 #------> uvcopy table3d,fild1=ftps,arg1=put,uop=w2
 # ==============================================================================
 # - scan all files in directory for a keyword & table counts of following word
 # InDir=ftps  Keyword=put  Qual1=   Qual2=
 # WordSepsBlank=  Options=q1a0b3c0d0f0j0l0m0p1s0t0x0w1w2
 # - default selects following word, use option w2 to table 2nd word, etc
 # - specify arg1=Keyword,arg2=Qualifier-present,arg2=Qualifier-absent
 # &\,$=/>-<:(.');_*[|]"<--- arg4=punctuation to blank for word separation
 # abcdefghjklpqrsuALPRQ<--- equivalents, easier to enter, may enter "all"
 # Date=2020/09/17_09:32:49, Site=UV_Software, Host=uvsoft5, User=uvadm
 #===============================================================================
 #---> uvcopy table3d,fild1=ftps,arg1=put,uop=w2
 table3d  2020/09/17_09:32:59_539  Counts by Targetword following specified Keyword
 tbl#0001  tblt1f7 e0(48)       <----- argument ----->
 line#   1strec#  %      count  target-word
     1         5  50         1   C:\AR\SALES.ITEMS
     2         6  50         1   D:\GL\SCCOUNT.TRAN1
                 100         2*  *TOTAL*

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4D2. TableJobs - Table Summary Counts from Keywords/Targetwords

most useful options - option 'y#'

Option 'y#' specifies the number of keywords to be tabled (default 1). For example, we can table summarize both userid & password following keyword 'user'. Here is a sample using the FTP ftps/* but showing only 1st file:

# ftps/ftpdemo1a open 192.168.0.4 user user01 user01pw lcd data1 get /home/userxx/ar/sales.items get /home/userxx/gl/account.tran1

Example#3 - option 'y' no of words to table

 #3. uvcopy table3d,fild1=ftps,arg1=user,uop=y2
     ===========================================
     - search ftps/* for keyword 'user' & table following 2 words
     --> cat <-- enter at last prompt to display report

 #Report: /home/uvadm/demo/stats/table3d_ftps_user_y2
 # uvcopy table3d,fild1=ftps,arg1=user,uop=y2
 # =====================================================================
 # - scan all files in directory for a keyword & table counts of following word
 # InDir=ftps  Keyword=user  Qual1=   Qual2=
 # WordSepsBlank=  Options=q1a0b3c0d0f0j0l0m0p1s0t0x0w1y2
 # - default selects following word, use option w2 to table 2nd word, etc
 # - specify arg1=Keyword,arg2=Qualifier-present,arg2=Qualifier-absent
 # &\,$=/>-<:(.');_*[|]"<--- arg4=punctuation to blank for word separation
 # abcdefghjklpqrsuALPRQ<--- equivalents, easier to enter, may enter "all"
 # Date=2019/06/17_15:31:41, Site=UV_Software, Host=uvsoft5, User=uvadm
 #===============================================================================
 #---> uvcopy table3d,fild1=ftps,arg1=user,uop=y2
 table3d  2019/06/17_15:31:44  Counts by Targetword following specified Keyword
 tbl#0001  tblt1f7 e0(48)         argument
 line#   1strec#  %      count  target-word
     1         3  25         1  user01 user01pw
     2         3  25         1  user02 user02pw
     3         3  50         2  user03 user03pw
                 100         4*  *TOTAL*

Notes

1. Note that any options entered are concatenated onto the output filename (ftps_user_y2 for the example above). The 1st line of the report file shows you the full path name of the report file (see above).
   
   
2. For these demos, we are coding all arguments & options on the command-line, but you could enter only 'uvcopy table3d' & enter relevant info at the prompts. When we enter all relevant info on the cmdline, we can just make null replies to all following prompts.
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4E1. Vancouver Utility Programming Aids - TableJobs

table3d - create summary table of programs in JCL

This the 4th demo of table3d, now using JCL as input

 #40a. login userxx --> /home/userxx
 #40b. cd demo      --> /home/usrxx/demo

 #1. l    <-- list files in current directory /home/userxx/demo
     ===

      drwxrwxr-x 2 userxx apps 4096 Feb 13 15:01 jcl2
      drwxrwxr-x 2 userxx apps 4096 Feb 13 15:01 jcl3
      drwxrwxr-x 2 userxx apps 4096 Feb 13 06:47 ftps
      drwxrwxr-x 2 userxx apps 4096 Feb 13 06:47 rpts
      drwxrwxr-x 2 userxx apps 4096 Feb 13 06:47 sqls
      drwxrwxr-x 2 userxx apps 4096 Feb 13 15:04 stats

 #2. l jcl2   <-- list jcl2/* input files for 3rd demo of table3d
     ======

      -rw-rw-r-- 1 userxx apps  480 Feb 13 15:01 jar100.jcl
      -rw-rw-r-- 1 userxx apps  613 Feb 13 15:01 jar120.jcl
      -rw-rw-r-- 1 userxx apps  984 Feb 13 15:01 jar200.jcl
      -rw-rw-r-- 1 userxx apps  777 Feb 13 15:01 jgl100.jcl  <-- listed below
      -rw-rw-r-- 1 userxx apps 1238 Feb 13 15:01 jgl200.jcl
      -rw-rw-r-- 1 userxx apps  617 Feb 13 15:01 jgl220.jcl
      -rw-rw-r-- 1 userxx apps 1477 Feb 13 15:01 jgl230.jcl
      -rw-rw-r-- 1 userxx apps  932 Feb 13 15:01 jgl320.jcl

 #3. cat jcl2/jar200.jcl
     ===================

      //JAR200   JOB  (1234),'TEST/DEMO MVS JCL CONVERT'
      //* SORT AR.SALES.ITEMS BY PRODUCT CODE FOR LISTING
      //STEP010  EXEC PGM=SORT,REGION=2048K                      <--Note PGM=SORT
      //SORTIN   DD DSN=AR.SALES.ITEMS,DISP=SHR
      //SORTOUT  DD DSN=&&jar200_TEMPSLS,DISP=(NEW,PASS),...
      //SYSIN    DD *
      SORT FIELDS=(31,6,CH,A,1,6,CH,A)
      OMIT COND=((11,2,CH,EQ,C'65'),OR,(COND=(11,2,CH,EQ,C'85'))
      /*
      //*=================== step# 0020 ========================
      //* LIST AR.SALES.ITEMS IN PRODUCT CODE SEQUENCE
      //STEP020  EXEC PGM=CAR200,COND=(4,LT,STEP010),PARM=2006   <--Note PGM=CAR200
      //SALEDTL  DD DSN=&&jar200_TEMPSLS,DISP=(OLD,PASS)
      //CUSTMAS  DD DSN=AR.CUSTOMER.MASTER.INDEXED,DISP=SHR
      //SALELST  DD DSN=AR.SALES.LIST,DISP=(,CATLG,DELETE),...

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4E2. Vancouver Utility Programming Aids - TableJobs

table summarize PGM names in JCL

 #4. uvcopy table3d,fild1=jcl2,arg1=PGM,arg4=ec,uop=w1q0i7
     =====================================================
     - read following notes before executing above command line

Notes re arguments & options

We will use 'PGM' as the keyword to table summarize the following word (program-name).

Re: 'arg4=ec', arg4 specifies characters to blank before word separation. Some special characters are a problem when entered using arg4=... on the command line so we allow you to use an alpha character to represent & show the equivalents as follows:

&\,$=/-:(.`);_*|" <--- arg4=special chars to blank abcdefhklpqrsuAPQ <--- equivalents, easier to enter

 //STEP010  EXEC PGM=CAR100,PARM=2008

For the above example, we need to blank the '=' & the ',' to separate the words. We used 'arg4=ec' vs 'arg4==,', because the ',' would confuse command parsing.

You could omit arg4=... from command line & enter actual characters at the prompt, but we prefer entering on the command line for this documentation.

Re: options 'uop=w1q0i7'. 'w1' means the target-word is 1st word following the keyword & we did not need to specify since it is the default.

Option 'q0' inhibits prompting for options (not needed if on the command line).

Option 'i7' inhibits displaying the 'opr' commands describing options, etc.

now execute the table3d command

 #5. uvcopy table3d,fild1=jcl2,arg1=PGM,arg4=ec,uop=q0i7
     ===================================================

 enter arg2 qualifier#1 (null=disable) ----->
 enter arg3 qualifier#2 (null=disable) ----->
 enter strings to be removed (use ":" sep if multiple) --->
 190216:160322:table3d: EOF fili01 rds=34 size=1477: demo/jcl2/jgl230.jcl hits=3
 190216:160322:table3d: EOF fili01 rds=23 size=984: demo/jcl2/jar200.jcl hits=2
 190216:160322:table3d: EOF fili01 rds=11 size=480: demo/jcl2/jar100.jcl hits=1
 190216:160322:table3d: EOF fili01 rds=17 size=777: demo/jcl2/jgl100.jcl hits=1
 190216:160322:table3d: EOF fili01 rds=26 size=1238: demo/jcl2/jgl200.jcl hits=2
 190216:160322:table3d: EOF fili01 rds=22 size=932: demo/jcl2/jgl320.jcl hits=2
 190216:160322:table3d: EOF fild01 rds=8 size=4096: demo/jcl2 hits=11
 190216:160322:table3d: EOF filo01 wrts=20 size=1322: stats/jcl2_PGM_ec_w1q0i7
 EOJ, Output File written to: stats/jcl2_PGM_ec_w1q0i7
 default command = null, OR enter: more,print,uvlpr12,edit,null -->

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4E3. Vancouver Utility Programming Aids - TableJobs

table3d output report for 3rd demo JCL programs

 #5a. --> cat <-- suggest 'cat' to view outputs (when known to be small)
          ===   - alternative, null reply & use #6. vi stats/jcl2_PGM_ec_q0i7

 #Report: /home/uvadm/demo/stats/table3d_jcl2_PGM_ec_q0i7
 #------> uvcopy table3d,fild1=jcl2,arg1=PGM,arg4=ec,uop=q0i7
 # ==============================================================================
 # - scan all files in directory for a keyword & table counts of following word
 # InDir=jcl2  Keyword=PGM  Qual1=   Qual2=
 # WordSepsBlank==,  Options=q1a0b3c0d0f0j0l0m0p1s0t0x0w1q0i7
 # - default selects following word, use option w2 to table 2nd word, etc
 # - specify arg1=Keyword,arg2=Qualifier-present,arg2=Qualifier-absent
 # &\,$=/>-<:(.');_*[|]"<--- arg4=punctuation to blank for word separation
 # abcdefghjklpqrsuALPRQ<--- equivalents, easier to enter, may enter "all"
 # Date=2020/09/17_09:35:52, Site=UV_Software, Host=uvsoft5, User=uvadm
 #===============================================================================
 #---> uvcopy table3d,fild1=jcl2,arg1=PGM,arg4=ec,uop=q0i7
 table3d  2020/09/17_09:35:59_988  Counts by Targetword following specified Keyword
 tbl#0001  tblt1f7 e0(48)       <----- argument ----->
 line#   1strec#  %      count  target-word
     1         3   7         1   CAR100
     2        15   7         1   CAR200
     3        27  21         3   CGL100
     4        18  21         3   CGL200
     5        12   7         1   IDCAMS
     6         6   7         1   IEBGENER
     7         5  28         4   SORT
                 100        14*  *TOTAL*

 #6. vi stats/jcl2_PGM_ec_q0i7  <-- view report separately after running table3d
     =========================

General Purpose Utilities

The example above used JCL to test/demo table3d. You may not have JCL, but we hope you can see how table3d might be used with whatever files, scripts,& programming languages you have.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4F1. Vancouver Utility Programming Aids - TableJobs

Writing specific uvcopy jobs vs Pre-Programmed TableJobs

Pre-programmed jobs make it easy to apply the power of uvcopy to your data files - analyzing, selecting, searching/replacing, etc with more options & qualifications than are provided by the standard unix/linux system utilities.

You do not need to know the uvcopy instruction set to use general purpose pre-programmed jobs such as 'table3d', but we hope you will eventually learn the uvcopy instruction set, in case you find situations where you need more specific custom processing.

You can see the instruction file for 'table3d' at /home/uvadm/pf/util/table3d. It has over 250 instructions because it processes all files in a directory & provides many options to search for & qualify keywords & build summary tables of following targetwords.

We will show you here a much simpler table summary job (tableIP) with only 14 essential instructions that creates the same table summary as did the previous 'table3d', but it is written specifically to table summarize IP#s following the word 'open' (vs the general purpose pre-programmed table3d which accepts arguments to summarize any desired item following any desired keyword for all files in directory).

'tableIP' is stored at /home/uvadm/pf/demo/tableIP & you can run as follows:

 #0a. login userxx --> /home/userxx
 #0b. cd demo      --> /home/usrxx/demo

 #1. cat ftps/* >tmp1/ftps_all   <-- concat all ftps/* into 1 file for tableIP
     ===========================

 #2. uvcopy tableIP,fili1=tmp1/ftps_all,filo1=stats/ftps_ftp_tableIP
     =================================================================
     - run demo job to summarize IP#s in 1 file & create table same as previous table3d

 tableIP  2019/06/17_16:22:09  table summarize TCP/IP#s in FTP scripts
 tbl#0001  tblt1   ax6(16)        argument
 line#   1strec#  %      count  FTP IP#
     1         2  25         1  192.168.0.4
     2         9  25         1  192.168.0.5
     3        17  50         2  192.168.0.6
                 100         4*  *TOTAL*

Since this reads only 1 file (vs all files in directory), we concatenate the ftps/* files used for the previous table3d demo into 1 file stored in tmp1/ftps_all for input to uvcopy tableIP.

See the 'tableIP' demo job listed on the next page:

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4F2. Writing customized uvcopy job vs Pre-Programmed TableJobs

tableIP - simplified table summary demo

 # tableIP - table summarize counts of unique TCP/IP#s in FTP scripts
 #         - uvcopy demo job, by Owen Townsend, UV Software, June 2019
 # - demo job used in documentation www.uvsoftware.ca/uvdemos2.htm#2C1
 # - Normally use pre-programmed job 'table3d' to crate summary table counts
 # - This illustrates writing the uvcopy code for a custom table summary
 # - to keep it simple we will 1st concat all parm files into 1 tmp file
 #
 # cat ftps/* >tmp1/ftps_all
 #
 # uvcopy tableIP,fili1=tmp1/ftps_all,filo1=stats/ftps_ftp_tableIP
 # =================================================================
 # - read input fili1=..., build table of IP#s, write to output filo1=... at EOF
 #
 # uvcopy tableIP    <-- same as above, I/O files default as above
 # ==============
 #
 # 'tableIP' is a simplified version of 'table3d' general purpose pre-programmed job
 #   - to create table summaries of ANY item from ALL files in a directory
 #   - without needing to write any uvcopy instructions
 # 'tableIP' builds a table of 1 specific item from only 1 file
 #   - intended to demo the power of uvcopy & encourage you to learn uvcopy
 #   - will scan for lines with word 'open' known to precede the IP#
 #     open 192.168.0.4   <-- scan for lines with 'open' known to precede the IP#
 #
 opr='$jobname - table summarize TCP/IP#s in FTP scripts'
 rop=r1  # option for EOF prompt to view output file
 fili1=?tmp1/ftps_all,rcs=256,typ=LST
 filo1=?stats/ftps_tableIP,rcs=256,typ=LSTt
 @run
         opn     all
 # begin loop to get records, build table until EOF
 man20   get     fili1,a0               get next record into area 'a'
         skp>    man90                  (cc set > at EOF)
         sqzl1c1 a0(80),' '             ensure column 1 blank & 1 blank between words
         scn     a0(80),' open '        scan for ' open ' preceding IP#
         skp!    man20                  if not found - return to get next record
         tblt1   ax6(16),'FTP IP#'      build table counts in memory
         skp     man20                  return to get next record
 # EOF - dump table to output file, close files, end job
 man90   tbpt1  filo1,'table summarize TCP/IP#s in FTP scripts'
         cls    all
         eoj
 #            ** output - stats/ftps_tableIP **
 # tableIP  2019/06/17_16:22:09  table summarize TCP/IP#s in FTP scripts
 # tbl#0001  tblt1   ax6(16)        argument
 # line#   1strec#  %      count  FTP IP#
 #     1         2  25         1  192.168.0.4
 #     2         9  25         1  192.168.0.5
 #     3        17  50         2  192.168.0.6
 #                 100         4*  *TOTAL*

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4F3. Writing customized uvcopy job vs Pre-Programmed TableJobs

Notes re uvcopy demo job 'tableIP'

1. You could use this demo job to learn a lot about the uvcopy instruction set.
   
   
2. Some uvcopy instructions are similar to the IBM 360 Z/OS instruction set, but uvcopy instructions are interpretive, no compile required, just edit & run.
   
   
3. uvcopy gives you the power of assembler in an easy to use framework. In particular, this example will illustrate the power of index registers. uvcopy operands consist of an area (a-z), optionally an index register (a-z), and a displacement. For example op1 of 'tbl' is 'ax6' which is area 'a' + the displacement in register 'x' + the displacement coded ('6') in this example.
   
   
4. 'scn' finds the word ' open ' & stores its displacement in index register 'x', which is then used as by 'tbl' to address the following word for tabling.
   
   
5. All instructions are documented at uvsoftware.ca#uvcopy3.htm. The 1st page is an index with links to the various instructions. Here are direct links to some of the more interesting instructions in tableIP.
   
   

      uvsoftware.ca#uvcopy3.htm#sqz
      uvsoftware.ca#uvcopy3.htm#scn
      uvsoftware.ca#uvcopy3.htm#tbl
      uvsoftware.ca#uvcopy3.htm#tbp

6. Here are a few notes about these 4 instructions use in tableIP & you can click on the links to see the complete doc on any of these.
   
   

 #7a. sqzl1c1 a0(80),' '             ensure column 1 blank & 1 blank between words
      =================
      - option 'l1' of sqzl1c1 ensures 1 blank in column 1
      - option 'c1' of sqzl1c1 ensures 1 blank between words
        so we can know that the word following ' open ' is exactly 6 bytes higher

 #7b. scn     a0(80),' open '        scan for ' open ' preceding IP#
      =======================
      - scn stores the zero relative displacement of ' open ' in register x.

 #7c. tblt1   ax6(16),'FTP IP#'      build table counts in memory
      ========================
      - tblt1 builds table#1 based on the 16 bytes located in area 'a'
        + displacement in register 'x' + 6 = area 'a' + 0 + 6
      - in this example, register 'x' will be 0 for ' open 192.168.0.4 ' since 'open'
        was 1st word on the line & sqzl1c1 has ensured the leading ' ' matching ' open '

 #7d. tbpt1  filo1,'table summarize TCP/IP#s in FTP scripts'
      ======================================================
      - tbpt1 (at EOF) dumps (Prints) the table to the output file (filo1=... above)
      - operand 2 supplies an extra heading for the table.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4G1. Vancouver Utility Programming Aids - TableJobs

table3d - create summaries of TABLEs in SQL scripts

 #0a. login userxx --> /home/userxx
 #0b. cd demo      --> /home/usrxx/demo

 #1a. l        <-- list subdirs in /home/userxx/demo
      ===

      drwxrwxr-x 2 userxx apps 4096 Feb 16 17:16 ctl
      drwxrwxr-x 2 userxx apps 4096 Feb 16 17:16 jcl2
      drwxrwxr-x 2 userxx apps 4096 Feb 16 17:16 jcl3
      drwxrwxr-x 2 userxx apps 4096 Feb 16 17:16 ftps
      drwxrwxr-x 2 userxx apps 4096 Feb 16 17:16 rpts
      drwxrwxr-x 2 userxx apps 4096 Feb 16 17:16 sqls     <-- SQL scripts
      drwxrwxr-x 2 userxx apps 4096 Feb 16 17:16 stats
      drwxrwxr-x 2 userxx apps 4096 Feb 16 17:16 tmp
      drwxrwxr-x 2 userxx apps 4096 Feb 16 17:16 tmp1

 #1b. l sqls     <-- list files in sqls/...
 ===========

      -rw-rw-r-- 1 userxx apps  56 Feb 16 17:16 select_customers_all    <-- simple example
      -rw-rw-r-- 1 userxx apps  97 Feb 16 17:16 select_customers_basic
      -rw-rw-r-- 1 userxx apps 152 Feb 16 17:16 select_customers_WA     <-- PROBLEM
      -rw-rw-r-- 1 userxx apps 136 Feb 16 17:16 select_employee_dept123
      -rw-rw-r-- 1 userxx apps 115 Feb 16 17:16 select_employee_seattle
      -rw-rw-r-- 1 userxx apps  79 Feb 16 17:16 select_orders_big
      -rw-rw-r-- 1 userxx apps 306 Feb 16 17:16 select_patients_old
      -rw-rw-r-- 1 userxx apps 129 Feb 16 17:16 select_students_failing

We can use the known keyword 'FROM' to summarize the following SQL TABLE-name. For example here is the SELECT stmnt from the 1st of the 8 listed on the next page.

      SELECT * FROM Customers;

PROBLEM in SQL scripts for table3d

table3d expects the target-word (to be summarized) to follow the known key-word on the same line, as above, but consider the SELECT in the 3rd SQL script:

       SELECT custno, Name, Birthday, Phone,
       Address, City, Zip, LYsales,Discount, FROM   <-- PROBLEM
       Customers WHERE LYsales >5000;

Our solution is to precede 'table3d' with 'combine1d' which will combine the SQL SELECT statements onto 1 line using the ';' semi-colons that end SQL statements.

Note that combine1d is a general purpose utility & could be used for other file types that you may have. 'arg1=...' defines optional statement begin patterns (up to 8 words) and 'arg4=..." defines the END patterns (up to 8 words, not necessarily 1 character).

'arg2=...' defines up to 8 words that must be present for the stmnt to be selected and 'arg3=...' defines up to 8 words that must be absent for the stmnt to be selected.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4G2. Creating table summaries of SQL TABLEs in SQL scripts

SQL scripts listed - test files for table3d

 #1c. cat sqls/*  <-- display contents of files in sqls/...
      ==========

      /* select_customers_all */
         SELECT * FROM Customers;

      /* select_customers_basic */
         SELECT Name, Phone, Address, City, Zip
                FROM Customers;

      /* select_customers_sales10000 */
         SELECT custno, Name, Phone, Address, City, Zip,
         TYsales, LYsales, FROM
         Customers WHERE LYsales >10000;

      /* select_customers_sales20000 */
         SELECT custno, Name, Phone, Address, City, Zip,
         TYsales, LYsales, FROM
         Customers
         WHERE LYsales >20000;

      /* select_employee_dept123 */
         SELECT EMP_ID, NAME, ADDRESS, CITY, ZIP, DEPT FROM
         EMPLOYEE WHERE DEPT = '123' AND STATUS = 'FULL';

      /* select_employee_seattle */
         SELECT EMP_ID, LAST_NAME FROM EMPLOYEE
         WHERE CITY = 'Seattle' ORDER BY EMP_ID;

      /* select_orders_big */
         SELECT item FROM Orders
         WHERE quantity > 500;

      /* select_patients_over70 */
         SELECT Name, Age FROM Patients WHERE Age > 70
         GROUP BY Age ORDER BY Name;

      /* select_patients_over80 */
         SELECT Name, Age FROM Patients WHERE Age > 80
         GROUP BY Age ORDER BY Name;

      /* select_patients_over90 */
         SELECT Name, Age FROM Patients
         WHERE Age > 90 GROUP BY Age ORDER BY Name;

      /* select_students_failing */
         CREATE VIEW Failing_Students AS
         SELECT S_NAME, Student_ID FROM
         STUDENT WHERE GPA < 30;

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4G3. Creating table summaries of SQL TABLEs in SQL scripts

table3d summarize SQL TABLEs - 1st attempt

 #2. uvcopy table3d,fild1=sqls,arg1=FROM,uop=q0i7
     ============================================

      enter arg2 qualifier#1 (null=disable) ----->
      enter arg3 qualifier#2 (null=disable) ----->
      enter arg4 chars to blank before word sep (comma,equal,etc) -->
      190617:173959:table3d: EOF fili01 rds=3 size=77: sqls/select_orders_big hits=1
      190617:173959:table3d: EOF fili01 rds=3 size=109: sqls/select_patients_over80 hits=1
      190617:173959:table3d: EOF fili01 rds=2 size=55: sqls/select_customers_all hits=1
      190617:173959:table3d: EOF fili01 rds=3 size=97: sqls/select_customers_basic hits=1
      190617:173959:table3d: EOF fili01 rds=3 size=115: sqls/select_employee_seattle hits=1
      190617:173959:table3d: EOF fili01 rds=3 size=110: sqls/select_patients_over70 hits=1
      190617:173959:table3d: EOF fili01 rds=5 size=152: sqls/select_customers_sales20000
      190617:173959:table3d: EOF fili01 rds=3 size=110: sqls/select_patients_over90 hits=1
      190617:173959:table3d: EOF fili01 rds=4 size=147: sqls/select_customers_sales10000
      190617:173959:table3d: EOF fili01 rds=4 size=126: sqls/select_students_failing
      190617:173959:table3d: EOF fili01 rds=3 size=136: sqls/select_employee_dept123
      190617:173959:table3d: EOF fild01 rds=13 size=4096: sqls hits=7
      190617:173959:table3d: EOF filo01 wrts=17 size=1240: stats/sqls_FROM_q0i7
      EOJ, Output File written to: stats/sqls_FROM_q0i7
      default command = null, OR enter: more,print,uvlpr12,edit,null --> cat

      #Repoert: /home/uvadm/demo/stats/table3d_sqls_FROM
      # uvcopy table3d,fild1=sqls,arg1=FROM
      # =====================================================================
      # - scan all files in directory for a keyword & table counts of following word
      # InDir=sqls  Keyword=FROM  Qual1=   Qual2=
      # WordSepsBlank=  Options=q1a0b3c0d0f0j0l0m0p1s0t0x0w1
      # - default selects following word, use option w2 to table 2nd word, etc
      # - specify arg1=Keyword,arg2=Qualifier-present,arg2=Qualifier-absent
      # &\,$=/>-<:(.');_*[|]"<--- arg4=punctuation to blank for word separation
      # abcdefghjklpqrsuALPRQ<--- equivalents, easier to enter, may enter "all"
      # Date=2019/06/17_11:45:06, Site=UV_Software, Host=uvsoft5, User=uvadm
      #===============================================================================
      #---> uvcopy table3d,fild1=sqls,arg1=FROM
      table3d  2019/06/17_11:45:09  Counts by Targetword following specified Keyword
      tbl#0001  tblt1f7 e0(48)         argument
      line#   1strec#  %      count  target-word
          1         2  28         2   Customers;
          2         2  14         1   EMPLOYEE
          3         2  14         1   Orders
          4         2  42         3   Patients
                      100         7*  *TOTAL*

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4G4. Creating table summaries of SQL TABLEs in SQL scripts

PROBLEM - some TABLE names missing ?

If you compare our 1st attempt above to the 8 sql files listed on page '4G2', you will see that there are some missing. This 1st attempt found only 4 TABLE-names, & 6 occurrences, but we know there are 5 TABLE-names & 8 occurrences.

'table3d' expects the target-word to be summarized (SQL TABLEname in this case) to directly follow the keyword ('FROM' in this case), BUT in 4 of the 8 sql files, the keyword 'FROM' is on the line preceding the line with the target-word (TABLEname).

Solution - combine SQL statements onto 1 line

We will use the uvcopy 'combine1d' utility to combine SQL statements onto 1 line. 'arg1=SELECT' will start combining lines until the 'arg4=;' end-of-stmnt marker found and 'arg2=FROM' must occur somewhere within the combined statement.

We will use 'combine1d' to combine the SQL stmnts from all files in sqls/... and write the output combined stmnts into the tmp1/... directory as follows:

 #2. uvcopy "combine1d,fild1=sqls,fild2=tmp1,arg1=SELECT,arg2=FROM,arg4=;,uop=d1r1"
     ==============================================================================
      - copy all files in sqls/* to tmp1/... combining multi-line SQL stmnts onto 1 line
      - we use option 'd1' to drop /*...comments...*/ & option 'r1' to remove the ';' marker

      uop=d1r0t0 - option defaults
          d1     - drop /* ...comments... */
            r1   - remove stmt end pattern
              t0 - no case translation (t1 lower, t2 UPPER)
 190617:172639:combine1d: EOF filo02 wrts=1 size=24: tmp1/select_customers_all
 190617:172639:combine1d: EOF filo02 wrts=1 size=54: tmp1/select_customers_basic
 190617:172639:combine1d: EOF filo02 wrts=1 size=102: tmp1/select_customers_sales10000
 190617:172639:combine1d: EOF filo02 wrts=1 size=102: tmp1/select_customers_sales20000
 190617:172639:combine1d: EOF filo02 wrts=1 size=99: tmp1/select_employee_dept123
 190617:172639:combine1d: EOF filo02 wrts=1 size=78: tmp1/select_employee_seattle
 190617:172639:combine1d: EOF filo02 wrts=1 size=45: tmp1/select_orders_big
 190617:172639:combine1d: EOF filo02 wrts=1 size=73: tmp1/select_patients_over70
 190617:172639:combine1d: EOF filo02 wrts=1 size=73: tmp1/select_patients_over80
 190617:172639:combine1d: EOF filo02 wrts=1 size=73: tmp1/select_patients_over90
 190617:172639:combine1d: EOF filo02 wrts=1 size=54: tmp1/select_students_failing
 190617:172639:combine1d: EOF fild01 size=4096: sqls
 190617:172639:combine1d: EOF fild02 size=4096: tmp1

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4G5. Creating table summaries of SQL TABLEs in SQL scripts

Problem Solution - Combine SELECT stmnts onto 1 line

 #2a. cat tmp1/*    <-- list contents of all output files from combine1d
      ==========

      SELECT * FROM Customers
      SELECT Name, Phone, Address, City, Zip FROM Customers
      SELECT custno, Name, Phone, Address, City, Zip, TYsales, LYsales, FROM Customers WHERE LYsales >10000
      SELECT custno, Name, Phone, Address, City, Zip, TYsales, LYsales, FROM Customers WHERE LYsales >20000
      SELECT EMP_ID, NAME, ADDRESS, CITY, ZIP, DEPT FROM EMPLOYEE WHERE DEPT = '123' AND STATUS = 'FULL'
      SELECT EMP_ID, LAST_NAME FROM EMPLOYEE WHERE CITY = 'Seattle' ORDER BY EMP_ID
      SELECT item FROM Orders WHERE quantity > 500
      SELECT Name, Age FROM Patients WHERE Age > 70 GROUP BY Age ORDER BY Name
      SELECT Name, Age FROM Patients WHERE Age > 80 GROUP BY Age ORDER BY Name
      SELECT Name, Age FROM Patients WHERE Age > 90 GROUP BY Age ORDER BY Name
      SELECT S_NAME, Student_ID FROM STUDENT WHERE GPA < 30

rerun table3d inputting SELECT stmnts combined onto 1 line

We will specify the input directory as tmp1/... (output from combine1d above), and the report output of table3d defaults to stats/... Note that table3d names the output report by concatenating the input directory (now tmp1) + the keyword, so in this case the output report will be 'stats/tmp1_FROM'. You could name the output file by adding 'filo1=sqls_FROM' to the command below:

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4G6. Creating table summaries of SQL TABLEs in SQL scripts

rerun table3d to create correct summary of SQL TABLEs

 #3. uvcopy table3d,fild1=tmp1,arg1=FROM,uop=q0i7
     ============================================

      enter arg2 qualifier#1 (null=disable) ----->
      enter arg3 qualifier#2 (null=disable) ----->
      enter arg4 chars to blank before word sep (comma,equal,etc) -->
      190617:173015:table3d: EOF fili01 rds=1 size=45: tmp1/select_orders_big hits=1
      190617:173015:table3d: EOF fili01 rds=1 size=73: tmp1/select_patients_over80 hits=1
      190617:173015:table3d: EOF fili01 rds=1 size=24: tmp1/select_customers_all hits=1
      190617:173015:table3d: EOF fili01 rds=1 size=54: tmp1/select_customers_basic hits=1
      190617:173015:table3d: EOF fili01 rds=1 size=78: tmp1/select_employee_seattle hits=1
      190617:173015:table3d: EOF fili01 rds=1 size=73: tmp1/select_patients_over70 hits=1
      190617:173015:table3d: EOF fili01 rds=1 size=102: tmp1/select_customers_sales20000 hits=1
      190617:173015:table3d: EOF fili01 rds=1 size=73: tmp1/select_patients_over90 hits=1
      190617:173015:table3d: EOF fili01 rds=1 size=102: tmp1/select_customers_sales10000 hits=1
      190617:173015:table3d: EOF fili01 rds=1 size=54: tmp1/select_students_failing hits=1
      190617:173015:table3d: EOF fili01 rds=1 size=99: tmp1/select_employee_dept123 hits=1
      190617:173015:table3d: EOF fild01 rds=13 size=4096: tmp1 hits=11
      190617:173015:table3d: EOF filo01 wrts=18 size=1279: stats/tmp1_FROM_q0i7
      EOJ, Output File written to: stats/tmp1_FROM_q0i7
      default command = null, OR enter: vi,cat,more,lp,uvlp12,etc -->

      #Report: /home/uvadm/demo/stats/table3d_tmp1_FROM
      # uvcopy table3d,fild1=tmp1,arg1=FROM
      # =====================================================================
      # - scan all files in directory for a keyword & table counts of following word
      # InDir=tmp1  Keyword=FROM  Qual1=   Qual2=
      # WordSepsBlank=  Options=q1a0b3c0d0f0j0l0m0p1s0t0x0w1
      # - default selects following word, use option w2 to table 2nd word, etc
      # - specify arg1=Keyword,arg2=Qualifier-present,arg2=Qualifier-absent
      # &\,$=/>-<:(.');_*[|]"<--- arg4=punctuation to blank for word separation
      # abcdefghjklpqrsuALPRQ<--- equivalents, easier to enter, may enter "all"
      # Date=2019/06/17_11:52:30, Site=UV_Software, Host=uvsoft5, User=uvadm
      #===============================================================================
      #---> uvcopy table3d,fild1=tmp1,arg1=FROM
      table3d  2019/06/17_11:52:34  Counts by Targetword following specified Keyword
      tbl#0001  tblt1f7 e0(48)         argument
      line#   1strec#  %      count  target-word
          1         1  36         4   Customers
          2         1  18         2   EMPLOYEE
          3         1   9         1   Orders
          4         1  27         3   Patients
          5         1   9         1   STUDENT
                      100        11*  *TOTAL*

Now you can see that we are reporting TABLE-names found in all 8 SQL scripts (3 have Customers, 2 have EMPLOYEE,& others have only 1 TABLE-name in the script).

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4H1. Vancouver Utility Programming Aids - TableJobs

table2 - fixed position fields by displacement(length)

'table2' will build summary tables based on fixed position fields versus 'table3d' which searched records for a Key-Word & tabled the following Target-Word.

We will use $UV/demo/dat1/UScongress (US Government Representatives & Senators) to demonstrate table2. We downloaded an Excell file, extracted a csv file converted to a fixed column layout with uvcopy UScongressfix. You can see that uvcopy job at UVdemos2.htm#20E1.

Here are samples of the 539 records with a column scale, since table2 expects arguments specified by record displacements & lengths (vs table3 which expected Key-Words to table following Target-Words).

samples US Reps & Senators .csv converted to fixed field

Abraham,Ralph,,,,Ralph Lee Abraham,1954-09-16,M,rep,LA,5,,Republican, Adams,Alma,,,,Alma S. Adams,1946-05-27,F,rep,NC,12,,Democrat, Aderholt,Robert,B.,,,Robert B. Aderholt,1965-07-22,M,rep,AL,4,,Republican,

 #        1         2         3         4         5         6         7         8
 #2345678901234567890123456789012345678901234567890123456789012345678901234567890
 001  Abraham             Ralph          19540916  M  LA  rep  Republican
 002  Adams               Alma           19460527  F  NC  rep  Democrat
 003  Aderholt            Robert         19650722  M  AL  rep  Republican
              ---------- omitting 533 lines ----------
 537  Young               Don            19330609  M  AK  rep  Republican
 538  Young               Todd           19720824  M  IN  sen  Republican
 539  Zeldin              Lee            19800130  M  NY  rep  Republican

table2 1st Example for discussion below

 uvcopy table2,fili1=dat1/UScongress,uop=a62b15,arg1=Party,arg2u=Members_by_Party
 ================================================================================

 # Report=/home/uvadm/demo/stats/UScongress_Party_a62b15
 # uvcopy table2,fili1=dat1/UScongress,uop=a62b15,arg1=Party,arg2u=Members_by_Party
 # ===================================================================================
 # - read a file, building a table of counts & values by 1 or 2 arguments, dump at EOF
 # InPutFile=dat1/UScongress
 # Options=a62b15   Title=Members by Party
 # Date=2019/07/05_16:25:17, Site=UV_Software, Host=uvsoft5, User=uvadm
 #====================================================================================
 table2  2019/07/05_16:25:17  Members by Party uop=a62b15
 tbl#0001  tblo1t1  n0($rm48)   <----- argument ----->
 line#   1strec#  %      count  Party
     1         2  52       284  Democrat
     2       265   0         2  Independent
     3         1  46       253  Republican
                 100       539*  *TOTAL*

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4H2. Vancouver Utility Programming Aids - TableJobs

table2 - Notes & Benefits

1. 'table2' allows you to create table summaries for desired fields in your datafiles with fixed length fields - in contrast to the preceding 'table3' & 'table3d' which create table summaries based on key-words known to precede desired target-words.
   
   
2. table2 will prompt for the file type, can be text (with LineFeeds), or fixed length records without LineFeeds, or variable (such as typ=RDW).
   
   
3. Reports are created in subdir stats/... of your current working directory, so it is best to stay in the working directory with your datafile & stats sub-directories below you (ie - do not change into the datafile directories).
   
   
4. Reports are automatically named from the datafilename, fieldnames,& field locations. For example in the sample report above the Report name (on 1st line of report) is: "Report=/home/uvadm/demo/stats/UScongress_Party_a62b15"
   
   
5. This is convenient, you can run many reports without overwriting previous reports, and then use them to research problems or to assess the impacts of planned changes.
   
   
6. The reports include all relevant information (inputs, fieldnames, locations, options, date/time, site, host,& userid).
   
   
7. We recommend you specify all parameters on the command line, but you could wait & reply to the prompts for filename, field location displacement & length, fieldname,& options. Here is our sample command with all parameters:
   
   

     uvcopy table2,fili1=dat1/UScongress,uop=a62b15,arg1=Party,arg2u=Members_by_Party
     ================================================================================

8. Specifying all parameters on the command line makes it easy to use the command search history to recall, modify,& repeat desired commands.
   
   
9. 'arg1=...' specifies the description for the heading above the table field-data & 'arg2=...' specifies an optional Title=... to be included in the report header. If specified on the command line, any spaces between words must be coded as '_' underscores & specify option 'u' on arg1u=... & arg2u=...
   
   
10. Note that the main objective of these demos is to give you the knowledge to run these table utilities on your own data-files to achieve your objectives.
    
    

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4H3. Vancouver Utility Programming Aids - TableJobs

table2 Execution & Console-Log

The sample above showed the command line & the report created, and now we will illustrate the console-log prompts for options, arguments, table fieldnames, & prompt to view output report.

 uvcopy table2,fili1=dat1/UScongress,uop=a62b15,arg1=Party,arg2u=Members_by_Party
 ================================================================================

Console Log - options & prompts

 uop=a0b0c0d0e0f0g0h0j0n0p0r0x1 - option defaults
 uop=a0                 - argument displacement (0 relative)
 uop=  b0               - argument length
 uop=    c0             - argument displacement (0 relative)
 uop=      d0           - argument length
 uop=        e0         - acum#1 dsplcmnt (omit c,d,e,f for counts only)
 uop=          f0       - acum#1 length
 uop=            g0     - acum#2 displacement (0 relative)
 uop=              h0   - acum#2 length
 uop=            j1     - edit all acums as qty (commas, no decimal)
 uop=            j2     - edit all acums as $ (commas & decimal point)
 uop=            j__    - table formats j1-j12 see uvcopy.doc tbf f1-f12
 uop=          n0       - argument n0=unpacked, n1=packed, n2=binary
 uop=        p0         - acum-fields p0=unpacked, p1=packed, p2=binary
 uop=          r8192    - input record size (max 8192)
 uop=               x1  - bypass any #comments in data file
 uop=              note - if file type LST specify r > largest possible
 uop=a30b6c38d6e53f9g3r64x1 <-- ENTER this for demo with dat1/sales3 file
 product#;quantity;amount   <-- ENTER this for demo Field Headings
 Summary of Qty & Amt by Product#  <-- ENTER this for demo Report Heading

User OPtion (uop) defaults = q1a0b0c0d0e0f0g0h0j0n0p0r0x1a62b15 -->null to accept or enter/override --> recsize (option r) unspcfd, default 2048 OK text files, may continue acum field#1 (option f) length unspcfd, may continue to count only enter argument & acum fieldnames with semicolon separators -->

 LST = typ default fili01 - null accept or enter new typ ?
 190705:174132:table2: EOF fili01 rds=539 size=38781: dat1/UScongress
 190705:174132:table2: EOF filo01 wrts=11 size=886: stats/UScongress_Party_a62b15
 EOJ, Output File written to: stats/UScongress_Party_a62b15
 default command = more, OR enter: vi,cat,more,lp,uvlp12,etc --> more <--

 table2  2019/07/05_17:41:32  Members by Party uop=a62b15
 tbl#0001  tblo1t1  n0($rm48)   <----- argument ----->
 line#   1strec#  %      count  Party
     1         2  52       284  Democrat
     2       265   0         2  Independent
     3         1  46       253  Republican
                 100       539*  *TOTAL*

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4I1. Table2 Summaries of US Representatives & Senators

4 Table Summaries from dat1/UScongress

You can run various table summaries from the dat1/UScongress demo file. We will show a few of the shorter reports, followed by script sf/UScongress_stats, which runs 13 reports that we thought were interesting.

Here is a reminder of the UScongress file layout, in case you want to try making up your own commands to run table summaries on other field combinations.

 #        1         2         3         4         5         6         7         8
 #2345678901234567890123456789012345678901234567890123456789012345678901234567890
 001  Abraham             Ralph          19540916  M  LA  rep  Republican
 002  Adams               Alma           19460527  F  NC  rep  Democrat
 003  Aderholt            Robert         19650722  M  AL  rep  Republican

table US Represenatives/Senators by Party

 #1. uvcopy table2,fili1=dat1/UScongress,uop=a62b15,arg1=Party,arg2u=Members_by_Party
     ================================================================================

 # Report=/home/uvadm/demo/stats/UScongress_Party_a62b15
 # uvcopy table2,fili1=dat1/UScongress,uop=a62b15,arg1=Party,arg2u=Members_by_Party
 # ===================================================================================
 # - read a file, building a table of counts & values by 1 or 2 arguments, dump at EOF
 # InPutFile=dat1/UScongress
 # Options=a62b15   Title=Members by Party
 # Date=2019/07/05_16:25:17, Site=UV_Software, Host=uvsoft5, User=uvadm
 #====================================================================================
 table2  2019/07/05_16:25:17  Members by Party uop=a62b15
 tbl#0001  tblo1t1  n0($rm48)   <----- argument ----->
 line#   1strec#  %      count  Party
     1         2  52       284  Democrat
     2       265   0         2  Independent
     3         1  46       253  Republican
                 100       539*  *TOTAL*

Notes

1. You must enter the field displacement zero relative. In the above example the the options for Party field location are defined as 'uop=a62b15'. Option 'a62' defines the displacemnt & option 'b15' defines the length of the Party field.
   
   
2. From the scale, you can see that the Party field begins in column 63 'one relative' which is 62 'zero relative'.
   
   
3. The 1st column of the scale is '#' rather than '1', because option 'x1' allows records with '#' in column 1 to be bypassed (avoiding bad data in table). Allows you to add scales & other info in your data files if you so choose.
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4I2. Table2 Summaries of US Representatives & Senators

table US Represenatives/Senators by House & Party

 #2. uvcopy table2,fili1=dat1/UScongress,uop=a57b3c62d15,arg1=House+Party,arg2u=Members_by_House+Party
     ==================================================================================================

 # Report=/home/uvadm/demo/stats/UScongress_House+Party_a57b3c62d15
 # uvcopy table2,fili1=dat1/UScongress,uop=a57b3c62d15,arg1=House+Party,arg2u=Members_by_House+Party
 # ===================================================================================
 # - read a file, building a table of counts & values by 1 or 2 arguments, dump at EOF
 # InPutFile=dat1/UScongress
 # Options=a57b20   Title=Members by House+Party
 # Date=2019/07/05_16:25:16, Site=UV_Software, Host=uvsoft5, User=uvadm
 #====================================================================================
 table2  2019/07/05_16:25:17  Members by House+Party uop=a57b20
 tbl#0001  tblo1t1  n0($rm48)   <----- argument ----->
 line#   1strec#  %      count  House+Party
     1         2  44       239  rep  Democrat
     2         1  37       200  rep  Republican
     3        18   8        45  sen  Democrat
     4       265   0         2  sen  Independent
     5         5   9        53  sen  Republican
                 100       539*  *TOTAL*

Notes

1. This example illustrates using 2 table arguments for House (sen or rep) & Party. Re: options 'uop=a57b3c62d15' - a57b3 specifies the House sen/rep in cols 58-60, a57 displacemnt & b3 length - c62d15 specifies the Party in columns 63-77, c62 displacment & d15 length
   
   
2. arg1=House+Party specifies the field headings to appear directly above the data fields tabled on line 11 of the report. arg2u=Members_by_House+Party is an optional heading that will be inserted on line 9 of the report.
   
   
3. We did not need to use option u on arg1 since no spaces in "House+Party", but did need option u on arg2u since we coded space with '_' underscores.
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4I3. Table2 Summaries of US Representatives & Senators

table US Represenatives/Senators by Party & Sex

 #3. uvcopy table2,fili1=dat1/UScongress,uop=a62b15c50d1,arg1=Party+Sex,arg2u=Members_by_Party+Sex
     =============================================================================================

 # Report=/home/uvadm/demo/stats/UScongress_Party+Sex_a62b15c50d1
 # uvcopy table2,fili1=dat1/UScongress,uop=a62b15c50d1,arg1=Party+Sex,arg2u=Members_by_Party+Sex
 # ===================================================================================
 # - read a file, building a table of counts & values by 1 or 2 arguments, dump at EOF
 # InPutFile=dat1/UScongress
 # Options=a62b15c50d1   Title=Members by Party+Sex
 # Date=2019/07/05_16:25:17, Site=UV_Software, Host=uvsoft5, User=uvadm
 #====================================================================================
 table2  2019/07/05_16:25:17  Members by Party+Sex uop=a62b15c50d1
 tbl#0001  tblo1t1  n0($rm48)   <----- argument ----->
 line#   1strec#  %      count  Party+Sex
     1         2  20       108  Democrat        F
     2         4  32       176  Democrat        M
     3       265   0         2  Independent     M
     4         9   4        23  Republican      F
     5         1  42       230  Republican      M
                 100       539*  *TOTAL*

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4I4. Table2 Summaries of US Representatives & Senators

table US Represenatives/Senators by State & Party

 #4. uvcopy table2,fili1=dat1/UScongress,uop=a53b2c62d15,arg1=State+Party,arg2u=Members_by_State+Party
     =================================================================================================

 # Report=/home/uvadm/demo/stats/UScongress_State+Party_a53b2c62d15
 # uvcopy table2,fili1=dat1/UScongress,uop=a53b2c62d15,arg1=State+Party,arg2u=Members_by_State+Party
 # ===================================================================================
 # - read a file, building a table of counts & values by 1 or 2 arguments, dump at EOF
 # InPutFile=dat1/UScongress
 # Options=a53b2c62d15   Title=Members by State+Party
 # Date=2019/07/05_16:25:22, Site=UV_Software, Host=uvsoft5, User=uvadm
 #====================================================================================
 table2  2019/07/05_16:25:22  Members by State+Party uop=a53b2c62d15
 tbl#0001  tblo1t1  n0($rm48)   <----- argument ----->
 line#   1strec#  %      count  State+Party
     1       346   0         3  AK Republican
     2       246   0         2  AL Democrat
     3         3   1         7  AL Republican
     4        40   1         6  AR Republican
     5         9   0         1  AS Republican
         ------------- 83 lines omitted -------------
    89        18   0         4  WI Democrat
    90       141   1         6  WI Republican
    91       309   0         1  WV Democrat
    92        63   0         4  WV Republican
    93        21   0         3  WY Republican
                 100       539*  *TOTAL*

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4J1. Table2 Summaries of US Representatives & Senators

script to run 13 table summaries on dat1/UScongress

 #!/bin/ksh
 # UScongress_stats - run table2 to create multi stats/reports from dat1/UScongress demo file
 #                  - by owen Townsend, UV Software, Jul04/2019
 # See details at uvsoftware.ca/tablejobs.htm or uvsoftware.ca/uvdemos2.htm
 export UVCOPYROP=q0i63r0   # minimize console prompts
 uvcopy table2,fili1=dat1/UScongress,uop=a40b4,arg1=BirthYear,arg2u=Members_by_BirthYear
 uvcopy table2,fili1=dat1/UScongress,uop=a57b3,arg1=House,arg2u=Members_by_House
 uvcopy table2,fili1=dat1/UScongress,uop=a57b20,arg1=House+Party,arg2u=Members_by_House+Party
 uvcopy table2,fili1=dat1/UScongress,uop=a57b3c50d1,arg1=House+Sex,arg2u=Members_by_House+Sex
 uvcopy table2,fili1=dat1/UScongress,uop=a62b15,arg1=Party,arg2u=Members_by_Party
 uvcopy table2,fili1=dat1/UScongress,uop=a62b15c50d1,arg1=Party+Sex,arg2u=Members_by_Party+Sex
 uvcopy table2,fili1=dat1/UScongress,uop=a62b15c53d2,arg1=Party+State,arg2u=Members_by_Party+State
 uvcopy table2,fili1=dat1/UScongress,uop=a50b1,arg1=Sex,arg2u=Members_by_Sex
 uvcopy table2,fili1=dat1/UScongress,uop=a50b1c57d3,arg1=Sex+House,arg2u=Members_by_Sex+House
 uvcopy table2,fili1=dat1/UScongress,uop=a50b1c62d15,arg1=Sex+Party,arg2u=Members_by_Sex+Party
 uvcopy table2,fili1=dat1/UScongress,uop=a53b2,arg1=State,arg2u=Members_by_State
 uvcopy table2,fili1=dat1/UScongress,uop=a53b2c57d3,arg1=State+House,arg2u=Members_by_State+House
 uvcopy table2,fili1=dat1/UScongress,uop=a53b2c62d15,arg1=State+Party,arg2u=Members_by_State+Party
 echo "Output Reports in $PWD/stats - listed with line counts"
 llc stats
 #========

 File#   Lines
     1      69 stats/UScongress_BirthYear_a40b4
     2      15 stats/UScongress_House_a57b3
     3      18 stats/UScongress_House+Party_a57b3c62d15
     4      17 stats/UScongress_House+Sex_a57b3c50d1
     5      16 stats/UScongress_Party_a62b15
     6      18 stats/UScongress_Party+Sex_a62b15c50d1
     7     106 stats/UScongress_Party+State_a62b15c53d2
     8      15 stats/UScongress_Sex_a50b1
     9      17 stats/UScongress_Sex+House_a50b1c57d3
    10      18 stats/UScongress_Sex+Party_a50b1c62d15
    11      69 stats/UScongress_State_a53b2
    12     119 stats/UScongress_State+House_a53b2c57d3
    13     106 stats/UScongress_State+Party_a53b2c62d15
    13     603 total lines in    13 files in directory stats

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4K1. Vancouver Utility Programming Aids - TableJobs

Table2 Summaries of Canadian Members of Parliament

'table2' will build summary tables based on fixed position fields versus 'table3d' which searched records for a Key-Word & tabled the following Target-Word.

We will use $UV/demo/dat1/CanadaMPs (CAnadian Members of Parliament) to demo table2. We downloaded a spreadsheet, extracted a csv file (dat1/CanadaMPs.csv) & converted to a fixed layout so we could define specific fields required for some selections. See UVdemos2.htm#20D1 if interested to see the uvcopy job (demo/pf/CanadaMPsfix).

Here are the samples of the 335 records with a column scale to help you determine field locations. You must specify zero relative displacement with option 'a' and length with option 'b'. For example, use 'uop=a70b2' for the Province in columns 71-72.

samples of Canadian MPs .csv converted to fixed fields

Title,First Name,Last Name,Constituency,Province/Territory,Political Affiliation,Start Date ,Ziad,Aboultaif,Edmonton Manning,Alberta,Conservative,10/19/2015 ,Dan,Albas,Central Okanagan/Similkameen/Nicola,British Columbia,Conservative,10/19/2015

          1         2         3         4         5         6         7         8         9       100
 1234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890
               ----------------- First 2 of 335 MP's ------------------
 001  Aboultaif          Ziad            Edmonton Manning              AB Conservative     2015
 002  Albas              Dan             Central Okanagan/Similkameen/ BC Conservative     2015
               --------------- samples of all parties --------------
 010  Anderson           David           Cypress Hills/Grasslands      SK Conservative     2015
 011  Angus              Charlie         Timmins/James Bay             ON NDP              2015
 023  Barsalou-Duval     Xavier          Pierre-Boucher/Les Patriotes/ QC Bloc Quebecois   2015
 032  Bernier            Maxime          Beauce                        QC People's Party   2015
 202  May                Elizabeth       Saanich/Gulf Islands          BC Green Party      2015
 328  Wilson-Raybould    Jody            Vancouver Granville           BC Independent      2015
               ----------------- Last 2 of 335 MP's ------------------
 334  Zahid              Salma           Scarborough Centre            ON Liberal          2015
 335  Zimmer             Bob             Prince George/Peace River/Nor BC Conservative     2015

We will build 3 tables: by Province cols 71-72, Party cols 74-88,& YearElected cols 91-94

Here are the 3 commands we will use, see results on the following pages:

 #1. uvcopy table2,fili1=dat1/CanadaMPs,uop=a70b2,arg1=Province,arg2u=CDN_MPs_by_Province
     ====================================================================================
 #2. uvcopy table2,fili1=dat1/CanadaMPs,uop=a73b17,arg1=Party,arg2u=CDN_MPs_by_Party
     ===============================================================================
 #3. uvcopy table2,fili1=dat1/CanadaMPs,uop=a90b4,arg1=YearElected,arg2u=CDN_MPs_by_YearElected
     ==========================================================================================

Notes

1. We enter all arguments on the command line, but you could omit & enter at the prompts
   
   
2. For spaces within arguments, you must code them as '_' undercores & use option 'u' - for example 'arg3u=CDN_MPs_by_Province'
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4K2. Table2 Summaries of Canadian Members of Parliament

3 Table Summaries from dat1/CanadaMPs

 #1. uvcopy table2,fili1=dat1/CanadaMPs,uop=a70b2,arg1=Province,arg2u=CDN_MPs_by_Province
     ====================================================================================

table CA MPs by Province

 # Report=/home/uvadm/demo/stats/CanadaMPs_Province_a70b2
 # uvcopy table2,fili1=dat1/CanadaMPs,uop=a70b2,arg1=Province,arg2u=CDN_MPs_by_Province
 # ====================================================================================
 # - read a file, building a table of counts & values by 1 or 2 arguments, dump at EOF
 # InPutFile=dat1/CanadaMPs
 # Options=a70b2   Title=CDN MPs by Province
 # Date=2019/07/06_11:42:06, Site=UV_Software, Host=uvsoft5, User=uvadm
 #====================================================================================
 table2  2019/07/06_11:42:08  CDN MPs by Province uop=a70b2
 tbl#0001  tblo1t1  n0($rm48)   <----- argument ----->
 line#   1strec#  %      count  Province
     1         1  10        34  AB
     2         2  12        41  BC
     3        15   4        14  MB
     4        13   2        10  NB
     5       147   2         7  NL
     6        59   2        10  NS
     7       212   0         1  NT
     8       310   0         1  NU
     9         3  36       121  ON
    10        58   1         4  PE
    11         8  22        77  QC
    12        10   4        14  SK
    13        19   0         1  YT
                 100       335*  *TOTAL*

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4K3. Table2 Summaries of Canadian Members of Parliament

table CA MPs by House & Party

 #2. uvcopy table2,fili1=dat1/CanadaMPs,uop=a73b17,arg1=Party,arg2u=CDN_MPs_by_Party
     ===============================================================================

 # Report=/home/uvadm/demo/stats/CanadaMPs_Party_a73b17
 # uvcopy table2,fili1=dat1/CanadaMPs,uop=a73b17,arg1=Party,arg2u=CDN_MPs_by_Party
 # ===================================================================================
 # - read a file, building a table of counts & values by 1 or 2 arguments, dump at EOF
 # InPutFile=dat1/CanadaMPs
 # Options=a73b17   Title=CDN MPs by Party
 # Date=2019/07/06_11:42:08, Site=UV_Software, Host=uvsoft5, User=uvadm
 #====================================================================================
 table2  2019/07/06_11:42:09  CDN MPs by Party uop=a73b17
 tbl#0001  tblo1t1  n0($rm48)   <----- argument ----->
 line#   1strec#  %      count  Party
     1        23   2        10  Bloc Quebecois
     2       325   0         1  Co-operative Co
     3         1  28        96  Conservative
     4       195   0         2  Green Party
     5        52   2         7  Independent
     6         4  52       177  Liberal
     7        11  12        41  NDP
     8        32   0         1  People's Party
                 100       335*  *TOTAL*

table CA MPs by Year-Elected

 #3. uvcopy table2,fili1=dat1/CanadaMPs,uop=a90b4,arg1=YearElected,arg2u=CDN_MPs_by_YearElected
     ==========================================================================================

 # Report=/home/uvadm/demo/stats/CanadaMPs_YearElected_a90b4
 # uvcopy table2,fili1=dat1/CanadaMPs,uop=a90b4,arg1=YearElected,arg2u=CDN_MPs_by_YearElected
 # ===================================================================================
 # - read a file, building a table of counts & values by 1 or 2 arguments, dump at EOF
 # InPutFile=dat1/CanadaMPs
 # Options=a90b4   Title=CDN MPs by YearElected
 # Date=2019/07/06_11:42:09, Site=UV_Software, Host=uvsoft5, User=uvadm
 #====================================================================================
 table2  2019/07/06_11:42:10  CDN MPs by YearElected uop=a90b4
 tbl#0001  tblo1t1  n0($rm48)   <----- argument ----->
 line#   1strec#  %      count  YearElected
     1         1  94       317  2015
     2       222   0         1  2016
     3        30   3        11  2017
     4        22   0         2  2018
     5        27   1         4  2019
                 100       335*  *TOTAL*

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

4K4. Table2 Summaries of Canadian Members of Parliament

script to run multiple stats on dat1/CanadaMPs

 #!/bin/ksh
 # CandaMPs_stats - run table2 to create multi stats/reports from dat1/CanadaMPs demo file
 #                - by owen Townsend, UV Software, Jul06/2019
 # See details at uvsoftware.ca/tablejobs.htm or uvsoftware.ca/uvdemos2.htm
 export UVCOPYROP=q0i63r0   # minimize console prompts
 #
 uvcopy table2,fili1=dat1/CanadaMPs,uop=a70b2,arg1=Province,arg2u=CDN_MPs_by_Province
 #==================================================================================
 #
 uvcopy table2,fili1=dat1/CanadaMPs,uop=a73b17,arg1=Party,arg2u=CDN_MPs_by_Party
 #==============================================================================
 #
 uvcopy table2,fili1=dat1/CanadaMPs,uop=a90b4,arg1=YearElected,arg2u=CDN_MPs_by_YearElected
 #=========================================================================================
 echo "Output Reports in $PWD/stats/... - listed below with line counts"
 llc stats
 #========

 File#   Lines
     1      21 demo/stats/CanadaMPs_Party_a73b17
     2      26 demo/stats/CanadaMPs_Province_a70b2
     3      18 demo/stats/CanadaMPs_YearElected_a90b4
     4      65 total lines in    3 files in directory demo/stats

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

Part_5 UVdemos2.doc - Vancouver Utilities for Unix/Linux users

Part 5 most useful UVscripts

Part5 documents some of the most useful shell scripts used at UV Software. Our emphasis here is to illustrate how useful these scripts can be to anybody who works with files & directories on the command line.

We will demo just a few of the most useful scripts here. You can see many more listed in scripts1.htm and if the Vancouver Utilities are installed at your site, you can see hundreds more in $UV/sf/... 4 subdirs (adm,demo,util,IBM).

And if you have the Utiltiies installed you can run the scripts with the demo files provided & check your results to the expected results listed.

UVdemos2 Part5 Contents

9 cfd... scripts as follows

      1. cfl   - Count Lines in 1 File
      2. cfd   - Count Files,Lines,KB in 1 Directory
      3. cfdt  - Totals-Only version of Count Files,Lines,& KiloBytes in a Directory
      4. cfdpf - Count Files in a Directory with a Pattern [or not] in filenames
      5. cfdpl - Count Files in a Directory with a Pattern [or not] on any line in any file
      6. cfdd  - Count Files,Lines,& KB in a ALL Sub-Dirs in a Super-Directory
      7. cfddt - Count Files,Lines,& KB in a ALL Sub-Dirs in a Super-Directory Totals-Only
      8. cfddf - Count Files,Lines,KB in ALL Sub-Dirs in a Super-Dir + 1st few files
      9. cfdmm - List Directory: File#,Lines,Minsize,Maxsize,Minrec#,Maxrec#, Dir/Filename

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

UVdemos2 Part5 Contents - continued

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

UVdemos Part5 Contents - continued

UVscripts.htm is the same as UVdemos2.htm#Part_5. UVscripts was duplicated as a separate document because it is 1 of the most useful parts of UVdemos2.

SelectJobs.htm (same as UVdemos2.htm#Part_3) is also a separate document.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5A1. UVscripts - Introduction & Overview

Initial Example to get you interested

 cfdmm dat1 - report Files,Lines,KB, Min/Max RecSize & RecNumbers in directory dat1/...
 ==========

 cfdmm dat1 - list File#,Lines,Minsize,Maxsize,Minrec#,Maxrec#,Dir/Filename
  File#   Lines      KB MinRsiz MaxRsiz MinRnum MaxRnum  Directory/FileName
      1     335      32      95      95       1     335  dat1/CanadaMPs
      2      13       4      14      34      13       5  dat1/CanadaProvinces
      3       8       4      70      75       6       7  dat1/nameadrs1
      4     305      28      75      82       2       1  dat1/UScities
      5     539      40      71      74       2     422  dat1/UScongress
      6      50       4      13      23      15      40  dat1/USstates
      6    1250     112      13      95                  *Totals* in dat1
                            Report left in --> /home/uvadm/demo/rpts/dat1_cfdmm

UVscripts Benefits to Programmers & Analysts

1. The 9 cfd... scripts automatically create their reports in subdir rpts/... & the reports are automatically named from the directory & script name. Any pattern arguments will be included in the rpts/filename, For example the report created by 'cfdp dat1 Canada*' will be 'rpts/dat1_cfdp_Canada_'.
   
   
2. The reports include all relevant information - command line used, input directory, any patterns, date/time, full path-name of report created.
   
   
3. The above conventions are convenient, you can run many reports without overwriting previous reports, and then use them to research problems or to assess the impacts of planned changes.
   
   
4. The main objective of these demos is to give you the knowledge to run the scripts on your own directories to achieve your own objectives.
   
   

   UVscripts same as UVdemos2 Part 5

UVscripts.htm is the same as UVdemos2.htm#Part_5. UVscripts was duplicated as a separate document because it is 1 of the most useful parts of UVdemos2.

Because UVscripts.doc is also a separate document from UVdemos2.doc, the next 2 pages will duplicate the setup procedure for users to copy the demo files to a demo/ subdir within their homedir (rather than working in the $UV homedir.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5B1. Vancouver Utility Programming Aids - UVscripts

Vancouver Utilities - subdirs relevant to UVscripts

Here is the Vancouver Utilities homedir showing only the most relevant subdirs required for the UVscript demos documented in this section of UVdemos2.htm.

You could run the demos logged in as 'uvadm', but if you are sharing the system with other uvadm users, it would be better to copy the demo/subdirs/files to your own homedir. See the copy instructions below & an expanded view of the demo/... files on the next page.

 /home/uvadm             <-- $UV
 :-----bin                 - UV binaries (uvcopy,uvsort,uvcp,uvhd,uvlist,etc)
 :-----dat1                - test data files to demo various Vancouver Utilities
 :     :-----...         <-- 200 testdata files for all uvcopy job demos
 :     :                   - UVdemos testdata files copied to demo/dat1/...
 :-----doc                 - Vancouver Utilities documentation (text)
 :     :-----UVdemos2.doc   - this documentation (1 of 150 files)
 :     :-----UVscripts.doc - Part5 of UVdemos duplicated as a separate document
 :-----dochtml             - documentation in HTML (uploaded to www.uvsoftware.ca)
 :-***-demo              <-- demo files for TestDemo tutorials, copy to your homedir -->
 :     :                   - copy /home/uvadm/demo/* to your /home/userxx/demo/...
 :     :-----dat1          - data files for UVscript demos
 :     :--. ..etc...       - see details on the next page
 :-----pf               <-- Parameter Files for uvcopy
 :     :-----adm               - uvcopy jobs for uvadm admin
 :     :-----demo              - uvcopy jobs for various demos
 :     :-----util              - uvcopy jobs for users
 :     :-----IBM               - uvcopy jobs for Mainframe conversions
 :-----sf                <-- Script Files (bash or Korn shell)
 :     :-----adm               - scripts for uvadm admin
 :     :-----demo              - demo scripts
 :     :-----util     <---***--- includes scripts (cfd,cfdd,etc) in this UVscripts.doc
 :     :-----IBM               - scripts for mainframe conversions
 :-----src               <-- Vancouver Utilities C source code (uvcopy,uvsort,etc)
 :-----tf                  - test files for various demos (similar to dat1/...)
 :-----tmp                 - tmp subdir (test/demo outputs)
 :-----tmp1                - misc, outdir for some utility scripts (like listall1)

Please copy the demo/... files to your homedir to avoid conflict with other users of Vancouver Utilities & to avoid losing your files when new versions of Vancouver Utilities are installed.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5B2. Vancouver Utility Programming Aids - UVscripts

UVscripts demo files copied to your homedir

Here is an expanded view of the most relevant subdirs/files required for the UVscript demos (omitting subdirs/files used for other parts of UVdemos2.doc).

 /home/userxx/demo/             <-- your homedir demo directory
 :-----archive
 :     :---...misc...
 :-----backup                   <-- backup ParentDir
 :     :-----dat0                 - files in subdirs same as below
 :     :-----dat1
 :     :-----dat2
 :-----dat0                     <-- originals converted to dat1 fixed formats
 :     :-----CanadaMPs.csv
 :     :-----UScities.tab
 :     :-----UScongress.csv
 :     :-----USstates.csv
 :-----dat1                     <-- PRIMARY DEMO FILES for UVscripts
 :     :-----CanadaMPs
 :     :-----CanadaProvinces
 :     :-----nameadrs1
 :     :-----UScities
 :     :-----UScongress
 :     :-----USstates1
 :     :-----USstates2
 :-----dat2                     <-- N/A to UVscripts
 :     :-----accents1             - used for other parts of UVdemos
 :     :-----ar.custmas
 :     :-----ar.custmas.tellist
 :     :-----                     - several files omitted
 :     :-----nameadrs2
 :     :-----sales3
 :     :-----vendormas2
 :-----ftps
 :-----jcl0
 :-----jcl2   - N/A to UVscripts
 :-----jcl3
 :-----pf
 :     :-----CanadaMPsfix       <-- uvcopy to convert .csv to fixed fields
 :     :-----UScitiesfix
 :     :-----UScongressfix
 :     :-----USstatesfix1
 :     :-----USstatesfix2
 :-----rpts
 :     :-----dat1_cfd           <-- Reports created by UVscripts
 :     :----- ...                 - named from directory + scriptname
 :     :----- ...
 :-----sf    - scripts for other UVdemos
 :     :----- ... UVscripts are in $UV/sf/util/... (see prior page)
 :-----sql0  - N/A to UVscripts
 :-----sqls  - for other UVdemos
 :-----tmp

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5C1. Vancouver Utility Programming Aids - TableJobs

Setup check-list - Ready to run UVscripts test/demos ?

We will present a 'setup check-list' here, since you may be reading this in the separate UVscripts.doc vs UVdemos2.doc which includes UVscripts as Part5. See UVdemos2.htm#Part_1 for complete setup procedures, but here is a check-list of the steps required before you can execute these UVscript test/demos.

1. Install Vancouver Utilities. See complete documenation at install.htm or the install summary in UVdemos2.htm#1A3.
   
   
2. Setup your user login account if not already done. See UVdemos2.htm#1C1. Setup your user profile (.bash_profile or .profile for ksh). User profile in homedir calling common_profile in /home/appsadm/env/...
   
   
3. Setup subdir demo/ in your homedir & copy $UV/demo/* to your $HOME/demo/... See instructions below. See the demo file directories on the previous page.
   
   

   copy $UV/demo to your $HOME/demo/...

 #1. Login userxx --> /home/userxx
 #2. mkdir demo   <-- make directory for copy of demo files in your homedir

 #3. cp -r /home/uvadm/demo/* demo/   <-- copy demo files to your homedir
     ==============================

 #4. cd demo    <-- change into demo/ directory
     =======      - see demo/... subdirs & files on prior page

 :-----dat1     <-- PRIMARY FILES for UVscripts demos
 :     :-----CanadaMPs
 :     :-----CanadaProvinces
 :     :-----nameadrs1
 :     :-----UScities
 :     :-----UScongress
 :     :-----USstates1
 :     :-----USstates2

 #5. vi dat1/*   <-- look at demo file contents if you wish
     =========

Most of the cfd* scripts are not concerned with the file contents, but rather with counting the files, lines,& KB of the files. Some scripts such as 'cfdpf' selects files based on a pattern in the filenames. Only 1 script (cfdpl) selects files based on a pattern in the contents.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5C2. Demo files for Tutorials

dat1/CanadaMPs - 334 members - samples of all parties

 010  Anderson           David           Cypress Hills/Grasslands      SK Conservative     2015
 011  Angus              Charlie         Timmins/James Bay             ON NDP              2015
 023  Barsalou-Duval     Xavier          Pierre-Boucher/Les Patriotes/ QC Bloc Quebecois   2015
 032  Bernier            Maxime          Beauce                        QC People's Party   2015
 202  May                Elizabeth       Saanich/Gulf Islands          BC Green Party      2015
 328  Wilson-Raybould    Jody            Vancouver Granville           BC Independent      2015

dat1/CanadaProvinces

      01  AB  Alberta
      02  BC  British Columbia
      03  MB  Manitoba
      04  NB  New Brunswick
      05  NL  Newfoundland and Labrador
      06  NT  Northwest Territories
      07  NS  Nova Scotia
      08  NU  Nunavut
      09  ON  Ontario
      10  PE  Prince Edward Island
      11  QC  Quebec
      12  SK  Saskatchewan
      13  YT  Yukon

dat1/UScongress - 1st 5 & last of 539 members

 001  Abraham             Ralph          19540916  M  LA  rep  Republican
 002  Adams               Alma           19460527  F  NC  rep  Democrat
 003  Aderholt            Robert         19650722  M  AL  rep  Republican
 004  Aguilar             Pete           19790619  M  CA  rep  Democrat
 005  Alexander           Lamar          19400703  M  TN  sen  Republican
              ---------- omitting 533 lines ----------
 539  Zeldin              Lee            19800130  M  NY  rep  Republican

dat1/USstates2 - 1st 5 & last of 50 states

 00  ab    state               capital                      0
 01  AL    Alabama             Montgomery             205,764
 02  AK    Alaska              Juneau                  31,275
 03  AZ    Arizona             Phoenix              1,445,632
 04  AR    Arkansas            Little Rock            193,524
 05  CA    California          Sacramento             466,488
        -------- omitting 44 records --------
 50  WY    Wyoming             Cheyenne                59,466

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5D1. Counting Files,Lines,& KB in directories

Run test/demos for 9 cfd* scripts

 #0a. Login userxx ---> /home/userxx
 #0b. cd demo      <--- change into the demo/directory

1. cfl - Count Lines & KB in 1 File

 #1. cfl $UV/src/uvcopy.c  <-- count lines in 1 file (uvcopy source program)
     ====================
      cfl /home/userxx/src/uvcopy.c - count lines in 1 file
       24400 lines,   1072 KB in /home/userxx/src/uvcopy.c
                           Report also left in
                           /home/userxx/demo/rpts/_home_userxx_src_uvcopy.c_cfl

2. cfd - Count Files,lines,KB in 1 directory

 #2. cfd dat1   <-- Count Files,Lines,& KiloBytes in the dat1/ directory
     ========
      cfd dat1 - Count Files,Lines,KB in Directory
      File#    Lines      KB  Directory/Filename 20190726:1027
           1     335      32  dat1/CanadaMPs
           2      13       4  dat1/CanadaProvinces
           3       8       4  dat1/nameadrs1
           4     305      28  dat1/UScities
           5     539      40  dat1/UScongress
           6      50       4  dat1/USstates1
           7      50       4  dat1/USstates2
      ******    1250     112  *Totals* in Directory /home/userxx/demo/dat1
                               Report also in --> /home/userxx/demo/rpts/dat1_cfd

3. cfdt - Count Files,lines,KB in 1 directory (Totals-Only)

 #3. cfdt dat1   <-- Count Files,Lines,& KiloBytes in dat1/... Totals-Only
     =========
      cfdt dat1 - Count Files,Lines,& KB in Directory - Totals-Only
       Files   Lines      KB  Directory/Filename 20190726:1027
           6    1250     112  *Totals-Only* in Directory /home/userxx/demo/dat1
                               Report also in --> /home/userxx/demo/rpts/dat1_cfdt

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5D2. Counting Files,Lines,& KB in directories

4. cfdpf - Count Files,Lines,KB in Dir with/without Pattern in filenames

 #4. cfdpf dat1 'Canada*'   <-- Count Files,Lines,KB for filenames begining with 'Canada'
     ====================
      cfdpf dat1 Canada* - Count Files,Lines,KB in Directory with Pattern [not] in filenames
      File#    Lines      KB  Directory/Filename 20190726:1027
           1     335      32  dat1/CanadaMPs
           2      13       4  dat1/CanadaProvinces
      ******     348      36  *Totals* in dat1 with pattern "Canada*"
                               Report also in --> /home/userxx/demo/rpts/dat1_cfdpf_Canada_

** 5. cfdpl - Count Files,Lines,KB with/without Pattern any line any file in dir **

 #5. cfdpl dat1 'Washington'   <-- Count Files,Lines,KB with 'Washington' on any line in any file
     =======================
      cfdpl dat1 Washington - Count Files,Lines,KB in Directory with Pattern [not] on any line in file
      File#    Lines      KB  Directory/Filename 20190726:1027
           1     305      28  dat1/UScities
           2      50       4  dat1/USstates2
      ******     355      32  *Totals* in /home/userxx/demo/dat1 with  pattern "Washington"
                               Report also in --> /home/userxx/demo/rpts/dat1_cfdpl_Washington

6. cfdd - count Files,Lines,& KB in all subdirs of a superdir

 #6. cfdd $UV/sf    <-- Count Files,Lines,& KB in all Sub-Dirs of $UV/sf/...
     ===========
      cfdd  /home/userxx/sf - Count Files,Lines,& KB in SubDirs of SuperDir
        Dir#   Files   Lines      KB  SubDir/ParentDirectory  20190726:1027
           1     227    6502     944  /home/userxx/sf/adm
           2      86    2501     352  /home/userxx/sf/demo
           3     308   17102    1436  /home/userxx/sf/IBM
           4     541   21323    2248  /home/userxx/sf/util
      ******    1162   47428    4980  *Totals* for SubDirs of SuperDir /home/userxx/sf/...
                                       Report also in --> /home/userxx/demo/rpts/_home_userxx_sf_cfdd

7. cfddt - count Files,Lines,& KB all subdirs of superdir (Totals-Only)

 #7. cfddt $UV/sf   <-- Count Files,Lines,& KB in all Sub-Dirs of $UV/sf/... Totals-Only
     ============
      cfddt /home/userxx/sf - Count Files,Lines,KB in SubDirs of Super-Dir - Totals-Only
        Dirs    Files   Lines      KB  SubDir/ParentDir 20190726:1027
           4     1162   47428    4980  *Totals* for SubDirs of SuperDir /home/userxx/sf/...
                                        Report also in --> /home/userxx/demo/rpts/_home_userxx_sf_cfddt

8. cfddf - Count Files,Lines,KB in SubDirs of Super-Dir + 1st few files

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5D3. Counting Files,Lines,& KB in directories

 #8. cfddf backup 2   <-- cfddf - for all Sub-Dirs in backup Dir + 1st 2 files of each subdir
     ==============
      cfddf backup 2 - Count Files,Lines,KB in SubDirs of SuperDir + 1st few files
        Dir#   Files   Lines      KB  SubDir/ParentDirectory  20190726:1027
           1       8    1299     268  backup/archive
                   1    1299      28  backup/archive/CanadaMPs.csv
                   2    1299       4  backup/archive/ftpsall
           2       6    1250     116  backup/dat1
                   1    1250      32  backup/dat1/CanadaMPs
                   2    1250       4  backup/dat1/CAprovinces
           3      24     211     108  backup/dat2
                   1     211       4  backup/dat2/accents1
                   2     211       4  backup/dat2/accents2
      ******      38    2760     492  *Totals* for SubDirs of SuperDir /home/userxx/demo/backup/...
                                       Report also in --> /home/userxx/demo/rpts/backup_cfddf

9. cfdmm - list directory: File#,Lines,Minsize,Maxsize,Minrec#,Maxrec#

 #9. cfdmm dat1  <-- show Record Minsize,Maxsize,MinRec#,MaxRec# for all files in directory
     ==========

     cfdmm dat1 - list File#,Lines,Minsize,Maxsize,Minrec#,Maxrec#,Dir/Filename
      File#   Lines      KB MinRsiz MaxRsiz MinRnum MaxRnum  Directory/FileName
          1     335      32      95      95       1     335  dat1/CanadaMPs
          2      13       4      14      34      13       5  dat1/CanadaProvinces
          3       8       4      70      75       6       7  dat1/nameadrs1
          4     305      28      75      82       2       1  dat1/UScities
          5     539      40      71      74       2     422  dat1/UScongress
          6      50       4      13      23      15      40  dat1/USstates2
          6    1250     112      13      95                  *Totals* in dat1
                            Report left in --> /home/uvadm/demo/rpts/dat1_cfdmm

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5E1. Counting Files,Lines,& KB in directories

cfhelp - Help screen for cfd... scripts

If you need a reminder of the 9 cfd scripts, just enter 'cfhelp' at your prompt.

 cfhelp    <-- display help screen reminders of cfd... scripts
 ======      - display as follows:

           ------- cfd... scripts & demo/dirs to count Files,Lines,KB -------
 1. cfl   $UV/src/uvcopy.c  # Count Lines & KB in the uvcopy utility program
 2. cfd   dat1              # Count Files,lines,KB in 1 directory (dat1)
 3. cfdt  dat1              # Totals-Only of cfd dat1 (6 files counts combined onto 1 line)
 4. cfdpf dat1 'Canada*'    # Counts for dat1/... filenames begining with 'Canada'
 5. cfdpl dat1 'Washington' # Counts for dat1/... files with 'Washington' on any line of the file
 6. cfdd  $UV/sf            # count Files,Lines,& KB for the 4 subdirs (adm,demo,util,IBM) of /home/userxx/sf
 7. cfddt $UV/sf            # Totals-Only of cfdd /home/userxx/sf (4 subdir counts combined onto 1 line)
 8. cfddf backup 2          # Counts for backup/... (archive,dat1,dat2) + 1st 2 files of each subdir
 9. cfdmm                   # Directory-Stats: files,lines,Minsize,Maxsize,Minrec#,Maxrec#
           ----- add 'export UVEXPERT=y' to your profile to inhibit these displays -----

In fact, you will get a prompt after you run a cfd... script, asking if you want to see this help screen - reply 'y' to display or null to ignore.

And when you know them & don't need them, you can inhibit them by adding 'export UVEXPERT=y' to your .bash_profile to inhibit future displays.

Help screens for each script (vs all 9 above)

You can see a help screen for each script, by entering the script-name only, without required arguments (omit directory). For example, if we enter just 'cfl'

 cfl     <-- enter script name without arguments (directory)
 ===       - displays ERROR msg, Correct Format,& sample report as follows:

 cfl - count lines in 1 file
 cfl filename                  <-- Usage ERROR, arg1 MUST be a FILE
 ============
 cfl /home/userxx/src/uvcopy.c  <-- Correct Format & Sample Report
 ============================
  24400 lines,   1072 KB in src/uvcopy.c
                         Report--> /home/userxx/rpts/src_uvcopy.c_cfl

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5E2. Counting Files,Lines,& KB in directories

v12 - help menu for counting scripts

The 'v12' help menu is mentioned here because it also includes help menus for the cfd... scripts to count Lines & Files. v12 is just 1 of many help menus displayed by the 'uvhelp' main menu.

'help' screens are stored at $UV/help/... & it is in the profile PATH, so you can display the help/menu screen anytime anywhere, for example:

 uvhelp   <-- display main menu of help screens
 ======     - determine desired sub-menu code 'v12' in this case,
            - then quit the uvhelp main menu, & enter the sub-menu code 'v12'

 v12      <-- display sub-menu of 'counting lines & files' (shown below)
 ====

v12 - counting Lines,Files,& KB in Directories

1. cfl - Count Lines in 1 File
2. cfd - Count Files,Lines,KB in 1 Directory
3. cfdt - Totals-Only version of Count Files,Lines,& KiloBytes in a Directory
4. cfdpf - Count Files in a Directory with a Pattern [or not] in filenames
5. cfdpl - Count Files in a Directory with a Pattern [or not] on any line in any file
6. cfdd - Count Files,Lines,& KB in a ALL Sub-Dirs in a Super-Directory
7. cfddt - Count Files,Lines,& KB in a ALL Sub-Dirs in a Super-Directory Totals-Only
8. cfddf - Count Files,Lines,KB in ALL Sub-Dirs in a Super-Dir + 1st few files
9. cfdmm - List Directory: File#,Lines,Minsize,Maxsize,Minrec#,Maxrec#, Dir/Filename
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5F1. Counting Files,Lines,& KB in directories

cftest - run all 9 cfd scripts in batch mode

'cftest' is a script to run all 9 cfd scripts in batch mode. All reports will be collected in subdir rpts/... of current working directory. You will be prompted to remove existing reports (reply to remove, null to keep).

 #!/bin/ksh
 # cftest - run the 9 scripts to count Files,Lines,KB in directories
 #        - by Owen Townsend, UV Software, July 2019
 # cp -r $UV/demo $HOME  <-- assumes you have copied demo dir to your homedir
 # cd $HOME/demo         <-- ensure you are in the demo subdir
 export UVEXPERT=y   # inhibit prompt for cfhelp at end each cfs... script
 echo "cftest - run 9 scripts to count Files,Lines,KB in directories"
 echo "cp -r $UV/demo $HOME  <-- assumes you copied demo dir to your homedir"
 echo "cd $HOME/demo         <-- ensure you are in the demo subdir"
 reply=x
 until [[ "$reply" == "y" || "$reply" == "n" ]]
   do echo " - reports will be collected in rpts/..., OK to remove all old rpts/* ? y/n"
      read reply; done
 if [[ "$reply" == "y" ]]; then rm -f rpts/*; fi
 cfl   $UV/src/uvcopy.c
 cfd   dat1
 cfdt  dat1
 cfdpl dat1 'Washington'
 cfdd  $UV/sf
 cfddt $UV/sf
 cfdpf dat1 'Canada*'
 cfddf backup 2
 cfdmm dat1
 echo "reports collected in rpts/* listed as follows:"
 cfd rpts    #<-- list reports with line counts
 echo " "
 echo "enter to see report contents via more, then spacebar for each report"; read reply
 more rpts/*
 exit 0

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5G1. Counting Files,Lines,& KB in directories

Recommendations using cfd scripts on your own directories

1. Try the cfd... scripts on your own directories. Try cfd,cfdt,cfd[f,cfdpl,cfdmm on directories of files only & cfdd,cfddt,cfddf on super-directories that contain multiple sub-directories.
   
   
2. The cfd reports are automatically created in subdir rpts/... of your current working directory, so you must stay above the directories you are reporting.
   
   
3. The cfd scripts will create subdir 'rpts' if it does not already exist in your current working directory & you would not want rpts to be created among your files. IE - it is best if your current working directory contains only directories & all your files are within their appropriate directories.
   
   
4. The same argument applies to the './tmp' subdir that is automatically created by many of the Vancouver Utility scripts. We are not using the system '/tmp'. Many scripts create a tmp/ subdir in the current working directory if it does not exist - to create an 'ls' list of files to ensure processing alphabetically.
   
   
5. Reports are automatically named from the directory & script name that created it. For example the report created by 'cfd dat1' will be 'rpts/dat1_cfd'.
   
   
6. Any pattern arguments will be included in the rpts/filename, For example the report created by 'cfdp dat1 Canada*' will be 'rpts/dat1_cfdp_Canada_'. Any characters not allowed in filenames (such as '*') are converted to '_'.
   
   
7. Actually, the last line of the report gives you the full pathname of the report. For example '/home/userxx/demo/rpts/dat1_cfdpf_Canada_'
   
   
8. The above conventions are convenient, you can run many reports without overwriting previous reports, and then use them to research problems or to assess the impacts of planned changes.
   
   
9. The reports include all relevant information - command line used, input directory, any patterns, date/time, full path-name of report created.
   
   
10. Note that the main objective of these demos is to give you the knowledge to run these scripts on your own directories to achieve your objectives.
    
    

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5H1. Counting Files,Lines,& KB in directories

Listings of cfd... scripts

If you are interested to see listings of the cfd... scripts, please see uvsoftware.ca/scripts1.htm#Part_5. You can click on the following links, but be warned that the "+" links will take you to separate document scripts1.htm.

To avoid losing your place in this UVdemos2.doc, it is best to 'right-click' on the desired links & open in 'new-tab'. Then you will not get lost in scripts1.doc without an easy way back.

In case you are curious, we will list just 1 of the 9 scripts on the following page:

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5H2. scripts to manipulate text files

cfd - Count Files,lines,KB in 1 directory

 #!/bin/ksh
 # cfd - Korn shell script from UVSI stored in: /home/uvadm/sf/util/
 # cfd - Count Files,Lines,KB in 1 Directory
 #     - by Owen Townsend, UV Software, updated July 2019
 echo "cfd - Count Files,Lines,& KiloBytes in a Directory"
 d1="$1";
 if [[ ! -d "$d1" ]]; then
    echo "cfd directory   <-- Usage ERROR, arg1 MUST be a DIRECTORY"
    echo "============="
    sleep 2
    echo "cfd dat1        <-- Correct Format & Sample Report"
    echo "========"
    echo "cfd - Count Files,Lines,& KiloBytes in a Directory"
    echo "File#    Lines      KB  Directory/Filename 20190722:0819"
    echo "     1     335      32  dat1/CanadaMPs"
    echo "     2      13       4  dat1/CAprovinces"
    echo "     3       8       4  dat1/nameadrs2"
    echo "     4     305      28  dat1/UScities"
    echo "     5     539      40  dat1/UScongress"
    echo "     6      50       4  dat1/USstates2"
    echo "******    1250     112  *Totals* in Directory /home/userxx/demo/dat1"
    exit 1; fi
 #
 typeset -R6 files lines tlines fkb fkbt
 test -d rpts || mkdir rpts
 d2=$(echo $d1 | tr '/' '_')
 echo "File#    Lines      KB  Directory/Filename $(date +%Y%m%d:%H%M)" >rpts/${d2}_cfd
 for d1f in $d1/*
   { ((files+=1))
     lines=$(wc -l <$d1f)   # get line count
     ((tlines+=lines))      # count Total lines
     fdus=$(\du -s $d1f | tr '\t' ' '); fkb=${fdus%% *};
     if [[ -d $d1f ]]; then
        echo "$files  $lines  $fkb  ${d1f}/" >>rpts/${d2}_cfd
        else echo "$files  $lines  $fkb  $d1f" >>rpts/${d2}_cfd; fi
     ((fkbt+=fkb))
   }
 if [[ "$d1" == /* ]]; then fd1=$d1; else fd1=$PWD/$d1; fi
 echo "******  $tlines  $fkbt  *Totals* in Directory $fd1" >>rpts/${d2}_cfd
 echo "    - report left in --> $PWD/rpts/${d2}_cfd"
 more rpts/${d2}_cfd
 sleep 1
 cfhelp  # display help screen summary of 8 scripts to count Files,Lines,KB in directories"
 #-------# export UVEXPERT=n to inhibit
 exit 0

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5I1. Vancouver Utility scripts to list files in directories

List files using unix 'ls' options & more

sample output for 'llc'

 llc $UV/sf/util           <-- list Vancouver Utility script filenames
 ===============             - with File & Line counts (25 files/screen)
 File#   Lines Directory/Filename
     1      43 sf/util//acum1
     2      22 sf/util//all2lower
     3      22 sf/util//all2upper
   454      52 sf/util//wrtbig
   454 files,   16680 total lines in  files in directory

more info on UV scripts

You can see a help screen for each script, by entering the script-name only, without its required arguments (omit the directory). See these scripts listed on pages uvsoftware.ca/scripts1.htm#3A1 - 3H1.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5I2. Vancouver Utility scripts to list files in directories

llt - sample of 20 scripts to list files

Here is just 1 of the scripts to list files in directories (based on unix 'ls' with various options). See more via the '+' links on the following page.

 #!/bin/ksh
 # llt - Korn shell script from UVSI stored in: /home/uvadm/sf/util/
 # llt  - list directory long in date sequence with Newest first
 #      - pipe to more (show 1 screen & wait for null entry)
 #
 #usage with '*' wildcard patterns
 # llt dir/abc*      <-- does not work (will match only 1st occurrence)
 # llt 'dir/abc*'    <-- does work (enclose patterns in single quotes)
 #
 echo "llt - list directory in date sequence with Newest files 1ST"
 if (($# > 1));then
    echo "usage: llt directory"
    echo "       ============="
    echo "example: llt 'jcls/map*'"
    echo "         ==============="
    echo "- enclose any *wildcard patterns in single quotes"
    exit 1; fi
 #
 if [[ -z "$1" ]] ; then  d="."; else d=$1; fi
 ls -lt  $d | more
 #================
 exit 0

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5I3. Vancouver Utility scripts to list files in directories

All scripts to list files in directories

You can see All scripts at the "+" links in separate document scripts1.htm. To avoid losing your place in this UVdemos2.doc, it is best to 'right-click' on the desired links & open in 'new-tab'. Then you will not get lost in scripts1.doc without an easy way back.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5J1. Vancouver Utility scripts to Rename all files in directory

Rename scripts

'rename' scripts - can save you a lot of manual keying when you want to make mass changes to filenames in a directory, often the case when you import a lot of long awkward filenames from other systems (such as mainframes).

We have an example in our demo files - demo/sql0/... files are from a mainframe and we modified them as shown in demo/sqls/... with the rename scripts. Here are the 1st 2 of the 11 filenames before & after renaming

         'SELECT.CUSTOMERS.ALL'
         'SELECT.CUSTOMERS.BASIC'
   --- 1st 2 before & after renaming ---
         select_customers_all.sql
         select_customers_basic.sql

1. convert UPPER-case to lower-case
2. remove the single quotes
3. convert '.' period separators to '_' underscore separators
4. add extension 'sql'
   

   Operating Procedures

Note that the 'rename' scripts rename the files within the existing directory. Since we wanted to preserve the originals so we could repeat the demos, we 1st copied the files from sql0/... to sql1/... before we renamed the scripts.

 #0a. Login userxx --> /home/userxx/
 #0b. cd demo -------> /home/userxx/demo/

 #0c. cp sql0/* sqls/    <-- copy files to 2nd dir (if originals must be preserved)
      ===============

 #1. renameL sqls        <-- rename all UPPER-case to lower-case
     ============

 #2. rename-QQ sqls      <-- remove single opening & closing quotes
     ==============

 #3. renameCC sqls       <-- convert separators '.' periods to '_' underscores
     =============

 #4. rename+X sqls .sql  <-- add extension '.sql' to all files
     ==================

alternate method to rename files

Also see 'uvfix1' at UVdemos2.htm#7D1 which creates a script to do the same renaming as shown here by the 'rename...' scripts. uvfix1 requires some knowledge of the uvcopy instruction set (vs the easy to use rename scripts), but could be useful for really complex situations.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5J2. Vancouver Utility scripts to Rename all files in directory

RenameL - 1 example of 37 in sf/util/...

Here is just 1 example of the 37 rename... scripts in $UV/util/...

 #!/bin/ksh
 # renameL - Korn shell script from UVSI stored in: /home/uvadm/sf/util/
 # renameL - rename an entire directory of filenames to lower case
 #
 echo "rename all filenames in subdir to lower case"
 if [ -d "$1" ]; then :
    else echo "usage: renameL directory"
         echo "       ================="
         echo " - arg1 must be a directory"
         exit 1; fi
 #
 echo "will rename all files in $1 to lower case OK ? y/n"; read reply
 x=0; y=0
 for i in $1/*
 do let x=x+1
    f=${i##*/}
    typeset -l g=$f
    if [[ $g != $f ]]; then
       mv -i $1/$f $1/$g
       #================
       let y=y+1
       echo "file# $y (of $x) $1/$f - renamed to: $1/$g"
    fi
 done
 echo "total $y files in ${1}, $x renamed to lower case"
 exit 0

How to know there are 37 rename... scripts

I determined there were 37 rename... scripts by using the 'cfdpf' script documented at UVdemos2.htm#5D2 as follows:

 cfdpf $UV/sf/util 'rename*'   <-- count files begining with 'rename'
 ===========================
 File#    Lines      KB  Directory/Filename 20190728:0955
      1      17       4  /home/uvadm/sf/util/rename1R
                            --- omitting 36 lines ---
     37      32       4  /home/uvadm/sf/util/rename-XX3
 ******    1322     152  *Totals* in /home/uvadm/sf/util with pattern "rename*"

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5J3. Vancouver Utility scripts to Rename all files in directory

Rename Script Listings - ALL

You can see All scripts at the "+" links in separate document scripts1.htm. To avoid losing your place in this UVdemos2.doc, it is best to 'right-click' on the desired links & open in 'new-tab'. Then you will not get lost in scripts1.doc without an easy way back.

You can see a help screen for each script, by entering the script-name only, without its required arguments (omit the directory).

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5K1. Vancouver Utility scripts

removeCR - remove Carriage Returns from text files

Carriage Returns x'0D' can be a problem on unix/linux systems especially for scripts that will not work with carriage returns. You might have this problem when receiving scripts from other systems or via email. The error-message is "bash: scriptname: /bin/bash^M: bad interpreter"

Note that the 'CR's are invisible using text editors, but you can see them with the 'uvhd' utility - as was demonstrated briefly on pages '2B1' - 2B2, & in-depth on pages '20B1' - 20B11. Here is just the 1st line of a script shown with uvhd.

 #5. uvhd sf/llsx t  <-- rerun with option 't' separate lines on LineFeeds x'0A'
     ==============
     rec#=1 rsize=13 fptr=0 fsize=244 records=7
                      10
 r#        1 0123456789012
           0 #!/bin/bash..
             2226662667600    <-- CR x'0D' causes problems
             31F29EF2138DA

removeCR - remove Carriage Returns from text files

 #!/bin/ksh
 # removeCR - Korn shell script from UVSI stored in: /home/uvadm/sf/util/
 # removeCR - remove CR's Carriage Returns (x'0D')
 #          - by copy to tmp/... & prompt to copy back
 #          - by Owen Townsend, UV Software, Feb 2014
 #
 echo "removeCR  - copy a file to tmp/... removing CRs & nulls, prompt to copy back"
 echo "removeCR1 - alternate saves file in tmp/ before copy back removing CRs"
 df="$1";
 if [[ -f "$df" && -d tmp ]]; then :
 else echo "usage: removeCR subdir/file"
      echo "       ===================="
      echo " - arg1 must be a text file (with LFs & CRs)"
      echo " - current working directory must also contain a tmp/ subdir"
      echo " - will copy to tmp/ removing CRs & prompt to copy back"
      echo " - also see insertCR to insert CR's (create CR/LF)"
      exit 1; fi
 #
 f=$(basename $df)
 tr -d '\r' <$df >tmp/$f
 #==========================
 linesin=$(wc -l $df); sizein=$(du -bs $df);
 linesout=$(wc -l tmp/$f); sizeout=$(du -b tmp/$f);
 echo "input  lines & bytes:    $linesin $sizein"
 echo "output lines & bytes:    $linesout $sizeout"
 until [[ "$reply" = "y" || "$reply" = "n" ]]
    do echo "copy back overwriting original y/n ?"; read reply; done
 if [[ "$reply" = "y" ]]; then
    cp tmp/$f $df; echo "copied back to $df"; ls -l $df
 else echo "copy back aborted"; fi
 exit 0

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5L1. Vancouver Utility scripts

alldiff2 & alldiff3 diff between all files in 2 directories

'alldiff2' repeats the unix system 'diff' utility for each pair of files found in two directories. This is great for confirming results of mass changes to directories of scripts, programs, or any kind of text files.

Before you make mass changes to directories of text files, it is a good idea to 1st save the original directory as '.old', perform the changes,& then run alldiff2 on the 2 directories.

This is really important when modifying utility programs that make the mass changes to hundreds or thousands of files (such scripts, programs, etc). alldiff2 & alldiff3 can make the difference between your project's success or failure, since they can confirm that you have made only the intended changes & no unintended changes.

We will illustrate alldiff2 using the 'jcl3' & jcl3.old' directories in $UV/demo/... Assume that we have modified the JCL converter & are ready to run the new version to convert all JCLs in jcl2/... to JCL/scripts in jcl3/... We proceed as follows:

Alternative #1 - if you have JCL converter

Even if you have the JCL converter installed, you can not run #1a,#1b,#1c in the demo/ directory because it requires other files not supplied in the demo directory. So use Alternative #2 to copy demo/archive/jcl3.old to demo/jcl3.old, then alldiff2

 #1a. mv jcl3 jcl3.old   <-- change name of existing converter outputs
      ================       Note - do NOT run #1a,#1b,#1c (use #2)

 #1b. mkdir jcl3         <-- make new empty directory for new outputs
      ==========

 #1c. jclxx51 jcl2 jcl3  <-- re-convert JCL with modified version of JCL converter
      =================

Alternative #2 - copy jcl3.old from archive for alldiff2 with jcl3

 #2. cp -r archive/jcl3.old .  <-- copy jcl3.old from archive
     ========================

run alldiff2 & investigate diff report

 #3. alldiff2 jcl3.old jcl3  <-- run alldiff2 to create tmp/jcl3.dif
     ======================

 #4. vi tmp/jcl3.dif         <-- investigate the dif report
     ===============

See tmp/jcl3.dif listed on the next page:

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5L2. alldiff2 & alldiff3 for all files in 2 directories

alldiff2 report - tmp/jcl3.dif

 39c39
 < exit $JCC #jclunix51 version=20190119, converted 20190728:145940 sitename=UV Software
 ---
 > exit $JCC #jclunix51 version=20190119, converted 20190728:155658 sitename=UV Software
 diff file# 1 - jcl3.old/... vs jcl3/jar100.ksh

 56c56
 < exportfile  SALELST data1/ar.sales.list #(,CATLG,DELETE)
 ---
 > exportfile  SALELST data1/ar.sales.list200 #(,CATLG,DELETE)
 68c68
 < exit $JCC #jclunix51 version=20190119, converted 20190728:145940 sitename=UV Software
 ---
 > exit $JCC #jclunix51 version=20190119, converted 20190728:155658 sitename=UV Software
 diff file# 2 - jcl3.old/... vs jcl3/jar200.ksh

 46c46
 < exit $JCC #jclunix51 version=20190119, converted 20190728:145940 sitename=UV Software
 ---
 > exit $JCC #jclunix51 version=20190119, converted 20190728:155658 sitename=UV Software
 diff file# 3 - jcl3.old/... vs jcl3/jgl100.ksh

       ------ omitting reports for file#s 3,4,5,6 (similar to all except #2) ------
 70c70
 < exit $JCC #jclunix51 version=20190119, converted 20190728:145940 sitename=UV Software
 ---
 > exit $JCC #jclunix51 version=20190119, converted 20190728:155658 sitename=UV Software
 diff file# 7 - jcl3.old/... vs jcl3/jgl320.ksh
 7 different of 7 files compared jcl3.old to jcl3

Significant Differences only in file#2

You can see that the only significant differences are in file #2. The differences in the other 7 files are due only to the date/time stamps inserted by the JCL converter.

See alternative script 'alldiff3' which adds another step to alldiff2 to eliminate such differences using a table of keywords such as 'version'. When you run alldiff3 you will be prompted for other keywords to cause elimination, &/or you can add your keywords to the table for future alldiff3s.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5L3. alldiff2 & alldiff3 for all files in 2 directories

run alldiff3 to drop insignificant differences

The operating procedures are similar to the above - just change the script name from 'alldiff2' to 'alldiff3'.

 #5. alldiff3 jcl3.old jcl3  <-- run alldiff3 to create tmp1/jcl3.dif
     ======================

You will get more console messages that for alldiff2, such as the prompt for other keywords to cause difference eliminations (not shown here). Note that alldiff3 creates the same report as alldiff2 in tmp/... And then it creates a 2nd report in tmp1/... with the differences eliminated.

 #6. vi tmp1/jcl3.dif   <-- investigate the alldiff3 report
     ================     - with insignificant differences eliminated

alldiff3 report - tmp1/jcl3.dif

56c56 < exportfile SALELST data1/ar.sales.list #(,CATLG,DELETE) > exportfile SALELST data1/ar.sales.list200 #(,CATLG,DELETE) diff file# 2 - jcl3.old/... vs jcl3/jar200.ksh 1 significant difference in 7 files compared jcl3.old to jcl3

alldiff3 calls diffdrop2 to drop insigificants

Script 'alldiff3' calls uvcopy job 'diffdrop2' to drop insignificant differences caused by date/time stamps, versions, etc, depending on a table of patterns in $UV/ctl/diffdroptable2. You can add your own patterns to ctl/diffdroptable2, Or temporarily add 1 or 2 patterns at the arg1/arg2 prompts.

We will list 'alldiff3' on the following page & you can see the uvcopy job 'diffdrop2' at $UV/pf/util/diffdrop2.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5L4. alldiff2 & alldiff3 for all files in 2 directories

alldiff3 script listing

 #!/bin/ksh
 # alldiff3 - Korn shell script from UVSI stored in: /home/uvadm/sf/util/
 # alldiff3 - script to compare all text files in 1 directory to a 2nd directory
 #          - redirects output to tmp/dir2.dif & prompts to view/print/etc
 #Jul11/17 - add diffdrop2 script to drop insignificant lines on JCL/script diffs
 #         - ver:, UVSW, diff file# line, empty diffs after pattern drops
 #
 d1="$1"; d2="$2";
 echo "alldiff3 - compare all files in 2 subdirs & write all diffs to tmp/dir2.dif"
 echo " - then drop diffs due to time stamps & table of patterns (prompt to add)"
 if [[ -d "$1" && -d $2 ]]; then :
 else echo "usage: alldiff3 dir1 dir2"
      echo "       =================="
      echo "example: alldiff3 cbls.old cbls"
      echo "         ======================"
      exit 1; fi
 #
 d2b=$(basename $d2)   # get basename of dir2 (drop any preceding /path/...)
 log=tmp/$d2b.dif      # make name for output log file
 log2=tmp1/$d2b.dif    # make name for diffdrop2 outputfile
 >$log                 #init logfile in tmp subdir w same name as dir2 + .dif
 x=0; y=0;
 for i in $d1/*
 do
   let x=x+1
   typ=$(file $i)
   if [[  $typ == *text* || $typ == *script* || $typ == *data* ]]
      then f=${i##*/}
           diff -a -bBw $d1/$f $d2/$f >>$log
           #=================================
           if [[ $? -gt 0 ]]; then
              echo "diff file# $x - $d1/... vs $d2/$f" >>$log
              echo " " >>$log
              let y=y+1
           fi
      else echo " file# $x $typ - NOT text/script file" >>$log
   fi
 done
 lines=$(wc -l $log)      # capture line count
 echo "$y different of $x files compared $d1 to $d2" >>$log
 echo "$y diff $x files in $d1 & $d2, report: $log $lines lines"
 echo "--> enter additional drop patterns 'arg1=xxx,arg2=yyy' or null"
 read args
 uvcopy diffdrop2,fili1=$log,filo1=$log2,$args
 #============================================
 echo "--> enter command to view (vi,cat,more,uvlp12,etc,or null)"
 read cmd
 if [[ ! "$cmd" = "" ]]; then $cmd $log2; fi
 exit 0

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5M1. uvcmpFA1 - compare packed/binary files

'uvcmpFA1' will compare files with packed/binary fields &/or files without the LineFeeds required by unix 'diff' & the 'alldiff2/3' scripts. There are several versions of uvcmp... for ASCII, EBCDIC, fixed & variable length files. See uvsoftware.ca/cmpjobs.htm for full documentation.

Here is a brief demo you can run using dat2/custmas1 & dat2/custmas2, which have 32 records of 256 bytes with differences in only 1 record.

The demo will ask you to try unix tools (vi,diff,etc), but they are ineffective for files with packed fields & unix 'cmp' displays only in octal (vs hexadecimal) and shows only bytes that are different (vs showing complete record pairs with differences marked with '*'s).

 #0a. Login userxx --> /home/userxx/
 #0b. cd demo -------> /home/userxx/demo/

 #1. vi dat2/custmas1   <-- try to display packed file with unix 'vi'
     ================     - display not shown, mostly garbage

 #2. diff dat2/custmas1 dat2/custmas2  <-- try unix diff
     ================================

     --> "Binary files dat2/custmas1 and dat2/custmas2 differ" <-- not helpful
         =====================================================

 #3. uvhd dat2/custmas1 r256   <-- display packed file with 'uvhd'
     =======================

     version=20190321 records=32  rsize=256 fsize=8192
                      10        20        30        40        50        60
     r#    1 0123456789012345678901234567890123456789012345678901234567890123
           0 130140    EVERGREEN MOTORS LTD.    1815 BOWEN ROAD          NANA
             3333332222454545444244545524542222233332445442544422222222224444
             130140000056527255E0DF4F230C44E0000181502F75E02F140000000000E1E1
          64 IMO          BC V9S1H1    250-754-5531 LARRY WRENCH     ..4V|...
             4442222222222442535343222233323332333324455525544442222201357000
             9DF00000000002306931810000250D754D55310C12290725E38000000246C000
         128 .........W0....`........)X}..f3.....\.................4V}...f...
             0000000005300016000000002570063100095000000000000000013570016000
             0C0000C0270D0540C0000C0098D0263C0444C0000C0000C0000C0246D0056C00
         192 .E|...V}.......................f.....<........f.C 20190320     .
             0470005700000000880000000018000680001300000000694233333333222220
             35C0046D0000C0023C0000C0083C0056D0012C0000C0016D302019032000000A

 #3a. uvhd dat2/custmas2 r256  <-- could display 2nd file & look for diffs
      =======================    - but unlikely you could ever find them

 #4. cmp -l dat2/custmas1 dat2/custmas2  <-- try unix cmp
     ==================================
      2430   0   2       <-- displays 4 lines for 4 bytes different
      2431   2   3         - in octal (hexadecimal option not available)
      2435   0   3         - see uvcmpFA1 on next page, which shows
      2436   3   4           record pairs with '*'s flags on unmatched bytes

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5M2. uvcmpFA1 - compare packed/binary files

uvcmpFA1 - compare packed/binary files

 #5. uvcmpFA1 dat2/custmas1 dat2/custmas2 r256
     =========================================

 #6. vi rptcmp/custmas1   <-- view report from #4. uvcmpFA1 ...
     ==================

 uvcmp1 - compare 2 files, print mismatched records, '*' flag diffs
 2019/08/23_12:09:44 uop=q1p30r256s6t1000000u3x2y0q1r256
 recsize  reccount   file-size  typ Report=rptcmp/custmas1
 1:  256        32       8,192  RSF  File1=dat2/custmas1
 2:  256        32       8,192  RSF  File2=dat2/custmas2
                       1         2         3         4         5         6
 f#record#byte# 0123456789012345678901234567890123456789012345678901234567890123
 ===============================================================================
 1      10    0 154688    TAURUS RESOURCES         1110 - 625 HOWE STREET   VANC
                3333332222545555254545544522222222233332223332445425554452225444
                15468800004152530253F5235300000000011100D062508F75034255400061E3

             64 OUVER        BC V6C2T6    604 685 8565MEL RAHAL         ........
                4554522222222442534353222233323332333344425444422222222200000001
                F5652000000002306632460000604068508565D5C02181C0000000000000C021
                                                                             **
            128 (...U'...f`]..8d........g ..............)l......................
                2100528006650036900000016280000000000000260000000000000000000000
                8C0357C0060D0084D0000C0070C0000C0000C0359C0000C0000C0000C0000C00
                  **

 2      10      154688    TAURUS RESOURCES         1110 - 625 HOWE STREET   VANC
                3333332222545555254545544522222222233332223332445425554452225444
                15468800004152530253F5235300000000011100D062508F75034255400061E3

             64 OUVER        BC V6C2T6    604 685 8565MEL RAHAL         ........
                4554522222222442534353222233323332333344425444422222222200000001
                F5652000000002306632460000604068508565D5C02181C0000000000000C231
                                                                             **
            128 (...U'...f`]..8d........g ..............)l......................
                2100528006650036900000016280000000000000260000000000000000000000
                8C3457C0060D0084D0000C0070C0000C0000C0359C0000C0000C0000C0000C00
                  **
 ==================== EOF or StopPrint/StopRead count reached  ==============
 F1Count=32, F2Count=32, StopPrint=6, StopRead=1000000
 F1Reads=32, MisMatches=1, MisMatsPrinted=1, Recsize=256

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5M3. uvcmpFA1 - compare packed/binary files

uvhd to update packed/binary files

Here is how I created custmas2 with 4 bytes different in only 1 record of 32, for the uvcmpFA1 compare demo on the previous page.

 #1. cp dat2/custmas1 dat2/custmas2  <-- copy custmas1 to custmas2
     ==============================

 #2. uvhd dat2/custmas1 r256u  <-- update custmas2 different than custmas1
     ========================    - note option 'u' to allow update
                - 1st record display omitted to save space

 #2a. --> 10  <-- goto record 10, displayed as follows:
          ===
 rec#=10 rsize=256 fptr=2304 fsize=8192 records=32
                      10        20        30        40        50        60
 r#       10 0123456789012345678901234567890123456789012345678901234567890123
        2304 154688    TAURUS RESOURCES         1110 - 625 HOWE STREET   VANC
             3333332222545555254545544522222222233332223332445425554452225444
             15468800004152530253F5235300000000011100D062508F75034255400061E3
          64 OUVER        BC V6C2T6    604 685 8565MEL RAHAL         ........
             4554522222222442534353222233323332333344425444422222222200000001
             F5652000000002306632460000604068508565D5C02181C0000000000000C021
         128 (...U'...f`]..8d........g ..............)l......................
             2100528006650036900000016280000000000000260000000000000000000000
             8C0357C0060D0084D0000C0070C0000C0000C0359C0000C0000C0000C0000C00
         192 ................Q...A.\........(<...............C 19980331     .
             0000000000000001580048500000001230000000000000004233333333222220
             00C0000C0000C0081C0019C0000C0068C0000C0000C0000C301998033100000A

 #2b. --> u 125(2),x'0203'    <-- update x'0002' to x'0203'
          ================
 #2c. --> u 130(2),x'0304'    <-- update x'0003' to x'0304'
          ================
 rec#=10 rsize=256 fptr=2304 fsize=8192 records=32
                      10        20        30        40        50        60
 r#       10 0123456789012345678901234567890123456789012345678901234567890123
        2304 154688    TAURUS RESOURCES         1110 - 625 HOWE STREET   VANC
             3333332222545555254545544522222222233332223332445425554452225444
             15468800004152530253F5235300000000011100D062508F75034255400061E3
          64 OUVER        BC V6C2T6    604 685 8565MEL RAHAL         ........
             4554522222222442534353222233323332333344425444422222222200000001
             F5652000000002306632460000604068508565D5C02181C0000000000000C231
         128 (...U'...f`]..8d........g ..............)l......................
             2100528006650036900000016280000000000000260000000000000000000000
             8C3457C0060D0084D0000C0070C0000C0000C0359C0000C0000C0000C0000C00
         192 ................Q...A.\........(<...............C 19980331     .
             0000000000000001580048500000001230000000000000004233333333222220
             00C0000C0000C0081C0019C0000C0068C0000C0000C0000C301998033100000A
       record updated - u 125(2),x'0203'
       record updated - u 130(2),x'0304'

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5N1. system/application administration scripts

chmod1 - set perms on all levels - using 'find'

 #!/bin/ksh
 # chmod1 - Korn shell script from UVSI stored in: /home/uvadm/sf/util/...
 # chmod1 - change permissions on subdirs & files under a specified superdir
 #        - using 'find' to process all levels of directories & files
 #        - need to manually add 'x' perms on any bin/* & script/* dirs
 #        - by Owen Townsend, April 26/2006
 #
 # chmod1 directory dir-perms file-perms   <-- command format
 # ======================================
 # chmod1 directory 775 664                <-- recommended permissions
 # =========================
 #
 # - also see alternatives chmod2 & chmod3 (to this *chmod1)
 #*chmod1 - change perms on dirs & files, using 'find'
 # chmod2 - change perms on dirs & files, using 'recursion'
 # chmod3 - change perms on dirs & files, using 'recursion'
 #        - sets 'x' perm by testing for known names of bin/ & script/ subdirs
 #
 # After running chmod1 or chmod2, you must manually fix permissions on
 # executable programs & scripts via -->chmod 775 bin/*; chmod 775 scripts/*
 #
 # capture arguments & force perms integers
 dir="$1";
 typeset i dperm="$2"; typeset i fperm="$3";
 #
 # ensure arg1 is directory & length of perms are 3 digits
 dpl=${#dperm}; fpl=${#fperm};
 #
 if [[ -d "$dir" ]] && ((dpl==3 && fpl==3)); then :
    else echo "usage: chmod1 directory dir-perms file-perms"
         echo "       ====================================="
         echo "example: chmod1 dirxx 775 664"
         echo "         ===================="
         echo " - arg1 must be dir, args 2 & 3 must be 3 digits"
         exit 90; fi
 #
 echo -n "chmod1: set perms $dperm/$fperm from: $dir - enter to continue"
 read reply
 #
 find $dir -type d -exec chmod $dperm {} \;
 #=========================================
 #
 find $dir -type f -exec chmod $fperm {} \;
 #=========================================
 #
 echo "chmod1: perms set $dperm/$fperm for all subdirs & files within: $dir"
 exit 0

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5O1. lsold/mvold/rmold scripts

      lsold/mvold/rmold scripts to list/move/remove files older than x days.
      lsnew/mvnew/rmnew scripts to list/move/remove files newer than x days.
      - can find files anywhere in your directories & list/move/remove as desired

lsold1 - list files older than x days

 #!/bin/ksh
 # lsold1 - Korn shell script from UVSI stored in: /home/uvadm/sf/util/
 # lsold1 - list files older than a specified number of days
 #
 if [[ -d "$1" && -n "$2" ]]; then :
    else echo "usage: lsold1 directory days"
         echo "       ====================="
         echo "example: lsold1 /u2/apps/data 30"
         echo "         ======================="
         echo "- list files in directory tree older than 30 days"
         echo " "
         echo "example2: lsold1 . 30  (use '.' if in directory)"
         echo "          ==========="
         echo "- Also see 'lsold1p' that allows a filename matching pattern"
         exit 1; fi
 days="+$2"
 #
 find $1 -mtime $days -type f -exec ls -l {} \;
 #=============================================
 # - list files older than a specified number of days
 exit 0

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5O2. lsold/mvold/rmold scripts

rmold1 - remove files older than x days

 #!/bin/ksh
 # rmold1 - Korn shell script from UVSI stored in: /home/uvadm/sf/util/
 # rmold1 - remove files from a specified directory (& all subdirs),
 #          that are older(+) than a specified number of days
 #        - option to prompt y/n for each file to be removed
 #
 # 3 variations of this script as follows:
 #*rmold1 (this) - remove old files, option to prompt for each file to be removed
 # rmold2 - lists all old files, then prompts for each old file to be removed
 # rmold3 - lists all old files, then prompts once to remove all old files
 #
 # Also see:
 # lsold1 - list files older than specified number of days
 #        - might run this script before 'rmold1' (removes files)
 #          to prove files to be removed are as intended
 # mvold1 - might run this script instead of 'rmold1' (removes files)
 #          so you could recover files from the move to dir if required
 #
 if [[ -d "$1" && "$2" == +* && ("$3" == "-i" || "$3" == "-f") ]]; then :
    else echo "usage: rmold1 directory +days option"
         echo "       ============================="
         echo "example rmold1 history +730 -i"
         echo "        ======================"
         echo " - remove files over 2 yrs old, prompting for confirmation"
         echo " - arg1 must be a directory"
         echo " - arg2 must start with + (older than)"
         echo " - arg3 must be '-i' for confirmation, '-f' for none"
         exit 1; fi
 #
 find $1 -mtime $2 -exec rm $3 {} \;
 #==================================
 exit 0

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

5P1. 'dtree' script to draw directory trees

 'dtree' script to draw directory tree illustrations.
 - very useful for documentation (note usage in this documentation).

dtree - create directory tree illustration

 #!/bin/ksh
 # dtree - Korn shell script from UVSI stored in: /home/uvadm/sf/util/
 # dtree - list a directory tree
 #       - contributed by Howard Lobsinger (Peacock Engineering, Montreal)
 #usage: dtree directory
 #       ===============
 D=${1:-`pwd`}
 (cd $D; pwd)
 find $D -type d -print | sort |
 sed -e "s,^$D,,"\
     -e "/^$/d"\
     -e "s,[^/]*/\([^/]*\)$,\:-----\1,"\
     -e "s,[^/]*/,:     ,g" | more
 exit 0

dtree example

 #1. dtree /home/uvadm/demo   <-- demo with small directory
     ======================

 /home/uvadm/demo
 :-----archive
 :-----backup
 :     :-----dat1
 :     :-----dat2
 :     :-----sf
 :-----dat1
 :-----dat2
 :-----ftps
 :-----jcl2
 :-----jcl3
 :-----pf
 :-----rpts
 :-----selects
 :-----sf
 :-----sql0
 :-----sqls
 :-----stats
 :-----tf
 :-----tmp

 #2. dtree /home/uvadm    <-- demo with large directory
     =================      - would create about 600 lines
                            - not shown here, but you can run & observe

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

Part_6 UVdemos2 - Vancouver Utilities for Unix/Linux users

Part 6 Help Menus - Contents

The uvhelp menus are handy reminders of the most useful Vancouver Utilities available - just enter 'uvhelp' at your shell prompt & scroll thru the list. Use whenever you have a problem that you think may have a Vancouver Utility solution, but can't remember the exact command.

using uvhelp & sub-menus v11-v92

Assuming you are 'userxx', have Vancouver Utilities installed,& have modified your profile to call the $UV/env/common_profile (documented in install.htm).

 #0. Login userxx --> /home/userxx
 #1. uvhelp  <-- display main-menu (this page)
 #2. scroll down to find the sub-menu (v11,v12,etc) for command desired
 #3. q       <-- quit main-menu
 #4. v##     <-- enter code for sub-menu (v11,v12,etc, lower-case)
 #5. q       <-- quit sub-menu
 #6. xxxxx   <-- enter command desired

menus are scripts with 'more' + documentation + EOF

The menus are simply shell scripts with a 'more' command at the begining & an EOF marker at the end. For example:

 # v11 - help sub-menu for Vancouver Utilities, stored at $UV/help/v11
 #     - called by main-menu $UV/help/uvhelp
 more <<'EOF'
                 ** v11 - Listing files & directories **
 l    - 'l' (alias l='ls -l') saves keystrokes for this commonly used command
 llm  - List Long files in Directory & pipe to more (sorted by filename)
      - like 'ls -l | more', but allows argument directory (default current)
      - saves keystrokes & adds functionality to this often repeated command
 EOF           --- omitting remainder of help/v11 ---

uvhelp menus part of Vancouver Utilities

The uvhelp menus are installed as part of Vancouver Utilities. You can see separate install instructions at uvhelp.htm#6V91 & how to create your own menus at uvhelp.htm#6V92.

 /home/uvadm           <-- Vancouver utilities homedir
 :     :                   (not showing other subdirs)
 :-----help              - subdir for help menus
 :     :-----uvhelp    <-- main-menu for Vancouver Utility helps
 :     :-----v11         - 1st sub-menu for VU helps
 :     :-----...               --- etc ---
 :     :-----v99         - last sub-menu for VU helps

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

uvhelp Reminders for script names & arguments

For this example, let's suppose we know there is a script to count files & lines in a directory, but we have forgotten its name & operating instructions. We can easily find it by entering 'uvhelp' for the main menu, scroll down to find the sub-menu code, then quit the main-menu, enter the sub-menu code to see the detailed operating instructions.

 #0. Login userxx --> /home/userxx

 #1. uvhelp   <-- display uvhelp main-menu
     ======
               ** uvhelp - main-menu of sub-menus **

 v11. Listing files & directories sorted by name,date,size etc
      llm  - sorted by filename, same as 'ls -l | more', saves keystrokes
      llt  - sorted by creation date, latest first
      lls  - sorted by file size, biggest first
      ...  - several more v11 scripts (omitted here)

 v12. counting files in directories & lines in files, some matching patterns
      (wc, cfl, cfd, cfdt, cfdpl, cfdd, cfddt, cfdpf, cfddf, cfdmm)
      wc    - unix Word Count (wc used in some of the following scripts)
      cfl   - Count Lines in 1 File
 -->  cfd   - Count Files,Lines,KB in 1 Directory    <-- we want this script
      cfdt  - Totals-Only version of Count Files,Lines,& KiloBytes in a Directory
                  --- omitting other scripts ---
        ----- Now we see the script we want 'cfd', can Quit the main menu -----
               & goto the sub-menus for script details & examples

 #3. q       <-- QUIT main-menu
     ====

 #4. v12     <-- enter code for sub-menu 'v12' to see details for
     ====
 #4a. ...    <-- scroll down to cfd instruction & sample report
               - a few lines shown below

#2. cfd - Count Files,lines,KB in 1 directory

 cfd dat1        <-- Command Format & Sample Report
 ========

 cfd - Count Files,Lines,& KiloBytes in a Directory
 File#    Lines      KB  Directory/Filename 20190722:0819
      1     335      32  dat1/CanadaMPs
                           --- 4 lines omitted ---
      6      50       4  dat1/USstates2
 ******    1250     112  *Totals* in Directory /home/uvadm/demo/dat1
                           --- remainder v12 SUB-menu omitted ---
 #5. q      <-- QUIT sub-menu
     ===

 #6. cfd /home/demo/dat1   <-- enter desired command for desired directory
     ====================

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

reading documentation vs running help menus

If you don't already have the Utiliites installed or just want to read more about the uvhelp menus, you can click on the following links. Note that the special format "+" links will take you to separate document uvhelp.htm.

To avoid losing your place in this UVdemos2.doc, it is best to 'right-click' on the desired links & open in 'new-tab'. Then you will not get lost in uvhelp.doc without an easy way back.

Do not confuse the HTML-Links (6V11-6V99 UPPER-case 'V') in website documentation with the sub-menu codes (v11-v99 lower-case 'v') required at your shell prompt.

uvhelp - main-menu of sub-menus

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

uvhelp - unix & VU most useful command summaries

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

uvhelp - unix & VU most useful command summaries

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

uvhelp - unix & VU most useful command summaries

       You can do useful work with only 1 instruction such as 'fix' to convert
       delimited files to fixed-field formats. Or 'rep' to search for a pattern
       & REPlace all occurrences with an alternate pattern.

       Or even No instructions - just enter '.' period (indicates end of
       instructions) to copy 1 or ALL files in a directory, automatically
       removing trailing blanks & removing CR's x'0D's that can cause problems
       on unix systems (CR's can cause scripts to fail).

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

uvhelp - unix & VU most useful command summaries

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

Part_7. Vancouver Utility Programming Aids - uvcopy & uvfix

Part 7 uvcopy & uvfix - Contents

'uvcopy' is the most powerful Vancouver Utility. It is a 'general purpose' (can do anything) data manipulation utility. It gives you the power of assembler without the complexity. It interprets the instruction files for pre-programmed jobs such as SelectJobs & TableJObs. You do not need to know the uvcopy instruction set to run the pre-programmed jobs.

But if you want to use it for your own customized applications, you can see the over 100 instructions at uvcopy3.htm. And be sure to see scripts uvfix1 & uvfixA in UVdemos2.htm#Part_7 - the easy way to use the power of uvcopy instructions without writing uvcopy jobs.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

Part 7 uvcopy - Contents (continued)

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

uvcopy - power of assembler without the complexity

The uvcopy language is based on the IBM 360/ZOS assembler instruction set, which means many mainframers will be familiar with it. Since it is interpretive, it gives you the power of assembly without the complexity. No compile required, just edit/modify the parameter file and run/rerun.

'uvcopy' provides the capabilities on unix/linux to replace various mainframe utilities such as IDCAMS, IEBGENER, EASYTRIEVE, QUIKJOB, etc.

'uvcopy' allows you to do anything on unix/linux systems that you could do with mainframe utilities - process packed decimal fields, Indexed files, variable length files, fixed length records without linefeeds, and column addressing. Column addressing is heavily used by mainframe utiltiies but not provided by the most Unix/Linux system utilties.

See over 100 uvcopy instructions documented at www.uvsoftware.ca/uvcopy3.htm and see sample problems & solutions at www.uvsoftware.ca/uvdemos2.htm#Part_7

The 1st example at uvsoftware.ca/uvdemos2.htm#7A1 illustrates the 'fix' instruction to convert a .csv (comma separated variables) file to a customized fixed field format which might be required for input to your existing applications.

Another example of uvcopy's powerful instructions is 'evs' which expands $VARIABLEs. See demo job testevs1 at uvsoftware.ca/uvcopy3.htm#evs which copies a demo file expanding $HOME, $LOGNAME, $HOSTNAME, $datetime, etc.

A practical example of 'evs' was preprocessing DB2 SYSIN files expanding $VARIABLEs such as $SYSREC00 for input to db2 which does not expand $VARIABLEs. See the demo version at uvsoftware.ca/uvcopy3.htm#expandevs1

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

7A1. Vancouver Utility Programming Aids - uvcopy & uvfix

uvcopy/uvfix1 - Convert .csv file to fixed-fields

We wanted to create a table of US state names & abbreviations. We downloaded the following .csv file. Here are a few sample records of Input/Output records:

                ** Input: $UV/demo/dat1/USstates.csv

      abr,state,capital,population,
      AL,Alabama,Montgomery,205764,
      AK,Alaska,Juneau,31275,
      AZ,Arizona,Phoenix,1445632,
   -------- omitting 44 records --------
      WV,West Virginia,Charleston,51400,
      WI,Wisconsin,Madison,233209,
      WY,Wyoming,Cheyenne,59466,

desired Output: $UV/demo/dat1/USstates

               1         2         3         4         5         6
      123456789012345678901234567890123456789012345678901234567890
      00  ab    state               capital                      0
      01  AL    Alabama             Montgomery             205,764
      02  AK    Alaska              Juneau                  31,275
      03  AZ    Arizona             Phoenix              1,445,632
       -------- omitting 44 records --------
      48  WV    West Virginia       Charleston              51,400
      49  WI    Wisconsin           Madison                233,209
      50  WY    Wyoming             Cheyenne                59,466

We will show you 2 solutions illustrated on the following pages.

1. Writing a 'uvcopy job' - Parameter File of uvcopy instructions to be interpreted by the uvcopy interpreter.
   
   
2. Using script 'uvfix1' & pre-programmed job 'uvfix1' to supply the uvcopy framework, file-handling, prompting for input & output viewing. This means we only have to code a few instructions.
   
   

First we will show you the uvcopy job followed by the uvfix1 solution.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

7A2. Converting .csv file to fixed format to demo uvcopy/uvfix1

Directories to demo uvcopy/uvfix1

Here are the most relevant subdirs/files required to demo the uvcopy & uvfix1 methods of converting dat1/USstates.csv to fixed field dat1/USstates2.

 /home/userxx/demo/              - copy to your homedir from /home/uvadm/demo/*
 :-----dat0                    <-- original testdata files for demos
 :     :-----USstates.csv        - US state names & 2 letter code abbreviations
 :-----dat1                    <-- converted testdata files for demos
 :     :-----USstates1           - csv converted to fixed fields 20 apart
 :     :-----USstates2           - reformatted to desired layout with seq#s
 :     :
 :-----pf                      <-- uvcopy job Parameter Files
 :     :-----USstatesfix1        - convert csv to fixed fields 20 bytes apart
 :     :-----USstatesfix2        - reformat to desired layout with seq#s
 :     :-----                    - you could create your own uvcopy jobs here
 :     :
 :-----tmp                     <-- tmp dirs for temp files, sorts, etc
 :     :                         - uvfix1 output for inspection & copyback
 :-----tmp1                    <-- suggest using tmp1/... for uvfixA outputs

Tips for writing uvcopy jobs

We have already written this uvcopy job. See the result listed on the next page, but first, here are a few tips to help you develop uvcopy jobs for your purposes.

1. When you need to write a new program (in any language), you usually search for an already written program that does a similar function & copy/rename/modify.
   
   
2. You can search the $UV/pf/.../... directories for similar jobs. Note that /home/uvadm/pf/* has 4 subdirs pf/adm/..., pf/demo/..., pf/util/..., pf/IBM/...
   
   
3. I suggest you grep the $UV/pf/demo directory for words that would occur in a similar job. In this case you would grep for '.csv'.
   
   
4. Now copy/rename/modify to solve your current problem.
   
   
5. See all instructions documented at uvsoftware.ca/uvcopy3.htm.
   
   

6 Use lots of #comments to explain your job to other programmers & for yourself months later. Here are 4 important #comment groups at the begining of the job:

• uvcopy jobname, purpose, where stored, author,& date
• Execution instructions
• Sample I/O records
• Logic description if complex (can omit for short simple jobs)

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

7A3. uvcopy job to convert USstates.csv to Fixed-Fields

writing uvcopy job to convert USstates.csv to fixed fields

 #0a. Login userxx --> /home/userxx/
 #0b. cd demo -------> /home/userxx/demo/

 #1. vi pf/USstatesfix2  <-- write the uvcopy job instructions
     ==================

 # USstatesfix2 - convert US States & capital Cities from comma delimited to fixed columns
 #              - uvcopy job stored in: $UV/pf/demo/... or $UV/demo/pf/...
 #              - created from 'copy1' skeleton - copied,renamed,& modified Jul2020
 #
 # uvcopy USstatesfix2,fili1=dat0/USstates.csv,filo1=tmp1/USstates
 # ===============================================================
 #  - convert .csv file to fixed column layout, sequence#, reformat as follows:
 #  - 1st 4 records input, fixed field 20 apart, then reformatted to a fixed layout
 #
 # uvcopy USstatesfix2      <-- same as above, see defaults on fili1/filo1 below
 # ===================          Note - output to tmp1 for inspect & copy to dat1/...
 # vi tmp1/USstates2        <-- verify output OK ?
 # cp tmp1/USstates2 dat1/  <-- copy tmp1 output to dat1/...
 #
 #                ** sample 1st 4 records Input & Output **
 #
 # abr,state,capital,population,
 # AL,Alabama,Montgomery,205764,   <-- input to area 'a'
 # AK,Alaska,Juneau,31275,
 # AZ,Arizona,Phoenix,1445632,
 #          1         2         3         4         5         6         7         8
 # 12345678901234567890123456789012345678901234567890123456789012345678901234567890
 # abr                 state               capital             population
 # AL                  Alabama             Montgomery          205764  <-- fix to area 'b'
 # AK                  Alaska              Juneau              31275
 # AZ                  Arizona             Phoenix             1445632
 #          1         2         3         4         5         6         7         8
 # 12345678901234567890123456789012345678901234567890123456789012345678901234567890
 # 00   abr  state               capital             population
 # 01   AL   Alabama             Montgomery             205,764       <-- reformat area 'c'
 # 02   AK   Alaska              Juneau                  31,275           for output
 # 03   AZ   Arizona             Phoenix              1,445,632
 #

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

convert USstates.csv to Fixed-Fields - continued

 rop=r1  # option to view output at EOF (vi,cat,more,head,uvlp13,etc)
 fili1=?dat0/USstates.csv,typ=LST,rcs=512   # '?' prompts for change, enter for default
 filo1=?tmp1/USstates2,typ=LST,rcs=512      # ouput to tmp1/..., inspect, copy to dat1/...
 @run
        opn    all                       open files
 # begin loop to get & put records until EOF
 loop   get    fili1,a0                  get record into area 'a'
        skp>   eof                       (cc set > at EOF)
 #------------------------------------------------------------------------
 # fix fields 20 bytes apart copying from csv area 'a' to fixed area 'b'
        fix    b0(20),a0(80),4,','       fix fields 20 bytes apart
 # reformat, copying from fixed area 'b' to reformat area 'c'
        mvn    c0(2),$ca1                sequence# in cols 01-02
        add    $ca1,1                    increment sequence#
        mvc    c4(2),b0                  state abrev
        mvc    c10(20),b20               state name
        mvc    c30(20),b40               capital city
        edt    c50(10),b60(10),'zz,zzz,zz9'  edit population
 #------------------------------------------------------------------------
        put    filo1,c0                  write to output file from area 'b'
        skp    loop                      return to get next record
 #
 eof    cls    all                       close files
        eoj                              end job

Area addresses must be zero relative displacements (vs 1 relative columns) and data movement is from operand 2 (sending) to operand 1 (receiving). See all instructions documented at uvsoftware.ca/uvcopy3.htm.

The most vital instruction is 'fix' that separates the ',' comma delimited input fields to fixed fields 20 bytes apart. We can then easily reformat the fields to the desired output locations.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

7A4. uvcopy job to convert USstates.csv to Fixed-Fields

Executing uvcopy job to convert USstates.csv to fixed fields

 #2. uvcopy pf/USstatesfix2  <-- execute uvcopy on Param File USstatesfix2
     ======================

console log

 USstatesfix2 - convert comma delimited US City populations to fixed columns
 190711:174047:USstatesfix2: uvcopy ver=20190704 pf=pf/USstatesfix2
 uvcopy LNX H64 license=20190704_99V_930630 site=UV_Software
 dat0/USstates.csv = default fili01 - null accept or reenter ?
 dat1/USstates2 = default filo01 - null accept or reenter ?
 190711:174051:USstatesfix2: EOF fili01 rds=50 size=1357: dat0/USstates.csv
 190711:174051:USstatesfix2: EOF filo01 wrts=50 size=872: dat1/USstates2
 EOJ, Output File written to: dat1/USstates2
 default command = null, OR enter: vi,cat,more,lp,uvlp12,etc -->
 --------> head <-- enter head to display 1st 10 output records
 00  ab    state               capital                      0
 01  AL    Alabama             Montgomery             205,764
 02  AK    Alaska              Juneau                  31,275
 03  AZ    Arizona             Phoenix              1,445,632
 04  AR    Arkansas            Little Rock            193,524
 05  CA    California          Sacramento             466,488
 06  CO    Colorado            Denver                 600,158
 07  CT    Connecticut         Hartford               124,775
 08  DE    Delaware            Dover                   36,047
 09  FL    Florida             Tallahassee            181,376
 10  GA    Georgia             Atlanta                420,003

Notes

1. In this case we coded the 'pf/' directory on the uvcopy command - because we are operating within the $HOME/demo/... directory.
   
   
2. uvcopy can find most uvcopy jobs automatically because the common_profile includes 'export PFPATH=...' (similar to export PATH=...)
   
   

      export PFPATH=$HOME/pf,$UV/pf/adm,$UV/pf/demo,$UV/pf/util,$UV/pf/IBM
      ====================================================================

3. $HOME/pf is coded prior to $UV/pf/... so your same-named uvcopy jobs would be found before Vancouver Utility jobs.
   
   
4. We used ',' separators vs the usual ':' separators to allow the same PFPATH definition on Windows systems, but either works on Unix/Linux.
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

7B1. uvfix1 - easy way to use uvcopy for simple jobs

'uvfix1' is the easy way to use the power of uvcopy when only a few instructions are required. You execute script $UV/sf/util/uvfix1 which calls uvcopy job $UV/pf/util/uvfix1. You only need to specify the input file.

The output is automatically written to the tmp/ directory in your current directory. You can inspect the output & if OK, you can copyback replacing the original if your intention was to fix a problem in the file (often the case).

uvfix1 alternate to convert .csv file to fixed field

 #0a. Login userxx --> /home/userxx/
 #0b. cd demo -------> /home/userxx/demo/

 #1. uvcopy uvfix1,fili1=dat1/USstates.csv  <-- run uvcopy uvfix1 directly
     =====================================

 uvfix1 - copy a text file & modify via uvcopy instruction keyins
        - input rec in area a has already been copied to output rec in b
 uop=q1c0n99r8192 - user option defaults
       c1         - pass thru any "#" col1 #comment records
         n99      - output record count limit (high# copies to EOF)
            r8192 - recsize ONLY for Fixed-Length OUTPUT records if desired
                  - for Fixed-Length, reply RSF/RST at prompt(default text typ=LSTt)
                  - for Text files: accept default recsize & default typ=LSTt
 User OPtion (uop) defaults  = q1c0n999999999r8192
 -->null to accept or override -->   <-- null to accept default options
 -->LSTt = typ default filo01 --->   <-- null to accept default file typ
 enter uvcopy instructions (period "." terminates entries)

 --> fix    b0(20),a0(80),4,','           <-- 7 instructions entered
 --> mvn    c0(2),$ca1
 --> add    $ca1,1
 --> mvc    c4(2),b0
 --> mvc    c10(20),b20
 --> mvc    c30(20),b40
 --> edt    c50(10),b60(10),'zz,zzz,zz9'
 --> .                                    <-- '.' to end entry & execute job

 190712:121236:uvfix1: EOF fili01 rds=50 size=1357: dat1/USstates.csv
 190712:121236:uvfix1: EOF filo01 wrts=50 size=872: tmp/USstates.csv
 default command = null,vi,cat,more,lp,uvlp12,etc --> vi <--

 #2. vi tmp/USstates.csv                 <-- check output
     ===================
      01  AL    Alabama             Montgomery             205,764
             --- showing only 1st & last records ---
      50  WY    Wyoming             Cheyenne                59,466

 #3. cp tmp/USstates.csv dat1/USstates2  <-- copy/rename as appropriate
     ==================================

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

7C1. uvfixA - modify ALL files in directory

'uvfixA' will copy all files from 1 directory to a 2nd directory, modifying records in all files via instruction keyins (vs 'uvfix1' modify only 1 file at a time).

uvfixA Example - modify directory of SQL scripts

Assume that we have FTP'd multiple SQL scripts from a mainframe to Linux & we wish to convert them to Linux standards vs mainframe conventions. Output files from the mainframe FTP ASCII are usually fixed length 80 bytes with CR/LF in columns 81-82, filenames are UPPER-case,& the data contents are UPPER-case.

We will copy all SQL scripts from the FTP output subdir sql0/... to tmp2/... while translating both filenames & data contents from UPPER-case to lower-case & automatically shortening mainframe FTP 80 column records to last non-blank.

relevant subdirs/files to demo uvfixA SQL scripts

 /home/userxx/demo/
 :-----sql0                          <-- SQL scripts FTP'd from mainframe
 :     :-----SELECT_CUSTOMERS_ALL
 :     :   --- 1st & last files ---
 :     :-----SELECT_STUDENTS_FAILING
 :-----sqls                          <-- SQL scripts copied from tmp2
 :     :                                - after checking OK
 :-----tmp2                          <-- tmp2/ output from uvfixA
 :     :-----select_Customers_all
 :     :   --- 1st & last files ---  <-- inspect output, if OK copy to sqls/...
 :     :-----select_students_failing

 #0a. Login userxx --> /home/userxx/
 #0b. cd demo -------> /home/userxx/demo/

 #1. l sql0      <-- list files FTP'd from mainframe
     ======
 -rw-rw-r-- 1 userxx apps  55 Jul 14 15:15 SELECT_CUSTOMERS_ALL
 -rw-rw-r-- 1 userxx apps  97 Jul 14 15:15 SELECT_CUSTOMERS_BASIC
 -rw-rw-r-- 1 userxx apps 146 Jul 14 15:15 SELECT_CUSTOMERS_SALES10000
 -rw-rw-r-- 1 userxx apps 149 Jul 14 15:15 SELECT_CUSTOMERS_SALES20000
 -rw-rw-r-- 1 userxx apps 136 Jul 14 15:15 SELECT_EMPLOYEE_DEPT123
 -rw-rw-r-- 1 userxx apps 115 Jul 14 15:15 SELECT_EMPLOYEE_SEATTLE
 -rw-rw-r-- 1 userxx apps  76 Jul 14 15:15 SELECT_ORDERS_BIG
 -rw-rw-r-- 1 userxx apps 109 Jul 14 15:15 SELECT_PATIENTS_OVER70
 -rw-rw-r-- 1 userxx apps 109 Jul 14 15:15 SELECT_PATIENTS_OVER80
 -rw-rw-r-- 1 userxx apps 109 Jul 14 15:15 SELECT_PATIENTS_OVER90
 -rw-rw-r-- 1 userxx apps 126 Jul 14 15:15 SELECT_STUDENTS_FAILING

 #2. cat sql0/SELECT_CUSTOMERS_ALL  <-- inspect 1st file, UPPER case ?
     =============================
      /* SELECT_CUSTOMERS_ALL */
         SELECT * FROM CUSTOMERS;

 #3. rm -f tmp2/*             <-- remove all files from intended output subdir
     ============

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

7C2. uvfixA - modify ALL files in directory

Execute uvfixA to modify All files in directory of SQL scripts

 #4. uvfixA sql0 tmp2 LSTt2 t1  <-- arg1=indir,arg2=outdir,arg3=outfiletype,arg4=options
     =========================    - log as follows:

User OPtion (uop) defaults = q1c0n999999999r8192t0 #4a. -->null accept or override --> t1 <-- could enter options here (if not on cmdline)

enter instruction: #4b. --> trl b0(100) <-- enter 'trl' (TRanslate to Lower) area 'b' 1st 100 bytes

 enter instruction:
 #4c. --> .             <-- enter '.' period to end instruction keyins

 190714:154752:uvfixA: EOF fili01 rds=2 size=55: sql0/SELECT_CUSTOMERS_ALL
 190714:154752:uvfixA: EOF filo02 wrts=2 size=55: tmp2/select_customers_all
         --- showing I/O stats for 1st & last files only ---
 190714:154752:uvfixA: EOF fili01 rds=4 size=126: sql0/SELECT_STUDENTS_FAILING
 190714:154752:uvfixA: EOF filo02 wrts=4 size=126: tmp2/select_students_failing

 #5. l tmp2             <-- list output files (check lower-case filenames)
     ======

      -rw-rw-r-- 1 userxx apps  55 Jul 14 15:47 select_customers_all
      -rw-rw-r-- 1 userxx apps  97 Jul 14 15:47 select_customers_basic
      -rw-rw-r-- 1 userxx apps 146 Jul 14 15:47 select_customers_sales10000
      -rw-rw-r-- 1 userxx apps 149 Jul 14 15:47 select_customers_sales20000
      -rw-rw-r-- 1 userxx apps 136 Jul 14 15:47 select_employee_dept123
      -rw-rw-r-- 1 userxx apps 115 Jul 14 15:47 select_employee_seattle
      -rw-rw-r-- 1 userxx apps  76 Jul 14 15:47 select_orders_big
      -rw-rw-r-- 1 userxx apps 109 Jul 14 15:47 select_patients_over70
      -rw-rw-r-- 1 userxx apps 109 Jul 14 15:47 select_patients_over80
      -rw-rw-r-- 1 userxx apps 109 Jul 14 15:47 select_patients_over90
      -rw-rw-r-- 1 userxx apps 126 Jul 14 15:47 select_students_failing

 #6. cat tmp2/*         <-- display 1st file contents (check lower-case data)
     ==========
      /* select_customers_all */
         select * from customers;

 #7. cp tmp2/* sqls     <-- if OK - copy files back to desired directory
     ==============

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

7D1. uvfix1 - easy way to use uvcopy for simple jobs

uvfix1 creating scripts with filenames in fixed columns

'uvfix1' helps make scripts with filenames in desired columns for neater appearance.

Useful when making scripts to copy all files from 1 directory to a 2nd directory, changing the filenames in various ways (UPPERcase, lowercase, dropping extensions, adding extensions, etc).

For example, suppose we have FTP'd SQL scripts from a mainframe to Linux & we wish to modify the filenames. Here are samples of the input & output filenames desired.

SQL scripts from mainframe in sql0/...

                        'SELECT.CUSTOMERS.ALL'
                        'SELECT.CUSTOMERS.BASIC'
                        'SELECT.CUSTOMERS.SALES10000'

SQL scripts on Linux renamed in sqls/...

                         select_customers_all.sql
                         select_customers_basic.sql
                         select_customers_sales10000.sql

filename rename changes desired

1. convert UPPER-case filenames to lower-case
2. remove the single quotes enclosing the filenames
3. convert '.' period separators to '_' underscore separators
4. add extension 'sql'
5. align all output filenames the same at column 41 (neater appearance)
   

   sample output

 cp sql0/SELECT.CUSTOMERS.ALL            sqls/select_customers_all.sql
 cp sql0/SELECT.CUSTOMERS.BASIC          sqls/select_customers_basic.sql
 cp sql0/SELECT.CUSTOMERS.SALES10000     sqls/select_customers_sales10000.sql

Operating Procedures

 #0a. Login userxx --> /home/userxx/
 #0b. cd demo -------> /home/userxx/demo/

 #1. ls sql0 > sf/copy_rename_sql0
     =============================
     - capture mainframe filenames assigning appropriate name for intended script
       to be created by manipulations with uvfix1

 #2. cat sf/copy_rename_sql0   <-- confirm input as expected
     =======================     - showing 1st 3 of 11 lines
       SELECT.CUSTOMERS.ALL
       SELECT.CUSTOMERS.BASIC
       SELECT.CUSTOMERS.SALES10000

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

7D2. uvfix1 creating scripts with filenames in fixed columns

uvfix1 - Execution & Console Log

 #3. uvfix1 sf/copy_rename_sql0
     ==========================
     - execute uvfix1, input filenames, named for intended script
     - console log as follows:

User OPtion (uop) defaults = q1c0n999999999r8192 -->null to accept or override --> <-- null to accept default options -->LSTt = typ default filo01 ---> <-- null to accept default file typ

   clr  b0(80)      <-- example: clr - CLeaR output area b
   mvc  b6(80),a0   <-- example: mvc - MoVe Char a to b offset 6 right
   add  $ca1,1      <-- example: add - count records
   mvn  b0(5),$ca1  <-- example: mvn - MoVe Numeric seq# to 1st 5 bytes

 enter a uvcopy instruction (period "." terminates entries)
 #3a. --> mvf b0(100),'cp sql0/'
 #3b. --> cat b0(100),a0(30)
 #3c. --> mvf b40(60),'sqls/'     <-- see explanations on next page
 #3d. --> cat b45(50),a0(30)
 #3e. --> trl b45(50)
 #3f. --> rep b45(50),x'27',''    <-- remove the single quotes
 #3g. --> rep b45(50),'.','_'
 #3h. --> cat b45(50),'.sql'
 #3h. .
 190715:113936:uvfix1: EOF fili01 rds=11 size=259: sf/copy_rename_sql0
 190715:113936:uvfix1: EOF filo01 wrts=11 size=798: tmp/copy_rename_sql0
 EOJ, Output File written to: tmp/copy_rename_sql0

 #4. cat tmp/copy_rename_sql0       <-- confirm output as expected
     ========================         - showing 1st 3 of 11 lines
       cp sql0/SELECT.CUSTOMERS.ALL            sqls/select_customers_all.sql
       cp sql0/SELECT.CUSTOMERS.BASIC          sqls/select_customers_basic.sql
       cp sql0/SELECT.CUSTOMERS.SALES10000     sqls/select_customers_sales10000.sql

 #5. cp tmp/copy_rename_sql0 sf/    <-- copy tmp/ output to intended script
     ===========================

 #6. chmod 775 sf/copy_rename_sql0  <-- add execute permissions
     =============================

 #7. [ rm sqls/* ]         <-- may need to remove existing files in sqls/... ???
     =============

 #8. sf/copy_rename_sql0   <-- Execute script to copy sql0/* to sqls/...
     ===================       renaming files as desired

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

7D3. uvfix1 creating scripts with filenames in fixed columns

uvfix1 - Explanations of Instructions entered

 We will explain the intructions entered to uvfix1 on lines #3a to #3h above
 - illustrating with the 1st record step by step manipulations

 SELECT.CUSTOMERS.ALL                   <-- 1st record input

       --- outputs after each instruction ---

 cp sql0/
 ========================================================
                                           ^-- after #3a. mvf b0(100),'cp sql0/'

 cp sql0/SELECT.CUSTOMERS.ALL
 ========================================================
                                           ^-- after #3b. cat b0(100),a0(30)

 cp sql0/SELECT.CUSTOMERS.ALL    sqls/
 =========================================================
                                           ^-- after #3c. mvf b40(60),'sqls/'

 cp sql0/SELECT.CUSTOMERS.ALL    sqls/'SELECT.CUSTOMERS.ALL'
 ===========================================================
                                           ^-- after #3d. cat b45(50),a0(30)

 cp sql0/SELECT.CUSTOMERS.ALL    sqls/'select.customers.all'
 ===========================================================
                                           ^-- after #3e. trl b45(50)

 cp sql0/SELECT.CUSTOMERS.ALL    sqls/select.customers.all
 =========================================================
                                           ^-- after #3f. rep b45(50),x'27',''

 cp sql0/SELECT.CUSTOMERS.ALL    sqls/select_customers_all
 =========================================================
                                           ^-- after #3f. rep b45(50),'.','_'

 cp sql0/SELECT.CUSTOMERS.ALL    sqls/select_customers_all.sql
 =============================================================
                                           ^-- after #3g. cat b45(50),'.sql'

Notes

1. Could do some of these steps using an editor (such as 'vi')
   
   
2. But hard to copy data to desired output columns for neat appearance
   
   
3. And hard to restrict operations to desired column ranges
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

7E1. Vancouver Utility Programming Aids - uvcopy & uvfix

MakeTelList - uvcopy job to create a Telephone List

See this uvcopy job at /home/uvadm/demo/pf/MakeTelList. You can execute as documented on line 4 or 6 of the listing below. See sample Input records on lines 8-10 & sample Output records on lines 14-16.

 # MakeTelList - create telephone list from Customer Master file
 #             - see www.uvsoftware.ca/uvdemos2.htm#7E1
 #
 # uvcopy MakeTelList,fili1=tf/custmas2,filo1=tmp1/custmas2.tlist
 # ==============================================================
 # uvcopy MakeTelList  <-- same as above, files default below as shown above
 # ==================
 #         10        20        30        40        50        60        70        80        90       100       110       120
 # 123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890
 #                     ----- sample Input -----
 # 139923    JOHNSTONE BOILER & TANKS 1250 EAST PENDER STREET  VANCOUVER        BC V5L1W1    604-320-1845 GEORGE BROWN
 # 147615  X O'CONNER R.V. CENTRE     44430 YALE ROAD WEST     CHILLIWACK       BC V2P6J1    604-858-4161 BONNIE
 # 152355    SHAW, JOHN               477 CARIBOO CRES.        COQUITLAM        BC V3M1X1    604-291-6261 JOHN
 #                     ----- sample Output -----
 # 139923   JOHNSTONE BOILER & TANKS   604-320-1845  GEORGE BROWN
 # 147615   O'CONNER R.V. CENTRE       604-858-4161  BONNIE
 # 152355   SHAW, JOHN                 604-291-6261  JOHN
 #
 opr='$jobname - create telephone list from Customer Master file'
 rop=r1      # prompt to view output file at EOF (reply vi,cat,more,etc)
 fili1=?tf/custmas2,typ=LST,rcs=256
 filo1=?tmp1/custmas2.tlist,typ=LSTt,rcs=80
 @run
       opn   all                    open files
 # begin loop to get, reformat,& put records until EOF
 man20 get   fili1,a0               get record into area 'a'
       skp>  man90                  (condition code set > at EOF)
 #-----------------------------
 man30 clr   b0(256),' '            clear output area
       mvc   b0(6),a0               cust#
       mvc   b9(25),a10             customer name
       mvc   b36(12),a90            telephone#
       mvc   b50(18),a103           contact name
 #-----------------------------
 man40 put   filo1,b0               write record to output file
       skp   man20                  return to get next record
 man90 cls   all                    close files
       eoj                          end job

Suggested Exercise for you

Create the same Telephone list using 'uvfix1' (vs uvcopy job above). Procedures would be similar to those shown on pages '7D1' - 7D2 to create a script to copy SQL scripts changing filenames from mainframe conventions to Linux conventions.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

7F1. Vancouver Utility Programming Aids - uvcopy

Expanding $VARIABLES

The uvcopy 'evs' instruction copies text strings expanding environmental $VARIABLEs. Here is a simple demo job you can run:

 #0a. Login userxx --> /home/userxx/
 #0b. cd demo -------> /home/usrxx/demo/

 #1. uvcopy testevs1      <-- demo 'evs' expand Environmental Variables
     ===============        - output shown below:

      homedir=$HOME, user=$LOGNAME, datetime=$datetime              <-- input
      ------------------------------------------------
      homedir=/home/uvadm, user=uvadm, datetime=2020/03/28_08:00:29 <-- output
      -------------------------------------------------------------

 #2. cat $UV/pf/adm/testevs1   <-- display the uvcopy job (Parameter File)
     =======================     - code listed below:

 # testevs1 - test uvcopy instruction 'evs' (test job in $UV/pf/adm/testevs1)
 #          - copy a string expanding environmental-variables
 #          - this job includes a hard-coded string with $HOME,$LOGNAME,etc
 #
 # uvcopy testevs1    <-- execute this job to test the "evs" instruction
 # ===============      - with hard-coded $Variables (see testevs2 prompts for entry)
 @run
         msg     '  --- test uvcopy instruction "evs" copy text expanding $VARIABLES ---'
         mvf     a0(100),'homedir=$HOME, user=$LOGNAME, machine=$HOSTNAME, datetime=$datetime'
         msg     a0(100)                show string BEFORE expanding variables
         evs     b0(100),a0(100)        copy from area 'a' to area 'b' expanding $variables
         msg     b0(100)                show string AFTER expanding variables
         eoj

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

7F2. Demo uvcopy 'evs' instruction to expand $VARIABLES

testevs2 - 'evs' demo#2 - enter your strings with $Variables

 #3. uvcopy testevs2   <-- run 2nd 'evs' demo (prompts for your text with $Variables)
     ===============     - sample input & output shown below:

      Enter text containing $VARIABLEs ($HOME,$LOGNAME,$PWD,$datetime,etc)
      --> I am $LOGNAME, homedir=$HOME, HOST=$HOSTNAME, date/time=$datetime
      --> I am userxx, homedir=/home/userxx, HOST=uvsoft5, date/time=2020/03/30_10:14:24
      Enter another string OR null entry to end job

 #4. cat $UV/pf/adm/testevs2   <-- display the uvcopy job (Parameter File)
     =======================     - code listed below:

 # testevs2 - test uvcopy instruction 'evs' (test job in $UV/pf/adm/testevs2)
 #          - copy a string expanding environmental-variables
 #          - this job prompts you to enter a string containing any environment variables
 #
 # uvcopy testevs2    <-- execute this job to test the "evs" instruction
 # ===============      - prompting to enter string with $VARIABLEs
 @run
         msg     '          --- test "evs" - copy YOUR text expanding $VARIABLES ---'
 man10   msga1w  '     Enter text containing $VARIABLEs (ex: $HOME, $PWD, $datetime, etc)'
         skp<    man99                  goto end job if null entry
         mvfv3   a0(100),$arg1
         evs     b0(100),a0(100)        copy from area 'a' to area 'b' expanding $variables
         msg     b0(100)                show string AFTER expanding variables
         msg     '     Enter another string OR null entry to end job'
         skp     man10
 man99   eoj

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

7F3. uvcopy 'evs' instruction to expand $VARIABLES

expandevs1 - copy a file expanding $VARIABLEs

The above (testevs1 & testevs2) were only demos, whereas 'expandevs1' can be used to do some real work - see the next page '7F4' where expandevs1 plays a critical role in converting mainframe JCL unloading DB2 tables to unix scripts for operation on unix/linux systems.

First, we show you the uvcopy job listing for expandevs1 & a short demo showing the test input file & output file with $variables expanded.

 # expandevs1 - copy a text file expanding unix ENVIRONMENTAL $VARIABLEs
 #            - by Owen Townsend, UV Software, Jan 2018
 # Example below used by db2 script dsntiaul to expand $SYSRTMP
 #  - JCL converter uses this technique to load/unload DB2 tables
 #
 # uvcopy expandevs1,fili1=$SYSIN,filo1=$SYSINTMP
 # ==============================================
 # - copy $SYSIN to $SYSINTMP, expanding $VARIABLEs ($SYSRTMP, possible others)
 # - used by db2 script dsntiaul to expand variables such as $SYSRTMP
 #   since input on db2 -txf $SYSIN does not expand
 # - may run this demo job with supplied test file $UV/tf/expandevs1_data
 #
 rop=r1      # prompt for output file disposition at EOJ
 fili1=?tf/expandevs1_data,rcs=256,typ=LST
 filo1=?tmp/$fili1,rcs=256,typ=LSTt
 @run
         opn    all
 # begin loop to copy expanding $variables
 man20   get    fili1,a0                get next line
         skp>   man90                   (cc set > at EOF)
         mvc    b0(200),a0              copy to output in case # col1
         cmc    a0(1),'#'               inhibit expansion ? (# col 1)
         skp=   man30                   ifso - skip evs, go output
         evs    b0(200),a0(100)         copy expanding any $variables
 man30   put    filo1,b0                write to output file
         skp    man20                   repeat loop until EOF
 # EOF - close files & end job
 man90   cls    all
         eoj

run expandevs1 with demo file

 #5. uvcopy expandevs1,fili1=tf/expandevs1_data,filo1=tmp/expandevs1_data
     ====================================================================
 #5a. uvcopy expandevs1       <-- same as above, I/O files default as shown
      =================
 #6. cat tmp/expandevs1_data  <-- display output file
     =======================
      # HOME=$HOME HOSTNAME=${HOSTNAME} LOGNAME=$LOGNAME   <-- input
      #-------------------------------------------------
      HOME=/home/uvadm HOSTNAME=uvsoft5 LOGNAME=uvadm      <-- output
      #-------------------------------------------------

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

7F4. Demo uvcopy 'evs' instruction to expand $VARIABLES

expandevs1 used for mainframe DB2 conversions to unix

'expandevs1' can do some serious valuable work at unix/linux sites. It has been used to expand $variables in DB2 scripts to load/unload tables at JCL conversion sites. We added code with $Variables to the SYSIN files for the db2 utility & then used 'expandevs1' to copy the file before submitting to the db2 utility.

To understand this explanation, please refer to the samples on the following page:

 #1. parms/db2sysinxx - SYSIN SQL commands to db2 utility
 #2. DB2 unload table step - from unix script (converted from mainframe JCL)
 #3. dsntiaul - script to unload DB2 tables (called by JCL/script)

Why expandevs1 needed for JCL conversions

1. We needed 'expandevs1' because unix versions of DB2 (or SQL Server) can NOT unload tables to 'Fixed-Field' copybook layouts expected by following steps in the JCL. Unix versions of DB2 or SQL server can unload only to 'Delimited-Formats'. So, we follow the DB2 script with a uvcopy job which uses the copybook, to convert the unloaded delimited format (in $SYSRTMP) to the fixed-field layout expected by following COBOL programs.
   
   
2. DB2 UDB unloads tables in delimited format to a file defined by $SYSREC00. On the mainframe SYSREC00 would define a file in fixed field format expected by some following step in the JCL/script.
   
   
3. We solved the problem by writing unix scripts (named the same as the mainframe utilities (DSNTIAUL,DSNUTILB,etc) in lower case (dsntiaul,dsnutilb,etc). These scripts execute the command line utility (db2 or sqlcmd) with SQL instructions from the SYSIN parm files.
   
   
4. We redefine the output file 'SYSREC00' (fixed-field format on the mainframe) as $SYSRTMP (within & only for the dsntiaul script). 'db2' will then output to $SYSRTMP (in delimited format), which will be converted to fixed-field back in the JCL/script where SYSRTMP defines the delimited format & SYSREC00 defines the fixed-field format --> exportfile SYSREC00 $SYSRTMP <--
   
   
5. uvcopy input 'fili1=SYSRTMP' will be delimited format created by unix DB2. uvcopy output 'filo1=$SYSREC00' will be fixed field copybook layout, expected by the following step.
   
   
6. This logic required parms with SELECTs to be modified by inserting --> export to $SYSRTMP of del modified by coldel| nochardel <-- This modification was performed by uvcopy job $UV/pf/db2delimfix1 while copying all original parm1/... to parms/...
   
   
7. And since '$SYSRTMP' is not expanded by 'db2 -txf $SYSIN', we changed it to 'db2 -txf $SYSINTMP' & preceded it with 'uvcopy expandevs1', to expand $VARIABLEs ($SYSRTMP) in $SYSIN while copying to $SYSINTMP.
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

7F5. Demo uvcopy 'evs' instruction to expand $VARIABLES

JCL conversion to unload DB2 tables on unix/linux

Here are the 3 components involved reduced to essential lines only.

#1. parms/db2sysinxx - SQL input to db2 utility

 /* db2sysinxx - 'SYSIN' file to DB2 command line utility 'db2' */
 /*            - to demo JCL conversion to unix/linux scripts   */
 /*            - this demo file stored at $UV/tf/db2sysinxx     */
 export to $SYSRTMP of del modified by coldel| nochardel
 SELECT * FROM tablexx;

#2. DB2 unload table step - from JCL/script

 #1========== begin step#S0040 DSNTIAUL UNLOADSEL ============
 exportfile SYSREC00 data1/fixed.field.datafilexx
 exportfile SYSIN $RUNLIBS/parms/db2sysinxx
 exportfile SYSRTMP $JTMP/${JSTEP}_SYSREC00
 exportfile SYSINTMP $JTMP/db2sysinxx
 #3---------------------------------------------------------------
 dsntiaul <$SYSIN   #<-- call script to execute db2 utility to unload
 uvcopy $RUNLIBS/pfq1/delim2fixedxx,fili1=$SYSRTMP,filo1=$SYSREC00
 #4---------------------------------------------------------------
 # - uvcopy job converts unloaded delimited to fixed format for following COBOLs

#3. dsntiaul - unload table script - called by JCL/script

 # dsntiaul - UNLOAD DB tables - SELECT with delimiter via export chardel
 #          - minimal comments - see complete version at $UV/sf/IBM/dsntiaul
 #
 rm -f $SYSRTMP            # remove any existing $SYSRTMP
 touch $SYSRTMP            # recreate empty file
 export SYSREC00=$SYSRTMP  #<-- redef SYSREC00 as $SYSRTMP (only in this script)
 #
 uvcopy expandevs1,fili1=$SYSIN,filo1=$SYSINTMP
 #=============================================
 # - copy $SYSIN to $SYSINTMP, expanding $VARIABLEs ($SYSRTMP, possible others)
 #   since input by 'db2 -txf $SYSIN' does not expand
 #-------------------------------------------------------------------------------
 export DB2CLP=**$$**
 echo "db2 script begin: dsntiaul - UNLOAD SELECT with delimiter via export chardel"
 db2 "CONNECT TO $DBNAME USER $DBUSR USING $DBPWD"
 db2 "SET SCHEMA = $DBUSR"
 db2 -txf $SYSINTMP       #<-- Note $SYSINTMP $variables expanded by expandevs1 above
 db2 "connect reset"

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

Part_8. Mass Change Search/Replace Beyond Unix Tools

UVdemos2 - Part 8 - Contents

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

8A1. Search/Replace Beyond Unix System Tools

Overview of Vancouver Utility Mass Change Utilities

The Vancouver Utilities are invaluable to IT professionals at Unix/Linux sites.

1. They are much more powerful than grep because they can search for multiple patterns with 1 pass, using AND & OR relationships.
   
   
2. You can specify that the multiple patterns must be found or not found on the same line or on any line in the file, or on 1 or any line between a begining & ending line, that are themselves identified by 1 or multiple patterns.
   
   
3. You can use these tools to investigate problems in text files of any kind: data files, scripts (SQLs, JCLs, FTPs, etc),& any programming language.
   
   
4. You can use these tools to research the impacts of planned changes to your scripts, programs, documentation, etc.
   
   
5. These tools create reports in subdirs (rpts,stats,selects) of the current working directory, automatically named from the file or directories being searched & the report names are concatenated with the patterns used. This allows you to review past searches & easily modify & repeat the search.
   
   
6. The search reports include all relevant info (files,dirs,search patterns,date/time, user,host,etc) to help you document problems & plan proposed changes.
   
   
7. uvcopy makes it easy to do mass changes that would otherwise require many hours of editing or writing specific programs in other languages.
   
   
8. uvcopy has all the power required to deliver solutions much faster than other languages. uvcopy is parameter driven & requires no compiles - the power of assembly without the complexity.
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

8B1. Search/Replace Beyond Unix System Tools

scan1d - scan directory for 1 pattern qualified by other patterns

'scan1d' is a uvcopy job to scan all files in a directory searching for any 1 pattern, qualified by 1 or 2 other patterns (present or not present), creating a report with matching lines, line#s,& total matches by file.

 uvcopy scan1d   - would prompt for directory,arguments,& options
 =============   - better to code directory & arguments on command line
                 - to show on audit report for easier re-runs

command format & arguments

 uvcopy scan1d,fild1=dir,arg1=search-pat,arg2=qual-present,arg3=qual-absent
 ==========================================================================
  ,arg6=searchbgn,arg7=searchend,arg8=match-optns,arg9=viewer,uop=user-optns
  ==========================================================================
   - command format above, see example/demo on page below

 arg1 - search pattern (prefix 0x indicates hex, 0x2C for a comma)
 arg2 - qualifier present (optional)
 arg3 - qualifier absent, or 2nd present if option p2
 arg6 - pattern to begin scanning for search pattern (optional)
      - also see alternative uop=a1 to begin scan by data file line
 arg7 - pattern to end scanning for search pattern (optional)
      - also see alternative uop=b99999 to end scan by data file line
 arg8 (match options): q3 inhibits scanning within quotes
        i = case insensitive (patterns must be entered in lower case)
        p = pattern match chars (@=any alpha,=any numeric,etc)
 uop (user options): q1 causes prompt for change, q0 inhibits prompt
        a1=line(within file) to begin scan,b99999=lineto end scan
        c0=column(within lines, zero rel) begin scan, d256=length of scan
        p1 - qualifier1 Present & qualifier2 Absent'
        p2 - qualifier1 Present & qualifier2 Present'
        p4 - qualifier1 Absent  & qualifier2 Absent'

July 2020 updates

 scan1d,scan2d,rep1d,rep2d updated to create audit reports in rpts/...
 - named as jobname_indir_oudir_searchpattern_replace_pattern_options
 - showing command used to create report, making it easy to rerun
 New doc at uvdemos2.htmPart_8 (vs old doc at scanjobs.htm)
 - using new demo files in $UV/demo/dat1/... (vs $UV/tf/...)

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

8B2. scan1d - scan directory for 1 pattern qualified by other patterns

scan1d demo

 #1. cdm   <-- alias to change to the demo/... subdir
     ===     - /home/uvsoftxx/demo/... for online to UVsoftware website
             - /home/userxx/demo/..... for offline on user machines

 #2. uvcopy scan1d,fild1=demo/dat1,arg1=Idaho
     ========================================
      - scan all files in demo/dat1/... searching for "Idaho"
      - output report will default to rpts/demo_dat1_Idaho
      - First --> mkdir rpts <-- if not already present
      - See demo output Report listed below

 #3. cat rpts/scan1d_dat1_Idaho
     ==========================

 Report: rpts/scan1d_dat1_Idaho
 -----> uvcopy scan1d,fild1=dat1,arg1=Idaho
        ============================================================================
 Format: uvcopy scan1d,fild1=indir,arg1=search,arg2=qual1,arg3=qual2,uop=UserOptions
                     ,arg6=searchbgn,arg7=searchend,arg8=MatchOptions
 MatchOptnsArg8: i=Insensetive, q3=notinquotes, p=patternchars(@=alpha,=num,etc)
 UserOptions: a0=BgnScan at bgnfile or arg6 if spcfd, a=BgnScanLine
             b0=EndScan at endfile or arg7 if spcfd, b=EndSscanLine
             c0=BgnScan at dsplcmnt 0 or cdsp, d0=EndScan at 256 or dsplcmnt
             p1=qual1Present & qual2Absent, p2=bothPresent, p4=bothAbsent
 Date=2020/07/20_12:58:00, Host=uvsoft5, User=uvadm, Option-Overrides=
 ====================================================================================
 00101 097  ID  Idaho                Boise City city                            205,671
 00291 287  ID  Idaho                Meridian city                               75,092
 00305rt: rpts/scan1d    2 hits @EOF: dat1/UScities

 00013 ID                  Idaho               Boise               205671
 00051                   1 hits @EOF: dat1/USstates1

 00013 12  ID    Idaho               Boise                  205,671
 00051                   1 hits @EOF: dat1/USstates2
 =======================================================2020/07/20_12:58:03======
 EOD: 4 hits in 3 files of 16 total (1460 lines)

 Note - Audit report saved in rpts/... for later reviews, reruns, changes & reruns
     - includes all info you might need directory & arguments
     - Audit report-name changes to reflect changes you make to indir & arguments

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

8B3. scan1d - scan directory for 1 pattern qualified by other patterns

Alternate Demos Suggested

 Here are some more suggested demos you can run. We will not show the reports
 - but will tell you how many hits to expect (see if your results agree ?).

 #0. rm -f rpts/*   <-- remove any previous audit reports
     ============

 #1. uvcopy scan1d,fild1=dat1,arg1=Vancouver,arg2=BC  <-- search 'Vancouver' And 'BC'
     ===============================================      (arg2 Qualifier-Present)
      - expect 10 hits in 2 files of 13 total

 #2. uvcopy scan1d,fild1=dat1,arg1=Vancouver,arg3=BC  <-- search 'Vancouver' and NOT 'BC'
     ===============================================      (arg3 Qualifier-Absent)
      - expect 1 hit in 1 file of 13 total

 #3. uvcopy scan1d,fild1=dat1,arg1=Richmond,arg2=VA,arg3=BC  <-- 'Richmond' & 'VA', NOT 'BC'
     ======================================================      (arg2 Present, arg3 Absent)
      - expect 3 hits in 3 files of 13 total

 #4. l rpts    <-- list Audit files from alternate demos
     ======
      -rw-rw-r-- 1 uvadm apps 1405 Jul 22 12:45 scan1d_dat1_Richmond_VA_not_BC
      -rw-rw-r-- 1 uvadm apps 2082 Jul 22 12:22 scan1d_dat1_Vancouver_BC
      -rw-rw-r-- 1 uvadm apps 1150 Jul 22 12:23 scan1d_dat1_Vancouver_not_BC

Run your own scan1d's

 #1. ls dat1      <-- list test file-names available
     =======
      CanadaMPs CanadaProvinces Provinces1 Provinces2
      UScandidates UScandidateups UScities UScongress USstates1 USstates2
      insults nameadrs1 payroll1.dlm

 #2. more dat1    <-- list test-file contents
     =========      - not shown here

 #3. uvcopy scan1d,fild1=dat1,arg1=SearchPattern,arg2=QualifierPresent
                             ,arg3=QualifierAbsent,uop=options
     =================================================================
      - make up your own scan1d's

 #4. l rpts/      <-- list Audit reports, see most recent
     =======        - ReportName includes your filename & arguments

 #5. more rpts/*  <-- inspect your audit reports
     ===========

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

8C1. Search/Replace Beyond Unix System Tools

scan2d - scan directory for matches to patterns in a tablefile

'scan2d' is a uvcopy job to scan all files in a directory searching for any match to a table file of search patterns & optional qualifying patterns, matching lines are written to rpts/... with a filename that identifies the jobname (scan2d), the directory, the table-filename, & any options.

 uvcopy scan2d   <-- would solicit files & arguments
 =============     - better to code directory & arguments on command line
                   - to show on audit report for easier re-runs

 uvcopy scan2d,fild1=indir,fili2=tablefile,arg6=SearchBegin,arg7=SearchEnd
                          ,arg8=MatchOptions,uop=UserOptions
 ==========================================================================
  - command format above, see example/demo on page below

scan2d demo - July 2020

 #1. cdm   <-- alias to change to the demo/... subdir
     ===     - /home/uvsoftxx/demo/... for online to UVsoftware website
             - /home/userxx/demo/..... for offline on user machines

 #2. cat tf/scan2d.tbl   <-- inspect table file to be used for scan2d demo
     =================     - you could prepare alternates with 'vi'

 # scan2d.tbl - table file to demo --> uvcopy scan2d,fild1=directory,fili2=patterntable
 # scan2d - scan all files in directory for any match in a table of patterns
 # 01-30 - search pattern (ended by 1st tilde)
 # 31-60 - qualifier1, must ALSO be present, if coded (disabled by tildes)
 # 61-80 - qualifier2, must  NOT be present, if coded (disabled by tildes)
 #       - option p1 (default above), option p2 both present
 North Vancouver~~~~~~~~~~~~~~~BC~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Vancouver~~~~~~~~~~~~~~~~~~~~~WA~~~~~~~~~~~~~~~~~~~~~~~~~~~~BC~~~~~~~~~~~~~~~~~
 Olympia~~~~~~~~~~~~~~~~~~~~~~~WA~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 ~~~~~~~~~~~~~~~~~~~~~~~~(table end marker)~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

8C2. scan2d - scan directory for matches to patterns in a tablefile

scan2d demo

 #3. uvcopy scan2d,fild1=dat1,fili2=tf/scan2.tbl  <-- execute scan2d on demo dir
    ==========================================       with demo table-file patterns
      - best to specify indir, tablefile,& any arguments on command line
        (will show on audit report, making it easier for any later reruns)
      - could specify audit report via filo1=..., but it defaults as shown below

 #4. cat rpts/scan2d_dat1_scan2d.tbl   <-- inspect output report
    ===============================

 Report: rpts/scan2d_dat1_scan2d.tbl
 -----> uvcopy scan2d,fild1=dat1,fili2=tf/scan2d.tbl
        ============================================================================
 Format: uvcopy scan2d,fild1=indir,fili2=pattern-table,uop=UserOptions
                     ,arg6=searchbgn,arg7=searchend,arg8=MatchOptions
 MatchOptnsArg8: i=Insensetive, q3=notinquotes, p=patternchars(@=alpha,=num,etc)
 UserOptions: a0=BgnScan at bgnfile or arg6 if spcfd, a=BgnScanLine
             b0=EndScan at endfile or arg7 if spcfd, b=EndSscanLine
             c0=BgnScan at dsplcmnt 0 or cdsp, d0=EndScan at 256 or dsplcmnt
             p1=qualifier1 Present & qualifier2 Absent, p2=both Present
             t1=type 1 table - qualifiers apply only to current line (default)
             t2=type 2 table - qualifiers independent of search patterns
 Date=2020/07/20_12:27:43, Host=uvsoft5, User=uvadm, OptionOverrides=
 ====================================================================================
                     ** Table-File = tf/scan2d.tbl **
 North Vancouver~~~~~~~~~~~~~~~BC~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Vancouver~~~~~~~~~~~~~~~~~~~~~WA~~~~~~~~~~~~~~~~~~~~~~~~~~~~BC~~~~~~~~~~~~~~~~~
 Olympia~~~~~~~~~~~~~~~~~~~~~~~WA~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 ================================================================================
 00048 WA                  Washington          Olympia             46478
 00051                   1 hits @EOF: dat1/USstates1

 00048 47  WA    Washington          Olympia                 46,478
 00051                   1 hits @EOF: dat1/USstates2

 00001 Owen Townsend       4667 Hoskins Rd     North Vancouver, BC Canada V7K2R3
 00008                   1 hits @EOF: dat1/nameadrs1

 00327 327  Wilkinson          Jonathan        North Vancouver               BC Liberal          2015
 00335                   1 hits @EOF: dat1/CanadaMPs

 00142 138  WA  Washington           Vancouver city                             161,791
 00305                   1 hits @EOF: dat1/UScities
 =======================================================2020/07/20_12:27:44======
 EOD: 00005 hits in 0005 files of 0016 total (01460 lines)

 Note - Audit report saved in rpts/... for later reviews, reruns, changes & reruns
     - includes all info you might need directory, table-file, arguments
     - Audit report-name includes any changes you make indir,tablefile,arguments

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

8D1. Search/Replace Beyond Unix System Tools

rep1d - scan a directory replacing 1 pattern with an alternate

'rep1d' is a uvcopy job to scan all files in a directory searching for any 1 pattern & replacing with an alternate pattern. Replacement may be qualified by 1 or 2 other patterns that must be or must not be present.

 uvcopy rep1d   - directories & arguments will be solicited if omitted
 ============   - could specify on command line as follows:

 uvcopy rep1d,fild1=indir,fild2=outdir,arg1=search,arg2=replace
             ,arg3=qual-present,arg4=qual-absent,arg6=repbgn,arg7=repend
             ,arg8=match-optns,uop=user-optns

 arg1 - search pattern
 arg2 - replacement
 arg3 - qualifier present (optional)
 arg4 - qualifier absent or 2nd qual present if option p2
 arg6 - pattern to begin scanning for search pattern (optional)
      - also see alternative uop=a1 to begin scan by data file line
 arg7 - pattern to end scanning for search pattern (optional)
      - also see alternative uop=b99999 to end scan by data file line
 arg8 (match options): q3 inhibits scanning within quotes
        p - pattern match chars (@=any alpha,=any numeric,etc)
        s - allows match chars in replacement patterns
 uop  - user options (see options on the next page)

rep1d OLD demo

 uvcopy rep1d,fild1=tf,fild2=tmp2,arg1=Canada,arg2=Iceland,arg3=~,arg4=BC,arg8=n
 ==============================================================================
  - output directory will default to tmp2/ if unspecified
  - output audit report will default to 'tmp/indir_searchpattern' if unspcfd
  - demo1 at 'uvsoftware.ca/repjobs.htmE1', listing I/O demo files
  - original demo from around Year 2000

July 2020 updates

 scan1d,scan2d,rep1d,rep2d updated to create audit reports in rpts/...
 - named as jobname_indir_oudir_searchpattern_replace_pattern_options
 - showing command used to create report, making it easy to rerun

 New documentation at 'uvdemos2.htmPart_8'
 - vs old doc at scanjobs.htm & repjobs.htm
 - see July2020 new rep1d demo below

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

8D2. rep1d - scan a directory replacing 1 pattern with an alternate

rep1d demo - July 2020

 #1. cdm   <-- alias to change to the demo/... subdir
     ===     - /home/uvsoftxx/demo/... for online to UVsoftware website
             - /home/userxx/demo/..... for offline on user machines

 #2. uvcopy rep1d,fild1=dat1,arg1=Vancouver,arg2=CoastCity,arg4=Liberal
     ==================================================================
      - search/replace 'Vancouver' with 'CoastCity' in all files of $UV/demo/dat1/...
        while copying to $UV/demo/tmp2/...

audit report created in rpts/rep1d_indir_arg1_arg2

 Report: rpts/rep1d_dat1_Vancouver_CoastCity
 -----> uvcopy rep1d,fild1=dat1,arg1=Vancouver,arg2=CoastCity,arg4=Liberal
        ============================================================================
 Format: uvcopy rep1d,fild1=indir,fild2=outdir,arg1=search,arg2=replace
              ,arg3=qual-present,arg3=qual-absent,arg6=repbgn,arg7=repend
              ,arg8=Match-Options,uop=User-Options
 MatchOptions: i=caseInsensetive, q3=NoMatchInQuotes, p=patternchars(@=alpha,=num,etc)
 UserOptions:  a0=BgnScan at bgnfile or arg6 if spcfd, a=BgnScanLine
              b0=EndScan at endfile or arg7 if spcfd, b=EndSscanLine
              c0=BgnScan at dsplcmnt 0 or cdsp, d0=EndScan at 256 or dsplcmnt
              p1=qual1Present & qual2Absent, p2=bothPresent, p4=bothAbsent
 Date=$datetime, Host=$hostname, User=$logname, Option-Overrides=UOPS2
 ====================================================================================
 00075 075  Davies             Don             CoastCity Kingsway            BC NDP              2015
 00165 165  Kwan               Jenny           CoastCity East                BC NDP              2015
 00328 328  Wilson-Raybould    Jody            CoastCity Granville           BC Independent      2015
 00335                   3 reps @EOF: tmp2/CanadaMPs

 00142 138  WA  Washington           CoastCity city                             161,791
 00305                   1 reps @EOF: tmp2/UScities

 00001 Owen Townsend       4667 Hoskins Rd     North CoastCity, BC Canada V7K2R3
 00002 Jenny Townsend      21 Canada Place     CoastCity, BC       Canada V5P3V8
 00008                   2 reps @EOF: tmp2/nameadrs1
 ====================================================== 2020/07/21_10:05:00
 EOD: 6 reps in 3 files of 16 total (1460 lines)
 Audit filename: rpts/rep1d_dat1_Vancouver

'alldiff2' to verify search/replacements

 #3. alldiff2 dat1 tmp2   <-- verify changes as intended & nothing unintended
     ==================     - will match the audit file shown above

 #4. cp tmp2/* dat1       <-- copy back overwriting original files
     ==============

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

8E1. Search/Replace Beyond Unix System Tools

rep2d - search/replace by table for all files in a directory

'rep2d' is a uvcopy job to search all files in a directory, using a search/replace table file of search-patterns & replacement-patterns & optionally qualified by a pattern that must be present & a 2nd pattern that must not be present.

sample search/replace table

 # rep2d.tbl - table file to demo uvcopy rep2d mass change via search/replace table
 # uvcopy rep2d,fild1=indir,fild2=outdir,fili2=patterntable
 # 001-030 - search pattern (ended by 1st tilde)
 # 031-060 - replace pattern (ended by 1st tilde)
 # 061-080 - qualifier#1, must ALSO be present, if coded (disabled by tildes)
 # 081-100 - qualifier#2, must  NOT be present, if coded (disabled by tildes)
 #         - option p1 (default above), option p2 both present
 North Vancouver~~~~~~~~~~~~~~~South Vancouver~~~~~~~~~~~~~~~BC~~~~~~~~~~~~~~~~~~Liberal~~~~~~~~~~~~~
 New Mexico~~~~~~~~~~~~~~~~~~~~OLD Mexico~~~~~~~~~~~~~~~~~~~~NM~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Richmond~~~~~~~~~~~~~~~~~~~~~~Poormond~~~~~~~~~~~~~~~~~~~~~~VA~~~~~~~~~~~~~~~~~~BC~~~~~~~~~~~~~~~~~~
 ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~(table end marker)~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

 uvcopy rep2d   - directories & arguments will be solicited
 ============   - But, better to code on command line
                - to appear on the audit report, to make reruns easier

 uvcopy rep2d,fild1=indir,fild2=outdir,fili3=table,filo4=auditreport
             ,arg6=RepBgn,arg7=RepEnd,arg8=match-optns,uop=user-optns
 ====================================================================

 arg6 - pattern to begin scanning for search pattern (optional)
      - also see alternative uop=a1 to begin scan by data file line
 arg7 - pattern to end scanning for search pattern (optional)
      - also see alternative uop=b99999 to end scan by data file line
 arg8 (match options): q3 inhibits scanning within quotes
        p - pattern match chars (@=any alpha,=any numeric,etc)
        s - allows match chars in replacement patterns
 uop  - user options (see listed in the audit report below)

July 2020 updates

 scan1d,scan2d,rep1d,rep2d updated to create audit reports in rpts/...
 - named as jobname_indir_oudir_searchpattern_replace_pattern_options
 - showing command used to create report, making it easy to rerun

 New documentation at 'uvdemos2.htmPart_8'
 - vs old doc at scanjobs.htm & repjobs.htm
 - see July2020 new rep2d demo below

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

8E2. rep2d - search/replace by table for all files in a directory

rep2d demo - July 2020

 #1. cdm   <-- alias to change to the demo/... subdir
     ===     - /home/uvsoftxx/demo/... for online to UVsoftware website
             - /home/userxx/demo/..... for offline on user machines

 #2. uvcopy rep2d,fild1=dat1,fild2=tmp2,fili3=tf/rep2d.tbl [,filo4=audit-file]
     ============================================================================
     - copy files from dat1/* to tmp2/... using search/replace table tf/rep2d.tbl
     - audit file defaults to rpts/rep2d_dat1_tmp2_rep2d.tbl

audit report created in rpts/rep2d_indir_outdir_tablefile

 Report: rpts/rep2d_dat1_rep2d.tbl
 -----> uvcopy rep2d,fild1=dat1,fild2=tmp2,fili3=tf/rep2d.tbl
        ============================================================================
 Format: uvcopy rep2d,fild1=indir,fild2=outdir,fili3=SearchReplaceTableFile
              ,arg6=searchbgn,arg7=searchend,arg8=MatchOptions,uop=UserOptions
 MatchOptions: i=Insensetive, q3=notinquotes, p=patternchars(@=alpha,=num,etc)
 UserOptions:  a0=BgnScan at bgnfile or arg6 if spcfd, a=BgnScanLine
              b0=EndScan at endfile or arg7 if spcfd, b=EndSscanLine
              c0=BgnScan at dsplcmnt 0 or cdsp, d0=EndScan at 256 or dsplcmnt
              p1=qualifier1 Present & qualifier2 Absent
 Date=2020/07/21_18:16:10, Host=uvsoft5, User=uvadm, OptionOverrides=
 ====================================================================================
                     ** Table-File = tf/rep2d.tbl **
 North Vancouver~~~~~~~~~~~~~~~South Vancouver~~~~~~~~~~~~~~~BC~~~~~~~~~~~~~~~~~~Liberal~~~~~~~~~~~~~
 New Mexico~~~~~~~~~~~~~~~~~~~~OLD Mexico~~~~~~~~~~~~~~~~~~~~NM~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 Richmond~~~~~~~~~~~~~~~~~~~~~~Poormond~~~~~~~~~~~~~~~~~~~~~~VA~~~~~~~~~~~~~~~~~~BC~~~~~~~~~~~~~~~~~~
 ====================================================================================================
 00036=032  NM  OLD Mexico           Albuquerque city                           545,852
 00102 098  VA  Virginia             Poormond city                              204,214
 00305                   2 reps @EOF: tmp2/UScities

 00032 NM                  OLD Mexico          Santa Fe            67947
 00047 VA                  Virginia            Poormond            204214
 00051                   2 reps @EOF: tmp2/USstates1

 00001 Owen Townsend       4667 Hoskins Rd     South Vancouver, BC Canada V7K2R3
 00008                   1 reps @EOF: tmp2/nameadrs1
 ========================================================== 2020/07/21_18:16:14
  EOD: 00007 reps in 0004 files of 0016 total (01460 lines)
 Audit filename: rpts/rep2d_dat1_rep2d

'alldiff2' to verify search/replacements

 #3. alldiff2 dat1 tmp2   <-- verify changes as intended & nothing unintended
     ==================     - will match the audit file shown above

 #4. cp tmp2/* dat1       <-- copy back overwriting original files
     ==============

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

Part_9. UVdemos2 - Vancouver Utilities for Unix/Linux

Part 9 Contents

Part 9 Contents (Election1 demos)

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

Part 9 Contents (Election2 demos)

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

Part 9 Contents (Election3 demos)

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

9A1. Introduction & Objectives of Part 9 demos

election1, election2, election3 demo progression

The primary objective of Part_9 is to demonstrate the powerful features that were developed for mainframe JCL conversions & how you can include them in your scripts. This is also a great place to start if you are intending to do mainframe JCL conversion & want to understand how the generated scripts provide the advanced features.

We split Part 9 into 3 parts (3 working directories). You will modify your .bash_profile to define RUNDATA & RUNLIBS to $HOME/demo/election1,2,or 3 to perform the demos progressively from simple to most advanced. You logoff & back on to make changes to RUNDATA & RUNLIBS effective. This is not too important for the election1 & election2 demos, but is vital for the election3 demos.

election1, election2, election3 demo progression

• GDG files, function exportgen0 to read next generation & exportgen1 to write
• testcc function test step status, abort on failure, w/o committing new generations
• joblog script to capture console logs in $RUNDATA/joblog/jobname.log
• logmsg function to save critical messages (date/time stamped)
• Restart at any step, for example --> joblog jobname step=S0020 <--
• Keywords=Values on command line to make $KEYWORDS available in your scripts
• autoload functions in separate library defined by export FPATH=$APPSADM/sfun/...
• multiple sets of data with the same set scripts/programs
• different sets of testdata for different programmers
• never having to modify scripts for testing or for production

Part 9 will also demonstrate good command line working habits, Best-Practices working-directory standards - all files in subdirs, using a tmp subdir for miscellaneous temp outputs, etc.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

9A2. Directories for election1,2,3 demos

 /home/userxx/demo/
 |   election1                     <-- election1 demos 9A1 - 9D3
 |   |-- 1README_election1           - no subdirs, no scripts, not recommended
 |   |-- candidatesM
 |   |-- candidatesMI.dat
 |   |-- candidatesMI.idx
 |   |-- candidatesMun
 |-- election2                     <-- election2 demos 9F1 - 9K2
 |   |-- 1README_election2           - subdirs for data, scripts,& uvcopy jobs
 |   |-- data1
 |   |   |-- candidatesM
 |   |   |-- candidatesMI.dat
 |   |   |-- candidatesMI.idx
 |   |   |-- candidatesMun
 |   |   |-- candiupsD20200229
 |   |   `-- candiupsF20200229
 |   |-- pf
 |   |   |-- fixcandiupsD2F
 |   |   `-- upcandidatesMI
 |   |-- sf
 |   |   |-- loadcandidatesMI
 |   |   `-- unloadcandidatesMI
 |   `-- tmp
 |-- election3                     <-- election3 demos 9M1 - 9T2
 |   |-- 1README_election3           - advanced features from JCL conversions
 |   |-- ctl                         - GDG files, joblogs,jobmsgs,jobtimes
 |   |   |-- gdgctl51                - demo Restart, $RUNDATA/$RUNLIBS, etc
 |   |-- data1
 |   |   |-- candidatesM
 |   |   |-- candiupsD20200229
 |   |   `-- candiupsF20200229
 |   |-- datag1
 |   |   |-- candidatesMG_000001
 |   |   `-- candidatesMG_000002
 |   |-- jcls
 |   |   |-- loadcandidatesMG2
 |   |   |-- upcandimg0
 |   |   `-- upcandimg1
 |   |-- joblog
 |   |   `-- upcandimg1.log
 |   |-- jobmsgs
 |   |   `-- 200315
 |   |       `-- 180004_upcandimg1
 |   |-- jobtimes
 |   |   |-- _UPCANDIMG1_jobtimes
 |   |-- jobtmp
 |   |   `-- upcandimg1
 |   `       |-- GDG
 |   |-- pf
 |   |   |-- fixcandiupsD2F
 |   |   `-- upcandidatesMG
 |   |-- sf
 |   |   `-- loadcandidatesMG1
 |   `-- tmp

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

9B1. Election1 demos - datafiles directly in working directory

Pre-Requisites/Assumptions to run election1 demos

1. Installed Vancouver Utilities as per uvsoftware.ca/install.htm
   
   
2. You have a user logon or setup as per uvsoftware.ca/uvdemos2.htm#1C1 (we will call it 'userxx')
   
   
3. You have setup subdir demo & copied $UV/demo/* to your $HOME/demo/
   
   
4. You have copied/renamed $APPSADM/env/bash_profile_uv to your $HOME/.bash_profile
   
   
5. Now modify your $HOME/.bash_profile, to run the election1 demo/tutorials:
   
   

    export RUNLIBS=$HOME/demo RUNDATA=$HOME/demo    <-- change this
    ============================================
    export RUNLIBS=$HOME/demo/election1 RUNDATA=$HOME/demo/election1  <-- to this
    ================================================================

6. Log off & back on to make the new RUNLIBS/RUNDATA definitions effective
   
   

Objectives of election1 demo/tutorials

The election1 demos were inspired by a client who wanted to use the Vancouver Utilities to load/unload Indexed files compatible with Micro Focus COBOL. uvcopy,uvsort,uvcp,etc use the D-ISAM file handler (from www.isamcentral.com) which is compatible with Micro Focus COBOL & C-ISAM.

AS well as demonstrate using the utilities to load/unload Indexed files, these election1 demos illustrate command line working habits (good & bad).

See the summary at the end of these election1 demos to see the bad habits that will be improved in the election2 demos.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

9B2. Election1 demos - datafiles directly in working directory

login to Run election1 demos

 #1.  Logon userxx --> /home/userxx
      ============
 #2.  cdd  (alias 'cd $RUNDATA) --> /home/userxx/demo/election1/
      ===
 OR-> cdl  (alias 'cd $RUNLIBS) --> /home/userxx/demo/election1/
      ===    - same effect since RUNLIBS/RUNDATA defined the same

 #3.  l    <-- alias='ls -l' list long (alias saves keystrokes)
      ===    - all dirs/files in current directory (election1)

 election1/
      -rw-rw-r-- 1 userxx apps 1186 Feb 24 13:28 1README
      -rw-rw-r-- 1 userxx apps  754 Feb 21 11:32 candidatesM
      -rw-rw-r-- 1 userxx apps  891 Feb 23 18:06 candidatesMI.dat
      -rw-rw-r-- 1 userxx apps 3072 Feb 23 18:06 candidatesMI.idx
      -rw-rw-r-- 1 userxx apps  754 Feb 24 12:17 candidatesMun

 #4. tree .  <-- alternate way to list all files (Recursively)
     ======      (gives us space on the right to describe files)

      election1
      |-- candidatesM       <-- Master file (before loading to Indexed file)
      |-- candidatesMI.dat  <-- data partition of Master Indexed file
      |-- candidatesMI.idx  <-- index partition of Master Indexed file
      |-- candidatesMun     <-- Master file UNloaded from Indexed file

Notes

1. 'candidatesM' is the only file you need to run the demos, since it will be used to create the Indexed file (2 parts .dat & .idx) which is then unloaded to create 'candidatesMun'.
   
   
2. The next page will display the data file contents using 'cat'. We prefer the unix 'cat' command to display short files vs more or less which prompt for browsing at EOF (vs just quitting).
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

9B3. Election1 demos - datafiles directly in working directory

INSPECT election1/... data file contents

 #0a. Logon userxx --> /home/userxx
 #0b. cdd  (alias 'cd $RUNDATA) --> /home/userxx/demo/election1/

 #0c. l data1/   <-- list all data filenames in data1/...
      ========     - before listing each data file content

      -rw-rw-r-- 1 userxx apps  754 Feb 21 11:32 candidatesM
      -rw-rw-r-- 1 userxx apps  891 Feb 23 18:06 candidatesMI.dat
      -rw-rw-r-- 1 userxx apps 3072 Feb 23 18:06 candidatesMI.idx
      -rw-rw-r-- 1 userxx apps  754 Feb 24 12:17 candidatesMun

 #1. cat data1/candidatesM   <-- list candidates master file
     =====================     - sequential before loading to Indexed file

      #1 candidatesM - master file 2020 election (uvsoftware.ca/uvdemos2.htm#Part_9)
      #2 Name   Age  City     State  Month   Poll% Delegs Month$ Total$ (millions)
      #3       1         2         3         4         5         6         7         8
      #4345678901234567890123456789012345678901234567890123456789012345678901234567890
      Biden      77  Wilmington  DE  20200131   27      0      0     61
      Bloomberg  77  New York    NY  20200131    7      0      0    200
      Buttigieg  38  South Bend  IN  20200131    8      0      0     76
      Klobuchar  59  Minneapolis MN  20200131    4      0      0     29
      Sanders    78  Burlington  VT  20200131   22      0      0    108
      Trump      74  New York    NY  20200131   44  2,472      0    150
      Warren     70  Cambridge   MA  20200131   15      0      0     82

 #2a. cat data1/candidatesMI.dat  <-- list candidates master Indexed data
      ==========================    - loaded from sequential file
       - will be same as #1. data1/candidatesM shown above

 #2b. cat data1/candidatesMI.idx  <-- list candidates master Index (vs .dat)
      ==========================    - could try but would get garbage display
      uvhd data1/candidatesMI.idx  <-- use 'uvhd' to see hex display of binary file
      ==========================

 #3. cat data1/candidatesMun   <-- list candidates Master file
     =======================     - unloaded from Indexed file
      - will be same as #1. data1/candidatesM shown above

We have shown you the original data file contents from UV Software, and you should get the same results after you run the load/unloads on the next page. Before we run the loads/unloads we will remove all files except 'candidadtesM' so you can know your loads/unloads were successful. But 1st you might save in subdir archive/ for later restore if needed.

 #4a. mkdir archive     <-- make subdir to save files before recreate
      =============
 #4b. cp * archive      <-- copy original demo files to archive/...
      ============

 #5. rm candidatesMI.dat candidatesMI.idx candidatesMun
     ==================================================
     - remove all files except original candidatesM Master file

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

9C1. Election1 demos - datafiles directly in working directory

EXECUTE uvcp to load/unload candidates Master file

 #0a. Logon userxx --> /home/userxx
 #0b. cdd  (alias 'cd $RUNDATA) --> /home/userxx/demo/election1/

The demo Op. Instrns. below do not show the data file contents, but you can run cat/more/vi/etc after each command to confirm you get same results as shown above.

 #1. uvcp "fili1=candidatesM,rcs=80,typ=LST,filo1=candidatesMI,rcs=80,typ=ISF,isk1=0(10)"
     ====================================================================================
      - load an Indexed file (2 parts, candidatesMI.dat & candidatesMI.idx)
      --> displays log as shown below

      200225:130834:uvcp: uvcp fili1=data1/candidatesM,filo1=data1/candidatesMI
      200225:130834:uvcp: EOF fili01 11 rds, 755 size; data1/candidatesM
      200225:130834:uvcp: EOF filo01 11 wrts, 0 size; data1/candidatesMI
      200225:130834:uvcp: DISAM.dat: recs=11,rcsz=80,keys=1; data1/candidatesMI
      200225:130834:uvcp: KEY1: start=0,length=10

 #2. uvcp "fili1=candidatesMI,typ=ISF,rcs=80,filo1=candidatesMun,typ=LST,rcs=80"
     ===========================================================================
      - unloads data1/condidatesMI.dat/idx to data1/candidatesMun
      --> displays log as shown below

      200225:131528:uvcp: uvcp fili1=data1/candidatesMI,filo1=data1/candidatesMun
      200225:131528:uvcp: EOF fili01 11 rds, 891 size; data1/candidatesMI
      200225:131528:uvcp: DISAM.dat: recs=11,rcsz=80,keys=1; data1/candidatesMI
      200225:131528:uvcp: EOF filo01 11 wrts, 755 size; data1/candidatesMun

 #3. diff -b candidatesM candidatesMun
     =================================
      - diff original file (before loading Indexed) to the unloaded file
      - no output shown if same (as expected)
      - option '-b' ignores any trailing blanks

 #4. diff candidatesM candidatesMI.dat     <-- run diff without '-b' option
     =================================
      - diff original file to the data partition of the Indexed file without '-b' option
      - will show diffs because Indexed .dat records are blank filled to rcs=80 specified
      - here is just 1st record in each file

      < #1 candidatesM - master file 2020 election (uvsoftware.ca/uvdemos2.htm#Part_9)
      ---
      > #1 candidatesM - master file 2020 election (uvsoftware.ca/uvdemos2.htm#Part_9)

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

9C2. Election1 demos - datafiles directly in working directory

investigate results loading Indexed file

 #5. diff -b candidatesM candidatesMI.dat  <-- repeat diff WITH '-b' option
     ====================================
      - will show no output since '-b' ignores trailing blanks

 #6. uvhd candidatesMI.dat   <-- can use 'uvhd' to see trailing blanks
     =====================     - output as follows (1st record only)

      rec#=1 rsize=81 fptr=0 fsize=891 records=11
                    10        20        30        40        50        60        70        80
      r# 1 012345678901234567890123456789012345678901234567890123456789012345678901234567890
           #1 candidatesM - master file 2020 election (uvsoftware.ca/uvdemos2.htm#Part_9)   .
           232666666676742226677672666623333266667666227776677676266277666672676256775322220
           31031E4941453D0D0D13452069C50202005C5349FE08563F647125E31F5645DF3E84D30124F99000A

      Now you can see the 3 trailing blanks prior to the x'0A' LineFeed that terminates records
      The LineFeed is in byte 81 after 80 bytes of data & will be changed to x'00' if deleted
      by the Indexed file handler.

'uvsort' Alternative to 'uvcp' (#1 above) to load Indexed file

 #7. uvsort "fili1=candidatesM,rcs=80,typ=LST,filo1=candidatesMI,rcs=80,typ=ISF,isk1=0(10),key1=0(10)"
     =================================================================================================
      - NOT required since candidatesM file was already in sequence on keyfield 1st 10 bytes
      - only difference is adding the sort 'key1=0(10)' (& changing 'uvcp' to 'uvsort')

separate 'uvsort' + 'uvcp' to load Indexed file

 #8a. uvsort "fili1=candidatesM,rcs=80,typ=LST,filo1=candidatesM,rcs=80,typ=LST,key1=0(10)"
      =====================================================================================
      - could 1st sort only to a sequential file, Before loading the Indexed file
      - OK to sort back to the same filename (data1/candidatesM), since uvsort allows.

 #8b. uvcp "fili1=candidatesM,rcs=80,typ=LST,filo1=candidatesMI,rcs=80,typ=ISF,isk1=0(10)"
      ====================================================================================
      - now load the Indexed file from the sorted file

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

9D1. Election1 demos - datafiles directly in working directory

Recommended Command Line Working Habits

AS well as demonstrating using the utilities to load/unload Indexed files, these election1 demos illustrate command line working habits (good & bad). Here are several habits that will be improved in the election2 demos.

Working-Directory Recommendations/Tips

1. We recommend defining your working directory for your current project using 'RUNLIBS' & 'RUNDATA' in your .bash_profile (listed on page '1B2'). For small projects, RUNLIBS & RUNDATA can define the same directory, but for large projects, they should be different & in large file systems rather than in /home/... Here is line# 38 in our .bash_profile.
   
   

    export RUNLIBS=$HOME/demo/election1 RUNDATA=$HOME/demo/election1
    ================================================================

2. Defining RUNLIBS/RUNDATA in your .bash_profile has several advantages which will be illustrated later in election2 & election3. For example you can use the 'cdl' (or 'cdd') to change to your libs/data directory with 3 keystrokes from anywhere else you might be.
   
   
3. The election1 demos stored the data files directly in the working directory, and did NOT use sub-directories to store different types of files which we strongly recommend.
   
   
4. It might be OK to have files directly in the working directory for very small projects with short life-span, but usually better to take time to setup different subdirs for different file types that may be added to the project.
   
   
5. For example, the next project (election2) will have a subdir data1/... for data files + sf/... for Script Files + pf/... for Parameter Files + tmp/... for temporary files.
   
   
6. We will use 'data1' (not just 'data'), better to assign unique names to directories so your can search & find all instances in multiple files. Searching for just 'data' would get a lot of matches you don't want. So the data files in election2 will be:
   
   

      election2
      |-- data1/
      |   |-- candidatesM
      |   |-- candidatesMI.dat
      |   |-- candidatesMI.idx
      |   |-- candidatesMun

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

9D2. Election1 demos - datafiles directly in working directory

7. You should stay in the working directory, do not change into the subdirs, address your files thru 1 level of subdir. Don't waste time by changing into a subdir, looking at 1 file,& changing back out. Of course OK, if you intend to inspect/edit multiple files.
   
   
8. The election1 demos executed the utilities (uvcp,uvsort) directly, which resulted in long command lines, for example:
   
   

     uvcp "fili1=candidatesM,rcs=80,typ=LST,filo1=candidatesMI,rcs=80,typ=ISF,isk1=0(10)"
     ====================================================================================

9. Better to create scripts that call the utilities with desired parameters, especially if you may need to repeat the commands multiple times in future. Election2 will create the 'loadcandidatesM' script as follows:
   
   

      #!/bin/bash
      # loadcandidatesM - script calling uvcp to load indexed file
      #  - demo by Owen Townsend, UVsoftware, Feb/2020
      #
      uvcp "fili1=data1/candidatesM,rcs=80,typ=LST,filo1=data1/candidatesMI,rcs=80,typ=ISFo4,isk1=0(10)"
      #=================================================================================================
      exit
      #Note: 'filo1=data1/candidatesMI,typ=ISF' & .dat/.idx extensions on Indexed files
      # - Indexed file handler will output 2 files candidatesM.dat & candidatesM.idx

10. Note that we inserted 'data1/' on the file definitions, since we know we will be in the working directory & need to address files thru 1 level of subdir of subdir Later in election3, we will show you how this can work no matter where you are.
    
    

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

9D3. Election1 demos - datafiles directly in working directory

11. Election2 will of course setup a separate directory for the project's Script Files (called 'sf' for brevity). There will also be a 'pf' directory for uvcopy's Parameter Files (called 'pf'). So now the directory tree for election2 will be:
    
    

      election2
      |-- backup/
      |-- data1/                   <-- data files
      |   |-- candidatesM
      |   |-- candidatesMI.dat
      |   |-- candidatesMI.idx
      |   |-- candidatesMun
      |   |-- candidateupsD
      |   |-- candidateupsF
      |-- pf/                       <-- Parameter Files
      |   |-- fixcandidateupsD2F
      |   |-- upcandidatesMI
      |-- sf/                       <-- Script Files
      |   |-- loadcandidatesM*
      |   |-- sortcandidatesM*
      |   |-- sortloadcandidatesM*
      |   |-- unloadcandidatesMI*
      |-- tmp/

      Note - 'tree' has option -F to append '/' on directories & '*' on excutable files

12. To run the 'loadcandidatesM' script, from the working directory, you could enter:
    
    

      sf/loadcandidatesM
      ==================

13. But, you do not need the 'sf/' prefix, since the supplied profiles include '$RUNLIBS/sf' in $PATH. (profiles on pages '1B2' & '1B3').
    
    

      loadcandidatesM
      ===============

For the election2 demos, you do need to be in the working directory, since the script addresses the data files relative to the working directory, but later in election3, we will show you how this can work no matter where you are.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

9F1. Election2 demos - subdirs for data,scripts,uvcopys,tmp,etc

Pre-Requisites/Assumptions to run election2 demos

1. Installed Vancouver Utitiliites as per uvsoftware.ca/install.htm
2. You have a user logon or setup as per uvsoftware.ca/uvdemos2.htm#1C1 (we will call it 'userxx')
3. You have setup subdir demo & copied $UV/demo/* to your $HOME/demo/
4. You have copied/renamed $APPSADM/env/bash_profile_uv to your $HOME/.bash_profile
   

5. Now modify your $HOME/.bash_profile, to run the election2 demo/tutorials:
   
   

    export RUNLIBS=$HOME/demo RUNDATA=$HOME/demo    <-- change this
    ============================================
    export RUNLIBS=$HOME/demo/election1 RUNDATA=$HOME/demo/election1 <-- OR this
    ================================================================

    export RUNLIBS=$HOME/demo/election2 RUNDATA=$HOME/demo/election2  <-- to this
    ================================================================

6. Log off & back on to make the new RUNLIBS/RUNDATA definitions effective
   
   

   Objectives of election2 demo/tutorials

There are 3 levels of these demo/tutorials (election1,election2,election3) in separate directories $HOME/demo/election1,2,3 or $RUNDATA/demo/election1,2,3

Election1 demos were very simple - just 4 data files in the working directory with no subdirs. We entered uvcp/uvsort commands to load/unload Indexed files.

Election2 demos illustrate better working habits - setting up separate subdirs for various file types: ./data1/... for DataFiles, ./sf/... for ScriptFiles, ./pf/... for ParameterFiles,& ./tmp/... for temporary files.

Election3 demos will illustrate how any site can use the many powerful features used in the JCL/scripts at mainframe migration sites.

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

9G1. Election2 demos - subdirs for data,scripts,uvcopys,tmp,etc

Login to Run election2 demos

 #1.  Logon userxx --> /home/userxx
      ============
 #2.  cdd  (alias 'cd $RUNDATA) --> /home/userxx/demo/election2/
      ===
 OR-> cdl  (alias 'cd $RUNLIBS) --> /home/userxx/demo/election2/
      ===    - same effect since RUNLIBS/RUNDATA defined the same

Inspect Demo Files - with 'llr'

 #3.  llr .  <-- llr (alias ls -lR) list Recursively
      =====    - all dirs/files in election2/...

 election2/
      -rw-rw-r-- 1 userxx apps 1186 Feb 24 13:28 1README
      drwxrwxr-x 3 userxx apps 4096 Feb 24 15:28 backup
      drwxrwxr-x 2 userxx apps 4096 Feb 24 11:56 data1
      drwxrwxr-x 2 userxx apps 4096 Feb 24 12:19 pf
      drwxrwxr-x 2 userxx apps 4096 Feb 24 12:18 sf
      drwxrwxr-x 2 userxx apps 4096 Feb 24 15:29 tmp

 election2/backup:
      drwxrwxr-x 2 userxx apps 4096 Feb 24 15:28 data1_Jan2020
       - backup/data1_Jan2020 files same as data1/. files below

 election2/data1:
      -rw-rw-r-- 1 userxx apps  754 Feb 21 11:32 candidatesM
      -rw-rw-r-- 1 userxx apps  891 Feb 23 18:06 candidatesMI.dat
      -rw-rw-r-- 1 userxx apps 3072 Feb 23 18:06 candidatesMI.idx
      -rw-rw-r-- 1 userxx apps  754 Feb 24 12:17 candidatesMun
      -rw-rw-r-- 1 userxx apps  322 Feb 21 11:32 candiupsD20200229
      -rw-rw-r-- 1 userxx apps  385 Feb 21 13:03 candiupsF20200229

 election2/pf:
      -rw-rw-r-- 1 userxx apps 1851 Feb 24 11:48 fixcandiupsD2F
      -rw-rw-r-- 1 userxx apps 2320 Feb 23 18:06 upcandidatesMI

 election2/sf:
      -rwxrwxr-x 1 userxx apps 1517 Feb 24 12:05 loadcandidatesM
      -rwxrwxr-x 1 userxx apps  960 Feb 24 12:09 sortcandidatesM
      -rwxrwxr-x 1 userxx apps 1181 Feb 24 12:16 sortloadcandidatesM
      -rwxrwxr-x 1 userxx apps 1149 Feb 24 12:17 unloadcandidatesM

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

9G2. Election2 demos - subdirs for data,scripts,uvcopys,tmp,etc

Inspect Demo Files - with 'tree' (vs llr above)

The 'tree' utility is a good way to understand the directory structure 'tree' is open software created by Steve Baker (ice@mama.indstate.edu) You can install with apt-get, yum, etc, But it is included with the Vancouver Utilities in $UV/bin/tree or if not in $UV/bin, copy from $UV/lib/tree to $UV/bin/tree

 /home/userxx/demo/election2/
 |-- 1README_election2
 |-- backup/                          <-- directory for backups
 |   |-- data1_Jan2020/               <-- subdirs with date stamps
 |       |-- candidatesM
 |       |-- candidatesMI.dat
 |       |-- candidatesMI.idx
 |       |-- candidatesMun
 |       |-- candidateupsD
 |       |-- candidateupsF
 |   |
 |-- data1/                           <-- data files (except for GDGs)
 |   |-- candidatesM                    - candidates Sequential Master file
 |   |-- candidatesMI.dat               - candidates Indexed Master file (Data)
 |   |-- candidatesMI.idx               - candidates Indexed Master file (Index)
 |   |-- candidatesMun                  - candidates Master UNloaded to Seqntl
 |   |-- candiupsD20200229              - campaign updates pipe|Delimited format
 |   `-- candiupsF20200229              - campaign updates Fixed field format
 |-- pf/                             <-- uvcopy jobs (Parameter Files)
 |   |-- fixcandiupsD2F                - convert pipe|delimited to fixed fields
 |   |-- upcandidatesMI                - update caandidates Indexed Master file
 |   `-- upcandidatesMG                - update candidates GDG Master file (alternative)
 |   |
 |-- sf/                             <-- bash shell scripts
 |   |-- loadcandidatesMI              - load candidates Master Sequential file
 |   |-- loadcandidatesMG1             - load candidates Master Indexed file
 |   |-- sortcandidatesM               - sort candidates Master Sequential file
 |   |-- sortloadcandidatesMI          - load & load candidates Master Sequential file
 |   `-- unloadcandidatesMI            - unload candidates Master Indexed file
 `-- tmp/

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

9G3. Election2 demos - subdirs for data,scripts,uvcopys,tmp,etc

Inspect election2/data1/... file CONTENTS

 #0a. Logon userxx --> /home/userxx
 #0b. cdd  (alias 'cd $RUNDATA) --> /home/userxx/demo/election2/

 #0c. l data1/   <-- list all data filenames in data1/...
      ========     - before listing each data file content

      -rw-rw-r-- 1 userxx apps  754 Feb 21 11:32 candidatesM
      -rw-rw-r-- 1 userxx apps  891 Feb 23 18:06 candidatesMI.dat
      -rw-rw-r-- 1 userxx apps 3072 Feb 23 18:06 candidatesMI.idx
      -rw-rw-r-- 1 userxx apps  754 Feb 24 12:17 candidatesMun
      -rw-rw-r-- 1 userxx apps  322 Feb 21 11:32 candiupsD20200229
      -rw-rw-r-- 1 userxx apps  385 Feb 21 13:03 candiupsF20200229

 #1. cat data1/candidatesM   <-- display candidates master file
     =====================     - sequential before loading to Indexed file

      #1 candidatesM - master file 2020 election (uvsoftware.ca/uvdemos2.htm#Part_9)
      #2 Name   Age  City     State  Month    Poll% Delegs Month$ Total$ (millions)
      #3       1         2         3         4         5         6         7         8
      #4345678901234567890123456789012345678901234567890123456789012345678901234567890
      Biden      77  Wilmington  DE  20200131   27      0      0     61
      Bloomberg  77  New York    NY  20200131    7      0      0    200
      Buttigieg  38  South Bend  IN  20200131    8      0      0     76
      Klobuchar  59  Minneapolis MN  20200131    4      0      0     29
      Sanders    78  Burlington  VT  20200131   22      0      0    108
      Trump      74  New York    NY  20200131   44  2,472      0    150
      Warren     70  Cambridge   MA  20200131   15      0      0     82

 #2a. cat data1/candidatesMI.dat  <-- display candidates master Indexed data
      ==========================    - loaded from sequential file
      - will be same as #1. data1/candidatesM shown above

 #2b. cat data1/candidatesMI.idx   <-- display candidates master Index (vs .dat)
      ==========================     - could try but would get garbage display
      uvhd data1/candidatesMI.idx  <-- use 'uvhd' to see hex display of binary file
      ===========================

 #3. cat data1/candidatesMun   <-- display candidates Master file
     =======================     - unloaded from Indexed file
     - will be same as #1. data1/candidatesM shown above

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

9G4. Election2 demos - subdirs for data,scripts,uvcopys,tmp,etc

Inspect election2/data1/files (continued)

 #4. cat data1/candiupsD20200229   <-- display candidates update records
     ===========================     - pipe delimited fields from spreadsheet

      #1 candiupsD20200229 - update file 2020 election (uvsoftware.ca/uvdemos2.htm#Part_9)
      #2 Name | month | poll% | Delegs | month$  <-- pipe delimited from spreadsheet
      Biden|20200229|23|6|9|
      Bloomberg|20200229|10|0|264|
      Buttigieg|20200229|9|22|6|
      Klobuchar|20200229|5|7|6|
      Sanders|20200229|25|21|25|
      Trump|20200229|44|2,472|15|
      Warren|20200229|14|8|11|

 #5. cat data1/candiupsF20200229   <-- display candidates update records
     ===========================
     - Fixed field records extracted from Delimited by uvcopy job pf/fixcandiupsD2F

      Biden                          20200229  23      6      9
      Bloomberg                      20200229  10      0    264
      Buttigieg                      20200229   9     22      6
      Klobuchar                      20200229   5      7      6
      Sanders                        20200229  25     21     25
      Trump                          20200229  44   2472     15
      Warren                         20200229  14      8     11

 #6. cat data1/candidatesMI.dat   <-- display candidates master file AFTER update
     ==========================       with current months donations

      #1 candidatesM - master file 2020 election (uvsoftware.ca/uvdemos2.htm#Part_9)
      #2 Name   Age  City     State  Month   Poll% Delegs Month$ Total$ (millions)
      #3       1         2         3         4         5         6         7         8
      #4345678901234567890123456789012345678901234567890123456789012345678901234567890
      Biden      77  Wilmington  DE  20200229   23      6      9     70
      Bloomberg  77  New York    NY  20200229   10      0    264    464
      Buttigieg  38  South Bend  IN  20200229    9     22      6     82
      Klobuchar  59  Minneapolis MN  20200229    5      7      6     35
      Sanders    78  Burlington  VT  20200229   25     21     25    133
      Trump      74  New York    NY  20200229   44   2472     15    165
      Warren     70  Cambridge   MA  20200229   14      8     11     93

Notes

1. We have shown you the orignal data file contents from UV Software, and you should get the same results after you run the scripts below.
   
   
2. The demo Op. Instrns. below do not show the data file contents, but you can run 'cat/more/less' commands after each script to confirm you get same results as shown above.
   
   
3. We prefer the unix 'cat' command to display short files vs more or less which prompt for browsing at EOF (vs just quitting).
   
   

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

9H1. Election2 demos - subdirs for data,scripts,uvcopys,tmp,etc

EXECUTE scripts load/unload candidates Master Jan2020

 #0a. Logon userxx --> /home/userxx
 #0b. cdl  (alias 'cd $RUNLIBS) --> /home/userxx/demo/election2/

 #0c. vi sf/*    <-- inspect scripts to load/unload Master file (optional)
     =======      - see Script Files listed further below

 #1. loadcandidatesM   <-- load data1/candidatesM to Indexed file
     ===============    --> data1/condidatesMI.dat & data1/candidatesMI.idx
                        --> displays log as shown below

      200225:130834:uvcp: uvcp fili1=data1/candidatesM,filo1=data1/candidatesMI
      200225:130834:uvcp: EOF fili01 11 rds, 755 size; data1/candidatesM
      200225:130834:uvcp: EOF filo01 11 wrts, 0 size; data1/candidatesMI
      200225:130834:uvcp: DISAM.dat: recs=11,rcsz=80,keys=1; data1/candidatesMI
      200225:130834:uvcp: KEY1: start=0,length=10

      sf/loadcandidatesM  <-- Alternate, same as #1 above
      ==================
      - do not need 'sf/...' since :$RUNLIBS/sf: is in $PATH
        defined in your profile $HOME/.bash_profile

 #2. sortloadcandidatesMI  <-- SORT & LOAD Indexed file
      ===================    - alternate to #1. loadcandidatesM
      - NOT required since candidatesM file is already in sequence
        on the keyfield 1st 10 bytes (candidate last name)

 #3. unloadcandidatesMI <-- unload Indexed file to sequential file
     ==================
      - unloads data1/condidatesMI.dat/idx to data1/candidatesM

      --> displays log as shown below
      200225:131528:uvcp: uvcp fili1=data1/candidatesMI,filo1=data1/candidatesMun
      200225:131528:uvcp: EOF fili01 11 rds, 891 size; data1/candidatesMI
      200225:131528:uvcp: DISAM.dat: recs=11,rcsz=80,keys=1; data1/candidatesMI
      200225:131528:uvcp: EOF filo01 11 wrts, 755 size; data1/candidatesMun

 #4. sortcandidatesM    <-- SORT data1/candidatesM back to same filename
     ===============      - uvsort allows this

 #5. loadcandidatesMI   <-- LOAD sorted file to data1/candidatesMI.dat & .idx
     ================

Goto:   Begin this doc ,  End this doc ,  Index this doc ,  Contents this library ,  UVSI Home-Page

9H2. Election2 demos - subdirs for data,scripts,uvcopys,tmp,etc

EXECUTE uvcopy jobs to update Master file with campaign info

 #0a. Logon userxx --> /home/userxx
 #0b. cdl  (alias 'cd $RUNLIBS) --> /home/userxx/demo/election2/

 #0c. vi pf/*    <-- inspect uvcopy jobs (Parameter Files) to update Master file
      =======      - see uvcopy Parameter Files listed further below