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 |  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: SDESORDCLEAN

Package: Scheduling

Routine: SDESORDCLEAN


Information

SDESORDCLEAN ;ALB/LAB - Clean-up of Pending and partialdd RTC orders ;Dec 06,2022@08:00

Source Information

Source file <SDESORDCLEAN.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 3 ^DIC  FILE^DIE  $$GET1^DIQ  
Kernel 2 ^%ZIS  ^%ZISC  
Registration 1 DEM^VADPT  
Scheduling 1 EN^SDHL7BLD  

Entry Points

Name Comments DBIA/ICR reference
CLEANDATA ;
DEVICEPROMPT ;prompt for device
FIN ;Show final results
GETDISPOSITION(REQIEN,ORDSTAT,POP,DISPOSITION) ;
ORDPROMPT(ORDERIENS,POP) ;enter order number
CHECKORDERSTAT(ORDERIEN,STATUS,POP) ;is order status in range
GETREQUESTIEN(ORDERIEN,REQIEN,POP) ;get request IEN
MATCHORDTOREQ(ORDERIEN,REQIEN,POP,OBJOFORDER) ; Match order with request quit if they do not match
UPDATEREQ(REQIEN,ORDERIEN) ;update order field in request with order if missing
CLEANUPSTEPS(ORIEN,ORSTATUS,DISPOSITION,SDPATIENT,SDIEN,POP) ;
START ;Show introductory text
SDHL7BLD(SDIEN,ORIEN,SDDISPBY,SDPATIENT,PATNAME,ORDIS) ;

External References

Name Field # of Occurrence
^%ZIS DEVICEPROMPT+1
^%ZISC FIN+2
^DIC ORDPROMPT+5
FILE^DIE UPDATEREQ+3
$$GET1^DIQ GETDISPOSITION+1, GETDISPOSITION+5, CHECKORDERSTAT+2, GETREQUESTIEN+2, GETREQUESTIEN+3, GETREQUESTIEN+5, MATCHORDTOREQ+2, MATCHORDTOREQ+3, MATCHORDTOREQ+4, MATCHORDTOREQ+5
, MATCHORDTOREQ+6, MATCHORDTOREQ+7, CLEANUPSTEPS+2, CLEANUPSTEPS+6, SDHL7BLD+9, SDHL7BLD+13, SDHL7BLD+17
EN^SDHL7BLD SDHL7BLD+26
DEM^VADPT CLEANUPSTEPS+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Request for Order is still open, no status update"
  • Line Location: GETDISPOSITION+3
Function Call: WRITE
  • Prompt: !,"Current status for ORDER ",ORDERIEN," is ",STATUS,". No status change."
  • Line Location: CHECKORDERSTAT+4
Function Call: WRITE
  • Prompt: !,"Could not find request on ORDER. Please submit a YourIT ticket for the Scheduling Team."
  • Line Location: GETREQUESTIEN+6
Function Call: WRITE
  • Prompt: !,"Order did not match request. Please submit a YourIT ticket for the Scheduling Team."
  • Line Location: MATCHORDTOREQ+11
Function Call: WRITE
  • Prompt: !,"Disposition By field is missing from request. Status has not been udpated."
  • Line Location: CLEANUPSTEPS+4
Function Call: WRITE
  • Prompt: !,"Disposition Date field is missing from request. Status has not been updated."
  • Line Location: CLEANUPSTEPS+8
Function Call: WRITE
  • Prompt: !,"ORDER "_ORIEN_" was successfully updated."
  • Line Location: CLEANUPSTEPS+17
Function Call: WRITE
  • Prompt: !!,"This OPTION will verify if the entered ORDER is stuck in the incorrect status. "
  • Line Location: START+2
Function Call: WRITE
  • Prompt: " The status will be updated based on the Request status."
  • Line Location: START+3
Routine Call
  • %ZIS
  • Line Location:
    • DEVICEPROMPT+1
