Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Caller Graph |  Entry Points |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: IBDFRPC2

Package: Automated Information Collection System

Routine: IBDFRPC2


Information

IBDFRPC2 ;ALB/AAS - Return list of selections, broker call ;29-JAN-96

Source Information

Source file <IBDFRPC2.m>

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

Package Total Caller Graph
Automated Information Collection System 1 IBDFRPC1  

Entry Points

Name Comments DBIA/ICR reference
TEST1
DYNQ
SEL(RESULT,IBDF) ; -- Procedure
; -- called by ibdfrpc1, returns list for one selection list
; see ibdfrpc1 for complete input/output lists
; -- Input IBDF("IEN") := pointer to selection list (357.2)
; IBDF("PI") := pointer to package interface (357.6) (optional)
; IBDF("DFN") := pointer to patient (2) (optional)
; IBDF("CLINIC") := pointer to clinic (44) (optional)
DYN(RESULT,IBDF) ; -- Procedure
; -- called by ibdfrpc1 to return selection list for dynamic selections
; see ibdfrpc1 for complete input/output lists
; -- Input IBDF("PI") := pointer to package interface (357.6)
; IBDF("IEN") := pointer to selection list (357.2)
; IBDF("DFN") := pointer to patient (2) (optional for provider selections)
; IBDF("CLINIC") := pointer to clinic (44) (optional for active problem selections)
BLDA ; -- build results array
URH ; -- UnReferenced Headers removal
; if a header doesn't have any data under it, then remove the header
RULE
SELQ
GETQLF ; -- add selection rule and qualifiers from marking area
; subcolumns to results(0) node, but only for bubbles
TESTD ; -- Test dynamic
COPYLIST(RESULT,LIST,COUNT) ;copies the entries from LIST to @ARY, starting subscript at COUNT+1
TEST
SUBCOL(LIST) ; -- function
; -- returns the subcolumn containing the text
; input LIST := selection list internal entry
; -- Assumes data returned by the package interface, piece 2 is the description

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] DYN+13
^IBD(357.98 - [#357.98] GETQLF+6
^IBE(357.2 - [#357.2] SEL+15, GETQLF+4, GETQLF+5, SUBCOL+8, SUBCOL+9, SUBCOL+10, SUBCOL+11, SUBCOL+12, SUBCOL+13, DYN+19
^IBE(357.3 - [#357.3] COPYLIST+18, COPYLIST+20, COPYLIST+22, COPYLIST+32, COPYLIST+33, COPYLIST+37, COPYLIST+38, COPYLIST+42
^IBE(357.4 - [#357.4] COPYLIST+10, COPYLIST+12, COPYLIST+13, COPYLIST+14
^IBE(357.6 - [#357.6] DYN+22
^IBE(357.91 - [#357.91] GETQLF+3
^SC("B" DYN+25
^TMP("IBD-DUP" COPYLIST+52!

Label References

Name Line Occurrences
$$SUBCOL COPYLIST+7
@( DYN+31
BLDA COPYLIST+49
COPYLIST SEL+19
DYN TESTD+9
DYNQ DYN+12, DYN+13, DYN+19, DYN+22, DYN+28, RULE+3
GETQLF SEL+23, RULE+2
RULE DYN+15
SEL TEST+2, TEST1+2
SELQ SEL+14, SEL+15, DYN+18

Naked Globals

Name Field # of Occurrence
^(0 SUBCOL+10, SUBCOL+11, SUBCOL+12, SUBCOL+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ARRY SEL+9*, SEL+10*, SEL+11, SEL+13, SEL+22, GETQLF+6, GETQLF+9*, COPYLIST+4*, COPYLIST+5*, COPYLIST+16
, COPYLIST+28, COPYLIST+29, BLDA+1, BLDA+2*, BLDA+3*, BLDA+4*, BLDA+5*, BLDA+6*, BLDA+7*, BLDA+8*
, BLDA+9*, BLDA+10*, BLDA+12*, URH+3, URH+4, URH+5, URH+6, URH+7, DYN+9*, DYN+10*
, DYN+11, DYN+12, DYN+13, DYN+17, DYN+21, DYN+26, DYN+33, RULE, RULE+11, RULE+15
, RULE+16
BUBB GETQLF+2~, GETQLF+3*, GETQLF+6
BUBBCNT GETQLF+2~, GETQLF+3*, GETQLF+6*, GETQLF+9
CNT DYN+8~, RULE+5*, RULE+6, RULE+11, RULE+15, RULE+16
COUNT SEL+8~, SEL+11*, SEL+19, SEL+22, COPYLIST~, COPYLIST+16*, COPYLIST+28*, COPYLIST+29*, COPYLIST+49*, BLDA+1
, BLDA+2, BLDA+3, BLDA+4, BLDA+5, BLDA+6, BLDA+7, BLDA+8, BLDA+9, BLDA+10, BLDA+12
, URH+6*, URH+7*, DYN+8~, DYN+11*
CSUBCOL COPYLIST+2~, COPYLIST+7*, COPYLIST+37, COPYLIST+39, SUBCOL+5~, SUBCOL+6*, SUBCOL+11*, SUBCOL+13*, SUBCOL+14
DCODE SEL+8~, COPYLIST+2~, COPYLIST+21*, COPYLIST+39*, BLDA+2
DFN DYN+8~, DYN+14*
GROUP COPYLIST+2~, COPYLIST+11*, COPYLIST+12*, COPYLIST+13, COPYLIST+14, COPYLIST+18, COPYLIST+20
HDR COPYLIST+2~, COPYLIST+13*, COPYLIST+14*, COPYLIST+15*, COPYLIST+16, COPYLIST+28*, COPYLIST+29*, URH+2~, URH+4*, URH+5!
, URH+6*, URH+7*
IBARY DYN+8~, DYN+30*, DYN+33, RULE+5, RULE+6, RULE+11, RULE+15, RULE+16
IBCLINIC DYN+8~, DYN+24*, DYN+25*, DYN+26, RULE+10
IBDF SEL~, DYN~, TEST!, TEST+2, TEST1!, TEST1+2, TESTD+1!, TESTD+9
IBDF("CLINIC" DYN+24, TESTD+8*
IBDF("DFN" DYN+12, DYN+13, DYN+14, TESTD+7*
IBDF("IEN" SEL+14, SEL+15, SEL+19, GETQLF+4, GETQLF+5, DYN+18, DYN+19, TEST+1*, TEST1+1*, TESTD+5*
IBDF("PI" DYN+22, TESTD+5*
IBDF("RULE-ONLY" SEL+19, DYN+15, RULE, RULE+3
IEN COPYLIST+2~, COPYLIST+21*, COPYLIST+22*, BLDA+3
LIST COPYLIST~, COPYLIST+7, COPYLIST+10, COPYLIST+12, COPYLIST+18, COPYLIST+20, SUBCOL~, SUBCOL+8, SUBCOL+9, SUBCOL+10
, SUBCOL+11, SUBCOL+12, SUBCOL+13
NAME DYN+8~, DYN+28*, DYN+29*, DYN+30, RULE+9, RULE+14
NODE GETQLF+2~, GETQLF+5*, GETQLF+6, COPYLIST+2~, COPYLIST+22*, COPYLIST+23, COPYLIST+26, COPYLIST+27, COPYLIST+28, COPYLIST+29
, COPYLIST+33*, COPYLIST+34, COPYLIST+38*, COPYLIST+39, COPYLIST+42*, COPYLIST+43, COPYLIST+46
NOTREAL COPYLIST+2~, COPYLIST+21*, COPYLIST+26*, COPYLIST+27, BLDA+3, BLDA+7
ORDER COPYLIST+2~, COPYLIST+17*, COPYLIST+18*, COPYLIST+20
OTEXT SEL+8~, COPYLIST+21*, COPYLIST+43*, BLDA+5
PI DYN+8~, DYN+22*, DYN+28
>> PRNT COPYLIST+9*, COPYLIST+10*, COPYLIST+12
QUANTITY COPYLIST+2~, COPYLIST+23*, BLDA+8
RESULT SEL~, SEL+9, SEL+19, COPYLIST~, COPYLIST+4, DYN~, DYN+9
RTN DYN+8~, DYN+28*, DYN+31
SC SEL+8~, GETQLF+2~, GETQLF+3*, GETQLF+4*, GETQLF+5, GETQLF+9*, SUBCOL+5~, SUBCOL+7*, SUBCOL+8*, SUBCOL+9
, SUBCOL+10, SUBCOL+11, SUBCOL+12, SUBCOL+13
SECOND SEL+8~, COPYLIST+2~, COPYLIST+21*, COPYLIST+46*, BLDA+9
SLCTN COPYLIST+2~, COPYLIST+19*, COPYLIST+20*, COPYLIST+22, COPYLIST+32, COPYLIST+33, COPYLIST+37, COPYLIST+38, COPYLIST+42, BLDA+12
SUBCOL COPYLIST+2~, COPYLIST+7*, COPYLIST+32*, COPYLIST+33, COPYLIST+37*, COPYLIST+38
TERM SEL+8~, COPYLIST+21*, COPYLIST+43*, BLDA+6
TEXT SEL+8~, COPYLIST+2~, COPYLIST+21*, COPYLIST+34*, COPYLIST+49, BLDA+1
THIRD SEL+8~, COPYLIST+2~, COPYLIST+21*, COPYLIST+46*, BLDA+10
TSUBCOL COPYLIST+2~, COPYLIST+7*, COPYLIST+32, COPYLIST+34, SUBCOL+5~, SUBCOL+6*, SUBCOL+10*, SUBCOL+12*, SUBCOL+14
VAR TEST!, TEST+2, TEST1!, TEST1+2, TESTD+1!, TESTD+9
X URH+2~, URH+3*, URH+4, URH+5, URH+6, URH+7*
Info |  Source |  Caller Graph |  Entry Points |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All