65. EPMO Open Source Coordination Office Redaction File Detail Report

Produced by Araxis Merge on 11/9/2018 12:33:50 AM Central Standard 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.

65.1 Files compared

# Location File Last Modified
1 CPEE_Build9_Sprint27.zip\HAC_CPE_CH CHLCR79C.m Mon Nov 5 16:39:39 2018 UTC
2 CPEE_Build9_Sprint27.zip\HAC_CPE_CH CHLCR79C.m Mon Nov 5 17:41:46 2018 UTC

65.2 Comparison summary

Description Between
Files 1 and 2
Text Blocks Lines
Unchanged 2 58
Changed 1 2
Inserted 0 0
Removed 0 0

65.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

65.4 Active regular expressions

No regular expressions were active.

65.5 Comparison detail

  1   CHLCR79C ; AHJ/DEN;MI LLIMAN CLA IMS TO FS3 BIG
  2    ;V1.0
  3    ;001 OLD  ROUTINE NA ME WAS ZAL CR79C
  4    S (TCNT,C NT)=0
  5    S U="^"
  6    ;INPUT =  ^CHMZHOLD( "MILLIMANC LAIMS"  FR OM ZALCR79 X
  7    ;OUTPUT =  FS3BIG CL AIMS FILE
  8   A1
  9    S FIO="HA CFS3"" DNS     decnet HAC dec741!"": :D:[FS3BIG ]MILLIMAN_ CLAIMS_FIL E.TXT"
  10    O FIO C F IO:"D"
  11    O FIO:"NW S"
  12    S NAME=0
  13    S DFN=0
  14   A2 ;
  15    S DFN=$O( ^CHMZHOLD( "MILLIMANC LAIMS",DFN )) G:DFN=" " END
  16    S BFN=0
  17   A3 ;
  18    S BFN=$O( ^CHMZHOLD( "MILLIMANC LAIMS",DFN ,BFN)) G:' BFN A2
  19    S CI=0
  20   A4 ;
  21    S CI=$O(^ CHMZHOLD(" MILLIMANCL AIMS",DFN, BFN,CI)) G :'CI A3
  22    S DATA=^C HMZHOLD("M ILLIMANCLA IMS",DFN,B FN,CI)
  23    U FIO W ! ,DATA    
  24    S CNT=CNT +1
  25    S TCNT=TC NT+1 I TCN T=10000 W  !,DFN S TC NT=0
  26    G A4
  27   END ;
  28    C FIO
  29    W !!,"TOT AL COUNT   =  ",CNT
  30    Q