Routine: IBDF2B

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Caller Graph
Entry Points
External References
Interaction Calls
Label References
Local Variables

Information

IBDF2B ;ALB/CJM - ENCOUNTER FORM - (prints data field);12/15/92

Source Information

Source file <IBDF2B.m>

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
Automated Information Collection System	5	TXTPRINT^IBDF2B1 ($$HLINE,$$PADRIGHT,DRWSTR)^IBDFU ($$FLDDESCR,$$SFLDDSCR)^IBDFU1A ($$DATANODE,$$DORTN,RTNDSCR)^IBDFU1B PAUSE^IBDFU5

Caller Graph

Caller Graph Total: 3

Package	Total	Caller Graph
Automated Information Collection System	3	IBDF2A IBDF2A1 IBDF2B1

Entry Points

Name	Comments	DBIA/ICR reference
ADDLINES	;if there are unused lines writes blank lines to the form
RTN	;calls the rtn specified by the pkg interface if ok
PRNTDATA	;displays the correct data to the subfield
OVERFLOW(TYPE)	;keeps track of data that does not fit on the form
RANGE	;sets MAXX and MAXY to the maximum values allowed for the X,Y coordinates
WARNING	; prints a warning that data field prints outside of block - meant only for display while editing a form description
DATAFLD(FIELD)	;for printing data fields to the encounter form

External References

Name	Field # of Occurrence
TXTPRINT^IBDF2B1	DATAFLD+14
$$HLINE^IBDFU	PRNTDATA+8, PRNTDATA+9, ADDLINES+11
$$PADRIGHT^IBDFU	PRNTDATA+13
DRWSTR^IBDFU	DATAFLD+21, PRNTDATA+13, ADDLINES+11
$$FLDDESCR^IBDFU1A	DATAFLD+7
$$SFLDDSCR^IBDFU1A	DATAFLD+17, DATAFLD+18
$$DATANODE^IBDFU1B	PRNTDATA+4
$$DORTN^IBDFU1B	RTN+8
RTNDSCR^IBDFU1B	DATAFLD+9
PAUSE^IBDFU5	WARNING+3

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Data Field="_FLDNAME_" in Block="_IBBLK("NAME")_" is printing",!,"outside of the block!" Line Location: WARNING+2

Name	Line Occurrences
OVERFLOW	PRNTDATA+11, PRNTDATA+12
PRNTDATA	DATAFLD+23
RANGE	DATAFLD+12
RTN	DATAFLD+13
WARNING	DATAFLD+22, PRNTDATA+14, ADDLINES+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BLK	DATAFLD+5~, DATAFLD+8
BOX	RANGE+1~, RANGE+2*, RANGE+3, RANGE+4
DISPLAY	DATAFLD+5~, DATAFLD+20, DATAFLD+21
FIELD	DATAFLD~, DATAFLD+7, DATAFLD+17, DATAFLD+18, OVERFLOW+3
FLDNAME	DATAFLD+5~, WARNING+2
HIO	DATAFLD+5~, ADDLINES+3, ADDLINES+4, ADDLINES+7
I	ADDLINES+2~, ADDLINES+11*
>> IBARRAY("OVERFLOW"	OVERFLOW+3
>> IBBLK	DATAFLD+8, OVERFLOW+3
>> IBBLK("BOX"	RANGE+2
>> IBBLK("H"	RANGE+3
>> IBBLK("NAME"	WARNING+2
>> IBBLK("W"	RANGE+4
>> IBDEVICE("LISTMAN"	DATAFLD+12, DATAFLD+22, PRNTDATA+8, PRNTDATA+11, PRNTDATA+12, PRNTDATA+14, RTN+11, ADDLINES+9
>> IBPRINT("ENTIRE"	DATAFLD+11, DATAFLD+20, RTN+4
>> IBPRINT("WITH_DATA"	DATAFLD+13, PRNTDATA+8
>> IBWARN	WARNING+1, WARNING+4*
ITEM	DATAFLD+5~, PRNTDATA+12, RTN+15, OVERFLOW+3
LABEL	DATAFLD+5~, DATAFLD+20, DATAFLD+21, DATAFLD+22
LAST	DATAFLD+5~, DATAFLD+17, DATAFLD+18
LASTITEM	DATAFLD+5~, PRNTDATA+12
>> LNSUSED	ADDLINES+4, ADDLINES+7, ADDLINES+11
LSPACING	ADDLINES+2~, ADDLINES+5, ADDLINES+6, ADDLINES+8, ADDLINES+10, ADDLINES+11
MAXX	DATAFLD+5~, DATAFLD+22, RANGE+4*, PRNTDATA+14, ADDLINES+10
MAXY	DATAFLD+5~, DATAFLD+22, RANGE+3*, PRNTDATA+14, ADDLINES+10
NODE	PRNTDATA+1~, PRNTDATA+4, PRNTDATA+5, RTN+6~, RTN+14, RTN+15
NUMLEFT	ADDLINES+2~, ADDLINES+7, ADDLINES+8, ADDLINES+10, ADDLINES+11
PIECE	DATAFLD+5~, PRNTDATA+2*, PRNTDATA+3, PRNTDATA+4, PRNTDATA+5
PVALUE	PRNTDATA+1~, PRNTDATA+5, PRNTDATA+6, PRNTDATA+8, PRNTDATA+9*, PRNTDATA+10, PRNTDATA+11, PRNTDATA+13
RTN	DATAFLD+5~, DATAFLD+9, PRNTDATA+4, RTN+8
RTN("ACTION"	RTN+1
RTN("CHANGES"	DATAFLD+11, DATAFLD+13, PRNTDATA+8, PRNTDATA+9, RTN+4
RTN("DATATYPE"	DATAFLD+14, PRNTDATA+2, PRNTDATA+12, RTN+14, RTN+15
RTN("DATA_LOCATION"	PRNTDATA+12, RTN+14, RTN+15
RTN("FULL"	PRNTDATA+11, PRNTDATA+12
RTN("NAME"	RTN+2
RTN("RTN"	RTN+8, RTN+11
>> RTNLIST(	RTN+8, RTN+11*
SPACING	DATAFLD+5~, ADDLINES+6
TYPE	OVERFLOW~, OVERFLOW+3
VALUE	DATAFLD+5~, PRNTDATA+5, RTN+14, RTN+15
VALUE(	PRNTDATA+5, RTN+14, RTN+15
WIO	DATAFLD+5~, PRNTDATA+6, PRNTDATA+8, PRNTDATA+9, PRNTDATA+11, PRNTDATA+13, PRNTDATA+14, ADDLINES+10, ADDLINES+11
XIO	DATAFLD+5~, PRNTDATA+13, PRNTDATA+14, ADDLINES+10, ADDLINES+11
XLAB	DATAFLD+5~, DATAFLD+21, DATAFLD+22
YIO	DATAFLD+5~, PRNTDATA+13, PRNTDATA+14, ADDLINES+10, ADDLINES+11
YLAB	DATAFLD+5~, DATAFLD+21, DATAFLD+22

Customize PDF page

Package: Automated Information Collection System

Routine: IBDF2B

Call Graph Total: 5

Caller Graph Total: 3