Where do I get TRACK?

Note: As of August 2002, TRACK is not yet available if you run your z/VM system in 64 bit mode, but there are updates available for 32 bit mode systems.

To begin, you need the base TRACKXA code from Marist's VM Workshop tape. The URL to the TRACKXA VMARC file is: http://www.marist.edu/~workshop/trackx95.vmarc

(Note, another tool you will want is VMARC - check the FAQs for more details on that tool!) This level of code will support VM XA and ESA versions through VM/ESA 2.4.0. For z/VM 3.1+ get updates from the VMESA LISTSERV, documented at: http://listserv.uark.edu/scripts/wa.exe?A2=ind0110&L=vmesa-l&F=&S=&P=34554

Again, for z/VM the modifications above will only work in 32-bit mode; 64-bit support will be done in the near future.

Start with the TRACK MEMO file - read the whole thing before starting. Installation will depend on your current level of VM and is mostly assembler parts and very dependent on CP source code. TRACK is installed and maintained using the standard VM update scheme, using AUX, CNTRL and Xedit UPDATE files.

For z/VM (32-bit) support, you need to build your own CNTRL file based on the updates from Ross Fried on the VMESA LISTSERV as noted in the URL above. You will want to use (and update) TRACKV31 CNTRL to build the parts. Add the local CP MACLIBS in the right order on the TEXT MACS line. For example:

TEXT MACS TRAMAC HCPGPI HCPPSI HCPOM1 HCPOM2 DMSGPI DMSOM OSMACRO

Now you can build the TRAMAC MACLIB: VMFMAC TRAMAC TRACKV31

Assemble all the parts: TRKASM EXEC VMFHASM TRACKV31

NOTE: TRKGEN EXEC needs a tweak or two for z/VM systems - change the code at the beginning to look like:

If sys = ''                                                       
  Then do                                                          
    Parse Value Diag(8,'Q CPLEVEL') with system rest '15'x         
    If system = 'VM/ESA'                                           
      Then do                                                      
       vers = ''                                                   
       If Index(rest,'Version') > 0                                
         Then Parse Var rest . 'Version' vers . 'Release' rel ',' .
         Else Parse Var rest . 'Release' rel ',' .                 
        Select                                                     
          When vers = '2'  &  rel = '3.0'  Then system = 'V23'     
          When vers = '2'  &  rel = '2.0'  Then system = 'V22'     
          When vers = '2'  &  rel = '1.0'  Then system = 'V21'     
          When rel = '2.2' Then system = 'E22'                     
          When rel = '2.1' Then system = 'E21'                     
          When rel = '2'   Then system = 'ES2'                     
          When rel = '1.1' Then system = 'XC'                      
          Otherwise Nop  /* ESA 1.0 */                             
        End                                                        
      end                                                          
    Else If system = 'z/VM' Then system = 'V31'                    
    sys = system                                                   
  end 
 If sys\='XA' & sys\='ESA' & sys\='XC' & sys\='ES2' & sys\='E21' &,
    sys\='E22' & sys\='V21' & sys\='V22' & sys\='V23' & sys\='V31'
   Then do
     Say 'Only XA, ESA, XC, ES2, E21, E22, V21, V22, V23 & V31 are',
         'valid systems. "'sys'" is not.'
     Exit 4
   end

Build the TRACK MODULE: TRKGEN TRACK TRACKV31

Now copy the TRACK MODULE and all HELP files to a tools disk, one that system admins will have access to, and give it a try!