Routine: IBDF2A

Call Graph Total: 14

Package	Total	Call Graph
Automated Information Collection System	12	$$FID^IBDF18C COMPILE^IBDF19 OVERFLOW^IBDF1B3 (DEVSETUP,DRWBLOCK)^IBDF2A1 DATAFLD^IBDF2B PRINTLST^IBDF2D (CNVRTHT,CNVRTLEN)^IBDF2D1 LNPRINT^IBDF2F DRWSTR^IBDFU $$BLKDESCR^IBDFU1B ($$FORMDSCR,ARRAYS,PRNTPRMS)^IBDFU1C (DEVICE,KPRNTVAR)^IBDFUA
Kernel	2	^%ZIS $$REPLACE^XLFSTR

Package	Total	Caller Graph
Automated Information Collection System	8	IBDF19 IBDF1A IBDF1B2 IBDF1C IBDF5C IBDFC IBDFFSMP IBDFREG
IHS Changes To Scheduling	1	ASDFORM

Package

Total

Caller Graph

Automated Information Collection System

IBDF19 IBDF1A IBDF1B2 IBDF1C IBDF5C IBDFC IBDFFSMP IBDFREG

IHS Changes To Scheduling

ASDFORM

Entry Points

Name	Comments	DBIA/ICR reference
FORM(IBFORM,WITHDATA)	;prints FORM - defines IBDEVICE array
REPLACE	;replace objects requiring PCL with plain text
DRWBLKS	;draws all the form's blocks
EXIT	;
DRWFORM(IBFORM,WITHDATA,IBDEVICE)	;prints IBFORM - IBDEVICE array already defined, must be passed by reference
JUSTDATA(WITHDATA)	;draws the form's data fields and dynamic selection lists, just the portion that may change with data

External References

