Produced by Araxis Merge on 11/9/2018 12:34:10 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.
# | Location | File | Last Modified |
---|---|---|---|
1 | CPEE_Build9_Sprint27.zip\HAC_CPE_CH | CHMXGU04.m | Mon Nov 5 16:43:19 2018 UTC |
2 | CPEE_Build9_Sprint27.zip\HAC_CPE_CH | CHMXGU04.m | Mon Nov 5 17:52:24 2018 UTC |
Description | Between Files 1 and 2 |
|
---|---|---|
Text Blocks | Lines | |
Unchanged | 3 | 36 |
Changed | 2 | 4 |
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 | CHMXGU04 ; CVA/DTP;CL AIM STATUS GENERATIO N UTILITY; 09/13/01 4:12 PM | |
2 | ;;1.0; | |
3 | ENVCSTS S FLNMPRT1=" EDI2"" DNS decnet HAC dec741!"": :E:[X12.EN VOY.OUT]" | |
4 | D NOW^%DT C S:X=-1 X =DT S CHMM DD=$E(X,4, 7) | |
5 | S:'$D(^CH MXCL("ENV_ NAME_CNT", "HCCSTS",C HMMDD)) ^C HMXCL("ENV _NAME_CNT" ,"HCCSTS", CHMMDD)=0 | |
6 | S ^CHMXCL ("ENV_NAME _CNT","HCC STS",CHMMD D)=^CHMXCL ("ENV_NAME _CNT","HCC STS",CHMMD D)+1 | |
7 | S FLNMPRT 2=^CHMXCL( "ENV_NAME_ CNT","HCCS TS",CHMMDD ) | |
8 | I FLNMPRT 2<10 S FLN MPRT2="0"_ FLNMPRT2 | |
9 | S FILE=FL NMPRT1_FLN MPRT2 | |
10 | Q | |
11 | ; | |
12 | MMICSTS S FLNMPRT1=" EDI1"" DNS decnet HAC dec741!"": :E:[X12.MM I.OUT]" | |
13 | D NOW^%DT C S:X=-1 X =DT S CHMM DD=$E(X,4, 7) | |
14 | S:'$D(^CH MXCL("MMI_ NAME_CNT", "HCCSTS",C HMMDD)) ^C HMXCL("MMI _NAME_CNT" ,"HCCSTS", CHMMDD)=0 | |
15 | S ^CHMXCL ("MMI_NAME _CNT","HCC STS",CHMMD D)=^CHMXCL ("MMI_NAME _CNT","HCC STS",CHMMD D)+1 | |
16 | S FLNMPRT 2=^CHMXCL( "MMI_NAME_ CNT","HCCS TS",CHMMDD ) | |
17 | I FILNMPR T2<10 S FL NMPRT2="0" _FLNMPRT2 | |
18 | S FILE=FI LNMPRT1_FI NMPRT2 | |
19 | Q | |
20 | ; |
Araxis Merge (but not the data content of this report) is Copyright © 1993-2016 Araxis Ltd (www.araxis.com). All rights reserved.