SDES852P ;ALB/BWF - SD*5.3*852 Post Init Routine ; May 24, 2023
Source file <SDES852P.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Scheduling Consult Clean-up
|
|
| TASK | ;
|
|
| FIXCONSREQS | ; fix consult requests that were not correctly re-opened
|
|
| RESCHEDULED(DFN,VARPTR) | ;
|
|
| AFTEREVENT(DFN,APPTSTARTTIME,CLINICIEN,SDDA,SDATA) | ;
|
|
| BEFOREEVENT(DFN,APPTSTARTTIME,CLINICIEN,SDATA) | ;
|
|
| ;
; Get Station Number |
| Name | Field # of Occurrence |
|---|---|
| NOW^%DTC | TASK+10 |
| ^%ZTLOAD | TASK+10 |
| $$GET1^DIQ | FIXCONSREQS+23, FIXCONSREQS+31, FIXCONSREQS+34, FIXCONSREQS+35, FIXCONSREQS+36, FIXCONSREQS+40, FIXCONSREQS+46, FIXCONSREQS+51, FIXCONSREQS+53, FIXCONSREQS+63 , FIXCONSREQS+64, FIXCONSREQS+66, FIXCONSREQS+68, FIXCONSREQS+69, FIXCONSREQS+71, FIXCONSREQS+73, RESCHEDULED+7, RESCHEDULED+10, RESCHEDULED+12, MAIL+5 |
| $$HANDLE^SDAMEVT | AFTEREVENT+2, BEFOREEVENT+3 |
| BEFORE^SDAMEVT | BEFOREEVENT+4 |
| CANCEL^SDAMEVT | AFTEREVENT+4 |
| AVUPDT^SDEC08A | FIXCONSREQS+48 |
| $$SCIEN^SDECU2 | BEFOREEVENT+2 |
| AMIECAN^SDESCOMPPEN | FIXCONSREQS+51 |
| REQSET^SDESCONSULTUPD | FIXCONSREQS+43 |
| UPDCONTSEQ^SDESCONTACTS | FIXCONSREQS+45 |
| $$FMADD^XLFDT | FIXCONSREQS+6 |
| $$FMTE^XLFDT | FIXCONSREQS+57 |
| ^XMD | MAIL+16 |
| MES^XPDUTL | TASK+1, TASK+2, TASK+3, TASK+4, TASK+5, TASK+6, TASK+7, TASK+12, TASK+13, TASK+15 , TASK+16 |
| $$KSP^XUPARAM | MAIL+4 |
| FileNo | Call Tags |
|---|---|
| ^GMR(123 - [#123] | GET1^DIQ |
| ^DPT - [#2] | GET1^DIQ |
| ^DIC(4 - [#4] | GET1^DIQ |
| ^SDEC(409.831 - [#409.831] | GET1^DIQ |
| ^SDEC(409.84 - [#409.84] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^GMR(123 - [#123] | FIXCONSREQS+22 |
| ^ORD(100.01 - [#100.01] | FIXCONSREQS+21 |
| ^SDEC(409.84 - [#409.84] | RESCHEDULED+4, RESCHEDULED+5 |
| ^TMP("SDES852P" | RESCHEDULED+2!, RESCHEDULED+14*, RESCHEDULED+15*, RESCHEDULED+18, RESCHEDULED+19, RESCHEDULED+20! |
| ^XTMP("SDES852P" | FIXCONSREQS+5!, FIXCONSREQS+6*, FIXCONSREQS+8*, FIXCONSREQS+10*, FIXCONSREQS+12*, FIXCONSREQS+14*, FIXCONSREQS+16*, FIXCONSREQS+18*, FIXCONSREQS+55*, FIXCONSREQS+57* , FIXCONSREQS+59*, FIXCONSREQS+61*, FIXCONSREQS+63*, FIXCONSREQS+66*, FIXCONSREQS+68*, FIXCONSREQS+71*, FIXCONSREQS+73*, FIXCONSREQS+75*, FIXCONSREQS+77*, FIXCONSREQS+79* , FIXCONSREQS+81* |
| Name | Line Occurrences |
|---|---|
| $$BEFOREEVENT | FIXCONSREQS+41 |
| $$RESCHEDULED | FIXCONSREQS+26 |
| AFTEREVENT | FIXCONSREQS+49 |
| FIXCONSREQS+82 | |
| TASK | EN+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| APPTIEN | FIXCONSREQS+1~ |
| APPTLENGTH | FIXCONSREQS+2~, FIXCONSREQS+46*, FIXCONSREQS+48 |
| APPTSTARTTIME | FIXCONSREQS+1~, FIXCONSREQS+31*, FIXCONSREQS+41, FIXCONSREQS+43, FIXCONSREQS+48, FIXCONSREQS+49, FIXCONSREQS+51, FIXCONSREQS+57, AFTEREVENT~, AFTEREVENT+3 , AFTEREVENT+4, BEFOREEVENT~, BEFOREEVENT+2, BEFOREEVENT+3, BEFOREEVENT+4 |
| BEFOREDATA | FIXCONSREQS+2~, FIXCONSREQS+41*, FIXCONSREQS+49 |
| CANBYCLINORPAT | FIXCONSREQS+2~, FIXCONSREQS+34*, FIXCONSREQS+43 |
| CANDT | RESCHEDULED+1~, RESCHEDULED+10*, RESCHEDULED+14, RESCHEDULED+16 |
| CANDTTM | FIXCONSREQS+1~ |
| CHECKAPTIEN | RESCHEDULED+1~, RESCHEDULED+5*, RESCHEDULED+7, RESCHEDULED+10, RESCHEDULED+12, RESCHEDULED+14, RESCHEDULED+15, RESCHEDULED+16 |
| CHKPTR | RESCHEDULED+1~, RESCHEDULED+7*, RESCHEDULED+8 |
| CLINICIEN | FIXCONSREQS+2~, FIXCONSREQS+36*, FIXCONSREQS+41, FIXCONSREQS+48, FIXCONSREQS+49, AFTEREVENT~, AFTEREVENT+3, AFTEREVENT+4, BEFOREEVENT~, BEFOREEVENT+2 , BEFOREEVENT+3, BEFOREEVENT+4 |
| CNT | FIXCONSREQS+2~, FIXCONSREQS+4*, FIXCONSREQS+7*, FIXCONSREQS+8, FIXCONSREQS+9*, FIXCONSREQS+10, FIXCONSREQS+11*, FIXCONSREQS+12, FIXCONSREQS+13*, FIXCONSREQS+14 , FIXCONSREQS+15*, FIXCONSREQS+16, FIXCONSREQS+17*, FIXCONSREQS+18, FIXCONSREQS+54*, FIXCONSREQS+55, FIXCONSREQS+56*, FIXCONSREQS+57, FIXCONSREQS+58*, FIXCONSREQS+59 , FIXCONSREQS+60*, FIXCONSREQS+61, FIXCONSREQS+62*, FIXCONSREQS+63, FIXCONSREQS+65*, FIXCONSREQS+66, FIXCONSREQS+67*, FIXCONSREQS+68, FIXCONSREQS+70*, FIXCONSREQS+71 , FIXCONSREQS+72*, FIXCONSREQS+73, FIXCONSREQS+74*, FIXCONSREQS+75, FIXCONSREQS+76*, FIXCONSREQS+77, FIXCONSREQS+78*, FIXCONSREQS+79, FIXCONSREQS+80*, FIXCONSREQS+81 |
| CONSIEN | FIXCONSREQS+1~ |
| CPRSSTAT | FIXCONSREQS+1~ |
| DFN | FIXCONSREQS+1~, FIXCONSREQS+23*, FIXCONSREQS+26, FIXCONSREQS+41, FIXCONSREQS+45, FIXCONSREQS+49, FIXCONSREQS+51, FIXCONSREQS+53, RESCHEDULED~, RESCHEDULED+4 , RESCHEDULED+5, AFTEREVENT~, AFTEREVENT+3, AFTEREVENT+4, BEFOREEVENT~, BEFOREEVENT+2, BEFOREEVENT+3, BEFOREEVENT+4 |
| DIFROM | MAIL+3~ |
| DT | FIXCONSREQS+6 |
| DTLOOP | RESCHEDULED+1~, RESCHEDULED+4*, RESCHEDULED+5 |
| DUZ | MAIL+9, MAIL+12 |
| LASTNOSHOWCAN | RESCHEDULED+1~, RESCHEDULED+18*, RESCHEDULED+19 |
| MESS1 | MAIL+3~, MAIL+6*, MAIL+11 |
| NOSHOWCANAPTIEN | RESCHEDULED+1~, RESCHEDULED+17, RESCHEDULED+19* |
| NOSHOWDT | RESCHEDULED+1~, RESCHEDULED+12*, RESCHEDULED+15, RESCHEDULED+16 |
| NOTE | FIXCONSREQS+1~, FIXCONSREQS+32*, FIXCONSREQS+43 |
| ORDERIEN | FIXCONSREQS+3~, FIXCONSREQS+22*, FIXCONSREQS+23, FIXCONSREQS+24, FIXCONSREQS+33, FIXCONSREQS+61, FIXCONSREQS+63 |
| PATNM | FIXCONSREQS+2~, FIXCONSREQS+53* |
| POINTER | FIXCONSREQS+1~, FIXCONSREQS+24*, FIXCONSREQS+26 |
| PROVIEN | FIXCONSREQS+1~, FIXCONSREQS+38*, FIXCONSREQS+43 |
| REQUESTIEN | FIXCONSREQS+1~, FIXCONSREQS+33*, FIXCONSREQS+43, FIXCONSREQS+45 |
| RESCHED | FIXCONSREQS+26*, FIXCONSREQS+27, FIXCONSREQS+29, RESCHEDULED+1~, RESCHEDULED+3*, RESCHEDULED+16*, RESCHEDULED+17, RESCHEDULED+21 |
| RESOURCE | FIXCONSREQS+2~, FIXCONSREQS+35*, FIXCONSREQS+36, FIXCONSREQS+43 |
| RESPAPPTIEN | FIXCONSREQS+3~, FIXCONSREQS+29*, FIXCONSREQS+31, FIXCONSREQS+34, FIXCONSREQS+35, FIXCONSREQS+40, FIXCONSREQS+46, FIXCONSREQS+51, FIXCONSREQS+59, FIXCONSREQS+64 , FIXCONSREQS+66, FIXCONSREQS+68, FIXCONSREQS+69, FIXCONSREQS+71, FIXCONSREQS+73 |
| RETURN | FIXCONSREQS+2~, FIXCONSREQS+51 |
| SCHIEN | FIXCONSREQS+3~, FIXCONSREQS+21*, FIXCONSREQS+22 |
| SDATA | FIXCONSREQS+2~, FIXCONSREQS+41, FIXCONSREQS+49, AFTEREVENT~, AFTEREVENT+3*, AFTEREVENT+4, BEFOREEVENT~, BEFOREEVENT+3*, BEFOREEVENT+4 |
| SDCPHDL | AFTEREVENT+1~, AFTEREVENT+2*, AFTEREVENT+4, BEFOREEVENT+1~, BEFOREEVENT+3*, BEFOREEVENT+4 |
| SDDA | AFTEREVENT~, AFTEREVENT+3, AFTEREVENT+4, BEFOREEVENT+1~, BEFOREEVENT+2*, BEFOREEVENT+3, BEFOREEVENT+4, BEFOREEVENT+5 |
| SDLINE | FIXCONSREQS+2~, FIXCONSREQS+20*, FIXCONSREQS+75, FIXCONSREQS+79 |
| STANUM | MAIL+3~, MAIL+4*, MAIL+5*, MAIL+6 |
| TOTCNT | FIXCONSREQS+2~, FIXCONSREQS+4*, FIXCONSREQS+52*, FIXCONSREQS+81 |
| U | FIXCONSREQS+27, FIXCONSREQS+29, RESCHEDULED+17, RESCHEDULED+21, AFTEREVENT+3, BEFOREEVENT+3 |
| VARPTR | RESCHEDULED~, RESCHEDULED+8 |
| X | TASK+8~, TASK+10 |
| XMDUZ | MAIL+3~, MAIL+9*, MAIL+12* |
| XMSUB | MAIL+3~, MAIL+11* |
| XMTEXT | MAIL+3~, MAIL+10* |
| XMY | MAIL+3~ |
| XMY( | MAIL+12* |
| XMY("DUNNAM.D | AVID W@DOMAIN.EXT" , MAIL+13* |
| XMY("FISHER.BRADLEY@DOMAIN.EXT" | MAIL+15* |
| XMY("REESE,DA | RRYL M@DOMAIN.EXT" , MAIL+14* |
| ZTDESC | TASK+8~, TASK+9* |
| ZTDTH | TASK+8~, TASK+10* |
| ZTIO | TASK+8~, TASK+10* |
| ZTRTN | TASK+8~, TASK+10* |
| ZTSAVE | TASK+8~ |
| ZTSAVE("*" | TASK+10* |
| ZTSK | TASK+8~, TASK+11, TASK+12, TASK+14 |