©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
SCMCTSK1 ;ALB/JDS - PCMM Inactivations; 18 Apr 2003 9:36 AM ; 10/24/07 12:24pm ; Compiled January 25, 2008 12:11:43 ; Compiled March 26, 2008 22:27:26
Source file <SCMCTSK1.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 12 | ($$PRTP,$$PTTP)^SCAPMC $$DATES^SCAPMCU1 $$GETPRTP^SCAPMCU2 $$DTCHK^SCAPU1 MSG^SCMCCV6 $$PDAT^SCMCGU $$CHECK^SCMCHLB1 ADD^SCMCHLE ($$IU,INACT,INCON)^SCMCTSK3 POSCHK^SCMCTSK4 FTERPT^SCMCTSK6 DIS2^SCMCTSK7 |
| VA Fileman | 8 | ^%DT C^%DTC ^DIC DT^DICRW (,FILE)^DIE EN1^DIP $$GET1^DIQ ^DIR |
| Kernel | 3 | $$TRIM^XLFSTR UPDATE^XPDID $$GET^XUA4A72 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| POSCHK(DATA,INFO) | ;
|
|
| IU(DFN) | ;is patient inactivity unassigned
|
|
| SEEN(DFN,POS,TYDT,SDDT,PROV,PROVP,SEEN) | ;
|
|
| FILE(RES,DATA) | ;File data on FTEE
|
|
| INACTIVE | ;
|
|
| SORT(DIPA,SDD) | ;sort tmpl
|
|
| FTEECHK(DATA,PAIEN) | ;check Ftee>1
|
|
| DIS | ;disch
|
|
| FTEERPT | ;FTEE REPORT
|
|
| CHKENR(DATA,INFO) | ;check if patient enrolled in teamposition clinic
|
|
| INCONR | ;inconsistent report
|
|
| POS | ||
| INCON | ;inconsistent PC assignments
|
|
| SUM(PR,POSI) | ;get pos for prov
|
|
| INACTDT(PA) | ;Scheduled inactivation date.
|
|
| SCREEN | ;Active assign. screen
|
|
| CHK | ;
|
|
| PRSEED | ;seed practitioner
|
|
| EXTEND(DATA,SCTEAM) | ;to inact. in next 60 days
|
|
| SCDFN | ||
| SEED | ;seed one patient/provider
|
|
| EX1 |
| Name | Field # of Occurrence |
|---|---|
| ^%DT | INACTIVE+6, INACTIVE+22, INACTIVE+28, INACTIVE+30, EXTEND+7, EXTEND+8 |
| C^%DTC | INACTIVE+29, INACTIVE+31 |
| ^DIC | SORT+6, SORT+10, SEED+8, PRSEED+6 |
| DT^DICRW | INACTIVE+3, INACTIVE+5, EXTEND+4, EXTEND+6 |
| ^DIE | INACTIVE+34 |
| FILE^DIE | FILE+9 |
| EN1^DIP | INCONR+4 |
| $$GET1^DIQ | POSCHK+16 |
| ^DIR | SORT+4, SORT+7 |
| $$PRTP^SCAPMC | SEEN+5 |
| $$PTTP^SCAPMC | POS+4 |
| $$DATES^SCAPMCU1 | INACTIVE+18, POS, SCREEN+4, SUM+6, SUM+8, POSCHK+5 |
| $$GETPRTP^SCAPMCU2 | SEEN+3, SEEN+8 |
| $$DTCHK^SCAPU1 | SCDFN+13 |
| MSG^SCMCCV6 | SEED+6, PRSEED+5 |
| $$PDAT^SCMCGU | SEED+3, PRSEED+2 |
| $$CHECK^SCMCHLB1 | SCDFN+17 |
| ADD^SCMCHLE | SCDFN+18, PRSEED+18 |
| $$IU^SCMCTSK3 | IU+1 |
| INACT^SCMCTSK3 | INACTDT+1 |
| INCON^SCMCTSK3 | INCON+2 |
| POSCHK^SCMCTSK4 | POSCHK+16 |
| FTERPT^SCMCTSK6 | FTEERPT+1 |
| DIS2^SCMCTSK7 | DIS+3 |
| $$TRIM^XLFSTR | FTEECHK+5, FTEECHK+7 |
| UPDATE^XPDID | INACTIVE+20 |
| $$GET^XUA4A72 | POSCHK+14 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| RPC Name | Call Tags |
|---|---|
| SCMC PCMM CHECK FTEE | FTEECHK |
| SC EXTEND BUILD LIST | EXTEND |
| SC EXTEND FILE LIST | FILE |
| SCMC POSITION PC CHECK | POSCHK |
| SC CHECK FOR ENROLLMENT | CHKENR |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | Classic Fileman Calls |
| ^VA(200 - [#200] | GET1^DIQ |
| ^SCPT(404.43 - [#404.43] | Classic Fileman Calls |
| ^SCTM(404.57 - [#404.57] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVPRV - [#9000010.06] | SEEN+14 |
| ^AUPNVPRV("AD" | SEEN+14 |
| ^SCE - [#409.68] | SEEN+11 |
| ^SCE("ADFN" | SEEN+9, SEEN+10 |
| ^SCPT(404.43 - [#404.43] | INACTIVE+11, DIS+1, EX1+2, POS+7, POS+8, FILE+4, SCDFN+11, PRSEED+11 |
| ^SCPT(404.48 - [#404.48] | SCDFN+16, PRSEED+16 |
| ^SCTM(404.51 - [#404.51] | INACTIVE+21, SUM+5, SUM+11 |
| ^SCTM(404.52 - [#404.52] | SCREEN+1, SCREEN+2, SCREEN+5, SCREEN+6, SUM+3, SUM+4, SUM+7, FTEECHK+11, POSCHK+9, POSCHK+10 , POSCHK+11, POSCHK+12, PRSEED+8 |
| ^SCTM(404.53 - [#404.53] | INACTIVE+18 |
| ^SCTM(404.57 - [#404.57] | INACTIVE+35, EXTEND+11, EXTEND+12, POS+1, POS+11, SCREEN+3, SUM+5, SUM+9, SCDFN+8, PRSEED+12 |
| ^SD(403.46 - [#403.46] | POSCHK+4, POSCHK+5, POSCHK+16 |
| ^SDD(409.44 - [#409.44] | SEEN+13 |
| ^TMP("SC TMP LIST" | POS+3! |
| ^TMP("SCF" | INACTIVE+36*, INACTIVE+37* |
| ^TMP("SCMCTSK" | INCONR+2! |
| ^XTMP("SCMCTSK2-" | INACTIVE+4, EXTEND+5 |
| Name | Line Occurrences |
|---|---|
| $$SUM | FTEECHK+11 |
| CHK | SEEN+13, SEEN+14 |
| EX1 | EXTEND+10 |
| POS | EXTEND+10, EXTEND+12 |
| PRSEED | SEED+8 |
| SCDFN | PRSEED+11 |
| SEEN | INACTIVE+32, POS+10 |
| Name | Field # of Occurrence |
|---|---|
| ^( | POS+5, PRSEED+11 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> %DT | INACTIVE+6*, INACTIVE+22*, INACTIVE+28*, INACTIVE+30* |
| A | INACTIVE+7*, INACTIVE+8, INACTIVE+9, EXTEND+3~, EX1*, EX1+1, EX1+2, SCREEN+1~*, SCREEN+2, SCREEN+3 , SCREEN+4, SCREEN+5, SCREEN+6, FTEECHK+11~*, IU+2~ |
| >> ACTIVE | SUM+6*, SUM+7, SUM+8* |
| AH | PRSEED+1~, PRSEED+8*, PRSEED+13, PRSEED+18 |
| B | EX1+1*, EX1+2, IU+2~ |
| BY | INCONR+1~, INCONR+3* |
| CNT | INACTIVE+2~*, INACTIVE+36*, INACTIVE+37*, EXTEND+3~*, EXTEND+11, EXTEND+12, EXTEND+13, EX1*, EX1+2, EX1+3* , POS+11* |
| >> D0 | SCREEN+1, SCREEN+6 |
| >> DA | INACTIVE+34* |
| DATA | CHKENR~, EXTEND~, EXTEND+2!, FILE~, FTEECHK~, FTEECHK+3*, FTEECHK+4, FTEECHK+8*, FTEECHK+12*, FTEECHK+13* , POSCHK~, POSCHK+3*, POSCHK+4*, POSCHK+5*, POSCHK+6*, POSCHK+16*, IU+2~ |
| DATA( | EX1+2*, FILE+2, FILE+3*, FILE+4, FILE+5, FILE+6, FILE+7, FILE+8 |
| DATA(0 | CHKENR+1* |
| DATA(1 | EXTEND+3*, EXTEND+13* |
| DFN | INACTIVE+19*, INACTIVE+20, INACTIVE+32, SEEN~, SEEN+9, SEEN+10, POS+9*, POS+10, IU~, IU+1 |
| DIC | SORT+1~, SORT+2*, SEED+2~, SEED+8*, PRSEED+6*, INCONR+3* |
| DIC("A" | SORT+9*, PRSEED+6* |
| DIC("S" | SORT+3* |
| DIC(0 | SORT+2*, SORT+9*, SEED+8*, PRSEED+6* |
| >> DIE | INACTIVE+34* |
| >> DIOBEG | INCONR+3* |
| DIPA | SORT~ |
| DIPA("EI" | SORT+5*, SORT+8*, SORT+11*, SORT+12* |
| DIPA("SI" | SORT+5*, SORT+6*, SORT+9* |
| >> DIR("A" | SORT+4*, SORT+7* |
| >> DIR("B" | SORT+4*, SORT+7* |
| >> DIR(0 | SORT+4*, SORT+7* |
| >> DR | INACTIVE+34* |
| DT | INACTIVE+4, INACTIVE+5, EXTEND+5, EXTEND+6, SCREEN+2, SCREEN+5, SUM+6, SUM+8, POSCHK+9, POSCHK+10 , SCDFN+13 |
| DUZ | FILE+8 |
| >> ENTRY | INACTIVE+10*, INACTIVE+11, INACTIVE+34, INACTIVE+36, INACTIVE+37, DIS+1 |
| >> FLDA( | FILE+6*, FILE+7*, FILE+8* |
| >> FLDA(0 | FILE+9 |
| >> FLDS | INCONR+3* |
| FTEE | SUM+1~, SUM+2*, SUM+13*, SUM+14, FTEECHK+2~, FTEECHK+11*, FTEECHK+13 |
| I | INACTIVE+2~, SEEN+2~, SEEN+6*, SEEN+7, SEEN+8, SEEN+9*, SEEN+10, CHK+3, CHK+4, EXTEND+3~ , FILE+1~, FILE+2*, FILE+3, FILE+4, FILE+5, FILE+6, FILE+7, FILE+8, SUM+1~, SUM+2* , SUM+3*, SUM+4, PRSEED+15~, PRSEED+16*, IU+2~ |
| INFO | CHKENR~, POSCHK~, POSCHK+3, POSCHK+4, POSCHK+5, POSCHK+7, POSCHK+9, POSCHK+10, POSCHK+11, POSCHK+16 |
| INS | SUM+1~, SUM+5* |
| J | SEEN+10*, SEEN+11, SEEN+13, EXTEND+3~, POS+5*, POS+6~, SCREEN+2~*, SCREEN+5, SCREEN+6, POSCHK+9* , POSCHK+10, POSCHK+11 |
| K | EXTEND+3~, POSCHK+11*, POSCHK+12 |
| >> L | INACTIVE+7* |
| NEW | INACTIVE+24~, INACTIVE+25*, INACTIVE+26*, INACTIVE+28, INACTIVE+30 |
| PA | INACTDT~ |
| PAIEN | FTEECHK~, FTEECHK+4, FTEECHK+5, FTEECHK+11, FTEECHK+13 |
| PCLASS | POSCHK+1~, POSCHK+14*, POSCHK+16 |
| POS | INACTIVE+13*, INACTIVE+18, INACTIVE+32, INACTIVE+35, SEEN~, SEEN+3, SEEN+5, SEEN+8, EXTEND+10*, EXTEND+12* , POS, POS+1, POS+4, POS+10, POS+11, INCON+1~ |
| POSA | EXTEND+3~, EXTEND+9*, EXTEND+11*, EXTEND+12 |
| POSI | SUM~, SUM+4 |
| PR | SUM~, SUM+3, SUM+7 |
| PREC | INACTIVE+18*, SEEN+2~, SEEN+7*, SEEN+8 |
| PRECP | INACTIVE+32~, INACTIVE+37, POS+10 |
| PRO | SEEN+2~, SEEN+12*, SEEN+13, SEEN+14, CHK+1, CHK+2, CHK+3, CHK+4 |
| PROV | INACTIVE+32~, INACTIVE+36, SEEN~, SEEN+3*, POS+10 |
| PROVP | SEEN~, SEEN+1*, SEEN+8* |
| Q | INACTIVE+2~, INACTIVE+8*, INACTIVE+9*, INACTIVE+10, INACTIVE+19, INACTIVE+21 |
| QUIT | PRSEED+15~*, PRSEED+16*, PRSEED+17 |
| RES | FILE~ |
| >> SC1 | SEED+6, SCDFN*, SCDFN+2, SCDFN+4, SCDFN+6, SCDFN+10, PRSEED+5 |
| SC177 | SEED+3*, SEED+4, SCDFN+13, PRSEED+1~, PRSEED+2*, PRSEED+3 |
| >> SC2 | SEED+5*, SEED+6, PRSEED+4*, PRSEED+5 |
| SC297 | INACTIVE+2~ |
| SCA | SUM+1~ |
| SCA( | SUM+4* |
| SCADT | SEED+2~, SCDFN+3*, SCDFN+4*, SCDFN+6, SCDFN+10, SCDFN+13 |
| SCDATA | EXTEND+2!, POS+5*, POS+6, POS+7, POS+8, POS+9, POS+11 |
| SCDDT | SEED+2~, SCDFN+11*, SCDFN+13 |
| >> SCDFN | SEED+10*, SCDFN+18, PRSEED+11* |
| >> SCERR | POS+4 |
| >> SCLIST | POS+4, POS+5, POS+12 |
| SCPAI | SEED+2~, SCDFN+9*, SCDFN+10*, SCDFN+11, SCDFN+14 |
| SCPR | SEEN+2~ |
| SCPR( | SEEN+6, SEEN+7, SEEN+8 |
| SCPRDTS | SEEN+2~ |
| SCPRDTS("BEGIN" | SEEN+4* |
| SCPRDTS("END" | SEEN+4* |
| SCPRDTS("INCL" | SEEN+4* |
| SCPRO | SEEN+2~ |
| SCPRO( | SEEN+6*, SEEN+8*, SEEN+12, CHK+1, CHK+2, CHK+3, CHK+4 |
| >> SCPROV | PRSEED+7*, PRSEED+8 |
| SCTEAM | EXTEND~, EXTEND+3*, EXTEND+10, EXTEND+11, EXTEND+12 |
| >> SCTP | SCDFN+5*, SCDFN+6*, SCDFN+8, SCDFN+10, SCDFN+18 |
| >> SCTP( | PRSEED+9, PRSEED+10* |
| >> SCU( | PRSEED+11* |
| SCVAR | SCDFN+14~*, SCDFN+16, SCDFN+17, SCDFN+18, PRSEED+13*, PRSEED+16, PRSEED+18 |
| SD1 | INACTIVE+4~*, EXTEND+5~* |
| SDD | SORT~, SORT+5*, SORT+6*, SORT+12*, SORT+13* |
| SDDATA | EXTEND+2! |
| SDDATA( | POS+11* |
| SDDT | INACTIVE+2~, INACTIVE+4*, INACTIVE+5*, INACTIVE+32, INACTIVE+34, SEEN~, SEEN+3, SEEN+4, SEEN+8, EXTEND+5* , EXTEND+6*, POS+10 |
| SDX | CHK+1~*, CHK+2, CHK+3, CHK+4 |
| SEEN | INACTIVE+32~, SEEN~, SEEN+1*, SEEN+9, SEEN+10, SEEN+12, SEEN+13, SEEN+14, CHK+1, CHK+3* , CHK+4*, POS+10 |
| STDD | INACTIVE+2~, INACTIVE+6*, INACTIVE+16 |
| STDT | INACTIVE+2~, INACTIVE+22~*, INACTIVE+25, INACTIVE+28~*, INACTIVE+29, INACTIVE+30~*, INACTIVE+31, EXTEND+7*, POS+6 |
| TEAM | INACTIVE+21*, SUM+1~, SUM+11*, SUM+12 |
| TEAMN | INACTIVE+2~ |
| >> TEAMNM | INACTIVE+21* |
| >> TP | PRSEED+8*, PRSEED+9, PRSEED+10, PRSEED+11, PRSEED+12 |
| TPZ | INACTIVE+2~, INACTIVE+35*, INACTIVE+36, INACTIVE+37 |
| TYDT | INACTIVE+2~, INACTIVE+27~, INACTIVE+29*, INACTIVE+31*, INACTIVE+32, SEEN~, SEEN+4, SEEN+9, SEEN+11, CHK+4 , EXTEND+8*, POS+10 |
| U | INACTIVE+12, INACTIVE+13, INACTIVE+14, INACTIVE+15, INACTIVE+16, INACTIVE+18, INACTIVE+21, INACTIVE+25, INACTIVE+30, INACTIVE+36 , INACTIVE+37, SEEN+6, SEEN+7, SEEN+8, SEEN+11, CHK+2, CHK+3, CHK+4, DIS+2, EXTEND+10 , EX1+2, POS+1, POS+6, POS+7, POS+8, POS+11, FILE+3, FILE+5, FILE+6, FILE+7 , SCREEN+3, SUM+5, SUM+7, SUM+10, SUM+11, SUM+12, SUM+13, FTEECHK+4, FTEECHK+5, FTEECHK+11 , FTEECHK+13, SORT+6, SORT+9, SORT+11, SORT+12, POSCHK+3, POSCHK+4, POSCHK+5, POSCHK+7, POSCHK+14 , POSCHK+16, SCDFN+11, PRSEED+12, PRSEED+16 |
| V | SEEN+14~* |
| VISIT | SEEN+11~*, SEEN+14 |
| X | INACTIVE+6*, INACTIVE+22*, INACTIVE+28*, INACTIVE+29, INACTIVE+30*, INACTIVE+31, SEEN+2~, SEEN+5*, EXTEND+7*, EXTEND+8* , POS+4*, SCREEN+2*, SCREEN+5*, SCREEN+6*, SCREEN+7*, FTEECHK+2~, FTEECHK+5*, FTEECHK+6, FTEECHK+7, SORT+5 , SORT+6, SORT+8, SORT+12 |
| X1 | INACTIVE+29*, INACTIVE+31*, FTEECHK+2~, FTEECHK+6*, FTEECHK+8 |
| X2 | INACTIVE+29*, INACTIVE+31*, FTEECHK+2~, FTEECHK+7*, FTEECHK+8 |
| >> XPDIDTOT | INACTIVE+20 |
| >> Y | INACTIVE+6, INACTIVE+22, INACTIVE+28, INACTIVE+30, EXTEND+7, EXTEND+8, SORT+6, SORT+9, SORT+11, SORT+12 , SEED+8, SEED+10, PRSEED+6, PRSEED+7 |
| >> Y(0 | SORT+9, SORT+11 |
| Z | SUM+1~, SUM+7*, SUM+8, SUM+9*, SUM+10, SUM+11 |
| ZERO | INACTIVE+11*, INACTIVE+12, INACTIVE+13, INACTIVE+14, INACTIVE+15, INACTIVE+16, INACTIVE+25, INACTIVE+30, DIS+1~*, DIS+2 , FILE+4*, FILE+5, SUM+1~, SUM+4*, SUM+5, SUM+6, SUM+7*, SUM+13, POSCHK+12*, POSCHK+14 , POSCHK+16 |