SDES842P ;ALB/MGD,LAB - SD*5.3*842 Post Init Routine ; Mar 10, 2023
Source file <SDES842P.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FIND | ;FIND THE IEN FOR "VS GUI NATIONAL"
|
|
| VERSION | ;SET THE NEW VERSION UPDATE IN SDEC SETTING FILE #409.98 TO 1.7.40
|
|
| NOFIND | ;"VS GUI NATIONAL" NOT FOUND
|
|
| TASK | ;
|
|
| TASK2 | ;
|
|
| DISP | ; Disposition old Appointment Requests
|
|
| ;
; Get Station Number |
||
| MAIL2 | ;
; Appointment vs request data report |
|
| DATAREPORT | ;
|
|
| APPT(APPTREQINFO,APPTIEN,APPTDFN,APPTREQTYP) | ;
|
|
| CONSULT(APPTREQINFO,APPTIEN,APPTDFN,APPTREQTYP) | ;
|
|
| REPORT(REQIEN,APPTREQTYP,APPTPATDFN,PATIENTNAME,REQPATDFN,APPTIEN,REQPATIENT) | ;
|
| Name | Field # of Occurrence |
|---|---|
| NOW^%DTC | TASK+10, TASK2+3 |
| ^%ZTLOAD | TASK+10, TASK2+3 |
| $$FIND1^DIC | DISP+3, DISP+15 |
| ^DIE | VERSION+1, VERSION+4 |
| FILE^DIE | DISP+43 |
| $$GET1^DIQ | DISP+9, DISP+30, DISP+40, DISP+41, MAIL+5, MAIL2+5, DATAREPORT+11, DATAREPORT+12, DATAREPORT+16, DATAREPORT+17 , DATAREPORT+18, APPT+2, APPT+4, APPT+5, CONSULT+3, CONSULT+5, CONSULT+7, REPORT+7, REPORT+9 |
| $$LAST4SSN^SDESINPUTVALUTL | REPORT+11, REPORT+13 |
| $$FMADD^XLFDT | DATAREPORT+2 |
| ^XMD | MAIL+13, MAIL2+16 |
| MES^XPDUTL | FIND+2, FIND+3, NOFIND+1, 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, MAIL2+4 |
| FileNo | Call Tags |
|---|---|
| ^GMR(123 - [#123] | GET1^DIQ |
| ^DIC(4 - [#4] | GET1^DIQ |
| ^SD(409.2 - [#409.2] | GET1^DIQ |
| ^SDEC(409.84 - [#409.84] | GET1^DIQ |
| ^SDEC(409.85 - [#409.85] | GET1^DIQ |
| ^SDEC(409.853 - [#409.853] | FIND1^DIC |
| ^XPD(9.7 - [#9.7] | FIND1^DIC, GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SDEC(409.84 - [#409.84] | DISP+22, DISP+24, DISP+25, DISP+33, DATAREPORT+7, DATAREPORT+10 |
| ^SDEC(409.85 - [#409.85] | DISP+38 |
| ^SDEC(409.98 - [#409.98] | FIND+4, VERSION+3 |
| ^XTMP("SDES842P" | DATAREPORT+3*, DATAREPORT+21*, REPORT+3*, REPORT+5*, REPORT+7*, REPORT+9*, REPORT+11*, REPORT+13*, REPORT+15* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| APPTDFN | DATAREPORT+16*, DATAREPORT+19, DATAREPORT+20, APPT~, APPT+3, APPT+6, CONSULT~, CONSULT+4, CONSULT+8, REPORT+11 |
| APPTIEN | DISP+1~, DISP+23*, DISP+24*, DISP+25, DISP+33, DISP+40, DISP+41, DATAREPORT+1~, DATAREPORT+8*, DATAREPORT+10* , DATAREPORT+11, DATAREPORT+12, DATAREPORT+16, DATAREPORT+17, DATAREPORT+18, DATAREPORT+19, DATAREPORT+20, APPT~, APPT+5, APPT+6 , CONSULT~, CONSULT+7, CONSULT+8, REPORT~, REPORT+5, REPORT+7, REPORT+9 |
| APPTPATDFN | REPORT~, REPORT+11 |
| APPTREQINFO | DATAREPORT+18*, DATAREPORT+19, DATAREPORT+20, APPT~, APPT+1, CONSULT~, CONSULT+2 |
| APPTREQTYP | DATAREPORT+17*, DATAREPORT+19, DATAREPORT+20, APPT~, APPT+6, CONSULT~, CONSULT+8, REPORT~, REPORT+3 |
| ARIEN | DISP+1~, DISP+35*, DISP+36, DISP+38, DISP+40, DISP+41, DISP+42 |
| CANCELDTTM | DATAREPORT+1~, DATAREPORT+12*, DATAREPORT+13 |
| CANCREAS | DISP+1~, DISP+27*, DISP+28, DISP+30 |
| CHECKIN | DATAREPORT+1~, DATAREPORT+11*, DATAREPORT+13 |
| CNT | DATAREPORT+1~, DATAREPORT+4*, DATAREPORT+21, REPORT+1* |
| CONSULTIEN | CONSULT+1~, CONSULT+2*, CONSULT+3, CONSULT+5, CONSULT+8 |
| CONSULTPATDFN | CONSULT+1~, CONSULT+3*, CONSULT+4, CONSULT+8 |
| CONSULTPATIENT | CONSULT+1~, CONSULT+5*, CONSULT+8 |
| DA | VERSION+1*, VERSION+2!, VERSION+4*, VERSION+5! |
| DATA0 | DISP+1~, DISP+25*, DISP+27 |
| DATA2 | DISP+1~, DISP+33*, DISP+34, DISP+35 |
| DIE | VERSION+1*, VERSION+2!, VERSION+4*, VERSION+5! |
| DIFROM | MAIL+3~, MAIL2+3~ |
| DISP | DISP+1~ |
| DISPIEN | DISP+1~, DISP+15*, DISP+16, DISP+42 |
| DR | VERSION+1*, VERSION+2!, VERSION+4*, VERSION+5! |
| DT | VERSION+1, VERSION+4, DATAREPORT+2, DATAREPORT+3 |
| DUZ | MAIL+9, MAIL+12, MAIL2+9, MAIL2+12 |
| ERR84 | DISP+44, DISP+45! |
| FDA | DISP+1~, DISP+45! |
| FDA( | DISP+40*, DISP+41*, DISP+42* |
| IEN627 | DISP+1~, DISP+3*, DISP+4, DISP+9 |
| MESS1 | MAIL+3~, MAIL+6*, MAIL+11, MAIL2+3~, MAIL2+6*, MAIL2+11 |
| PATIENTNAME | APPT+5*, APPT+6, CONSULT+7*, CONSULT+8, REPORT~ |
| POP | DATAREPORT+1~, DATAREPORT+9*, DATAREPORT+10, DATAREPORT+13*, DATAREPORT+14 |
| PURGEDT | DATAREPORT+1~, DATAREPORT+2*, DATAREPORT+3 |
| REOPEN | DISP+1~, DISP+30*, DISP+31 |
| REQIEN | APPT+1*, APPT+2, APPT+4, APPT+6, REPORT~, REPORT+3 |
| REQPATDFN | APPT+2*, APPT+3, APPT+6, REPORT~, REPORT+13 |
| REQPATIENT | APPT+4*, APPT+6, REPORT~ |
| SDECDA | FIND+1~, FIND+4*, VERSION+1 |
| SDECDA1 | FIND+1~, VERSION+3*, VERSION+4 |
| STANUM | MAIL+3~, MAIL+4*, MAIL+5*, MAIL+6, MAIL2+3~, MAIL2+4*, MAIL2+5*, MAIL2+6 |
| STARTTIME | DISP+1~, DISP+9*, DISP+10, DISP+21*, DISP+22*, DISP+24 |
| STARTTM | DATAREPORT+1~, DATAREPORT+6*, DATAREPORT+7*, DATAREPORT+10 |
| TCNT | DISP+1~, DISP+2*, DISP+44*, DISP+48 |
| TEXT | MAIL+14!, MAIL2+17! |
| TEXT(1 | DISP+5*, DISP+11*, DISP+17*, DISP+46* |
| TEXT(2 | DISP+6*, DISP+12*, DISP+18*, DISP+47* |
| TEXT(3 | DISP+7*, DISP+13*, DISP+19*, DISP+48* |
| TEXTCNT | DATAREPORT+1~, DATAREPORT+5*, DATAREPORT+21, REPORT+2*, REPORT+3, REPORT+4*, REPORT+5, REPORT+6*, REPORT+7, REPORT+8* , REPORT+9, REPORT+10*, REPORT+11, REPORT+12*, REPORT+13, REPORT+14*, REPORT+15 |
| U | DISP+27, DISP+38 |
| X | TASK+8~, TASK+10, TASK2+1~, TASK2+3 |
| XMDUZ | MAIL+3~, MAIL+9*, MAIL+12*, MAIL2+3~, MAIL2+9*, MAIL2+12* |
| XMSUB | MAIL+3~, MAIL+11*, MAIL2+3~, MAIL2+11* |
| XMTEXT | MAIL+3~, MAIL+10*, MAIL2+3~, MAIL2+10* |
| XMY | MAIL+3~, MAIL2+3~ |
| XMY( | MAIL+12*, MAIL2+12* |
| XMY("BARBER.LORI@DOMAIN.EXT" | MAIL2+13* |
| XMY("DILL.MATT@DOMAIN.EXT" | MAIL2+14* |
| XMY("REESE,DA | RRYL M@DOMAIN.EXT" , MAIL2+15* |
| ZTDESC | TASK+8~, TASK+9*, TASK2+1~, TASK2+2* |
| ZTDTH | TASK+8~, TASK+10*, TASK2+1~, TASK2+3* |
| ZTIO | TASK+8~, TASK+10*, TASK2+1~, TASK2+3* |
| ZTRTN | TASK+8~, TASK+10*, TASK2+1~, TASK2+3* |
| ZTSAVE | TASK+8~, TASK2+1~ |
| ZTSAVE("*" | TASK+10*, TASK2+3* |
| ZTSK | TASK+8~, TASK+11, TASK+12, TASK+14, TASK2+1~ |