Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: SDECRRCLEANUP

Package: Scheduling

Routine: SDECRRCLEANUP


Information

SDECRRCLEANUP ;ALB/BLB/DMR SDEC RECALL REMINDERS CLEANUP ;June 9, 2021@11:35

Source Information

Source file <SDECRRCLEANUP.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 4 ^%ZIS  ^%ZISC  ^%ZTLOAD  $$NOW^XLFDT  
VA FileMan 3 ^%DT  C^%DTC  $$GET1^DIQ  
Scheduling 1 $$FMTONET^SDECDATE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Scheduling 1 SDEC RECALL REMINDERS CLEANUP  

Entry Points

Name Comments DBIA/ICR reference
PRINT ;
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 ;

External References

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Beginning date cannot be less than "_DDATETXT
  • Line Location: SDECRRCLEANUP+8
Function Call: WRITE
  • Prompt: !
  • Line Location: SDECRRCLEANUP+9
Function Call: WRITE
  • Prompt: !
  • Line Location: SDECRRCLEANUP+17
Function Call: WRITE
  • Prompt: !
  • Line Location: SDECRRCLEANUP+23
Function Call: WRITE
  • Prompt: !,"Recall Removed IEN ^ Patient Name^ Provider ^ Recall Date ^ Recall Clinic ^ Recall Type ^ Recall Appointment Date ^ Clinic ^ Comment"
  • Line Location: WRITE+2
Function Call: WRITE
  • Prompt: !,"Counter: "_CCC
  • Line Location: WRITE+7
Function Call: WRITE
  • Prompt: "THIS CAN TAKE A LONG TIME, PLEASE WAIT...",!
  • Line Location: RRRDATELOOP+4
Routine Call
  • %ZIS
  • Line Location:
    • PRINT+1

FileMan Files Accessed Via FileMan Db 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

Global Variables Directly Accessed

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*

Label References

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

Local Variables

Legend:

>> 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*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All