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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: SDCCRGAP

Package: Scheduling

Routine: SDCCRGAP


Information

SDCCRGAP ;CCRA/LB,PB - Appointment retrieval API;APR 4, 2019

Source Information

Source file <SDCCRGAP.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Scheduling 2 $$STATUS^SDAM1  $$FIND^SDAM2  
VA FileMan 1 $$GET1^DIQ  

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 SDCCRCOR  

Entry Points

Name Comments DBIA/ICR reference
GETAPPT(PATIEN,APPTDT,APPTARY) ;Gets the appointment details form the database and returns it in an array.
; See parameter descriptions for details of the available nodes.
; PATIEN(I,REQ) - The patient IEN
; APPTDT(I,REQ) - the appointment date/time in vista format.
; Found in the ^DPT(<IEN>,"S",<APPTDT> node.
; APPTARY(O,REQ) - Array of appointment data.
APPTNODE(PATIEN,APPTDT,NODE) ;For a given patient we will return their appointment node in the ^DPT file.
; PATIEN(I,REQ) - The patient IEN
; APPTDT(I,REQ) - the appointment date/time in vista format. Found in the ^DPT(<IEN>,"S",<APPTDT> node.
; NODE(I,REQ) - node number to pull
APTNODEP(PATIEN,APPTDT,NODE,PIECE) ;For a given patient we will return a piece of their appointment node in the ^DPT file.
; PATIEN(I,REQ) - The patient IEN
; APPTDT(I,REQ) - the appointment date/time in vista format. Found in the ^DPT(<IEN>,"S",<APPTDT> node.
; NODE(I,REQ) - node number to pull
; PIECE(I,REQ) - piece in the node to return
; DATA(I,OPT) - data node may be passed in to bypass extracting.
CLINNODE(PATIEN,APPTDT,CLINICIEN,NODE,COUNT) ;For a given patient we will find their clinic node in the ^SC file.
; May need to loop through the overbooks on that time.
; PATIEN(I,REQ) - The patient IEN
; APPTDT(I,REQ) - the appointment date/time in vista format. Found in the ^DPT(<IEN>,"S",<APPTDT> node.
; CLINICIEN(I,REQ) - clinic record IEN to search through
; NODE(I,REQ) - last node for the clinic. 0 node has appointment info. "C" node has check in/out info.
; COUNT(O,OPT) - subscript # of appointment
CLINPROV(CLINIC,ARRAY) ;Sets an array filled with clinic provider data
; CLINIC (I,REQ) - The Clinic IEN (first piece of DPT 0 node)
; ARRAY (O,REQ) - APPTARY("CLINIC PROVIDER",0) - number of providers on the clinic
; APPTARY("CLINIC PROVIDER",N,"IEN") - Provider IEN
; APPTARY("CLINIC PROVIDER",N,"NAME") - Name of provider
PROVIEN(CLINIC,NODE) ;Returns the Nth provider ID for a Clinic
; CLINIC (I,REQ) - The Clinic IEN (first piece of DPT 0 node)
; NODE (I,REQ) - The count of the node being examined
CLINGRP(CLINIC) ;Returns the ID of a Clinic's group
; CLINIC (I,REQ) - The Clinic IEN (first piece of DPT 0 node)
APTSTAT(PATIEN,APPTDT,FULLSTAT) ;Returns current computed appointment status which
; includes checked in/out which the "S"0;2 node does not.
; PATIEN (I,REQ)- Patient ID as in DPT(PATIEN,"S",APPTDAT
; APPTDT (I,REQ) - Appointment date
; FULLSTAT (I,OPT,DEFAULT:"") - Set to 1 return full STATUS string
; OUTPUT: Appointment current Status values:
; SCHEDULED (Default)
; CHECKED IN
; CHECKED OUT
; CANCELLED
; NO-SHOW
; "" if the appointment does not exist.\

External References

Name Field # of Occurrence
$$GET1^DIQ GETAPPT+62, GETAPPT+64, CLINPROV+13
$$STATUS^SDAM1 APTSTAT+25
$$FIND^SDAM2 CLINNODE+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^SD(409.67 - [#409.67] GET1^DIQ
^SC - [#44] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] APPTNODE+6
^SC - [#44] CLINNODE+10, CLINPROV+10, PROVIEN+3, CLINGRP+2

Label References

Name Line Occurrences
$$APPTNODE GETAPPT+43, APTNODEP+7, APTSTAT+18
$$APTNODEP GETAPPT+74, GETAPPT+80
$$APTSTAT GETAPPT+76
$$CLINGRP GETAPPT+63
$$CLINNODE GETAPPT+48, GETAPPT+49, GETAPPT+50, GETAPPT+70
$$PROVIEN CLINPROV+11
CLINPROV GETAPPT+53

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
APPTARY GETAPPT~, GETAPPT+37!
APPTARY("APPTDT" GETAPPT+57*
APPTARY("APPTTYPE" GETAPPT+58*
APPTARY("CANC EL REASON" , GETAPPT+79*, EL REMARK" , GETAPPT+80*
APPTARY("CHEC KIN DT" , GETAPPT+65*, KIN USER" , GETAPPT+66*, KOUT DT" , GETAPPT+67*, KOUT USER" , GETAPPT+68*
APPTARY("CLIN IC GROUP NAME" , GETAPPT+64*, IC GROUP" , GETAPPT+63*, GETAPPT+64, IC NAME" , GETAPPT+62*, IC PROVIDER" , GETAPPT+61*, IC PURGED"
, GETAPPT+60*
APPTARY("CLINIC" GETAPPT+59*
APPTARY("COMMENT" GETAPPT+69*
APPTARY("CONSULT" GETAPPT+70*
APPTARY("COV" GETAPPT+71*
APPTARY("DURATION" GETAPPT+72*
APPTARY("ELIGIBILITY" GETAPPT+73*
APPTARY("ENCO UNTER IEN" , GETAPPT+81*
APPTARY("PAT INDICATED DATE" , GETAPPT+74*
APPTARY("PATI ENT IEN" , GETAPPT+56*
APPTARY("STAT US PIECE" , GETAPPT+77*
APPTARY("STATUS" GETAPPT+76*
APPTARY("USER" GETAPPT+78*
APPTDT GETAPPT~, GETAPPT+40, GETAPPT+43, GETAPPT+48, GETAPPT+49, GETAPPT+50, GETAPPT+57, GETAPPT+70, GETAPPT+74, GETAPPT+76
, GETAPPT+80, APPTNODE~, APPTNODE+5, APPTNODE+6, APTNODEP~, APTNODEP+7, CLINNODE~, CLINNODE+9, CLINNODE+10, APTSTAT~
, APTSTAT+15, APTSTAT+18, APTSTAT+25
ARRAY CLINPROV~, CLINPROV+6!
ARRAY( CLINPROV+11*, CLINPROV+12, CLINPROV+13*
ARRAY(0 CLINPROV+9*, CLINPROV+14*
CLINIC GETAPPT+36~, GETAPPT+47*, GETAPPT+48, GETAPPT+49, GETAPPT+50, GETAPPT+53, GETAPPT+59, GETAPPT+62, GETAPPT+63, GETAPPT+70
, CLINPROV~, CLINPROV+7, CLINPROV+10, CLINPROV+11, PROVIEN~, PROVIEN+3, CLINGRP~, CLINGRP+2
CLINICID APTSTAT+13~, APTSTAT+22*, APTSTAT+23, APTSTAT+25
CLINICIEN CLINNODE~, CLINNODE+9, CLINNODE+10
CLNODE0 GETAPPT+36~, GETAPPT+48*, GETAPPT+60, GETAPPT+69, GETAPPT+72, GETAPPT+73
CLNODEC GETAPPT+36~, GETAPPT+49*, GETAPPT+65, GETAPPT+66, GETAPPT+67, GETAPPT+68
CLNODECN GETAPPT+36~, GETAPPT+50*
COUNT CLINNODE~, CLINNODE+9*, CLINNODE+10
DATA APTNODEP+6~, APTNODEP+7*, APTNODEP+8
DELIM GETAPPT+36~, GETAPPT+42*, GETAPPT+47, GETAPPT+58, GETAPPT+65, GETAPPT+66, GETAPPT+67, GETAPPT+68, GETAPPT+69, GETAPPT+71
, GETAPPT+72, GETAPPT+73, GETAPPT+77, GETAPPT+78, GETAPPT+79, GETAPPT+81
DPT0 APTSTAT+13~, APTSTAT+18*, APTSTAT+19, APTSTAT+22, APTSTAT+25
FULLSTAT APTSTAT~, APTSTAT+26
NODE APPTNODE~, APPTNODE+5, APPTNODE+6, APTNODEP~, APTNODEP+7, CLINNODE~, CLINNODE+10, PROVIEN~, PROVIEN+3
NUM CLINPROV+5~, CLINPROV+8*, CLINPROV+10*, CLINPROV+11, CLINPROV+12, CLINPROV+13
PATIEN GETAPPT~, GETAPPT+39, GETAPPT+43, GETAPPT+48, GETAPPT+49, GETAPPT+50, GETAPPT+56, GETAPPT+70, GETAPPT+74, GETAPPT+76
, GETAPPT+80, APPTNODE~, APPTNODE+5, APPTNODE+6, APTNODEP~, APTNODEP+7, CLINNODE~, CLINNODE+9, APTSTAT~, APTSTAT+14
, APTSTAT+18, APTSTAT+25
PIECE APTNODEP~, APTNODEP+8
PROVARY GETAPPT+36~, GETAPPT+53, GETAPPT+61
RET CLINNODE+7~, CLINNODE+10*, CLINNODE+11, APTSTAT+13~, APTSTAT+25*, APTSTAT+27*, APTSTAT+28*, APTSTAT+29
SNODE0 GETAPPT+36~, GETAPPT+43*, GETAPPT+44, GETAPPT+47, GETAPPT+58, GETAPPT+71, GETAPPT+77, GETAPPT+78, GETAPPT+79, GETAPPT+81
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All