Routine: ORWDBA2

Information

ORWDBA2 ; SLC/GDU - Billing Awareness - Phase I [11/26/04 15:43]

Source Information

Source file <ORWDBA2.m>

Call Graph

Call Graph Total: 8

Package	Total	Call Graph
VA Fileman	5	NOW^%DTC FIND^DIC (FILE,UPDATE)^DIE FDA^DILF ($$GET1,GETS)^DIQ
DRG Grouper	2	$$STATCHK^ICDAPIU $$ICDDX^ICDCODE
Kernel	1	$$NOW^XLFDT

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Order Entry Results Reporting	1	ORWDBA4

Entry Points

Name	Comments	DBIA/ICR reference
CI(CNT)	;Counter Incrementer ; CNT - Counter
GETDUDC(Y,ORCIEN,ORPTIEN)	;Get Day's Unique Diagnoses Codes
ADDPDL(Y,ORCIEN,ORDXA)	;Add to Personal Diagnosis List
SETDXD(X)	;Set upper case diagnosis discription to mixed case
GETPDL(Y,ORCIEN)	;Get Personal Diagnosis List
F24HA()	;Returns date and time from exactly 24 hours ago
SETDXC(X)	;Set diagnosis code variable for sorting
SETDXI(X)	;Set the diagnosis inactive indicator
ERRMSG(MT)	;Display Error Message ; to be determined
DELPDL(Y,ORCIEN,ORDXA)	;Delete from Personal Diagnosis List

External References

Name	Field # of Occurrence
NOW^%DTC	F24HA+2
FIND^DIC	ADDPDL+32
FILE^DIE	ADDPDL+47, DELPDL+21
UPDATE^DIE	ADDPDL+42
FDA^DILF	ADDPDL+41, ADDPDL+46, DELPDL+20
$$GET1^DIQ	GETDUDC+45
GETS^DIQ	ADDPDL+22, DELPDL+15, GETPDL+23, GETDUDC+37
$$STATCHK^ICDAPIU	GETPDL+32, GETDUDC+48
$$ICDDX^ICDCODE	GETPDL+29, GETPDL+30, GETDUDC+47
$$NOW^XLFDT	GETPDL+22

RPC Name	Call Tags
ORWDBA2 GETPDL	GETPDL
ORWDBA2 ADDPDL	ADDPDL
ORWDBA2 DELPDL	DELPDL
ORWDBA2 GETDUDC	GETDUDC

