SCMCTSK2 ;ALB/JDS - PCMM Inactivation Nightly Job; 18 Apr 2003 9:36 AM ; 10/24/07 12:23pm ; Compiled November 21, 2007 13:32:47 ; 9/22/09 8:43am
Source file <SCMCTSK2.m>
Package | Total | Call Graph |
---|---|---|
Scheduling | 11 | $$PRTP^SCAPMC $$DATES^SCAPMCU1 $$GETPRTP^SCAPMCU2 $$OKPREC2^SCMCLK (DIS,INACTIVE,SEEN,SORT)^SCMCTSK1 (EXTEND,FLAGG,PRFLAG,PROMPT,UNASSIGN)^SCMCTSK3 (LINES,PRMAIL)^SCMCTSK5 BULL^SCMCTSK6 SETASC^SCMCTSK7 $$EN^SCMCTSKI $$SDAPI^SDAMA301 |
VA Fileman | 6 | ^%DT (,C)^%DTC FILE^DICN DT^DICRW ^DIE EN1^DIP |
Kernel | 1 | $$GET^XUA4A72 |
MailMan | 1 | ^XMD |
Name | Comments | DBIA/ICR reference |
---|---|---|
MSG(SCTP,DFN) | ;send inact. message
|
|
GETASC(DATA,ENTRY) | ;get assoc. clinics
|
|
SETASC(RESULT,DATA) | ;set assoc. clinics
|
|
FLRPT | ;FLAGGED REPORT
|
|
BULL | ;EOM Bulletin
|
|
FUTAPP(DFN) | ;print future appts
|
|
PRFLAG | ;flag incorrect provider pos
|
|
BY | ||
IN30 | ;inact. last month
|
|
LINES(TYPE) | ;Lines of Bulletin
|
|
INRPT | ; REPORT
|
|
EXRPT | ;EXTEND REPORT
|
|
NIGHT | ;
|
|
TST | ;
|
|
UNFLG | ;Unflagging
|
|
PRINAC | ;inact. flagged providers
|
|
ROLE(DATA,INFO) | ;SCMC ROLE
|
Name | Field # of Occurrence |
---|---|
^%DT | NIGHT+29, NIGHT+31 |
^%DTC | NIGHT+28 |
C^%DTC | NIGHT+8, NIGHT+23, NIGHT+30, NIGHT+32, NIGHT+42 |
FILE^DICN | PRINAC+22 |
DT^DICRW | NIGHT+2 |
^DIE | UNFLG+2, PRINAC+16 |
EN1^DIP | BULL+8, BULL+26, BULL+38, TST+10, INRPT+12, IN30+6, EXRPT+11, FLRPT+12 |
$$PRTP^SCAPMC | MSG+5 |
$$DATES^SCAPMCU1 | ROLE+8 |
$$GETPRTP^SCAPMCU2 | PRINAC+14, ROLE+13 |
$$OKPREC2^SCMCLK | MSG+8 |
DIS^SCMCTSK1 | NIGHT+43 |
INACTIVE^SCMCTSK1 | NIGHT+12, NIGHT+15 |
SEEN^SCMCTSK1 | NIGHT+39 |
SORT^SCMCTSK1 | IN30+1 |
EXTEND^SCMCTSK3 | EXRPT+5 |
FLAGG^SCMCTSK3 | FLRPT+3 |
PRFLAG^SCMCTSK3 | PRFLAG+4 |
PROMPT^SCMCTSK3 | INRPT+2, EXRPT+2, FLRPT+1 |
UNASSIGN^SCMCTSK3 | INRPT+4 |
LINES^SCMCTSK5 | LINES+1 |
PRMAIL^SCMCTSK5 | BULL+12, BULL+30, TST+2, TST+13 |
BULL^SCMCTSK6 | TST+14 |
SETASC^SCMCTSK7 | SETASC+1 |
$$EN^SCMCTSKI | PRINAC+10 |
$$SDAPI^SDAMA301 | FUTAPP+8 |
^XMD | MSG+13, BULL+11, BULL+29, BULL+41, TST+12 |
$$GET^XUA4A72 | PRINAC+15, ROLE+14 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
RPC Name | Call Tags |
---|---|
SC GET ASSOCIATE CLINICS | GETASC |
SCMC ROLE | ROLE |
FileNo | Call Tags |
---|---|
^SCPT(404.43 - [#404.43] | Classic Fileman Calls |
^SCTM(404.52 - [#404.52] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD("DD" | FUTAPP+11 |
^DPT - [#2] | MSG+12 |
^SC - [#44] | GETASC+2 |
^SCPT(404.42 - [#404.42] | NIGHT+20 |
^SCPT(404.43 - [#404.43] | NIGHT+17, NIGHT+18, NIGHT+19, NIGHT+45 |
^SCTM(404.44 - [#404.44] | NIGHT+4, NIGHT+13, PRINAC+26* |
^SCTM(404.52 - [#404.52] | PRINAC+5, PRINAC+11 |
^SCTM(404.53 - [#404.53] | ROLE+10, ROLE+11 |
^SCTM(404.57 - [#404.57] | PRINAC+17, GETASC+2, MSG+4, MSG+7, MSG+12 |
^SD(403.46 - [#403.46] | PRINAC+18, ROLE+7, ROLE+15 |
^TMP("SC" | INRPT+3, EXRPT+3, BY+1, FLRPT+2 |
^TMP("SCF" | BULL+13, BULL+15 |
^TMP("SCMC" | BULL+5!, BULL+9, BULL+14!, BULL+15*, BULL+19!, BULL+23!, BULL+27, BULL+32!, BULL+35!, BULL+39 , TST+3!, TST+7! |
^TMP("SCMCTXT" | BULL+5!, BULL+9*, BULL+14!, BULL+19!, BULL+27*, BULL+32!, BULL+39*, TST+3! |
^TMP("SCML" | BULL+5! |
^TMP($J | NIGHT+45!, NIGHT+53!, FUTAPP+9, FUTAPP+10, BULL+20! |
^XTMP("SCMCTSK2-" | NIGHT+2 |
Name | Line Occurrences |
---|---|
BULL | NIGHT+45, NIGHT+53 |
BY | INRPT+7, EXRPT+9, FLRPT+7 |
LINES | BULL+10, BULL+28, BULL+40, TST+11 |
PRFLAG | NIGHT+14 |
PRINAC | NIGHT+49 |
UNFLG | NIGHT+22, NIGHT+38, NIGHT+41 |
Name | Field # of Occurrence |
---|---|
^( | PRINAC+5 |
^(0 | ROLE+11 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %DT | NIGHT+29*, NIGHT+31* |
>> A | BY+2*, BY+3, BY+5, BY+6 |
>> ALPHA | NIGHT+4*, NIGHT+10, NIGHT+15, NIGHT+23, NIGHT+42, NIGHT+45, NIGHT+48 |
BY | BULL+1~, BULL+7*, BULL+25*, BULL+37*, TST+9*, IN30+3* |
BY(0 | BY+1* |
CLIN | EXRPT+1! |
CNT | GETASC+1~*, GETASC+2*, BULL+7*, BULL+25*, BULL+37*, TST+9* |
DA | UNFLG+1~, UNFLG+2*, PRINAC+16* |
DATA | GETASC~, SETASC~, SETASC+1, ROLE~ |
DATA( | GETASC+2* |
DATA(0 | ROLE+7*, ROLE+12, ROLE+18* |
>> DATE | NIGHT+17*, NIGHT+18, NIGHT+23, NIGHT+28, NIGHT+42 |
DFN | NIGHT+20*, NIGHT+39, FUTAPP~, FUTAPP+5, FUTAPP+9, FUTAPP+10, MSG~, MSG+12 |
>> DHD | BULL+8*, BULL+26*, BULL+38*, TST+10*, INRPT+8*, IN30+4*, EXRPT+7*, FLRPT+6* |
DHIT | BULL+1~, BULL+25*, BULL+37*, TST+9* |
>> DIC | PRINAC+21*, BULL+7*, BULL+25*, BULL+37*, TST+9*, INRPT+6*, IN30+3*, EXRPT+6*, FLRPT+5* |
>> DIC("DR" | PRINAC+21* |
>> DIC(0 | PRINAC+22* |
DIE | UNFLG+1~, UNFLG+2*, PRINAC+16* |
>> DIOBEG | INRPT+9*, EXRPT+8*, FLRPT+8* |
DIOEND | INRPT+1~, INRPT+10*, EXRPT+8*, FLRPT+11* |
DIPA | IN30+1~ |
DIPA("EI" | IN30+5 |
DIPA("SI" | IN30+5 |
DISPAR | BY~ |
DISPAR(0 | BY+1*, BY+2*, BY+3*, BY+5*, BY+6*, FLRPT+10 |
DISUPNO | BULL+1~, BULL+2*, BULL+18*, BULL+31*, TST+1* |
DO | PRINAC+20! |
DR | UNFLG+1~, UNFLG+2*, PRINAC+16* |
DT | NIGHT+2, NIGHT+3, PRINAC+3, PRINAC+21, FUTAPP+2, MSG+3 |
ENDDT | NIGHT+1~, NIGHT+23*, NIGHT+43 |
ENTRY | NIGHT+18*, NIGHT+19, UNFLG+2, GETASC~, GETASC+2 |
>> FLDS | BULL+7*, BULL+8*, BULL+26*, BULL+38*, TST+10*, INRPT+11*, IN30+5*, EXRPT+10*, FLRPT+9*, FLRPT+10* |
FLGDT | NIGHT+1~, NIGHT+42* |
>> FR | BULL+8*, BULL+26*, BULL+38*, TST+10*, IN30+5* |
HEAD | BULL+1~ |
I | PRINAC+1~, PRINAC+5*, PRINAC+6, GETASC+1~, GETASC+2*, MSG+11*, ROLE+1~, ROLE+10*, ROLE+11, BY+2* , BY+3, BY+5, BY+6 |
II | PRINAC+1~ |
INFO | ROLE~, ROLE+3 |
INST | EXRPT+1! |
>> IOP | BULL+8*, BULL+26*, BULL+38*, TST+10* |
L | NIGHT+1~, BULL+2*, IN30+3*, BY+1*, FLRPT+5* |
L(0 | BY+1* |
LDOM | NIGHT+1~, NIGHT+7*, NIGHT+9*, NIGHT+11, NIGHT+14, NIGHT+48 |
NEW | NIGHT+27~, NIGHT+28*, NIGHT+29, NIGHT+31 |
NOINAC | NIGHT+1~, NIGHT+7*, NIGHT+11*, NIGHT+43, NIGHT+45, BULL+20 |
PATDT | NIGHT+1~ |
>> PC | PRINAC+15*, PRINAC+18 |
POS | NIGHT+21*, NIGHT+39, PRFLAG+1~, PRINAC+13*, PRINAC+14, PRINAC+17 |
PREC | ROLE+9~*, ROLE+10, ROLE+11*, ROLE+18 |
>> PRECP | NIGHT+39 |
>> PROV | NIGHT+39, PRINAC+14*, PRINAC+15 |
>> Q | INRPT+5*, IN30+2*, EXRPT+4*, BY+2, FLRPT+4* |
RESULT | SETASC~, SETASC+1 |
ROLE | ROLE+1~, ROLE+3*, ROLE+4, ROLE+7, ROLE+15 |
SCARRAY | FUTAPP+1~, FUTAPP+8 |
SCARRAY("FLDS" | FUTAPP+7* |
SCARRAY("SORT" | FUTAPP+6* |
SCARRAY(1 | FUTAPP+4* |
SCARRAY(4 | FUTAPP+5* |
SCDHD | INRPT+1~, INRPT+8*, EXRPT+7*, BY+1, BY+3, BY+4, FLRPT+6* |
>> SCDT | FUTAPP+3*, FUTAPP+4 |
SCDT0 | FUTAPP+1~, FUTAPP+10*, FUTAPP+11 |
SCDTMP | FUTAPP+1~, FUTAPP+9*, FUTAPP+10, FUTAPP+11 |
>> SCERR | MSG+5 |
>> SCI | BULL+13*, BULL+14, BULL+15 |
>> SCLIST | MSG+2*, MSG+5, MSG+10, MSG+11 |
SCLS | ROLE+1~, ROLE+14*, ROLE+15 |
>> SCOK | MSG+5* |
SCPOR | ROLE+1~, ROLE+2*, ROLE+8*, ROLE+18 |
SCRSLT | ROLE+1~, ROLE+2*, ROLE+15*, ROLE+18 |
>> SCTEXT(1 | MSG+12* |
SCTF | ROLE+1~, ROLE+13*, ROLE+14 |
SCTP | MSG~, MSG+4, MSG+5, MSG+7, MSG+8, MSG+12 |
>> SCX | MSG+8*, MSG+10 |
SDASS | NIGHT+24~*, NIGHT+28 |
SDD | IN30+1~ |
SDDT | NIGHT+1~, NIGHT+2*, NIGHT+3*, NIGHT+4, NIGHT+8, NIGHT+9, NIGHT+11, NIGHT+39, NIGHT+42, NIGHT+43 , NIGHT+45, PRINAC+3*, PRINAC+10, PRINAC+14, PRINAC+26, FUTAPP+2*, FUTAPP+3, MSG+3*, MSG+8 |
SEEN | NIGHT+1~, NIGHT+39, NIGHT+41 |
SIXM | NIGHT+1~, NIGHT+13*, NIGHT+14 |
>> SORT | EXRPT+4* |
>> SORTN | BY+2 |
>> STDT | NIGHT+29*, NIGHT+30, NIGHT+31*, NIGHT+32 |
TAB | FUTAPP+1~* |
TEAM | EXRPT+1! |
>> TO | BULL+8*, BULL+26*, BULL+38*, TST+10*, IN30+5* |
TP | ROLE+1~, ROLE+3*, ROLE+5, ROLE+8, ROLE+10, ROLE+11, ROLE+13 |
>> TYDT | NIGHT+30*, NIGHT+32*, NIGHT+39 |
TYPE | LINES~, LINES+1 |
U | NIGHT+2, NIGHT+4, NIGHT+13, NIGHT+21, NIGHT+22, NIGHT+24, NIGHT+38, NIGHT+42, PRINAC+5, PRINAC+11 , PRINAC+18, PRINAC+21, PRINAC+26, FUTAPP+10, FUTAPP+11, GETASC+2, MSG+4, MSG+7, MSG+12, ROLE+3 , ROLE+7, ROLE+18, BY+2, BY+3, BY+5, BY+6 |
>> X | NIGHT+9, NIGHT+23, NIGHT+28, NIGHT+29*, NIGHT+30, NIGHT+31*, NIGHT+32, NIGHT+42, PRINAC+21* |
>> X1 | NIGHT+8*, NIGHT+23*, NIGHT+28*, NIGHT+30*, NIGHT+32*, NIGHT+42* |
>> X2 | NIGHT+8*, NIGHT+23*, NIGHT+28*, NIGHT+30*, NIGHT+32*, NIGHT+42* |
>> XMSUB | MSG+13*, BULL+3*, BULL+16*, BULL+21*, BULL+33*, TST+5* |
>> XMTEXT | BULL+6*, BULL+17*, BULL+24*, BULL+36*, TST+8* |
XMY | MSG+11~, BULL+14! |
XMY( | MSG+11*, BULL+14* |
XMY("G.PCMM P | ATIENT/PROVIDER INACTIVE" , BULL+4*, BULL+22*, BULL+34*, TST+6* |
>> Y | NIGHT+29, NIGHT+31, FUTAPP+11* |
>> ZERO | NIGHT+19*, NIGHT+20, NIGHT+21, NIGHT+22, NIGHT+24, NIGHT+38, NIGHT+42, PRINAC+5*, PRINAC+11, PRINAC+13 , PRINAC+21 |
>> ZERO1 | PRINAC+17*, PRINAC+18 |
>> ZEROIEN | PRINAC+6*, PRINAC+16 |
>> ZTSAVE("^TMP(""SC"",$J," | BY+7* |
>> ZTSAVE("^TMP(""SCSORT"",$J," | BY+7* |