Routine: ORFIMM1

Package	Total	Call Graph
PCE Patient Care Encounter	4	IMMGRP^PXAPIIM IMMROUTE^PXVRPC2 $$GETUNITS^PXVRPC4 $$ARTAPI^PXVUTIL
VA FileMan	4	CHK^DIE $$EXTERNAL^DILFD $$GET1^DIQ ^DIWP
Kernel	2	($$DT,$$FMADD,$$FMTE,$$NOW)^XLFDT ($$LJ,$$TRIM)^XLFSTR
Order Entry Results Reporting	2	(BLDDEFLS,BLDPARR,BLDPRMPT)^ORFEDT OVERDL^ORWU

Package	Total	Caller Graph
Order Entry Results Reporting	4	ORFEDT ORFIMM ORFIMM2 ORFSKT

Name	Comments	DBIA/ICR reference
BLD(RESULTS,LIST,INPUTS)	;
BLDSTRS(RESULT,CNT,PARM,TYPE,EXT,INT,PIECE,ID,NAME,LOC,DELSTR,DELSTR1,DELSTR2,MSG)	;
DOSECHK(RESULT,CNT,DELSTR,INT,ID,LOC,PIECE)	;
GETROUTE(RESULT,CNT,DEFAULT,LOCLIST)	;
GETSTOP(RESULT,CNT,DEFAULTS,ID,DATETIME,ENCTYPE)	;
GETTEXT(OUTPUT,LIST,ID,IMMNAME,TYPE,DATETIME,LOC,FORMAT)	;
FORMAT(OROUTPUT,ORLINE,ORTEXT,ORTITLE)	;
GETMAXDT()	; Get the Max date/time for the admin/read date/time fields

Name	Field # of Occurrence
CHK^DIE	BLDSTRS+8
$$EXTERNAL^DILFD	BLDSTRS+19
$$GET1^DIQ	GETTEXT+37
^DIWP	FORMAT+11
BLDDEFLS^ORFEDT	GETTEXT+3
BLDPARR^ORFEDT	BLD+16
BLDPRMPT^ORFEDT	BLD+15
OVERDL^ORWU	GETMAXDT+4
IMMGRP^PXAPIIM	GETTEXT+14
IMMROUTE^PXVRPC2	GETROUTE+3
$$GETUNITS^PXVRPC4	DOSECHK+13, DOSECHK+16, GETTEXT+47
$$ARTAPI^PXVUTIL	BLDSTRS+32
$$DT^XLFDT	GETMAXDT+7
$$FMADD^XLFDT	GETMAXDT+7
$$FMTE^XLFDT	BLDSTRS+13, GETTEXT+11, GETTEXT+19, GETTEXT+25, GETTEXT+28, GETTEXT+33
$$NOW^XLFDT	BLDSTRS+39, GETTEXT+19, GETMAXDT+6
$$LJ^XLFSTR	GETTEXT+30, GETTEXT+31, GETTEXT+33, GETTEXT+34, GETTEXT+42
$$TRIM^XLFSTR	BLDSTRS+8, DOSECHK+3

