SDES915P ;ALB/TAW,TJB - SD*5.3*915 Post Init Routine ; June 25, 2025
Source file <SDES915P.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;
|
|
| TASK | ; tasks off process to update the direct patient schedule field in the hospital location file
|
|
| TASK1 | ; tasks off process to check 409.831 file for clinic resource pointing at the same clinic
|
|
| DIRPAT | ;
|
|
| CLNINACTIVE(CLNIEN,REACTDT) | ;
|
|
| VALIDSC(SC) | ;
|
|
| VALIDCSC(CSC) | ;
|
|
| GETSC | ;Build an array of stop codes
|
|
| DUPCLIN | ;
|
|
| MAIL1 | ;
|
| Name | Field # of Occurrence |
|---|---|
| NOW^%DTC | TASK+7, TASK1+8 |
| ^%ZTLOAD | TASK+9, TASK1+8 |
| FILE^DIE | DIRPAT+27 |
| $$GET1^DIQ | MAIL+3, MAIL1+3 |
| GETS^DIQ | DIRPAT+11 |
| $$INACTIVE^SDES2UTIL | CLNINACTIVE+4, DUPCLIN+13, DUPCLIN+16 |
| ^XMD | MAIL+12, MAIL1+12 |
| MES^XPDUTL | TASK+1, TASK+2, TASK+3, TASK+4, TASK+11, TASK+12, TASK+14, TASK+15, TASK1+1, TASK1+2 , TASK1+3, TASK1+4, TASK1+5, TASK1+10, TASK1+11, TASK1+13, TASK1+14 |
| $$KSP^XUPARAM | MAIL+2, MAIL1+2 |
| FileNo | Call Tags |
|---|---|
| ^DIC(4 - [#4] | GET1^DIQ |
| ^SC - [#44] | GETS^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(40.7 - [#40.7] | GETSC+3, GETSC+6 |
| ^SC - [#44] | DUPCLIN+13, DUPCLIN+15 |
| ^SC("AG" | DIRPAT+7, DIRPAT+9 |
| ^SDEC(409.831 - [#409.831] | DUPCLIN+5 |
| ^XTMP("SDES915P" | DIRPAT+4!, DIRPAT+15*, DIRPAT+30*, DIRPAT+31*, DIRPAT+33!, DUPCLIN+2!, DUPCLIN+3, MAIL1+13! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | MAIL+1~, MAIL1+1~ |
| CLIEN | DUPCLIN+1~, DUPCLIN+2!, DUPCLIN+10*, DUPCLIN+11*, DUPCLIN+12, DUPCLIN+13, DUPCLIN+14, DUPCLIN+15, DUPCLIN+17 |
| CLNIEN | DIRPAT+1~, DIRPAT+2*, DIRPAT+3*, DIRPAT+8*, DIRPAT+9*, DIRPAT+11, DIRPAT+14, DIRPAT+15, DIRPAT+16, DIRPAT+17 , DIRPAT+19, DIRPAT+21, DIRPAT+23, DIRPAT+26, DIRPAT+30, CLNINACTIVE~, CLNINACTIVE+4 |
| CLNNAME | DIRPAT+1~, DIRPAT+2*, DIRPAT+3*, DIRPAT+7*, DIRPAT+9 |
| CODE | GETSC+1~, GETSC+2*, GETSC+3, GETSC+4, GETSC+5*, GETSC+6, GETSC+7 |
| CSC | VALIDCSC~, VALIDCSC+3, VALIDCSC+4 |
| D | MAIL+1~, MAIL1+1~ |
| D0 | MAIL+1~, MAIL1+1~ |
| D1 | MAIL+1~, MAIL1+1~ |
| D2 | MAIL+1~, MAIL1+1~ |
| DG | MAIL+1~, MAIL1+1~ |
| DIC | MAIL+1~, MAIL1+1~ |
| DICR | MAIL+1~, MAIL1+1~ |
| DIFROM | MAIL+1~, MAIL1+1~ |
| DIW | MAIL+1~, MAIL1+1~ |
| DT | CLNINACTIVE+4, CLNINACTIVE+6 |
| DUPS | DUPCLIN+1~, DUPCLIN+2! |
| DUPS( | DUPCLIN+7*, DUPCLIN+11, DUPCLIN+12, DUPCLIN+14, DUPCLIN+15, DUPCLIN+17 |
| DUZ | MAIL+5, MAIL+8, MAIL1+5, MAIL1+8 |
| ERRORCNT | DIRPAT+1~, DIRPAT+2* |
| ERRORS | DIRPAT+1~, DIRPAT+2*, DIRPAT+28!, DIRPAT+30 |
| FDA | DIRPAT+1~, DIRPAT+2*, DIRPAT+28! |
| FDA(44 | DIRPAT+26* |
| FIELD | DIRPAT+1~, DIRPAT+2*, DIRPAT+14* |
| FL | DUPCLIN+1~, DUPCLIN+9*, DUPCLIN+20 |
| I | DUPCLIN+1~, DUPCLIN+4*, DUPCLIN+5*, DUPCLIN+6, DUPCLIN+7, DUPCLIN+10*, DUPCLIN+17*, DUPCLIN+22*, DUPCLIN+23*, DUPCLIN+27* |
| IEN | GETSC+1~, GETSC+3*, GETSC+4, GETSC+6*, GETSC+7 |
| INACTIVE | CLNINACTIVE+1~, CLNINACTIVE+2*, CLNINACTIVE+4*, CLNINACTIVE+6*, CLNINACTIVE+8 |
| LIST | DUPCLIN+1~, DUPCLIN+13*, DUPCLIN+17 |
| MESS1 | MAIL+1~, MAIL+4*, MAIL+7, MAIL1+1~, MAIL1+4*, MAIL1+7 |
| MISS | DUPCLIN+1~, DUPCLIN+2!, DUPCLIN+24 |
| MISS( | DUPCLIN+6*, DUPCLIN+27 |
| OUT | DUPCLIN+1~ |
| OUT( | DUPCLIN+17*, DUPCLIN+23 |
| REACTDT | CLNINACTIVE~, CLNINACTIVE+6 |
| RESIEN | DUPCLIN+1~, DUPCLIN+14*, DUPCLIN+15, DUPCLIN+17 |
| RETURN | DIRPAT+1~, DIRPAT+2*, DIRPAT+10!, DIRPAT+12 |
| RETURN(44 | DIRPAT+14*, DIRPAT+15, DIRPAT+16, DIRPAT+17, DIRPAT+19, DIRPAT+21, DIRPAT+23 |
| RTIEN | DUPCLIN+1~, DUPCLIN+15*, DUPCLIN+16, DUPCLIN+17 |
| RTNAM | DUPCLIN+1~, DUPCLIN+15*, DUPCLIN+16, DUPCLIN+17 |
| RTSTAT | DUPCLIN+1~, DUPCLIN+16*, DUPCLIN+17 |
| SC | VALIDSC~, VALIDSC+3 |
| STANUM | MAIL+1~, MAIL+2*, MAIL+3*, MAIL+4, MAIL1+1~, MAIL1+2*, MAIL1+3*, MAIL1+4 |
| STOPCODE | DIRPAT+1~, DIRPAT+2* |
| STOPCODE("CSC" | VALIDCSC+4, GETSC+7* |
| STOPCODE("SC" | VALIDSC+3, GETSC+4* |
| U | DUPCLIN+5, DUPCLIN+6, DUPCLIN+7, DUPCLIN+13, DUPCLIN+15, DUPCLIN+17, DUPCLIN+27 |
| UPDATECNT | DIRPAT+1~, DIRPAT+2*, DIRPAT+3*, DIRPAT+15*, DIRPAT+29*, DIRPAT+30, DIRPAT+31 |
| VALID | VALIDSC+1~, VALIDSC+2*, VALIDSC+3*, VALIDSC+4, VALIDCSC+1~, VALIDCSC+2*, VALIDCSC+3*, VALIDCSC+4*, VALIDCSC+5 |
| X | TASK+5~, TASK+8, TASK1+6~, TASK1+8 |
| XMDUN | MAIL+1~, MAIL1+1~ |
| XMDUZ | MAIL+1~, MAIL+5*, MAIL+8*, MAIL1+1~, MAIL1+5*, MAIL1+8* |
| XMSUB | MAIL+1~, MAIL+7*, MAIL1+1~, MAIL1+7* |
| XMTEXT | MAIL+1~, MAIL+6*, MAIL1+1~, MAIL1+6* |
| XMY | MAIL+1~, MAIL1+1~ |
| XMY( | MAIL+8*, MAIL1+8* |
| XMY("BARBER.LORI@DOMAIN.EXT" | MAIL+9*, MAIL1+9* |
| XMY("BOYDA.THOMAS@DOMAIN.EXT" | MAIL1+11* |
| XMY("DUNNAM.DAVID@DOMAIN.EXT" | MAIL+10*, MAIL1+10* |
| XMY("WISE,TODD_A@DOMAIN.EXT" | MAIL+11* |
| XMZ | MAIL+1~, MAIL1+1~ |
| XT | DUPCLIN+1~, DUPCLIN+22*, DUPCLIN+23*, DUPCLIN+25*, DUPCLIN+26*, DUPCLIN+27*, DUPCLIN+28*, DUPCLIN+29*, DUPCLIN+30*, DUPCLIN+31* |
| XTMM | DUPCLIN+1~, DUPCLIN+3*, DUPCLIN+19, DUPCLIN+20, DUPCLIN+21, DUPCLIN+23, DUPCLIN+25, DUPCLIN+26, DUPCLIN+27, DUPCLIN+28 , DUPCLIN+29, DUPCLIN+30, DUPCLIN+31 |
| ZN | DUPCLIN+1~, DUPCLIN+5*, DUPCLIN+6, DUPCLIN+7 |
| ZTDESC | TASK+5~, TASK+6*, TASK1+6~, TASK1+7* |
| ZTDTH | TASK+5~, TASK+8*, TASK1+6~, TASK1+8* |
| ZTIO | TASK+5~, TASK+8*, TASK1+6~, TASK1+8* |
| ZTRTN | TASK+5~, TASK+8*, TASK1+6~, TASK1+8* |
| ZTSAVE | TASK+5~, TASK1+6~ |
| ZTSAVE("*" | TASK+8*, TASK1+8* |
| ZTSK | TASK+5~, TASK+10, TASK+11, TASK+13, TASK1+6~, TASK1+9, TASK1+10, TASK1+12 |