Routine: IBDF18C

Package	Total	Call Graph
VA Fileman	3	FILE^DICN ^DIE Y^DIQ
Automated Information Collection System	1	LOGERR^IBDF18E2
Kernel	1	$$FMTE^XLFDT
Registration	1	DEM^VADPT

Package	Total	Caller Graph
Automated Information Collection System	11	IBDF18E IBDF2A IBDFBK1 IBDFBKR IBDFDE1 IBDFDE6 IBDFDE7 IBDFDE8 IBDFDEA IBDFPCE IBDFRPC4

Entry Points

Name	Comments	DBIA/ICR reference
EXID(ID)	; -- converts external id format to internal id format ; -- we need to decide on external id format
INIDQ
FIDSTQ
FIDQ
FINDPT(FORMID)	; ; -- find patient from form id ; -- Output :Patient Name ^ PID ^ clinic Name ^ appt date/time (external) ; ^form ID ^ form status ^ DFN ^ clinic ien ^ appt date/time (fm format)
FINDIDQ
INID(ID)	; -- find internal id number from external format ; -- Input ID = form id in external format ; Output = form id in internal format or NULL if nonexistant
FSCND(ID,STAT,ERR)	; -- update form tracking file that ; -- Input ID = entry to flag as scanned (internal format) ; STAT = NEW status, 1=printed, 2=scanned,3=sent to pce okay, ; 4=pce returned err ; 11=pending pages, 12=input data error ; ERR = pce error message (required only if stat=4)
FIDST(ID)	; -- form id status ; -- Input ID = form id (internal entry number)
FID(DFN,APPT,SOURCE,FORMTYPE,CLIN)	; -- Form ID Tracking ; -- create record in the ENCOUNTER FORM TRACKING file ; and returned a unique FORM ID ; -- Input DFN = patient internal entry number ; APPT = appointment date time (fm format) ; SOURCE = the source of the form, ie ; IB = 1 ; Pandas = 2 ; Telefr = 3 ; FORMTYPE = the package form definition ID - may have been exterally assigned ; CLIN = pointer to 44 (optional)
FINDPTQ
FINDID(DFN,APPT,FORM,DUP)	; -- Find a form id for a patient and appointment ; -- input DFN = patient ; APPT = appointment date time ; FORM = (Optional) type of form, pointer to 357.95 or field 10 ; DUP = (Optional) if true, No duplicates of same form (357) ; returns last printing of same form with different ; form definitions, will also exclude nonscannable form
FSCNDQ

External References

