Routine: IBDFGRP

Package	Total	Call Graph
Automated Information Collection System	8	SELECT^IBDF3 GETLST^IBDFQSL2 $$LSTDESCR^IBDFU1 RTNDSCR^IBDFU1B COPYGRP^IBDFU2A $$SLCTFORM^IBDFU4 PAUSE^IBDFU5 $$SLCTBLK^IBDFU8
List Manager	4	EN^VALM ($$SETSTR,FULL)^VALM1 (CNTRL,KILL)^VALM10 EN^VALM2
Kernel	1	DISP^XQORM1

Package

Total

Call Graph

SELECT^IBDF3 GETLST^IBDFQSL2 $$LSTDESCR^IBDFU1 RTNDSCR^IBDFU1B COPYGRP^IBDFU2A $$SLCTFORM^IBDFU4 PAUSE^IBDFU5 $$SLCTBLK^IBDFU8

List Manager

EN^VALM ($$SETSTR,FULL)^VALM1 (CNTRL,KILL)^VALM10 EN^VALM2

Kernel

DISP^XQORM1

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Package	Total	Caller Graph
Automated Information Collection System	2	IBDF QUICK GROUP COPY SELECTION IBDF QUICK GRP COPY
Kernel	1	^ORD(101

Package

Total

Caller Graph

Automated Information Collection System

IBDF QUICK GROUP COPY SELECTION IBDF QUICK GRP COPY

Kernel

^ORD(101

Entry Points

Name	Comments	DBIA/ICR reference
INIT	; -- init variables and list array
SETARR	; -- Set up Listman array
TMP	; -- Set up TMP Array
HEADER	; -- Set up header line for the display
INTER	; -- Find Package interface for selection list
HELP	; -- help code
EXIT	; -- exit code
EXPND	; -- expand code
GRPCOPY	; -- COPY GROUP
SELECT2()	;allows the user to select a form, then a block from it

Name	Field # of Occurrence
SELECT^IBDF3	IBDFGRP+9
GETLST^IBDFQSL2	INTER+1
$$LSTDESCR^IBDFU1	INIT+23
RTNDSCR^IBDFU1B	INIT+25
COPYGRP^IBDFU2A	GRPCOPY+9
$$SLCTFORM^IBDFU4	SELECT2+2
PAUSE^IBDFU5	IBDFGRP+11
$$SLCTBLK^IBDFU8	SELECT2+5
EN^VALM	IBDFGRP+13
$$SETSTR^VALM1	SETARR+7, SETARR+9, SETARR+11, SETARR+13, HEADER+7, HEADER+10, HEADER+12, HEADER+13, HEADER+15
FULL^VALM1	GRPCOPY+8
CNTRL^VALM10	HEADER+13
KILL^VALM10	INIT+2
EN^VALM2	GRPCOPY+5
DISP^XQORM1	HELP+1

Name

Field # of Occurrence

IBDFGRP+9

INTER+1

INIT+23

INIT+25

GRPCOPY+9

SELECT2+2

IBDFGRP+11

SELECT2+5

IBDFGRP+13

SETARR+7, SETARR+9, SETARR+11, SETARR+13, HEADER+7, HEADER+10, HEADER+12, HEADER+13, HEADER+15

GRPCOPY+8

HEADER+13

INIT+2

GRPCOPY+5

HELP+1

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Block does not contain same type of selection list '"_$P($G(^IBE(357.6,+$P($G(^IBE(357.2,+NEWLIST,0)),U,11),0)),U)_"'.",! Line Location: IBDFGRP+11
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Routine Call	VALM Line Location: IBDFGRP+13

Name	Line Occurrences (* Changed, ! Killed)
^IBE(357.2 - [#357.2]	IBDFGRP+11, INIT+14, INIT+17, INIT+20, INIT+21, INTER+1
^IBE(357.4 - [#357.4]	SETARR+12
^IBE(357.6 - [#357.6]	IBDFGRP+11, INTER+1
^TMP("GRP"	INIT+2!, TMP+1*
^TMP("GRPIDX"	INIT+2!, TMP+2*, GRPCOPY+9
^TMP("SEL"	EXIT+2!
^TMP("SELIDX"	EXIT+2!

Name

Line Occurrences (* Changed, ! Killed)

^IBE(357.2 - [#357.2]

IBDFGRP+11, INIT+14, INIT+17, INIT+20, INIT+21, INTER+1

^IBE(357.4 - [#357.4]

SETARR+12

^IBE(357.6 - [#357.6]

IBDFGRP+11, INTER+1

^TMP("GRP"

INIT+2!, TMP+1*

^TMP("GRPIDX"

INIT+2!, TMP+2*, GRPCOPY+9

^TMP("SEL"

EXIT+2!

^TMP("SELIDX"

EXIT+2!

Name	Line Occurrences
$$SELECT2	IBDFGRP+6
HEADER	INIT+22
INTER	INIT+20
SETARR	INIT+22
TMP	HEADER+7, HEADER+13, HEADER+15

Name

Line Occurrences

$$SELECT2

IBDFGRP+6

INIT+22

INIT+20

INIT+22

HEADER+7, HEADER+13, HEADER+15

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BOT	IBDFGRP+4~
>> DA	GRPCOPY+9*
DIC	IBDFGRP+9!, EXIT+1!
DIC("S"	IBDFGRP+9*
FROM	GRPCOPY+1~, GRPCOPY+3*, GRPCOPY+9
GRP	GRPCOPY+1~, GRPCOPY+9*
IBARRY	INTER+1!, EXIT+1!
IBBLK	IBDFGRP+3, IBDFGRP+4~, IBDFGRP+6, IBDFGRP+7, INTER+1, SELECT2+1, SELECT2+5*, SELECT2+6
IBDCNT	INIT+1~, INIT+19, SETARR+4, TMP+1, HEADER+2, HEADER+8, HEADER+14*
IBDCNT1	INIT+1~, INIT+19, TMP+1, TMP+2, HEADER+1, HEADER+5, HEADER+7
IBDFAR	INIT+22, INTER+1*, EXIT+1!
IBDFARR	INIT+22*, SETARR+2, TMP+2, HEADER+4, HEADER+5, HEADER+6, HEADER+9, HEADER+11, EXIT+1!
IBDFCPYE	GRPCOPY+1~
IBDFCPYF	GRPCOPY+2*, GRPCOPY+10!
IBDFHDR	INIT+2!, EXIT+1!
IBDFHDR(	HEADER+5*
IBDFINT	INTER+1*, EXIT+1!
IBDFINT(1	INTER+1*
IBDFNEW	INIT+12*, EXIT+1!
IBDFNEW(	INIT+17*
IBDFNODE	SETARR+1~, SETARR+2*, SETARR+3, SETARR+6, SETARR+8, SETARR+10, SETARR+12
IBDFOLD	INIT+12*, EXIT+1!
IBDFOLD(	INIT+14*
IBDFSEL	SETARR+3, TMP+1, HEADER+6, EXIT+1!
IBDFVAL	SETARR+6, SETARR+7, SETARR+8, SETARR+9, SETARR+10, SETARR+11, SETARR+12, SETARR+13, EXIT+1!
IBDFX	INIT+22*, EXIT+1!
IBDLSTNM	INIT+20*, EXIT+1!
IBDVAL	HEADER+4, HEADER+5, HEADER+9, HEADER+10, HEADER+11*, HEADER+12, HEADER+13, EXIT+1!
IBDVAL1	HEADER+12*, HEADER+13, EXIT+1!
IBDVALM	GRPCOPY+1~, GRPCOPY+7, GRPCOPY+9
IBFORM	IBDFGRP+4~, INTER+1, SELECT2+2*, SELECT2+3, SELECT2+5
IBGRP	EXIT+1!
IBLIST	IBDFGRP+3, IBDFGRP+4~, IBDFGRP+11, IBDFGRP+13, INIT+13, INIT+14, INIT+20, INIT+21, INIT+23, INTER+1 , EXIT+1!, GRPCOPY+9
IBLIST("RTN"	INIT+24
IBLSNODE	INIT+21*, EXIT+1!
IBRTN	INIT+24*, INIT+25, EXIT+1!
IEN	EXIT+1!
>> IOINHI	HEADER+13
>> IOINORM	HEADER+13
IOSL	SELECT2+5
K	INIT+11~, INIT+13, INIT+14, INIT+16, INIT+17
NEWBLOCK	IBDFGRP+2~, IBDFGRP+3*, GRPCOPY+9
NEWLIST	IBDFGRP+2~, IBDFGRP+3*, IBDFGRP+11, INIT+16, INIT+17, GRPCOPY+9
NODE	INIT+11~, INIT+14, INIT+16, INIT+17*, EXIT+1!
TO	GRPCOPY+1~, GRPCOPY+3*, GRPCOPY+9
TOP	IBDFGRP+4~
U	IBDFGRP+11
>> VALMBCK	IBDFGRP+5, GRPCOPY+4, GRPCOPY+8*
>> VALMCNT	INIT+19, SETARR+4, TMP+1, TMP+2, HEADER+2, HEADER+8, HEADER+13, HEADER+14*
VALMY	GRPCOPY+1~
VALMY(	GRPCOPY+9
VALMY(0	GRPCOPY+6
>> X	SETARR+5, SETARR+7, SETARR+9, SETARR+11, SETARR+13, TMP+1, HEADER+3, HEADER+7, HEADER+8, HEADER+10* , HEADER+12, HEADER+13, HEADER+14, HEADER+15, HELP+1*
>> XQORNOD(0	GRPCOPY+5

Customize PDF page

Package: Automated Information Collection System

Routine: IBDFGRP

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: