SCMCCV6 ;BP/CMF - PCMM HL7 Baseline Xmit to AAC ; March 26, 2000
Source file <SCMCCV6.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EVENT(SC177,SC212,SCDFN,SCTST) | ;
; Description: Create an Event in file (#404.48) |
|
BASELINE(SCP177,SCP212,SCPDFN,SCPTST) | ;
; input ; SCP177 = Patch 177 date (required) ; SCP212 = Patch 212 date (optional, default = today) ; SCPDFN = Patient ien (optional, default = 0) ; SCPTST = 1 := test [default = 0] ; ; output ; 1 = success ; 0 = failure |
|
MSG(SC1,SC2,SCTST) | ;
|
|
CHECK() | ;
; Description: Determine whether or not the Baseline has run. |
|
RESTART(SCTST) | ; alb/rpm
; This undocumented entry point allows a user to clear the Baseline ; date stored in file #404.44 field #17. Then the last patient IEN ; that was processed from the last run is retrieved from ^XTMP("SCMCCV6" ; and decremented to seed the restart point. If ^XTMP does not exist ; the IEN is set to 0. |
|
EN(SCTST,SCDFN) | ;
; entry point for option 'SCMC PCMM BASELINE SEEDING' ; this option should not be on any users menu ; this option should be queued to run once ; it should not be run more than once without consulting NVS |
Name | Field # of Occurrence |
---|---|
$$S^%ZTLOAD | EVENT+24, EVENT+33 |
FILE^DIE | BASELINE+43, RESTART+20 |
$$GET1^DIQ | CHECK+11, EVENT+61, MSG+15 |
$$DTCHK^SCAPU1 | EVENT+53 |
$$PDAT^SCMCGU | EN+48 |
$$CHECK^SCMCHLB1 | EVENT+57 |
ADD^SCMCHLE | EVENT+60 |
$$VPATCH^SCUTBK3 | EN+20 |
$$VPROGMR^SCUTBK3 | EN+25 |
$$FMADD^XLFDT | EVENT+28 |
$$FMTE^XLFDT | EN+33, EN+55, EVENT+61 |
$$HTE^XLFDT | EN+17, MSG+14 |
$$NOW^XLFDT | EN+55, EVENT+29 |
^XMD | MSG+24 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
^SCTM(404.44 - [#404.44] | GET1^DIQ |
^SCTM(404.57 - [#404.57] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^SCPT(404.43 - [#404.43] | BASELINE+28, EVENT+32, EVENT+50 |
^SCTM(404.44 - [#404.44] | CHECK+9 |
^SCTM(404.57 - [#404.57] | EVENT+47 |
^TMP($J | CHECK+10!, CHECK+12, CHECK+13! |
^XTMP("SCMCCV6" | EVENT+27!, EVENT+28*, EVENT+36*, RESTART+16, RESTART+17 |
Name | Line Occurrences |
---|---|
$$BASELINE | EN+54 |
$$CHECK | EN+30 |
$$EVENT | BASELINE+34 |
EN | RESTART+26 |
MSG | EN+22, EN+27, EN+34, EN+38, EN+42, EN+45, EN+51, EN+56, BASELINE+16, BASELINE+21 , BASELINE+26, BASELINE+30, BASELINE+36, BASELINE+46, BASELINE+49, RESTART+23 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DT | EN+54, BASELINE+18, EVENT+28 |
DUZ | MSG+4 |
SC1 | EN+14~, EN+18*, EN+22, EN+27, EN+34, EN+38, EN+42, EN+45, EN+51, EN+56 , BASELINE+11~, BASELINE+12*, BASELINE+16, BASELINE+21, BASELINE+26, BASELINE+30, BASELINE+37~, BASELINE+38*, BASELINE+41*, BASELINE+46 , BASELINE+49, EVENT+20~, EVENT+37*, EVENT+40, EVENT+42, EVENT+44, EVENT+49, MSG~, MSG+9, RESTART+12~ , RESTART+13*, RESTART+23 |
SC177 | BASELINE+13*, BASELINE+14, BASELINE+34, EVENT~, EVENT+53 |
SC2 | EN+14~, EN+21*, EN+22, EN+26*, EN+27, EN+33*, EN+34, EN+37*, EN+38, EN+41* , EN+42, EN+44*, EN+45, EN+50*, EN+51, EN+55*, EN+56, BASELINE+11~, BASELINE+15*, BASELINE+16 , BASELINE+20*, BASELINE+21, BASELINE+25*, BASELINE+26, BASELINE+29*, BASELINE+30, BASELINE+37~, BASELINE+39*, BASELINE+41, BASELINE+45* , BASELINE+46, BASELINE+48*, BASELINE+49, MSG~, MSG+10, RESTART+12~, RESTART+22*, RESTART+23 |
SC212 | BASELINE+18*, BASELINE+19, BASELINE+34, BASELINE+42, EVENT~, EVENT+53 |
SCADT | EVENT+16~, EVENT+41*, EVENT+42*, EVENT+44, EVENT+49, EVENT+53, EVENT+61 |
SCARRAY | EN+15~, MSG+7! |
SCARRAY( | EVENT+61* |
SCARRAY(1 | MSG+8*, MSG+20* |
SCARRAY(2 | MSG+9*, MSG+21* |
SCARRAY(3 | MSG+10*, MSG+22* |
SCARRAY(4 | MSG+11* |
SCARRAY(5 | MSG+12* |
SCARRAY(6 | MSG+13* |
SCARRAY(7 | MSG+14* |
SCARRAY(8 | MSG+15* |
SCARRAY(9 | MSG+16* |
SCCNT | EVENT+13~, EVENT+30*, EVENT+61, EVENT+64*, EVENT+70 |
SCDDT | EVENT+17~, EVENT+50*, EVENT+53, EVENT+61 |
SCDFA | RESTART+12~ |
SCDFN | EN~, EN+11*, EN+54, BASELINE+23*, BASELINE+24, BASELINE+34, EVENT~, EVENT+31*, EVENT+32*, EVENT+36 , EVENT+60, EVENT+61, RESTART+12~, RESTART+14*, RESTART+17*, RESTART+26 |
SCERR | BASELINE+37~, BASELINE+44, RESTART+12~, RESTART+21 |
SCFDA | BASELINE+37~ |
SCFDA(1 | BASELINE+42*, RESTART+19* |
SCFLAG | BASELINE+11~, BASELINE+34*, BASELINE+36, BASELINE+39, BASELINE+40*, BASELINE+48 |
SCNOW | EVENT+18~, EVENT+29* |
SCP177 | EN+12~, EN+48*, EN+49, EN+54, BASELINE~, BASELINE+13 |
SCP212 | EN+13~, EN+30*, EN+31, EN+32, EN+33, EN+36, EN+40, BASELINE~, BASELINE+18 |
SCPAI | EVENT+14~, EVENT+48*, EVENT+49*, EVENT+50, EVENT+54 |
SCPDFN | BASELINE~, BASELINE+23 |
SCPTST | BASELINE~, BASELINE+33 |
SCSTIM | EN+16~, EN+17*, MSG+13 |
SCTP | EVENT+15~, EVENT+43*, EVENT+44*, EVENT+47, EVENT+49, EVENT+60, EVENT+61 |
SCTST | EN~, EN+10*, EN+54, BASELINE+33*, BASELINE+34, BASELINE+36, EVENT~, EVENT+26*, EVENT+60, EVENT+61 , MSG~, MSG+2*, MSG+5, MSG+21, RESTART~, RESTART+10*, RESTART+26 |
SCVAR | EVENT+19~, EVENT+54*, EVENT+57, EVENT+60, EVENT+61 |
SCX | CHECK+8~, CHECK+11*, CHECK+12*, CHECK+14 |
SCZ | EVENT+21~, EVENT+24*, EVENT+25, EVENT+32, EVENT+33*, EVENT+34, EVENT+70 |
U | BASELINE+39, BASELINE+40, EVENT+25, EVENT+28, EVENT+50, EVENT+70 |
XMDUZ | MSG+1~, MSG+3*, MSG+4 |
XMSUB | MSG+1~, MSG+6*, MSG+19* |
XMTEXT | MSG+1~, MSG+23* |
XMY | MSG+1~ |
XMY( | MSG+4* |
>> ZTSK | MSG+12, MSG+19 |