Produced by Araxis Merge on 9/25/2018 2:13:29 PM Central 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.
# | Location | File | Last Modified |
---|---|---|---|
1 | build 3.zip\build 3\MHLTH_YS_137_Source\MUMPS\RTN | YSCLSRV1.RTN | Thu Sep 6 11:30:06 2018 UTC |
2 | build 3.zip\build 3\MHLTH_YS_137_Source\MUMPS\RTN | YSCLSRV1.RTN | Wed Sep 12 18:10:01 2018 UTC |
Description | Between Files 1 and 2 |
|
---|---|---|
Text Blocks | Lines | |
Unchanged | 2 | 56 |
Changed | 1 | 2 |
Inserted | 0 | 0 |
Removed | 0 | 0 |
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 |
No regular expressions were active.
1 | Cache for UNIX^INT^L oad Initia l Release MH VistA S ource^~For mat=Cache. S~^RAW | |
2 | %RO on 14 Mar 2017 6:10 PM | |
3 | YSCLSRV1^I NT^1^63910 ,74846^0 | |
4 | YSCLSRV1 ; DALOI/RLM- Clozapine data serve r ;24 APR 1990 | |
5 | ;;5.01;ME NTAL HEALT H;**61,69, 74,90**;De c 30, 1994 ;Build 18 | |
6 | ; Referen ce to ^%ZO SF support ed by IA # 10096 | |
7 | ; Referen ce to ^XMD supported by IA #10 070 | |
8 | CSUM ;Calc ulate chec ksum for r outines an d transmit errors to Forum | |
9 | S X=$T(+0 ) X ^%ZOSF ("RSUM") S ^TMP("YSC L",$J,2,0) ="YSCLSRV1 at "_YSCL ST_" = "_Y | |
10 | F YSI=1:1 S YSA=$T( ROU+YSI) Q :YSA["***" S X=$P($ P(YSA,",") ,";",3) D | |
11 | . X ^%ZO SF("TEST") I '$T S ^ TMP("YSCL" ,$J,YSI+3, 0)=X_" is missing." Q | |
12 | . X ^%ZO SF("RSUM") S ^TMP("Y SCL",$J,YS I+3,0)=X_" should be "_$P(YSA, ",",2)_" i s "_Y | |
13 | K XMY S X MY("G.CLOZ APINE ROLL -UP@FORUM. VA.GOV")=" " | |
14 | I YSDEBUG K XMY S X MY("G.CLOZ APINE DEBU G@FO-DALLA S URL ")="" | |
15 | S XMSUB=$ S(YSDEBUG: "DEBUG ",1 :"")_"Cloz apine Chec ksum data at "_YSCLS T_" run on "_XQDATE | |
16 | S XMTEXT= "^TMP(""YS CL"",$J,", XMDUZ="CLO ZAPINE MON ITOR" D ^X MD | |
17 | K %DT,YSA ,YSCLST,YS I,X,XMDUZ, XMSUB,XMTE XT,Y | |
18 | K ^TMP("Y SCL",$J) | |
19 | Q | |
20 | ROU ; | |
21 | ;;YSCLSER V,25564583 | |
22 | ;;YSCLSRV 2,24723007 | |
23 | ;;YSCLSRV 3,24872037 | |
24 | ;;YSCLTES T,12378003 | |
25 | ;;YSCLTST 1,11839450 | |
26 | ;;YSCLTST 2,32098862 | |
27 | ;;YSCLTST 3,25645207 | |
28 | ;;*** | |
29 | ZEOR ;YSCL SRV1 |
Araxis Merge (but not the data content of this report) is Copyright © 1993-2016 Araxis Ltd (www.araxis.com). All rights reserved.