SCAPMC25 ;ALB/REW - Team API's:MSGDTH ; may 1999
Source file <SCAPMC25.m>
Package | Total | Call Graph |
---|---|---|
Scheduling | 4 | ($$PRTP,$$TMPT,$$TPPT,$$TPTM)^SCAPMC (ERR,INIT)^SCAPMCU1 $$OKARRAY^SCAPU1 $$OKPREC2^SCMCLK |
Package | Total | Caller Graph |
---|---|---|
Scheduling | 5 | SCAPMC SCMCCON SCMCPM SCMCTMM SCMCTPM |
Registration | 1 | DGDEATH |
Name | Comments | DBIA/ICR reference |
---|---|---|
QTXMY | ||
MSGQ | ||
OKPOS(MSGTYPE,SCTP,DFN,SCYESCL,SCDATES,SCERR) | ;check if message should go out to position for given pt
|
|
ST | ||
PRACQ | ||
MSGPT(MSGTYPE,DFN,SCTEAMA,SCDATES,SCYESCL,SCLIST,SCERR) | ; users getting death message
; Input: ; MSGTYPE: ; 1 = Death Message ; 2 = Inpatient Message ; 3 = Team Message ; 4 = Consult Message ; 5 = Inactivation Message |
|
PCMMXMY(MSGTYPE,DFN,SCTEAMA,SCDATES,SCYESCL) | ;create xmy array for the appropriate type of pcmm mess
; return 1 if success,0 if error or no users receiving message |
|
MSGTEXT(MSGTYPE) | ;
|
|
OKDATA() | ;setup/check variables
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | OKDATA+5, OKDATA+10 |
^SCTM(404.57 - [#404.57] | ST+25, OKPOS+5, OKPOS+6 |
^TMP( | MSGQ! |
^TMP("SC PCMM MAIL" | PCMMXMY+7, PCMMXMY+13! |
^TMP("SCMSG1" | ST+9 |
^TMP("SCMSG2" | ST+17 |
^TMP("SCMSG3" | OKPOS+4!, OKPOS+12, OKPOS+14! |
Name | Line Occurrences |
---|---|
$$MSGPT | PCMMXMY+5 |
$$OKDATA | ST+4 |
$$OKPOS | ST+19 |
MSGQ | ST+4, ST+7 |
QTXMY | PCMMXMY+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DFN | MSGPT~, ST+6, ST+19, OKPOS~, OKPOS+11, OKDATA+5, OKDATA+10, OKDATA+11, PCMMXMY~, PCMMXMY+5 |
DT | ST+26 |
GETMESS | OKPOS+3~, OKPOS+6*, OKPOS+7, OKPOS+8, OKPOS+9 |
MSGTYPE | MSGPT~, ST+19, ST+25, OKPOS~, OKPOS+6, PCMMXMY~, PCMMXMY+3, PCMMXMY+5, MSGTEXT~, MSGTEXT+1 |
NODE | ST~, ST+9* |
>> PATIENT | OKDATA+6 |
SC200 | PCMMXMY+2~, PCMMXMY+6*, PCMMXMY+7* |
SCBEGIN | ST+1~ |
SCDATES | MSGPT~, ST+6, ST+11, ST+19, ST+21, OKPOS~, OKPOS+11, PCMMXMY~, PCMMXMY+5 |
SCDTS | ST+1~ |
SCEND | ST+1~ |
SCERR | MSGPT~, ST+6, ST+11, ST+19, ST+21, PRACQ, OKPOS~, OKPOS+11, OKDATA+7, OKDATA+12 |
SCESEQ | ST+1~, OKDATA+7, OKDATA+12 |
SCGROUP | PCMMXMY+2~ |
SCINCL | ST+1~ |
SCLIST | MSGPT~, ST+21, ST+28 |
SCLSEQ | ST+1~ |
SCN | ST+1~ |
SCOK | ST~, ST+2*, ST+6*, ST+7, ST+9, ST+13*, ST+21*, OKPOS+3~, OKPOS+7*, OKPOS+8* , OKPOS+12*, OKPOS+13*, OKPOS+15, OKDATA+1~, OKDATA+2*, OKDATA+3, OKDATA+5*, OKDATA+10*, OKDATA+13, PCMMXMY+2~ , PCMMXMY+3*, PCMMXMY+4*, PCMMXMY+5*, PCMMXMY+11*, QTXMY |
SCP | ST+1~ |
SCPARM | ST+1~, OKDATA+7, OKDATA+12 |
SCPARM("PATIENT" | OKDATA+6*, OKDATA+11* |
SCTEAMA | MSGPT~, ST+9, PCMMXMY~, PCMMXMY+5 |
SCTM | ST~, ST+9*, ST+11, OKPOS+3~, OKPOS+5*, OKPOS+12 |
SCTP | ST~, ST+18*, ST+19, ST+21, ST+25, ST+26, OKPOS~, OKPOS+5, OKPOS+6, OKPOS+12 |
SCTPND | ST~, ST+17*, ST+18 |
SCX | ST~, ST+9*, ST+26*, ST+28, OKPOS+3~, OKPOS+11*, OKPOS+13 |
SCY | ST~, ST+17* |
SCYESCL | MSGPT~, ST+19, OKPOS~, OKPOS+11, OKDATA+4*, PCMMXMY~, PCMMXMY+5 |
SCZ | ST~, ST+11*, ST+12, ST+13, MSGQ* |
U | ST+18, ST+25, OKPOS+5, OKPOS+6 |
>> XMY | PCMMXMY+8 |
>> XMY( | PCMMXMY+7*, PCMMXMY+9*, PCMMXMY+12* |