Routine Call
  • DIC
  • Line Location:
    • ORDPROMPT+5
Routine Call
  • DIE
  • Line Location:
    • UPDATEREQ+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^OR(100 - [#100] GET1^DIQ
^VA(200 - [#200] GET1^DIQ
^SDEC(409.85 - [#409.85] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SDEC(409.85 - [#409.85] SDHL7BLD+24

Label References

Name Line Occurrences
CHECKORDERSTAT CLEANDATA+10
CLEANUPSTEPS CLEANDATA+14
DEVICEPROMPT CLEANDATA+6
FIN CLEANDATA+15
GETDISPOSITION CLEANDATA+12
GETREQUESTIEN CLEANDATA+11
MATCHORDTOREQ CLEANDATA+13
ORDPROMPT CLEANDATA+5
SDHL7BLD CLEANUPSTEPS+15
START CLEANDATA+4
UPDATEREQ MATCHORDTOREQ+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CLINIC SDHL7BLD+5~
DFN CLEANUPSTEPS+1~, CLEANUPSTEPS+12*, CLEANUPSTEPS+15
DIC ORDPROMPT+1~, ORDPROMPT+5*
DIC("A" ORDPROMPT+4*
DIC(0 ORDPROMPT+5*
DISPOSITION CLEANDATA+1~, CLEANDATA+12, CLEANDATA+14, GETDISPOSITION~, GETDISPOSITION+5*, CLEANUPSTEPS~, CLEANUPSTEPS+11
DISPSOTION CLEANDATA+8~
ERROR CLEANDATA+1~
FDA UPDATEREQ+1~, UPDATEREQ+3!
FDA( UPDATEREQ+2*
FDAERR UPDATEREQ+1~
INPUTS SDHL7BLD+5~, SDHL7BLD+26
INPUTS("CLINIC" SDHL7BLD+9*
INPUTS("COMMENT" SDHL7BLD+11*
INPUTS("DISCONTINUE" SDHL7BLD+15*
INPUTS("DISPO SITION BY" , SDHL7BLD+13*
INPUTS("NUMBE R APPT" , SDHL7BLD+18*
INPUTS("ORDER IEN" , SDHL7BLD+20*
INPUTS("PATIENT" SDHL7BLD+22*
INPUTS("REQ F ILE IEN" , SDHL7BLD+7*
INPUTS("RTC D ATE" , SDHL7BLD+24*
IO DEVICEPROMPT+2
LEAVE ORDPROMPT+1~, ORDPROMPT+2*, ORDPROMPT+3, ORDPROMPT+6*, ORDPROMPT+8
NUMBAPPTS SDHL7BLD+1~, SDHL7BLD+17*, SDHL7BLD+18
OBJOFORDER MATCHORDTOREQ~, MATCHORDTOREQ+2*, MATCHORDTOREQ+4*, MATCHORDTOREQ+9
ORDERIEN CLEANDATA+1~, CLEANDATA+3*, CLEANDATA+7*, CLEANDATA+10, CLEANDATA+11, CLEANDATA+13, CLEANDATA+14, CHECKORDERSTAT~, CHECKORDERSTAT+2, CHECKORDERSTAT+4
, GETREQUESTIEN~, GETREQUESTIEN+2, MATCHORDTOREQ~, MATCHORDTOREQ+2, MATCHORDTOREQ+3, MATCHORDTOREQ+4, MATCHORDTOREQ+7, MATCHORDTOREQ+13, UPDATEREQ~, UPDATEREQ+2
ORDERIENS CLEANDATA+1~, CLEANDATA+5, ORDPROMPT~
ORDERIENS( CLEANDATA+7, ORDPROMPT+10*
ORDIS CLEANUPSTEPS+11*, CLEANUPSTEPS+15, SDHL7BLD~, SDHL7BLD+15
ORDSTAT CLEANDATA+8~, CLEANDATA+12, GETDISPOSITION~
ORIEN CLEANUPSTEPS~, CLEANUPSTEPS+15, CLEANUPSTEPS+17, SDHL7BLD~, SDHL7BLD+20
ORSTATUS CLEANUPSTEPS~
PARENTREQ GETREQUESTIEN+1~, GETREQUESTIEN+3*, GETREQUESTIEN+4
PATIENT CLEANDATA+1~, CLEANDATA+8~, CLEANDATA+13, CLEANDATA+14
PATNAME SDHL7BLD~, SDHL7BLD+22
POP CLEANDATA+1~, CLEANDATA+2*, CLEANDATA+5, CLEANDATA+9*, CLEANDATA+10, CLEANDATA+11, CLEANDATA+12, CLEANDATA+13, CLEANDATA+14, DEVICEPROMPT+1
, GETDISPOSITION~, GETDISPOSITION+2*, GETDISPOSITION+4, ORDPROMPT~, ORDPROMPT+3, ORDPROMPT+7*, ORDPROMPT+8, CHECKORDERSTAT~, CHECKORDERSTAT+1*, CHECKORDERSTAT+3*
, CHECKORDERSTAT+4, GETREQUESTIEN~, GETREQUESTIEN+7*, MATCHORDTOREQ~, MATCHORDTOREQ+10*, MATCHORDTOREQ+12, CLEANUPSTEPS~, CLEANUPSTEPS+5*, CLEANUPSTEPS+9*, CLEANUPSTEPS+10
REQIEN CLEANDATA+1~, CLEANDATA+8~, CLEANDATA+11, CLEANDATA+12, CLEANDATA+13, CLEANDATA+14, GETDISPOSITION~, GETDISPOSITION+1, GETDISPOSITION+5, GETREQUESTIEN~
, GETREQUESTIEN+2*, GETREQUESTIEN+3, GETREQUESTIEN+4*, GETREQUESTIEN+5, MATCHORDTOREQ~, MATCHORDTOREQ+3, MATCHORDTOREQ+5, MATCHORDTOREQ+6, MATCHORDTOREQ+13, UPDATEREQ~
, UPDATEREQ+2, CLEANUPSTEPS+2, CLEANUPSTEPS+6
REQORDER MATCHORDTOREQ+1~
REQORIGUSR MATCHORDTOREQ+1~, MATCHORDTOREQ+6*, MATCHORDTOREQ+9
REQPATIENT MATCHORDTOREQ+1~, MATCHORDTOREQ+5*, MATCHORDTOREQ+9
SDDISPBY CLEANUPSTEPS+1~, CLEANUPSTEPS+2*, CLEANUPSTEPS+3, CLEANUPSTEPS+15, SDHL7BLD~, SDHL7BLD+13
SDDISPDT CLEANUPSTEPS+1~, CLEANUPSTEPS+6*, CLEANUPSTEPS+7
SDIEN CLEANUPSTEPS~, CLEANUPSTEPS+15, SDHL7BLD~, SDHL7BLD+7, SDHL7BLD+9, SDHL7BLD+17, SDHL7BLD+24
SDPATIENT CLEANUPSTEPS~, CLEANUPSTEPS+12, SDHL7BLD~, SDHL7BLD+22
STATUS CLEANDATA+1~, CLEANDATA+8~, CLEANDATA+10, CLEANDATA+14, CHECKORDERSTAT~, CHECKORDERSTAT+2*, CHECKORDERSTAT+3, CHECKORDERSTAT+4
U SDHL7BLD+9, SDHL7BLD+13, SDHL7BLD+22, SDHL7BLD+24
VADM CLEANUPSTEPS+12!
VADM(1 CLEANUPSTEPS+15
WHOORDERED MATCHORDTOREQ+1~, MATCHORDTOREQ+7*, MATCHORDTOREQ+9
X ORDPROMPT+1~, ORDPROMPT+6, ORDPROMPT+7, ORDPROMPT+9*, ORDPROMPT+10
Y ORDPROMPT+1~
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All