Name	Field # of Occurrence
FILE^DICN	FID+33
^DIE	FID+42, FSCND+17
Y^DIQ	FINDPT+12
LOGERR^IBDF18E2	FID+37
DEM^VADPT	FINDPT+11
$$FMTE^XLFDT	FINDPT+16

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^IBD(357.96 - [#357.96]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(357.96	FINDPT+12
^DPT - [#2]	FINDID+16
^IBD(357.95 - [#357.95]	FID+24, FINDID+24, FINDID+26, FINDPT+13
^IBD(357.96 - [#357.96]	FID+27, FID+33, FID+42, INID+5, FIDST+12, FINDID+18, FINDID+19, FINDID+21, FINDID+23, FINDID+24 , FINDID+25, FINDID+26, FINDID+29, FINDID+30, FINDID+32, FINDPT+8
^IBD(357.97 - [#357.97]	FID+31, FID+32, FID+34*, FID+35
^IBE(357 - [#357]	FINDID+24, FINDPT+14
^SC - [#44]	FINDPT+16
^TMP("IBD-FINDID"	FINDID+29
^TMP($J	FINDID+15!, FINDID+28, FINDID+31, FINDID+33, FINDIDQ!

Label References

Name	Line Occurrences
$$EXID	FID+39
$$FINDID	FID+27
FIDQ	FID+17, FID+27, FID+37
FIDSTQ	FIDST+11, FIDST+12
FINDIDQ	FINDID+14
FINDPTQ	FINDPT+7, FINDPT+9
FSCNDQ	FSCND+11, FSCND+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	FID+43!
%H	FID+43!
%I	FID+43!
APPT	FID~, FID+17, FID+21, FID+27, FINDID~, FINDID+14, FINDID+16, FINDID+18, FINDID+23
>> C	FINDPT+12*
CLIN	FID~
CLN	FID+14~, FINDID+16*, FINDID+19, FINDID+25
D0	FID+28!
DA	FID+14~, FID+28!, FID+40, FID+43!, FSCND+9~, FSCND+16
DD	FID+28!
DFN	FID~, FID+17, FID+27, FINDID~, FINDID+14, FINDID+16, FINDID+18, FINDID+23, FINDPT+5~, FINDPT+10* , FINDPT+16
DIC	FID+14~, FID+28!, FID+29*, FID+43!, FSCND+9~
DIC(0	FID+29*
DIE	FID+14~, FID+40, FID+43!, FSCND+9~, FSCND+16
DINUM	FID+14~, FID+28!, FID+29, FID+33, FID+43!
DLAYGO	FID+14~, FID+29*, FID+43!
DO	FID+28!
DR	FID+14~, FID+41, FID+43!, FSCND+9~, FSCND+16
DUP	FINDID~, FINDID+18, FINDID+23, FINDID+33
ERR	FSCND~, FSCND+12
EXID	FID+14~, FID+15, FID+27, FID+39, FIDQ, INID+4~, INID+5, INIDQ
FORM	FINDID~, FINDID+20, FINDID+21, FINDID+27, FINDID+32, FINDID+33, FINDPT+5~, FINDPT+13*, FINDPT+14, FINDPT+17
FORMID	FID+14~, FID+37, FINDPT~, FINDPT+7, FINDPT+8, FINDPT+19
FORMID("APPT"	FID+21*
FORMID("SOURCE"	FID+21*
FORMNM	FINDPT+5~, FINDPT+14*, FINDPT+17
FORMTYPE	FID~, FID+20*, FID+24, FID+27
I	FID+14~, FSCND+9~, FIDST+9~, FINDID+12~, FINDID+21, FINDID+32, FINDPT+5~
IBI	FSCND+9~
IBNODE	FINDPT+5~, FINDPT+8*, FINDPT+9, FINDPT+10, FINDPT+12, FINDPT+13, FINDPT+16, FINDPT+17, FINDPT+19
IBXX	FINDPT+5~, FINDPT+6, FINDPT+16, FINDPT+17, FINDPT+19, FINDPTQ
ID	FID+14~, FID+15, FID+27, FID+29, FID+32, FID+33, FID+34, FID+37, FID+38, FID+39 , FID+40, FID+42, FIDQ, EXID~, EXID+2, INID~, INID+5, FSCND~, FSCND+11, FSCND+16 , FIDST~, FIDST+11, FIDST+12, FINDID+12~, FINDID+13, FINDID+20, FINDID+21, FINDID+32, FINDID+33, FINDIDQ+1
INTERNAL	FID+14~, FID+24*
J	FID+14~, FSCND+9~, FIDST+9~, FINDID+12~, FINDPT+5~
NEWDATE	FINDID+12~, FINDID+30*, FINDID+31
NODE	FID+14~
OLDDATE	FINDID+12~, FINDID+29*, FINDID+31
ORIGIN	FINDID+12~, FINDID+26, FINDID+28, FINDID+29, FINDID+31, FINDID+33
SOURCE	FID~, FID+17, FID+24
STAT	FSCND~, FSCND+12
STATNM	FINDPT+5~, FINDPT+12*, FINDPT+17
STATUS	FIDST+9~, FIDST+10, FIDST+13, FIDST+14*, FIDSTQ
SUCCESS	FSCND+9~, FSCND+10, FSCND+18, FSCNDQ
VA	FINDPT+5~
VA("PID"	FINDPT+16
VADM	FINDPT+5~
VADM(1	FINDPT+16
VAERR	FINDPT+5~
X	FID+14~, FID+29, FID+33, FSCND+9~, FIDST+9~, FIDST+12, FIDST+13, FIDST+14, FINDID+12~, FINDID+18 , FINDID+19, FINDID+20, FINDID+21, FINDID+23*, FINDID+24, FINDID+25, FINDID+26, FINDID+28, FINDID+30, FINDID+31 , FINDID+32, FINDPT+5~
Y	FID+14~, FID+33, FID+37, FSCND+9~, FIDST+9~, FINDPT+5~, FINDPT+12*

Customize PDF page

Package: Automated Information Collection System

Routine: IBDF18C

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 11

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: