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

Package: Automated Information Collection System

Routine: IBDF1B1A


Information

IBDF1B1A ;ALB/CJM - ENCOUNTER FORM PRINT (IBDF1B continued - user options for printing- continuation of IBDF1B1); 3/1/93

Source Information

Source file <IBDF1B1A.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
Automated Information Collection System 1 $$DIVISION^IBDF1B5  

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

Package Total Caller Graph
Automated Information Collection System 3 IBDF1B1  IBDF1B1B  IBDF1B5  

Entry Points

Name Comments DBIA/ICR reference
ADDON(DFN,IBAPPT) ;returns 1 if the print manager already printed forms for this appt as an add-on, 0 otherwise
ENCL ;for every clinic choosen find patient appointments on DATE
PRINTED(DFN,IBAPPT) ;returns 1 if the print manager already printed forms for this appt, 0 otherwise
MULTIPLE(DFN,APPT) ;determines if patient=DFN has multiple appts on the list and APPT is the earliest
TDG(DFN) ;reformat patient's SSN into terminal digit order, then turns it into a cannonic number
; returns either 0 or ssn in terminal digit order
CLNCHAS(CLINIC) ;returns>0 if the clinic has something to print
DIVHAS(IBDIV) ;returns >0 if the division has anything to print, 0 otherwise
GETLIST(DFN,IBDT,DIVISION) ;creates a list of the patient's appts on IBDT

External References

Name Field # of Occurrence
$$DIVISION^IBDF1B5 ENCL+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] ENCL+19, ENCL+21, TDG+3, PRINTED+1, ADDON+1, GETLIST+5, GETLIST+6
^IBD(357.09 - [#357.09] ENCL+23
^SC - [#44] ENCL+13, ENCL+16, ENCL+17, ENCL+18, ENCL+19, ENCL+32, ENCL+47, GETLIST+8
^SD(409.95 - [#409.95] ENCL+9, CLNCHAS+2, CLNCHAS+3, CLNCHAS+6
^SD(409.96 - [#409.96] ENCL+9, DIVHAS+2
^TMP("IBDF" ENCL+2, ENCL+32*, ENCL+42*, ENCL+47*, ENCL+51!, GETLIST+4*, GETLIST+11*, MULTIPLE+3, MULTIPLE+5

Label References

Name Line Occurrences
$$ADDON ENCL+27
$$PRINTED ENCL+26
$$TDG ENCL+37, ENCL+47
GETLIST MULTIPLE+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
APPT GETLIST+2~, GETLIST+5*, GETLIST+6, GETLIST+11, MULTIPLE~, MULTIPLE+2
APT MULTIPLE+1~, MULTIPLE+3*, MULTIPLE+5
CLINIC CLNCHAS~, CLNCHAS+2, CLNCHAS+6
CLNCNAME ENCL+1~, ENCL+13*, ENCL+32*, ENCL+47*
DFN ENCL+1~, ENCL+19*, ENCL+21, ENCL+26, ENCL+27, ENCL+32, ENCL+37, ENCL+42, ENCL+47, TDG~
, TDG+3, PRINTED~, PRINTED+1, ADDON~, ADDON+1, GETLIST~, GETLIST+1, GETLIST+4, GETLIST+5, GETLIST+6
, GETLIST+11, MULTIPLE~, MULTIPLE+2, MULTIPLE+3, MULTIPLE+5
DIVISION GETLIST~, GETLIST+4, GETLIST+8, GETLIST+11, MULTIPLE+2, MULTIPLE+3, MULTIPLE+5
FIRST4 ENCL+1~, ENCL+37*, ENCL+40
FOUND CLNCHAS+1~, CLNCHAS+4*, CLNCHAS+5
I TDG+2~, TDG+4*, CLNCHAS+1~, CLNCHAS+4*
>> IBADDONS ENCL+26, ENCL+27
IBAPPT ENCL+1~, ENCL+16*, ENCL+17, ENCL+18, ENCL+19, ENCL+21, ENCL+26, ENCL+27, ENCL+32, ENCL+42
, ENCL+47, PRINTED~, PRINTED+1, ADDON~, ADDON+1
IBAPTYP ENCL+1~, ENCL+21*, ENCL+23
IBCLINIC ENCL+1~, ENCL+2*, ENCL+6, ENCL+9, ENCL+13, ENCL+16, ENCL+17, ENCL+18, ENCL+19, ENCL+32
, ENCL+42, ENCL+47
>> IBDFTSTP ENCL+19
IBDIV ENCL+1~, ENCL+6*, ENCL+9, ENCL+10*, ENCL+13, ENCL+32, ENCL+40, ENCL+42, ENCL+47, DIVHAS~
, DIVHAS+1, DIVHAS+2
IBDT ENCL+16, GETLIST~, GETLIST+1, GETLIST+3, GETLIST+5
>> IBREPRNT ENCL+13, ENCL+26, ENCL+27, ENCL+40
>> IBSRT ENCL+13, ENCL+32, ENCL+36, ENCL+47
>> IBSTRTDV ENCL+13, ENCL+40
IBX ENCL+1~, ENCL+17*, ENCL+18, ENCL+19
NODE GETLIST+2~, GETLIST+6*, GETLIST+7, GETLIST+8, GETLIST+11, CLNCHAS+1~, CLNCHAS+3*, CLNCHAS+4
PNAME ENCL+1~, ENCL+19*, ENCL+32
SETUP CLNCHAS+1~, CLNCHAS+2*, CLNCHAS+3
SSN TDG+2~, TDG+3*, TDG+4
TDIGIT ENCL+1~, ENCL+37*, ENCL+42, ENCL+47*
TO GETLIST+2~, GETLIST+3*, GETLIST+5
X TDG+2~, TDG+4*
Y ENCL+1~, TDG+2~, TDG+4*, TDG+5*, TDG+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All