SCMCTMM ;ALB/REW - Patient Team Changes MailMessages ; 26 Mar 1996
Source file <SCMCTMM.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 3 | EN^DDIOL FIELD^DID $$EXTERNAL^DILFD |
Scheduling | 2 | $$PCMMXMY^SCAPMC25 $$PCMAIL^SCMCMM |
MailMan | 1 | ^XMD |
Registration | 1 | PID^VADPT6 |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Scheduling | 5 | SCAPMC6 SCMC PT TEAM CHANGE MAIL MESSAGE SCMCBK7 SCMCCON SCMCCV |
Kernel | 1 | ^ORD(101 |
Name | Comments | DBIA/ICR reference |
---|---|---|
;Do Patient Team Changes MailMan Message
; - called by SCMC PT TEAM CHANGES MAIL MESSAGE protocol |
||
END | ||
SETLN(TEXT) | ;
|
|
TEXT(SCFILE,SCNODE,SCPC,SCSPACE,SCLAB) | ;returns fldname & external value
|
|
QTTXT | ||
DDNAME(FILE,FIELD) | ;return the fieldname
|
|
MAILLST(SCTM,SCFIELDA,SCDATE,SCNEWTM,SCOLDTM,SCBADTM) | ;
; Input: ; SCTM - Pointer to Team File (#404.51) ; SCFIELDA - Field array with internal values ; SCDATE - Effective Date ; SCNEWTM - DFN array of newly assigned to team ; SCOLDTM - DFN array of previously assigned to team ; SCBADTM - DFN array of patients unassignable to team |
|
BAD | ||
QTMULT |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD("DD" | MAILLST+31 |
^DPT - [#2] | MAIL+30, MAILLST+44, BAD+6 |
^SCTM(404.51 - [#404.51] | MAILLST+25, MAILLST+29 |
^TMP("SCTM MAIL LST" | MAILLST+45*, MAILLST+46*, MAILLST+48, MAILLST+50, MAILLST+51, BAD+8*, BAD+9*, BAD+11, BAD+13, BAD+14 , QTMULT! |
^TMP($J | END!, SETLN+4*, QTMULT+1! |
Name | Line Occurrences |
---|---|
$$DDNAME | TEXT+15 |
$$TEXT | MAIL+36, MAIL+41, MAIL+47, MAIL+49, MAILLST+37 |
END | MAIL+2, MAIL+27 |
QTMULT | MAILLST+9, MAILLST+10, MAILLST+11 |
QTTXT | TEXT+11 |
SETLN | MAIL+33, MAIL+34, MAIL+36, MAIL+38, MAIL+39, MAIL+41, MAIL+43, MAIL+44, MAIL+50, MAILLST+30 , MAILLST+32, MAILLST+33, MAILLST+37, MAILLST+38, MAILLST+39, MAILLST+51, BAD+1, BAD+2, BAD+14 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DFN | MAIL+4~, MAIL+25*, MAIL+27, MAIL+30, MAIL+51, MAILLST+13~, MAILLST+40*, MAILLST+41*, MAILLST+42, MAILLST+44 , MAILLST+45, MAILLST+46, MAILLST+49*, MAILLST+50*, MAILLST+51, BAD+3*, BAD+4*, BAD+5, BAD+6, BAD+8 , BAD+9, BAD+12*, BAD+13*, BAD+14 |
>> DGQUIET | MAIL+28, MAILLST+27 |
DT | MAIL+11, MAIL+13, MAIL+16, MAIL+17, MAIL+51, MAILLST+19, MAILLST+20 |
DUZ | MAIL+52, BAD+15 |
FIELD | DDNAME~, DDNAME+2 |
FILE | DDNAME~, DDNAME+2 |
SCB | MAIL+4~, MAIL+11*, MAIL+13*, MAIL+16*, MAIL+18, MAIL+22, MAILLST+13~, MAILLST+17*, MAILLST+19*, MAILLST+22 |
SCB2 | MAIL+4~, MAIL+17*, MAIL+18 |
SCBADTM | MAILLST~, BAD, BAD+4 |
SCDATE | MAILLST~, MAILLST+22, MAILLST+23, MAILLST+31 |
SCDELTEM | MAILLST+13~, MAILLST+15*, QTMULT |
>> SCDETAIL | MAILLST+51*, BAD+14* |
SCE | MAIL+4~, MAIL+11*, MAIL+13*, MAIL+16*, MAIL+19, MAIL+23, MAILLST+13~, MAILLST+18*, MAILLST+20*, MAILLST+23 |
SCE2 | MAIL+4~, MAIL+17*, MAIL+19 |
SCFIELDA | MAILLST~, MAILLST+16, MAILLST+34 |
SCFIELDA( | MAILLST+17, MAILLST+18, MAILLST+35, MAILLST+36 |
SCFILE | TEXT~, TEXT+15, TEXT+18 |
SCFLD | MAIL+40*, MAIL+45*, TEXT+8~, TEXT+12*, TEXT+15, TEXT+18, MAILLST+13~, MAILLST+35*, MAILLST+36 |
SCINT | TEXT+8~, TEXT+10*, TEXT+11, TEXT+18 |
SCLAB | TEXT~, TEXT+14, TEXT+16, TEXT+17 |
SCLAB2 | MAIL+46~, MAIL+48*, MAIL+49 |
SCLNCNT | MAIL+4~, MAIL+31*, MAIL+51*, SETLN+3*, SETLN+4, MAILLST+26* |
SCNDX | MAILLST+13~, MAILLST+35*, MAILLST+36, MAILLST+37 |
SCNEWTM | MAILLST~, MAILLST+10, MAILLST+11, MAILLST+41 |
SCNODE | MAIL+4~, TEXT~, TEXT+10, MAILLST+13~, MAILLST+36*, MAILLST+37 |
>> SCNOMAIL | MAIL+2, MAILLST+9 |
SCOK | MAILLST+13~, MAILLST+28*, MAILLST+42*, BAD+5* |
SCOLDTM | MAILLST~ |
SCPAD | MAIL+4~ |
SCPC | TEXT~, TEXT+10, TEXT+12 |
SCPHONE | MAIL+4~ |
SCPTNM | MAIL+4~, MAIL+30*, MAIL+31, MAILLST+13~, MAILLST+44*, MAILLST+45, MAILLST+46, MAILLST+47*, MAILLST+48*, MAILLST+50 , BAD+6*, BAD+8, BAD+9, BAD+10*, BAD+11*, BAD+13 |
>> SCPTTMAF | MAIL+13, MAIL+17, MAIL+25, MAIL+36, MAIL+49 |
>> SCPTTMB4 | MAIL+11, MAIL+16, MAIL+25, MAIL+41, MAIL+47 |
SCSPACE | MAIL+4~, MAIL+6*, MAIL+36, MAIL+41, MAIL+43, MAIL+47, MAIL+49, MAIL+50, TEXT~, TEXT+16 , TEXT+17, MAILLST+13~, MAILLST+21*, MAILLST+37 |
SCSTAT | MAIL+4~, MAIL+11*, MAIL+13*, MAIL+15*, MAIL+21, MAIL+25, MAIL+28, MAIL+31, MAIL+32, MAIL+37 , MAIL+42 |
SCTM | MAILLST~, MAILLST+25, MAILLST+29, MAILLST+45, MAILLST+46, MAILLST+48, MAILLST+50, MAILLST+51, BAD+8, BAD+9 , BAD+11, BAD+13, BAD+14, QTMULT |
>> SCTMAF | MAIL+9, MAIL+10, MAIL+13, MAIL+14, MAIL+17 |
SCTMAR | MAIL+4~ |
SCTMAR( | MAIL+8*, MAIL+9* |
>> SCTMB4 | MAIL+8, MAIL+11, MAIL+12, MAIL+14, MAIL+16 |
SCTMDT | MAIL+4~, MAILLST+13~ |
SCTMDT("BEGIN" | MAIL+18*, MAIL+22*, MAILLST+22* |
SCTMDT("END" | MAIL+19*, MAIL+23*, MAILLST+23* |
SCTMDT("INCL" | MAIL+20*, MAIL+24*, MAILLST+24* |
SCTMNM | MAILLST+13~, MAILLST+25*, MAILLST+26, MAILLST+29*, MAILLST+30 |
SCTMXM | MAIL+4~ |
SCX | MAIL+3~, MAIL+35*, MAIL+36, MAIL+40*, MAIL+41, MAIL+45*, MAIL+47, MAIL+49, TEXT+8~, TEXT+9* , TEXT+15*, TEXT+16*, TEXT+17*, TEXT+18*, TEXT+20*, QTTXT, DDNAME+1~ |
SCX("LABEL" | DDNAME+3 |
SCY | MAIL+4~, MAIL+46~, MAIL+47*, MAIL+48, MAIL+50 |
SCZ | MAIL+46~, MAIL+49*, MAIL+50 |
TEXT | SETLN~, SETLN+1, SETLN+4 |
U | MAIL+11, MAIL+13, MAIL+16, MAIL+17, MAIL+30, TEXT+10, MAILLST+25, MAILLST+29, MAILLST+36, MAILLST+44 , BAD+6 |
VA | MAIL+3~, MAILLST+12~ |
VA("BID" | MAIL+31 |
VA("PID" | TEXT+20, MAILLST+45, BAD+8 |
VAERR | MAIL+3~, MAILLST+12~ |
XMDUZ | MAIL+3~, MAIL+52*, MAIL+53, MAILLST+12~, BAD+15* |
XMSUB | MAIL+3~, MAIL+31*, MAILLST+12~, MAILLST+26* |
XMTEXT | MAIL+3~, MAIL+31*, MAILLST+12~, MAILLST+26* |
XMY | MAIL+3~, MAILLST+12~ |
XMY( | MAIL+53* |
XMZ | MAIL+3~, MAILLST+12~ |
Y | MAIL+3~, MAILLST+12~, MAILLST+31*, MAILLST+32 |
ZTQUEUED | MAIL+3~, MAIL+5*, MAILLST+12~, MAILLST+14* |