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* |