How to search for potential problems

This section assumes you have at least minimal experience on MVS/TSO or VM/CMS.  If you're the kind of person who writes your own programs, this should be familiar territory.  If you're not familiar with the basic functions presented below, this may be the time to call for help.

What to search for
You should search for the same things on either MVS/TSO or VM/CMS.  TSO users will end up with a list of PDS member names, CMS users will have a list of file names.  On both platforms, you're looking for the following strings:

'19'  (Including the quotation marks)
19&
19<
YMD
MDY
DMY
YYMMDD
MMDDYY
&DATE
&TODAY

MVS/TSO online
(This section assumes you know the name of your FOCEXEC dataset, such as  'N65432.FOCEXEC.DATA'.  If you're not sure, stop here and call for help.)

 1.  From the TSO prompt, type ISPF and press ENTER.
2.   From the main menu, type 3.14 and press ENTER.  You should see a screen as follows:
 
 

                                          Menu  RefList  Utilities Help     -----------------------------------------------------------------------------                                               Search-For Utility 
Command ===> 

 Search String  . . 

 ISPF Library: 
  Project . . . 
  Group . . . .          . . .          . . .          . . . 
  Type  . . . . 
  Member  . . .                 (Blank or pattern for member  selection list 
                                            "*" for all members) 
Other Partitioned or Sequential Data Set: 
  Data Set Name . . . FOCEXEC.DATA(*) 
  Volume Serial . . .           (If not cataloged) 
   Listing Data Set . . . SRCHFOR.LIST 
  Data Set Password  . .           (If Search-For dataset  password 
                                                        protected) 
Enter "/" to select option                        Execution Mode              Output Mode      
 /  Specify additional search strings     1  1. Foreground            1   1  1. View       
    Mixed Mode                                       2. Batch                              2. Browse     

  F1=Help      F2=Split     F3=Exit      F7=Backward  F8=Forward   F9=Swap       
  F10=Actions  F12=Cancel                                                         
 
 Enter the dataset that contains your Focus programs in 'Data Set Name', plus an asterisk in parentheses, which means all members of the dataset.  If your programs are not in your personal library, then you'll need to use quotes, in other words, 'N54321.FOCEXEC.DATA(*)'.
 
· Put a slash in 'Specify additional search strings'.
 
· On the next screen, enter the strings to search for:
 
 
                                       Menu  RefList  Utilities  Help 
- .-------------------------------------------------------------------------------------------- 
   |                          Search-For Strings 
C| Command ===> 
   | 
S|                   Specify 1 or more Search Strings below: 
  | 
I |   ==> '19 
  |   ==> 19< 
  |   ==> 19& 
  |   ==> YMD 
  |   ==> MDY 
  |   ==> DMY 
O|   ==> YYMM 
  |   ==> MMYY 
  |   ==> &DATE 
  |   ==> &TODAY 
L | 
D|            Press ENTER to start search or END command to exit. 
  |  F1=Help       F2=Split      F3=Exit       F7=Backward   F8=Forward 
E|  F9=Swap      F10=Actions   F12=Cancel 
/ '---------------------------------------------------------------------------------------------' 
   Mixed Mode                               2. Batch              2. Browse 

  F1=Help      F2=Split     F3=Exit      F7=Backward  F8=Forward   F9=Swap 
 
 
                   Finally, you'll get a full report of where the strings were found:
 
 
                         File  Edit  Confirm  Menu  Utilities  Compilers  Test  Help  ---------------------------------------------------------------------------- 
VIEW       X97SXC.SRCHFOR.LIST                            Columns 00001 00072 
Command ===>                                                 Scroll ===> PAGE 
****** *************************** Top of Data ******************************  
==MSG> -Warning- The UNDO command is not available until you change 
==MSG>           your edit profile using the command RECOVERY ON. 
000011 SUPERC - MVS/PDF FILE/LINE/WORD/BYTE/SFOR COMPAREUTILITY-V4.20(ISP 
000002   LINE-#  SOURCE SECTION                    SRCH DSN: X97SXC.FOCEXEC.DAT 
000003  
000004  
000005   LISTDATE              ----------- STRING(S) FOUND ------------------  
000006  
000007        2  PFULL/YYMD   = FULLYYMD;  
000008        3  PYMD/YYMD    = FULLYMD;  
000009        4  PYM/YYMD     = FULLYM;  
000010        5  PY/YYMD      = FULLY;  
000011        6  PYY/YYMD     = FULLYY;  
000012        7  PA8YYMD/YYMD = DATEA8YMD;  
000013        8  PI8YYMD/YYMD = DATEI8YMD;  
000014        9  PA6YYMD/YYMD = DATEA6YMD;  
000015       10  PI6YYMD/YYMD = DATEI6YMD;  
000016       11  PA4YM/YYMD   = DATEA4YM;  
000017       12  PI4YM/YYMD   = DATEI4YM;  
000018       13  -*PA4YY/YYMD   = DATEA4YY;  
000019       14  -*PI4YY/YYMD   = DATEI4YY;  
000020       15  -*PA2Y/YYMD    = DATEA2Y;  
000021       16  -*PI2Y/YYMD    = DATEI2Y;  
000022       23  BY FULLYYMD NOPRINT SUBFOOT  
 F1=Help     F2=Split     F3=Exit       F5=Rfind          F6=Rchange         F7=Up  
 F8=Down   F9=Swap   F10=Left     F11=Right        F12=Cancel  
 
 
 This dataset is named SRCHFOR.LIST, and can be printed or downloaded like any
 other dataset.
Finally, you'll get a full report of where the strings were found.
NEXT