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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: SCAPMC18

Package: Scheduling

Routine: SCAPMC18


Information

SCAPMC18 ;ALB/REW - Team APIs:ACPTCL ; 5 Jul 1995

Source Information

Source file <SCAPMC18.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Scheduling 3 $$CLPT^SCAPMC  (ERR,INIT)^SCAPMCU1  (AFTER,BEFORE,INVOKE)^SCMCEV3  
VA FileMan 2 EN^DDIOL  FILE^DICN  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Scheduling 2 SCMCBK1  SCMCQK1  

Entry Points

Name Comments DBIA/ICR reference
OKDATA() ;setup/check variables
PTCLACT(DFN,SCCL,SCDT,SCERR) ;what is patient/clinic enrollment date on a given date-time? Return date or 0
ACPTCL(DFN,SCCL,SCFIELDA,SCACT,SCERR) ;add a patient to a clinic (enrollment)
; input:
; DFN = pointer to PATIENT file (#2)
; SCCL = pointer to HOSPITAL LOCATION file (#44)
; SCFIELDA= array of additional fields to be added
; SCACT = date to activate [default=DT]
; SCERR = array NAME to store error messages.
; [ex. ^TMP("ORXX",$J)]
APTCLQ

External References

Name Field # of Occurrence
EN^DDIOL ACPTCL+25
FILE^DICN ACPTCL+31, ACPTCL+44
$$CLPT^SCAPMC PTCLACT+4
ERR^SCAPMCU1 OKDATA+6, OKDATA+9, OKDATA+12
INIT^SCAPMCU1 OKDATA+3
AFTER^SCMCEV3 ACPTCL+48
BEFORE^SCMCEV3 ACPTCL+21
INVOKE^SCMCEV3 ACPTCL+48

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] OKDATA+10
^SC - [#44] OKDATA+7

Label References

Name Line Occurrences
$$OKDATA ACPTCL+17
$$PTCLACT ACPTCL+18
APTCLQ ACPTCL+17, ACPTCL+19

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA(1 ACPTCL+28*, ACPTCL+35*
>> DA(2 ACPTCL+36*
DFN ACPTCL~, ACPTCL+18, ACPTCL+21, ACPTCL+22, ACPTCL+28, ACPTCL+36, ACPTCL+48, PTCLACT~, PTCLACT+4, OKDATA+10
, OKDATA+11
>> DGQUIET ACPTCL+25
DIC ACPTCL+16~, ACPTCL+22*, ACPTCL+23, ACPTCL+33*
DIC("DR" ACPTCL+39!, ACPTCL+42*, ACPTCL+43*
DIC("P" ACPTCL+27*, ACPTCL+34*
DIC(0 ACPTCL+26*
DLAYGO ACPTCL+16~, ACPTCL+30*
DT OKDATA+13
SC ACPTCL+16~
SCACT ACPTCL~, ACPTCL+18, ACPTCL+37, OKDATA+13*
SCCL ACPTCL~, ACPTCL+18, ACPTCL+29, PTCLACT~, PTCLACT+4, OKDATA+4, OKDATA+5, OKDATA+7, OKDATA+8
SCCLLST PTCLACT+1~
SCCLLST("SCCL" PTCLACT+4
SCDATES PTCLACT+1~
SCDATES("BEGIN" PTCLACT+3*
SCDATES("END" PTCLACT+3*
SCDT PTCLACT~, PTCLACT+3
SCERR ACPTCL~, ACPTCL+18, PTCLACT~, PTCLACT+4, OKDATA+6, OKDATA+9, OKDATA+12
SCESEQ ACPTCL+16~, OKDATA+6, OKDATA+9, OKDATA+12
SCFIELDA ACPTCL~, ACPTCL+38, ACPTCL+41, ACPTCL+42, ACPTCL+43
SCFLD ACPTCL+16~, ACPTCL+40*, ACPTCL+41*, ACPTCL+42, ACPTCL+43
SCIEN ACPTCL+16~
SCNEWCL ACPTCL+16~, ACPTCL+46*, APTCLQ
SCOK PTCLACT+1~, PTCLACT+2*, PTCLACT+4*, PTCLACT+5, OKDATA+1~, OKDATA+2*, OKDATA+3, OKDATA+4*, OKDATA+7*, OKDATA+10*
, OKDATA+14
SCPARM ACPTCL+16~, OKDATA+6, OKDATA+9, OKDATA+12
SCPARM("CLINIC" OKDATA+5*, OKDATA+8*
SCPARM("PATIENT" OKDATA+11*
SCPTCL ACPTCL+16~, ACPTCL+18*, ACPTCL+19, ACPTCL+45*, APTCLQ
SCX ACPTCL+16~, ACPTCL+23*, ACPTCL+24, ACPTCL+32, ACPTCL+47
U ACPTCL+45, ACPTCL+46, APTCLQ
X ACPTCL+16~, ACPTCL+29*, ACPTCL+37*
>> Y ACPTCL+32, ACPTCL+33, ACPTCL+35, ACPTCL+45, ACPTCL+46
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All