FileNo	Call Tags
^SC - [#44]	GET1^DIQ
^AUPNVIMM - [#9000010.11]	CHK^DIE, EXTERNAL^DILFD

Name	Line Occurrences (* Changed, ! Killed)
^SC - [#44]	GETTEXT+46
^UTILITY($J	FORMAT+3!, FORMAT+14, FORMAT+16, FORMAT+22!

Name	Line Occurrences
$$GETMAXDT	BLD+32
BLDSTRS	BLD+43
DOSECHK	BLDSTRS+5
FORMAT	GETTEXT+7, GETTEXT+8, GETTEXT+16, GETTEXT+17, GETTEXT+18, GETTEXT+22, GETTEXT+32, GETTEXT+53, GETTEXT+55, GETTEXT+59 , GETTEXT+60
GETTEXT	BLD+55

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ADMINDATE	BLD+1~, BLD+27, BLD+28, BLD+35*, BLD+54
CAT	BLD+1~
CNT	BLD+1~, BLD+13, BLD+24, BLD+33, BLD+43, BLD+44, BLD+47, BLD+51, BLD+54, BLD+57* , BLD+58, BLD+59, BLD+60, BLD+61, BLDSTRS~, BLDSTRS+5, BLDSTRS+9, BLDSTRS+20, BLDSTRS+24, BLDSTRS+27 , BLDSTRS+39, DOSECHK~, DOSECHK+5, DOSECHK+7, DOSECHK+9, DOSECHK+11, DOSECHK+12, DOSECHK+15, GETROUTE~, GETROUTE+10* , GETSTOP~, GETSTOP+1, GETSTOP+2
DATALST	GETROUTE+1~, GETROUTE+3
DATALST(	GETROUTE+5, GETROUTE+6, GETROUTE+7, GETROUTE+8, GETROUTE+9, GETROUTE+10
DATE	BLD+1~
DATETIME	BLD+3~, BLD+8*, BLD+54, BLD+55, GETSTOP~, GETTEXT~
DEF	GETROUTE+1~, GETROUTE+2*, GETROUTE+7, GETROUTE+8
DEFAULT	GETROUTE~
DEFAULT("ADMI	N ROUTE" , GETROUTE+2
DEFAULTS	GETSTOP~
DELSTR	BLD+2~, BLD+10, BLD+11, BLD+12, BLD+36, BLD+43, BLD+52, BLD+53, BLD+58, BLDSTRS~ , BLDSTRS+4, BLDSTRS+5, BLDSTRS+6, BLDSTRS+10, BLDSTRS+11, BLDSTRS+12, BLDSTRS+13, BLDSTRS+15, BLDSTRS+16, BLDSTRS+17* , BLDSTRS+21, BLDSTRS+22, BLDSTRS+28, BLDSTRS+29, BLDSTRS+31, BLDSTRS+40, BLDSTRS+41, BLDSTRS+42, BLDSTRS+43, BLDSTRS+44 , BLDSTRS+45, DOSECHK~, DOSECHK+14, DOSECHK+17*
DELSTR1	BLD+2~, BLD+11, BLD+43, BLD+59, BLDSTRS~, BLDSTRS+25
DELSTR2	BLD+2~, BLD+12, BLD+43, BLD+60, BLDSTRS~, BLDSTRS+28
DELSTR3	BLD+2~
DIV	GETTEXT+2~, GETTEXT+46*, GETTEXT+47
DIWF	FORMAT+1~, FORMAT+6, FORMAT+9
DIWL	FORMAT+1~, FORMAT+4*
DIWR	FORMAT+1~, FORMAT+5*
DUZ(2	GETTEXT+46
ENCTYPE	BLD+3~, BLD+8*, GETSTOP~
EXT	BLD+1~, BLD+21*, BLD+43, BLDSTRS~, BLDSTRS+4, BLDSTRS+6, BLDSTRS+8, BLDSTRS+9, BLDSTRS+10, BLDSTRS+11 , BLDSTRS+12, BLDSTRS+13, BLDSTRS+20, BLDSTRS+23, BLDSTRS+24, BLDSTRS+25, BLDSTRS+26, BLDSTRS+27, BLDSTRS+28, BLDSTRS+31 , BLDSTRS+41, BLDSTRS+43
FORMAT	GETTEXT~, GETTEXT+3, GETTEXT+4
HASERR	BLD+1~, BLD+13, BLD+19, BLD+25, BLD+34, BLD+44, BLD+46, BLD+48*, BLD+50
I	GETTEXT+2~, GETTEXT+5, GETTEXT+7, GETTEXT+8, GETTEXT+9, GETTEXT+10, GETTEXT+11, GETTEXT+16, GETTEXT+17, GETTEXT+18 , GETTEXT+19, GETTEXT+22, GETTEXT+30, GETTEXT+31, GETTEXT+32, GETTEXT+33, GETTEXT+34, GETTEXT+42, GETTEXT+44, GETTEXT+48* , GETTEXT+49, GETTEXT+52, GETTEXT+53, GETTEXT+55, GETTEXT+56, GETTEXT+58, GETTEXT+59, GETTEXT+60, GETTEXT+61, GETTEXT+62 , GETTEXT+63*, FORMAT+2~
ID	BLD+1~, BLD+5*, BLD+10, BLD+43, BLD+55, BLDSTRS~, BLDSTRS+5, BLDSTRS+31, BLDSTRS+41, DOSECHK~ , DOSECHK+13, DOSECHK+16, GETSTOP~, GETTEXT~, GETTEXT+14, GETTEXT+47
IDX	BLD+1~, BLD+19, BLD+20, BLD+57, BLD+61, BLDSTRS+1~, BLDSTRS+33, BLDSTRS+34, BLDSTRS+35, BLDSTRS+36* , BLDSTRS+37*
IMMNAME	GETTEXT~, GETTEXT+7, GETTEXT+17, GETTEXT+22
IMNAME	BLD+1~, BLD+5*, BLD+10, BLD+43, BLD+55
INPUTS	BLD~
INPUTS("DOCUMENTTYPE"	BLD+6
INPUTS("ID"	BLD+5
INPUTS("NAME"	BLD+5
INPUTS("VISITSTR"	BLD+7
INT	BLD+1~, BLD+21, BLD+27, BLD+28, BLD+32, BLD+35, BLD+36, BLD+39, BLD+40, BLD+43 , BLDSTRS~, BLDSTRS+3, BLDSTRS+4, BLDSTRS+5, BLDSTRS+6, BLDSTRS+9, BLDSTRS+10, BLDSTRS+11, BLDSTRS+15, BLDSTRS+16 , BLDSTRS+17, BLDSTRS+19, BLDSTRS+20, BLDSTRS+21, BLDSTRS+22, BLDSTRS+29, BLDSTRS+31, BLDSTRS+32, BLDSTRS+39, BLDSTRS+40 , BLDSTRS+41, BLDSTRS+42, BLDSTRS+44, BLDSTRS+45, DOSECHK~, DOSECHK+2, DOSECHK+3, DOSECHK+5, DOSECHK+7, DOSECHK+9 , DOSECHK+10, DOSECHK+11, DOSECHK+12, DOSECHK+14, DOSECHK+15, DOSECHK+17
ISLOC	GETROUTE+1~, GETROUTE+4, GETROUTE+7, GETROUTE+8*, GETROUTE+9
J	GETTEXT+2~, FORMAT+2~
LIST	BLD~, BLD+55, GETTEXT~, GETTEXT+3, GETTEXT+4
LIST(	BLD+19, BLD+20
LOC	BLD+3~, BLD+8, BLD+43, BLD+55, BLDSTRS~, BLDSTRS+5, DOSECHK~, DOSECHK+13, DOSECHK+16, GETTEXT~ , GETTEXT+37, GETTEXT+46
LOCLIST	GETROUTE~
LOCLIST(	GETROUTE+9*
MSG	BLD+1~, BLD+43, BLDSTRS~
MSG(	BLD+61, BLDSTRS+34, BLDSTRS+35, BLDSTRS+36, BLDSTRS+37
MSG(""	BLDSTRS+33
NAME	BLD+1~, BLD+21*, BLD+22, BLDSTRS~, BLDSTRS+31, BLDSTRS+41
NODE	BLD+1~, BLD+20*, BLD+21, BLD+23, GETTEXT+2~
NOTEARR	BLD+1~, BLD+55
NOTEARR(	BLD+57
NOTEINP	BLD+1~
ORGRPS	GETTEXT+2~, GETTEXT+14
ORGRPS("VG"	GETTEXT+15
ORINDENT	FORMAT+1~, FORMAT+8, FORMAT+9, FORMAT+17, FORMAT+18, FORMAT+19
ORLINE	FORMAT~, FORMAT+15*, FORMAT+20
ORLOT	BLD+3~, BLD+40*, BLD+46
ORMAXDT	GETMAXDT+1~, GETMAXDT+6, GETMAXDT+7, GETMAXDT+8
OROUTPUT	FORMAT~
OROUTPUT(	FORMAT+20*
OROVERDL	GETMAXDT+1~, GETMAXDT+3*, GETMAXDT+4, GETMAXDT+7
ORTEXT	FORMAT~, FORMAT+10, FORMAT+16, FORMAT+18, FORMAT+20
ORTITLE	FORMAT~, FORMAT+7, FORMAT+8, FORMAT+18
ORX	FORMAT+1~, FORMAT+13, FORMAT+14, FORMAT+16
OUTPUT	GETTEXT~, GETTEXT+7, GETTEXT+8, GETTEXT+16, GETTEXT+17, GETTEXT+18, GETTEXT+22, GETTEXT+32, GETTEXT+53, GETTEXT+55 , GETTEXT+59, GETTEXT+60
OUTPUT(	GETTEXT+9, GETTEXT+10, GETTEXT+11, GETTEXT+19, GETTEXT+30, GETTEXT+31, GETTEXT+33, GETTEXT+34, GETTEXT+42, GETTEXT+44 , GETTEXT+48, GETTEXT+49, GETTEXT+52, GETTEXT+56, GETTEXT+58, GETTEXT+61, GETTEXT+62, GETTEXT+63
PARM	BLD+1~, BLD+22*, BLD+23, BLD+24, BLD+26, BLD+30, BLD+31, BLD+38, BLD+41, BLD+42 , BLD+43, BLDSTRS~, BLDSTRS+2, BLDSTRS+4, BLDSTRS+5, BLDSTRS+6, BLDSTRS+7, BLDSTRS+11, BLDSTRS+12, BLDSTRS+13 , BLDSTRS+14, BLDSTRS+18, BLDSTRS+22, BLDSTRS+23, BLDSTRS+26, BLDSTRS+29, BLDSTRS+30, BLDSTRS+38, BLDSTRS+41, BLDSTRS+42 , BLDSTRS+43, BLDSTRS+44, BLDSTRS+45
PARR	BLD+1~, BLD+16
PARR(	BLD+22
PIECE	BLD+2~, BLD+31, BLD+36, BLD+42, BLD+43, BLDSTRS~, BLDSTRS+4, BLDSTRS+5, BLDSTRS+6, BLDSTRS+10 , BLDSTRS+11, BLDSTRS+12, BLDSTRS+13, BLDSTRS+15, BLDSTRS+21, BLDSTRS+22, BLDSTRS+29, BLDSTRS+40, DOSECHK~, DOSECHK+14 , DOSECHK+17
PRMPTS	BLD+1~, BLD+15
PRMPTS(	BLD+31, BLD+42
PRMPTS("pnumIMMVIS"	BLD+52
RESULT	BLDSTRS~, BLDSTRS+5, DOSECHK~, GETROUTE~, GETSTOP~
RESULT(	BLDSTRS+9, BLDSTRS+20, BLDSTRS+24, BLDSTRS+27, BLDSTRS+39, DOSECHK+5, DOSECHK+7, DOSECHK+9, DOSECHK+11, DOSECHK+12 , DOSECHK+15, GETROUTE+10, GETSTOP+1, GETSTOP+2
RESULTS	BLD~, BLD+43
RESULTS(	BLD+24, BLD+33, BLD+44, BLD+47, BLD+54, BLD+57, BLD+58, BLD+59, BLD+60, BLD+61*
TEMP	BLDSTRS+1~, BLDSTRS+8, BLDSTRS+9, BLDSTRS+19, BLDSTRS+20, DOSECHK+1~, DOSECHK+7, DOSECHK+11, DOSECHK+12, DOSECHK+13* , DOSECHK+14, DOSECHK+16!, DOSECHK+17, GETTEXT+2~, GETTEXT+15, GETTEXT+16, GETTEXT+21, GETTEXT+22, GETTEXT+23, GETTEXT+25* , GETTEXT+26, GETTEXT+27, GETTEXT+28, GETTEXT+30, GETTEXT+39, GETTEXT+41, GETTEXT+42, GETTEXT+47, GETTEXT+48, FORMAT+2~
TEMPARR	GETTEXT+2~, GETTEXT+3, GETTEXT+4*, FORMAT+2~
TEMPARR("ADMI	N ROUTE" , GETTEXT+44, N SITE" , GETTEXT+44
TEMPARR("COMMENTS"	GETTEXT+18, GETTEXT+59
TEMPARR("CONTRAINDICATED"	GETTEXT+8
TEMPARR("CVXONLY"	GETTEXT+12, GETTEXT+13
TEMPARR("DOSE"	GETTEXT+45, GETTEXT+48
TEMPARR("ENCO	UNTER PROVIDER" , GETTEXT+57, GETTEXT+58
TEMPARR("EXPI	RATION DATE" , GETTEXT+33
TEMPARR("INFO	SOURCE" , GETTEXT+49
TEMPARR("LOCATION"	GETTEXT+39
TEMPARR("LOT	NUMBER" , GETTEXT+33, GETTEXT+34
TEMPARR("MANUFACTURER"	GETTEXT+32
TEMPARR("ORDE	RING PROVIDER" , GETTEXT+56
TEMPARR("OVER	RIDE REASON" , GETTEXT+60
TEMPARR("PLAC	EMENT IEN" , GETTEXT+61
TEMPARR("READING"	GETTEXT+61
TEMPARR("REFUSAL"	GETTEXT+9
TEMPARR("RESULTS"	GETTEXT+62
TEMPARR("SERIES"	GETTEXT+31
TEMPARR("STOP"	GETTEXT+10
TEMPARR("VIS	OFFERED" , GETTEXT+51, GETTEXT+53, GETTEXT+54, GETTEXT+55
TEMPARR("VISI	T DATE TIME" , GETTEXT+25, GETTEXT+26, GETTEXT+27, GETTEXT+28
TEMPARR("WARN"	GETTEXT+11
TYPE	BLD+3~, BLD+6*, BLD+10, BLD+11, BLD+12, BLD+33, BLD+36, BLD+39, BLD+40, BLD+43 , BLD+46, BLD+53, BLD+55, BLDSTRS~, BLDSTRS+22, GETTEXT~, GETTEXT+6, GETTEXT+8, GETTEXT+9, GETTEXT+12 , GETTEXT+21, GETTEXT+23, GETTEXT+24, GETTEXT+28, GETTEXT+39, GETTEXT+56, GETTEXT+58
U	BLD+10, BLD+11, BLD+12, BLD+21, BLD+36, BLD+44, BLD+52, BLD+53, BLD+54, BLD+57 , BLD+58, BLD+59, BLD+60, BLD+61, BLDSTRS+4, BLDSTRS+6, BLDSTRS+10, BLDSTRS+11, BLDSTRS+12, BLDSTRS+13 , BLDSTRS+15, BLDSTRS+16, BLDSTRS+17, BLDSTRS+21, BLDSTRS+22, BLDSTRS+25, BLDSTRS+28, BLDSTRS+29, BLDSTRS+31, BLDSTRS+40 , BLDSTRS+41, BLDSTRS+42, BLDSTRS+43, BLDSTRS+44, BLDSTRS+45, DOSECHK+14, DOSECHK+17, GETROUTE+6, GETROUTE+7, GETROUTE+8 , GETROUTE+9, GETROUTE+10, GETSTOP+1, GETSTOP+2, GETTEXT+8, GETTEXT+9, GETTEXT+10, GETTEXT+11, GETTEXT+12, GETTEXT+13 , GETTEXT+18, GETTEXT+25, GETTEXT+26, GETTEXT+27, GETTEXT+28, GETTEXT+31, GETTEXT+32, GETTEXT+33, GETTEXT+34, GETTEXT+39 , GETTEXT+44, GETTEXT+45, GETTEXT+46, GETTEXT+48, GETTEXT+49, GETTEXT+53, GETTEXT+55, GETTEXT+56, GETTEXT+57, GETTEXT+58 , GETTEXT+59, GETTEXT+60, GETTEXT+61, GETTEXT+62
VIS	BLD+1~, BLD+18, BLD+27, BLD+28*, BLD+52
VISCNT	BLD+1~, BLD+18, GETTEXT+2~, GETTEXT+54, GETTEXT+55
VISITSTR	BLD+3~, BLD+7*, BLD+8
X	BLD+2~, GETROUTE+1~, GETROUTE+5, GETROUTE+6, GETROUTE+7, GETROUTE+8, GETROUTE+9, GETROUTE+10, FORMAT+1~, FORMAT+10
XLOC	GETTEXT+2~, GETTEXT+38, GETTEXT+39, GETTEXT+41, GETTEXT+42

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORFIMM1

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 4

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: