SDECRRCLEANUP ;ALB/BLB/DMR SDEC RECALL REMINDERS CLEANUP ;June 9, 2021@11:35
Source file <SDECRRCLEANUP.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Scheduling | 1 | SDEC RECALL REMINDERS CLEANUP |
Name | Comments | DBIA/ICR reference |
---|---|---|
;
|
||
GETDEFAULTDT(DEFAULTDATE) | ;
|
|
WRITE | ;
|
|
END | ;
|
|
RRRDATELOOP | ;
|
|
HASDELREASON(RRREMOVEDIEN) | ; CHECK RECALL REMINDER REMOVED DELETED REASON IS 6 (OTHER) OR 7 (SCHEDULED)
|
|
GETRRRFIELDS(RRREMOVEDIEN) | ; GET 403.56 (RECALL REMINDER REMOVED) FIELDS NEEDED
|
|
HASOPENAR(DFN) | ;
|
|
HASOPENRECALL(DFN) | ;
|
|
HASOPENCOMPAPT(DFN) | ;
|
|
GETSTARTDATE(DFN) | ;
|
|
ISCANCELLED(DFN) | ;
|
|
ISDATEINRANGE(DFN) | ;
|
|
ISSAMESTOPCODE(DFN) | ;
|
|
ISSAMECLINIC(DFN) | ;
|
|
ALREADYSAVED(DFN) | ;
|
|
SAVETOTMP | ||
FINDMISMATCH | ;
|
Name | Field # of Occurrence |
---|---|
^%DT | SDECRRCLEANUP+11, SDECRRCLEANUP+20 |
C^%DTC | GETSTARTDATE+2 |
^%ZIS | PRINT+1 |
^%ZISC | END+1 |
^%ZTLOAD | PRINT+2 |
$$GET1^DIQ | RRRDATELOOP+11, RRRDATELOOP+12, RRRDATELOOP+13, RRRDATELOOP+14, RRRDATELOOP+15, HASDELREASON+2, GETRRRFIELDS+1, GETRRRFIELDS+2, GETRRRFIELDS+3, GETRRRFIELDS+4 , HASOPENAR+4, HASOPENAR+5, HASOPENAR+7, HASOPENAR+8, HASOPENAR+12, HASOPENAR+13, HASOPENRECALL+4, HASOPENRECALL+6, HASOPENRECALL+7, ISCANCELLED+2 , ISDATEINRANGE+3, ISSAMESTOPCODE+3, ISSAMESTOPCODE+4, ISSAMESTOPCODE+5, ISSAMESTOPCODE+6, ISSAMECLINIC+3, ISSAMECLINIC+4, SAVETOTMP+2, SAVETOTMP+3, SAVETOTMP+4 , SAVETOTMP+5, SAVETOTMP+6, SAVETOTMP+7, SAVETOTMP+8, SAVETOTMP+9, FINDMISMATCH+7, FINDMISMATCH+11, FINDMISMATCH+12 |
$$FMTONET^SDECDATE | SDECRRCLEANUP+7 |
$$NOW^XLFDT | RRRDATELOOP+6 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
^DIC(40.7 - [#40.7] | GET1^DIQ |
^SD(403.5 - [#403.5] | GET1^DIQ |
^SD(403.56 - [#403.56] | GET1^DIQ |
^SDEC(409.831 - [#409.831] | GET1^DIQ |
^SDEC(409.84 - [#409.84] | GET1^DIQ |
^SDEC(409.85 - [#409.85] | GET1^DIQ |
^SC - [#44] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^SC - [#44] | FINDMISMATCH+15, FINDMISMATCH+16 |
^SD(403.5 - [#403.5] | HASOPENRECALL+3 |
^SD(403.56 - [#403.56] | RRRDATELOOP+7, RRRDATELOOP+9 |
^SDEC(409.84 - [#409.84] | HASOPENCOMPAPT+4, FINDMISMATCH+6, FINDMISMATCH+8 |
^SDEC(409.85 - [#409.85] | GETDEFAULTDT+2, GETDEFAULTDT+3, HASOPENAR+3 |
^TMP("CLEANUP" | WRITE+3, WRITE+4, WRITE+5, END+2!, ALREADYSAVED+2, SAVETOTMP+9* |
^TMP("MISMATCH" | FINDMISMATCH+1!, FINDMISMATCH+21* |
Name | Line Occurrences |
---|---|
$$ALREADYSAVED | RRRDATELOOP+19 |
$$GETDEFAULTDT | SDECRRCLEANUP+6 |
$$GETSTARTDATE | HASOPENCOMPAPT+2 |
$$HASDELREASON | RRRDATELOOP+10 |
$$HASOPENAR | RRRDATELOOP+16 |
$$HASOPENCOMPAPT | RRRDATELOOP+18 |
$$HASOPENRECALL | RRRDATELOOP+17 |
$$ISCANCELLED | HASOPENCOMPAPT+5 |
$$ISDATEINRANGE | HASOPENCOMPAPT+6 |
$$ISSAMECLINIC | HASOPENCOMPAPT+7 |
$$ISSAMESTOPCODE | HASOPENCOMPAPT+7 |
END | PRINT+1, PRINT+2, PRINT+6, WRITE+8 |
RRRDATELOOP | PRINT+5 |
SAVETOTMP | RRRDATELOOP+20 |
WRITE | RRRDATELOOP+21 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | SDECRRCLEANUP+3~, SDECRRCLEANUP+4*, SDECRRCLEANUP+18* |
%DT("A" | SDECRRCLEANUP+10*, SDECRRCLEANUP+19* |
%ZIS | SDECRRCLEANUP+3~, PRINT+1* |
APPTCLINIC | END+3!, RRRDATELOOP+13*, ISSAMECLINIC+5, SAVETOTMP+8*, SAVETOTMP+9 |
APPTCLINICIEN | ISSAMESTOPCODE+1~, ISSAMESTOPCODE+4*, ISSAMESTOPCODE+5, ISSAMECLINIC+1~, ISSAMECLINIC+4*, ISSAMECLINIC+5 |
APPTDATE | RRRDATELOOP+2~, ISDATEINRANGE+1~, ISDATEINRANGE+3*, ISDATEINRANGE+4 |
APPTDATETIME | FINDMISMATCH+2~, FINDMISMATCH+13*, FINDMISMATCH+14, FINDMISMATCH+19, FINDMISMATCH+21 |
APPTDT44 | FINDMISMATCH+2~, FINDMISMATCH+14*, FINDMISMATCH+15, FINDMISMATCH+16, FINDMISMATCH+19 |
APPTRESOURCE | ISSAMESTOPCODE+1~, ISSAMESTOPCODE+3*, ISSAMESTOPCODE+4, ISSAMECLINIC+1~, ISSAMECLINIC+3*, ISSAMECLINIC+4 |
APPTSTOPCODE | ISSAMESTOPCODE+1~, ISSAMESTOPCODE+6*, ISSAMESTOPCODE+7 |
APPTSTOPCODEN | ISSAMESTOPCODE+1~, ISSAMESTOPCODE+5*, ISSAMESTOPCODE+6 |
ARCLINIC | RRRDATELOOP+1~ |
ARCLINICIEN | HASOPENAR+1~, HASOPENAR+5*, HASOPENAR+6, HASOPENAR+7, HASOPENAR+9, HASOPENAR+11 |
ARIEN | END+3!, HASOPENAR+2*, HASOPENAR+3*, HASOPENAR+4, HASOPENAR+5, HASOPENAR+12 |
ARRESOURCE | RRRDATELOOP+1~, HASOPENAR+1~ |
ARSTOPCODE | RRRDATELOOP+2~, HASOPENAR+1~, HASOPENAR+8*, HASOPENAR+9, HASOPENAR+13*, HASOPENAR+14 |
ARSTOPCODENUM | RRRDATELOOP+1~, HASOPENAR+1~, HASOPENAR+7*, HASOPENAR+8, HASOPENAR+12*, HASOPENAR+13 |
BDATE | SDECRRCLEANUP+3~, SDECRRCLEANUP+13*, SDECRRCLEANUP+14, SDECRRCLEANUP+16*, RRRDATELOOP+7*, RRRDATELOOP+9, GETSTARTDATE+2 |
CANCELLED | END+3!, ISCANCELLED+1*, ISCANCELLED+3*, ISCANCELLED+4 |
CC | WRITE+1~, WRITE+4*, WRITE+5, FINDMISMATCH+4*, FINDMISMATCH+15*, FINDMISMATCH+16 |
CCC | WRITE+1~*, WRITE+6*, WRITE+7, FINDMISMATCH+5*, FINDMISMATCH+21, FINDMISMATCH+22* |
CLINIC | SAVETOTMP+1~ |
CLINIC1 | FINDMISMATCH+2~, FINDMISMATCH+10*, FINDMISMATCH+11*, FINDMISMATCH+15, FINDMISMATCH+16, FINDMISMATCH+21 |
COMMENT | SAVETOTMP+1~, SAVETOTMP+7*, SAVETOTMP+9 |
COUNTER | END+3!, RRRDATELOOP+5*, SAVETOTMP+9, SAVETOTMP+10* |
DAYSETTING | RRRDATELOOP+2~, GETSTARTDATE+1*, GETSTARTDATE+2 |
DDATETXT | SDECRRCLEANUP+5*, SDECRRCLEANUP+7*, SDECRRCLEANUP+8, SDECRRCLEANUP+15, END+3! |
DEFAULTBDATE | GETDEFAULTDT+1*, GETDEFAULTDT+2, GETDEFAULTDT+3*, GETDEFAULTDT+4, END+3! |
DEFAULTDATE | SDECRRCLEANUP+5*, SDECRRCLEANUP+6*, SDECRRCLEANUP+7, SDECRRCLEANUP+14, SDECRRCLEANUP+16, GETDEFAULTDT~ |
DELREAS | RRRDATELOOP+1~, HASDELREASON+1*, HASDELREASON+2*, HASDELREASON+3, HASDELREASON+4*, HASDELREASON+5 |
DFN | RRRDATELOOP+1~, RRRDATELOOP+11*, RRRDATELOOP+16, RRRDATELOOP+17, RRRDATELOOP+18, RRRDATELOOP+19, GETRRRFIELDS+1*, HASOPENAR~, HASOPENAR+3, HASOPENRECALL~ , HASOPENRECALL+3, HASOPENCOMPAPT~, HASOPENCOMPAPT+2, HASOPENCOMPAPT+4, HASOPENCOMPAPT+5, HASOPENCOMPAPT+6, HASOPENCOMPAPT+7, GETSTARTDATE~, ISCANCELLED~, ISDATEINRANGE~ , ISSAMESTOPCODE~, ISSAMECLINIC~, ALREADYSAVED~, SAVETOTMP+9, FINDMISMATCH+2~, FINDMISMATCH+12*, FINDMISMATCH+18 |
EDATE | SDECRRCLEANUP+3~, SDECRRCLEANUP+22*, RRRDATELOOP+6*, RRRDATELOOP+7 |
FIRSTARIEN | GETDEFAULTDT+1*, GETDEFAULTDT+2*, GETDEFAULTDT+3, END+3!, RRRDATELOOP+3* |
IEN40984 | END+3!, FINDMISMATCH+4*, FINDMISMATCH+6*, FINDMISMATCH+7, FINDMISMATCH+8, FINDMISMATCH+12, FINDMISMATCH+21 |
IEN44PATIENT | FINDMISMATCH+2~, FINDMISMATCH+17*, FINDMISMATCH+18, FINDMISMATCH+21 |
IO | PRINT+4 |
IO("Q" | PRINT+2, PRINT+4 |
OPENAR | END+4!, HASOPENAR+2*, HASOPENAR+3, HASOPENAR+10*, HASOPENAR+15*, HASOPENAR+16 |
OPENCOMPAPPT | END+4!, HASOPENCOMPAPT+3*, HASOPENCOMPAPT+8*, HASOPENCOMPAPT+9 |
OPENRECALL | END+5!, HASOPENRECALL+2*, HASOPENRECALL+3, HASOPENRECALL+5*, HASOPENRECALL+8*, HASOPENRECALL+9 |
POP | PRINT+1, END+4! |
PROVIDER | SAVETOTMP+1~, SAVETOTMP+2*, SAVETOTMP+9 |
REC | WRITE+1~, WRITE+3*, WRITE+4, WRITE+5 |
REC40984 | FINDMISMATCH+2~, FINDMISMATCH+8*, FINDMISMATCH+9, FINDMISMATCH+13 |
REC44APPT0 | FINDMISMATCH+2~, FINDMISMATCH+16*, FINDMISMATCH+17, FINDMISMATCH+20 |
RECALLAPPTDT | SAVETOTMP+1~, SAVETOTMP+6*, SAVETOTMP+9 |
RECALLCLINIC | SAVETOTMP+1~, SAVETOTMP+3*, SAVETOTMP+9 |
RECALLDATE | SAVETOTMP+1~, SAVETOTMP+4*, SAVETOTMP+9 |
RESOURCE | FINDMISMATCH+2~, FINDMISMATCH+9*, FINDMISMATCH+11 |
RRCLINIC | RRRDATELOOP+2~, HASOPENRECALL+1~, HASOPENRECALL+4*, HASOPENRECALL+5, HASOPENRECALL+6 |
RRIEN | END+4!, HASOPENRECALL+2*, HASOPENRECALL+3*, HASOPENRECALL+4 |
RRRCLINIC | RRRDATELOOP+1~, RRRDATELOOP+12*, RRRDATELOOP+14, GETRRRFIELDS+2*, GETRRRFIELDS+3, HASOPENAR+9, HASOPENRECALL+5, ISSAMECLINIC+5 |
RRREMOVEDIEN | RRRDATELOOP+8*, RRRDATELOOP+9*, RRRDATELOOP+10, RRRDATELOOP+11, RRRDATELOOP+12, RRRDATELOOP+13, HASDELREASON~, HASDELREASON+2, GETRRRFIELDS~, GETRRRFIELDS+1 , GETRRRFIELDS+2, ALREADYSAVED+2, SAVETOTMP+2, SAVETOTMP+3, SAVETOTMP+4, SAVETOTMP+5, SAVETOTMP+6, SAVETOTMP+7, SAVETOTMP+8, SAVETOTMP+9 |
RRRSTOPCODE | RRRDATELOOP+1~, RRRDATELOOP+15*, GETRRRFIELDS+4*, HASOPENAR+9, HASOPENAR+14, HASOPENRECALL+8, ISSAMESTOPCODE+7 |
RRRSTOPCODEN | END+4!, RRRDATELOOP+14*, RRRDATELOOP+15, GETRRRFIELDS+3*, GETRRRFIELDS+4 |
RRSTOPCODE | RRRDATELOOP+2~, HASOPENRECALL+1~, HASOPENRECALL+7*, HASOPENRECALL+8 |
RRSTOPCODENUM | RRRDATELOOP+2~, HASOPENRECALL+1~, HASOPENRECALL+6*, HASOPENRECALL+7 |
SAMECLINIC | END+4!, ISSAMECLINIC+2*, ISSAMECLINIC+5*, ISSAMECLINIC+6 |
SAMESTOPCODE | END+4!, ISSAMESTOPCODE+2*, ISSAMESTOPCODE+7*, ISSAMESTOPCODE+8 |
SAVED | END+4!, ALREADYSAVED+1*, ALREADYSAVED+2*, ALREADYSAVED+3 |
SDECAPPTIEN | END+4!, HASOPENCOMPAPT+3*, HASOPENCOMPAPT+4*, ISCANCELLED+2, ISDATEINRANGE+3, ISSAMESTOPCODE+3, ISSAMECLINIC+3 |
STARTDATE | HASOPENCOMPAPT+1~, HASOPENCOMPAPT+2*, GETSTARTDATE+3*, GETSTARTDATE+4*, GETSTARTDATE+5, ISDATEINRANGE+4, FINDMISMATCH+3* |
STATUS | END+5!, ISCANCELLED+2*, ISCANCELLED+3 |
TYPE | SAVETOTMP+1~, SAVETOTMP+5*, SAVETOTMP+9 |
U | SDECRRCLEANUP+12, SDECRRCLEANUP+21, SDECRRCLEANUP+24 |
WITHINRANGE | END+5!, ISDATEINRANGE+2*, ISDATEINRANGE+4*, ISDATEINRANGE+5 |
X | GETSTARTDATE+3! |
X1 | END+5!, GETSTARTDATE+2* |
X2 | END+5!, GETSTARTDATE+2* |
Y | SDECRRCLEANUP+3~, SDECRRCLEANUP+12, SDECRRCLEANUP+13, SDECRRCLEANUP+21, SDECRRCLEANUP+22, SDECRRCLEANUP+24 |
ZTRTN | PRINT+2*! |
ZTSAVE | PRINT+2! |
ZTSAVE("*" | PRINT+2* |