FileNo	Call Tags
^OR(100 - [#100]	GETS^DIQ
^VA(200 - [#200]	GETS^DIQ
200.0351	FDA^DILF
^ICD9 - [#80]	FIND^DIC, GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^OR(100 - [#100]	GETDUDC+33, GETDUDC+34, GETDUDC+35

Name	Line Occurrences
$$F24HA	GETDUDC+32
$$SETDXC	GETPDL+28, GETDUDC+46
$$SETDXD	GETPDL+29, GETPDL+30, GETDUDC+47
$$SETDXI	GETPDL+32, GETDUDC+48

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	F24HA+1~, F24HA+3
%H	F24HA+1~
%I	F24HA+1~
CKDATE	GETDUDC+29~, GETDUDC+32*, GETDUDC+33
CNT	CI~, CI+2*
DXC	GETPDL+21~, GETPDL+25, GETPDL+28, GETPDL+33, GETDUDC+29~, GETDUDC+41, GETDUDC+46, GETDUDC+49
DXD	GETPDL+21~, GETPDL+25, GETPDL+29, GETPDL+30, GETPDL+31, GETPDL+33, GETDUDC+29~, GETDUDC+41, GETDUDC+47, GETDUDC+49
DXDT	GETPDL+21~, GETPDL+22*, GETPDL+29, GETPDL+30, GETPDL+32
DXEM	GETDUDC+29~
DXI	ADDPDL+19~, ADDPDL+24, ADDPDL+26, ADDPDL+29, ADDPDL+32, ADDPDL+37, ADDPDL+44, ADDPDL+46, DELPDL+14~, DELPDL+18* , DELPDL+19, GETPDL+21~, GETPDL+25, GETPDL+32, GETPDL+33, GETDUDC+29~, GETDUDC+41, GETDUDC+48, GETDUDC+49
DXIEN	ADDPDL+19~, ADDPDL+34, ADDPDL+37, ADDPDL+41, GETDUDC+29~, GETDUDC+32, GETDUDC+41, GETDUDC+44*, GETDUDC+45
DXRF	GETDUDC+29~
EM	ADDPDL+19~, ADDPDL+29, ADDPDL+30!, ADDPDL+48, DELPDL+14~, GETPDL+21~
FDA	DELPDL+14~
FDXR	ADDPDL+19~, ADDPDL+30!
FDXR("DILIST"	ADDPDL+33, ADDPDL+34, ADDPDL+35, ADDPDL+36, ADDPDL+37
FDXRI	ADDPDL+19~, ADDPDL+36*, ADDPDL+37
ICD9	GETPDL+21~, GETPDL+25, GETPDL+27, GETPDL+28, GETPDL+29, GETPDL+30, GETPDL+32, GETPDL+33, GETDUDC+29~, GETDUDC+41* , GETDUDC+45*, GETDUDC+46, GETDUDC+47, GETDUDC+48, GETDUDC+49
IEN	ADDPDL+19~, ADDPDL+39!, ADDPDL+40, ADDPDL+41, ADDPDL+45, ADDPDL+46, DELPDL+14~, DELPDL+17, DELPDL+19, DELPDL+20 , GETPDL+21~, GETPDL+25, GETPDL+26, GETPDL+27, GETPDL+29, GETPDL+30, GETPDL+31, GETDUDC+29~, GETDUDC+38, GETDUDC+39 , GETDUDC+41, GETDUDC+42, GETDUDC+43, GETDUDC+44
IEN(1	ADDPDL+45
MT	ERRMSG~
OBJORD	GETDUDC+29~, GETDUDC+31*, GETDUDC+33, GETDUDC+34, GETDUDC+35
ORCIEN	ADDPDL~, ADDPDL+22, ADDPDL+40, ADDPDL+45, DELPDL~, DELPDL+15, GETPDL~, GETPDL+23, GETDUDC~, GETDUDC+39
ORDATE	GETDUDC+29~, GETDUDC+32, GETDUDC+33, GETDUDC+47, GETDUDC+48
ORDG	GETDUDC+29~, GETDUDC+32, GETDUDC+34, GETDUDC+35
ORDXA	ADDPDL~, ADDPDL+27, DELPDL~
ORDXA(	ADDPDL+24, ADDPDL+26!, ADDPDL+29, ADDPDL+32, ADDPDL+37, ADDPDL+44, ADDPDL+46, DELPDL+18, DELPDL+19
OREM	GETDUDC+29~, GETDUDC+36!
ORIEN	GETDUDC+30~, GETDUDC+32, GETDUDC+35, GETDUDC+37
ORPTIEN	GETDUDC~, GETDUDC+31
ORRF	GETDUDC+30~, GETDUDC+36!
ORRF(	GETDUDC+40, GETDUDC+42, GETDUDC+43, GETDUDC+44
ORRF(100	GETDUDC+38, GETDUDC+39
PDL	ADDPDL+19~, ADDPDL+23
PDL(	ADDPDL+25, ADDPDL+26
PDLI	ADDPDL+19~, ADDPDL+25*, ADDPDL+26
RCODI	GETDUDC+30~, GETDUDC+32, GETDUDC+33, GETDUDC+34, GETDUDC+35
RF	DELPDL+14~, DELPDL+16, GETPDL+21~, GETPDL+24
RF(	DELPDL+17, DELPDL+19, GETPDL+26, GETPDL+27, GETPDL+29, GETPDL+30, GETPDL+31
SUBFILE	GETDUDC+30~
U	ADDPDL+26, ADDPDL+32, ADDPDL+33, ADDPDL+34, ADDPDL+35, ADDPDL+37, ADDPDL+44, ADDPDL+46, GETPDL+29, GETPDL+30 , GETPDL+33, GETDUDC+47, GETDUDC+49, SETDXI+1
X	SETDXC~, SETDXC+1, SETDXD~, SETDXD+2, SETDXD+3, SETDXD+4, SETDXD+6, SETDXD+7, SETDXI~, SETDXI+1* , F24HA+1~
X1	SETDXD+1~, SETDXD+2*, SETDXD+3, SETDXD+4, SETDXD+6
X2	SETDXD+1~, SETDXD+4, SETDXD+5, SETDXD+6
Y	ADDPDL~, ADDPDL+27, ADDPDL+48, ADDPDL+49, DELPDL~, DELPDL+16, DELPDL+22, GETPDL~, GETPDL+34, GETDUDC~
Y(	GETPDL+33, GETDUDC+49

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORWDBA2

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Used in RPC

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: