53. EPMO Open Source Coordination Office Redaction File Detail Report

Produced by Araxis Merge on 9/24/2019 1:37:49 PM Eastern Daylight Time. See www.araxis.com for information about Merge. This report uses XHTML and CSS2, and is best viewed with a modern standards-compliant browser. For optimum results when printing this report, use landscape orientation and enable printing of background images and colours in your browser.

53.1 Files compared

# Location File Last Modified
1 PCL-5_v1_build_8.zip\v1_build 8\Unredacted\spp_mha_web-development.zip\spp_mha_web-development\Delphi\MHA uMHA_Const.pas Wed Jul 31 17:35:31 2019 UTC
2 PCL-5_v1_build_8.zip\v1_build 8\Unredacted\spp_mha_web-development.zip\spp_mha_web-development\Delphi\MHA uMHA_Const.pas Fri Sep 20 20:13:29 2019 UTC

53.2 Comparison summary

Description Between
Files 1 and 2
Text Blocks Lines
Unchanged 3 242
Changed 2 4
Inserted 0 0
Removed 0 0

53.3 Comparison options

Whitespace
Character case Differences in character case are significant
Line endings Differences in line endings (CR and LF characters) are ignored
CR/LF characters Not shown in the comparison detail

53.4 Active regular expressions

No regular expressions were active.

53.5 Comparison detail

  1   unit uMHA_ Const;
  2  
  3   interface
  4  
  5   uses
  6     Trpcb,
  7     uMHA_Adm inistratio n,
  8     Classes;
  9  
  10   type
  11     TDatabas eMode = (d bVista, db OffLine, d bNil);
  12     TOpenFor m = (ofMai n, ofAll,  ofSingle,  ofASI, ofA SI_508, of GAF, ofSin gleMenu,
  13       ofSele ct, ofResu lt, ofUplo ad, ofASIM enu);
  14  
  15   var
  16     DataBase Mode                  : TDataBas eMode;
  17     OpenForm Name                  : TOpenFor m;
  18  
  19   const
  20     MHA_Capt ion                   = 'Mental  Health Ass istant';
  21     OFFLINE_ CAPTION               = '  (Off- line Mode) ';
  22     YS_MHA_A UX                    = '\Vista\ Common Fil es\YS_MHA_ AUX.dll';
  23       MHA_ONLINE _SUPPORT_U RL        = 'http:// URL /';
  24     MetricUR L                     =
  25         'http:// URL /mha/metri c.asp';
  26     CONSULT_ NOTE_TITLE            = 'MENTAL  HEALTH CON SULT NOTE' ;
  27     PROGRESS _NOTE_TITL E          = 'MENTAL  HEALTH DIA GNOSTIC ST UDY NOTE';
  28  
  29     // MH Vi sta File n umbers
  30     FILE_TES TS_AND_SUR VEYS       = '601.71' ;
  31     FILE_QUE STIONS                = '601.72' ;
  32     FILE_INT RODUCTIONS            = '601.73' ;
  33     FILE_RES PONSE_TYPE S          = '601.74' ;
  34     FILE_CHO ICES                  = '601.75' ;
  35     FILE_CHO ICETYPES              = '601.751 ';
  36     FILE_INS TRUMENT_CO NTENT      = '601.76' ;
  37     FILE_BAT TERIES                = '601.77' ;
  38     FILE_BAT TERY_CONTE NTS        = '601.78' ;
  39     FILE_BAT TERY_USERS            = '601.781 ';
  40     FILE_SKI PPED_QUEST IONS       = '601.79' ;
  41     FILE_SEC TIONS                 = '601.81' ;
  42     FILE_RUL ES                    = '601.82' ;
  43     FILE_INS TRUMENTRUL ES         = '601.83' ;
  44     FILE_ADM INISTRATIO NS         = '601.84' ;
  45     FILE_ANS WERS                  = '601.85' ;
  46     FILE_SCA LEGROUPS              = '601.86' ;
  47     FILE_SCA LES                   = '601.87' ;
  48     FILE_DIS PLAY                  = '601.88' ;
  49     FILE_CHO ICEIDENTIF IERS       = '601.89' ;
  50     FILE_SCO RING_KEYS             = '601.91' ;
  51     FILE_MH_ RESULTS               = '601.92' ;
  52     FILE_REP ORT                   = '601.93' ;
  53  
  54     ASI_FULL                       = 'Full';
  55     ASI_LITE                       = 'Lite';
  56     ASI_FOLL OWUP                  = 'Follow- up';
  57     ASI_MV                         = 'ASI-MV' ;
  58  
  59   var
  60     gvASIWid th,
  61       gvSele ctWidth,
  62       gvResu ltWidth,
  63       gvGAFW idth,
  64       gvSing leWidth,
  65       gvASIH eight,
  66       gvSele ctHeight,
  67       gvResu ltHeight,
  68       gvGAFH eight,
  69       gvSing leHeight,
  70       gvASIG eneral,
  71       gvASIM edical,
  72       gvASIE mploy,
  73       gvASID rug,
  74       gvASIL egal,
  75       gvASIF amily,
  76       gvASIS ocial,
  77       gvASIP sych,
  78       gvLast ASIProgram ,
  79       gvStar t // Menu  selection
  80                                    : Integer;
  81  
  82     gvShowOp tionTabs              : string;
  83  
  84     gvID,
  85       gvLast Location,
  86       gvPass ,
  87       //gvJA WS_Dir,
  88       gvSpec ialResults List,
  89       gvUpda teSeries,
  90       gvDLL_ Version,
  91       gvCoSi gnerIEN,
  92       gvProg ressNoteIE N
  93                                    : string;
  94  
  95     gvShowAl lOrOneItem ,
  96       gvVisu alBeeps,
  97       gvDefa ultSize,
  98       gvShow Hints,
  99       gvShow Image,
  100       gvShow ScreenRead erMsg,
  101       gvChec kResourceF iles,
  102       gvCPRS ShutDown
  103                                    : Boolean;
  104  
  105     gvDateGi ven,
  106       gvUpda te                    : TDateTim e;
  107  
  108     gvAPICal ls                    : TStringL ist;
  109  
  110     gvAdmin                        : TAdminis tration;
  111  
  112     gvASI_Ty pe                    : integer;  // 1-Full , 2-Lite,  3-Followup , 4 - MV
  113  
  114     // patch  105 - Get  Environme nt Variabl e to deter mine which  program f ile direct ory should
  115     //              be  accessed f or finding  the YS_MH A_AUX.dll  file and s et into gl obal Aux F ile var  l lh
  116     gvEnvVar ,
  117       gvAuxF ile                   : string ;
  118  
  119  
  120   implementa tion
  121  
  122   end.
  123  

Araxis Merge (but not the data content of this report) is Copyright © 1993-2016 Araxis Ltd (www.araxis.com). All rights reserved.