Name	Field # of Occurrence
^%ZIS	DRWFORM+36
$$FID^IBDF18C	DRWFORM+15
COMPILE^IBDF19	DRWFORM+11
OVERFLOW^IBDF1B3	DRWFORM+31
DEVSETUP^IBDF2A1	DRWFORM+6
DRWBLOCK^IBDF2A1	DRWBLKS+2
DATAFLD^IBDF2B	JUSTDATA+10
PRINTLST^IBDF2D	JUSTDATA+11
CNVRTHT^IBDF2D1	REPLACE+20
CNVRTLEN^IBDF2D1	REPLACE+20
LNPRINT^IBDF2F	DRWFORM+28
DRWSTR^IBDFU	JUSTDATA+12, REPLACE+5, REPLACE+9, REPLACE+27, REPLACE+28, REPLACE+29
$$BLKDESCR^IBDFU1B	JUSTDATA+9
$$FORMDSCR^IBDFU1C	DRWFORM+3
ARRAYS^IBDFU1C	DRWFORM+17
PRNTPRMS^IBDFU1C	DRWFORM+4, JUSTDATA+5, REPLACE+2
DEVICE^IBDFUA	FORM+5
KPRNTVAR^IBDFUA	EXIT+2
$$REPLACE^XLFSTR	REPLACE+26

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^IBD(357.96 - [#357.96]	DRWFORM+15
^IBE(357.1 - [#357.1]	DRWBLKS+2, JUSTDATA+8, JUSTDATA+12
^IBE(357.2 - [#357.2]	JUSTDATA+11
^IBE(357.5 - [#357.5]	JUSTDATA+10
^IBE(359.1 - [#359.1]	REPLACE+15
^TMP("IB"	DRWFORM+7!, DRWFORM+33!
^TMP("IBDF"	DRWFORM+7!, DRWFORM+33!

Name	Line Occurrences
DRWBLKS	DRWFORM+19
DRWFORM	FORM+6
JUSTDATA	DRWFORM+18
REPLACE	DRWFORM+22

Name	Field # of Occurrence
^("OVERFLOW"	DRWFORM+7!

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %ZIS	DRWFORM+36*
A	REPLACE+22~, REPLACE+23, REPLACE+24
>> DFN	DRWFORM+15
HAND	DRWFORM+1~, REPLACE+13*, REPLACE+15
I	EXIT+3!, REPLACE+22~, REPLACE+23, REPLACE+24
>> IBAPPT	DRWFORM+15
IBARRAY	DRWFORM+1~, DRWFORM+17
IBARRAY("BUBBLES"	REPLACE+9, REPLACE+10*
IBARRAY("GRAPHICS"	REPLACE+5, REPLACE+6*
IBARRAY("HAND_PRINT"	REPLACE+13, REPLACE+15, REPLACE+30*
IBARRAY("UNDERLINES"	DRWFORM+25*
IBBLK	DRWBLKS+1~, DRWBLKS+2, JUSTDATA+3~, JUSTDATA+8, JUSTDATA+9, JUSTDATA+10, JUSTDATA+11, JUSTDATA+12, REPLACE+1~
IBBLK("X"	REPLACE+3*
IBBLK("Y"	REPLACE+3*
>> IBCLINIC	DRWFORM+15
IBCOL	REPLACE+1~, REPLACE+5, REPLACE+9, REPLACE+13*, REPLACE+15, REPLACE+27, REPLACE+28, REPLACE+29
IBDEVICE	FORM+3~, FORM+5, FORM+6, DRWFORM~, DRWFORM+6
IBDEVICE("CRT"	DRWFORM+15, DRWFORM+25
IBDEVICE("GRAPHICS"	REPLACE+4
IBDEVICE("LISTMAN"	JUSTDATA+7, JUSTDATA+12
IBDEVICE("PCL"	DRWFORM+22, DRWFORM+36
>> IBDSAMP	DRWFORM+15
IBFLD	JUSTDATA+3~, JUSTDATA+10*
IBFORM	FORM~, FORM+6, DRWFORM~, DRWFORM+3, DRWFORM+6, DRWFORM+17, DRWBLKS+2, JUSTDATA+8
IBFORM("COMPILED"	DRWFORM+11, DRWFORM+15
IBFORM("TOOLKIT"	DRWFORM+11, DRWFORM+18, DRWFORM+19
IBFORM("TYPE"	DRWFORM+15
IBFORM("WIDTH"	REPLACE+23, REPLACE+24
IBLIST	JUSTDATA+3~, JUSTDATA+11*
IBPFID	DRWFORM+1~, DRWFORM+8, DRWFORM+15, DRWFORM+28
IBPRINT	DRWFORM+1~, DRWFORM+4, JUSTDATA+3~, JUSTDATA+5, REPLACE+2
IBPRINT("ENTIRE"	JUSTDATA+11*
IBPRINT("WITH_DATA"	DRWFORM+15, DRWFORM+31, JUSTDATA+11
IBROW	REPLACE+1~, REPLACE+5, REPLACE+9, REPLACE+13*, REPLACE+15, REPLACE+19, REPLACE+21
IBWARN	JUSTDATA+7~*
IOM	DRWFORM+36
ION	DRWFORM+36
>> IOP	DRWFORM+36*
IOSL	DRWFORM+36
IOST	DRWFORM+36
LINES	DRWFORM+1~, REPLACE+15, REPLACE+18, REPLACE+20, REPLACE+21*, REPLACE+29
NODE	DRWFORM+1~, JUSTDATA+3~, JUSTDATA+12, REPLACE+15
PRINT	DRWFORM+1~, REPLACE+15, REPLACE+23, REPLACE+24, REPLACE+26, REPLACE+27
REPLACE	REPLACE+22~, REPLACE+26
REPLACE(	REPLACE+23, REPLACE+24
REPLACE("_"	REPLACE+23, REPLACE+24
REPRINT	DRWFORM+1~, DRWFORM+13, DRWFORM+15
ROW	REPLACE+14~, REPLACE+19, REPLACE+21, REPLACE+27, REPLACE+28, REPLACE+29
RTNLIST	DRWFORM+1~, DRWBLKS+1~, JUSTDATA+3~
>> STRING	REPLACE+17, REPLACE+23, REPLACE+24, REPLACE+25, REPLACE+27, REPLACE+28, REPLACE+29*
SUB	JUSTDATA+3~, JUSTDATA+12*
TYPE	DRWFORM+1~, REPLACE+15*, REPLACE+16, REPLACE+20, REPLACE+21, REPLACE+29
UNIT	DRWFORM+1~, REPLACE+15*, REPLACE+25
>> WIDTH	REPLACE+15*, REPLACE+16, REPLACE+20, REPLACE+23, REPLACE+24, REPLACE+29
WITHDATA	FORM~, FORM+6, DRWFORM~, DRWFORM+4, DRWFORM+18, JUSTDATA~, JUSTDATA+5
X	EXIT+3!
Y	EXIT+3!

Customize PDF page

Package: Automated Information Collection System

Routine: IBDF2A

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Caller Graph Total: 9

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: