Routine: PSOTRI

Package	Total	Call Graph
Outpatient Pharmacy	5	($$BYPASS,$$DOS,$$LSTRFL)^PSOBPSU1 $$ECMENUM^PSOBPSU2 $$RXSITE^PSOBPSUT $$TRIC^PSOREJP1 $$PSOET^PSOREJP3
Kernel	2	$$NOW^XLFDT BMES^XPDUTL
VA FileMan	2	UPDATE^DIE GETS^DIQ
E Claims Management Engine	1	DUR1^BPSNCPD3

Package	Total	Caller Graph
Outpatient Pharmacy	6	PSOBORP2 PSOREJP2 PSOREJP3 PSOREJU1 PSOREJU3 PSORXPA1
E Claims Management Engine	1	BPSECMP2

Entry Points

Name	Comments	DBIA/ICR reference
AUDIT(RX,RFL,RXCOB,JST,AUD,ELIG)	; ; Main entry to create a new record in the PSO AUDIT LOG file #52.87 ; Note that AUDIT^PSOTRI is called by ECME (BPSECMP2) - ICR 6156 ; INPUT: RX (r) = Prescription IEN ; RFL (o) = Prescription Fill # (Default is original zero fill) ; RXCOB (o) = Coordination of Benefits ; 1 = Primary (Default) ; 2 = Secondary ; JST (o) = Justification text ; AUD (r) = Audit Type ; R = NCPDP REJECT - Associated with an Override audit action ; N = NON BILLABLE - Associated with an Override audit action ; I = INPATIENT - Associated with a Bypass audit action ; P = PARTIAL FILL ; ELIG (r) = Eligibility Type ; T = TRICARE ; C = CHAMPVA ; RETURN: Successful Audit entry will return the IEN of the new entry in file 52.87 ; Unsuccessful Audit entry will return "0^Error Description"	ICR #6156 Status: Active Usage: Private

Name

Comments

DBIA/ICR reference

;
; Main entry to create a new record in the PSO AUDIT LOG file #52.87
; Note that AUDIT^PSOTRI is called by ECME (BPSECMP2) - ICR 6156
; INPUT: RX (r) = Prescription IEN
; RFL (o) = Prescription Fill # (Default is original zero fill)
; RXCOB (o) = Coordination of Benefits
; 1 = Primary (Default)
; 2 = Secondary
; JST (o) = Justification text
; AUD (r) = Audit Type
; R = NCPDP REJECT - Associated with an Override audit action
; N = NON BILLABLE - Associated with an Override audit action
; I = INPATIENT - Associated with a Bypass audit action
; P = PARTIAL FILL
; ELIG (r) = Eligibility Type
; T = TRICARE
; C = CHAMPVA
; RETURN: Successful Audit entry will return the IEN of the new entry in file 52.87
; Unsuccessful Audit entry will return "0^Error Description"

ICR #6156

Status: Active

Usage: Private

Name	Field # of Occurrence
DUR1^BPSNCPD3	AUDIT+137
UPDATE^DIE	AUDIT+146
GETS^DIQ	AUDIT+55, AUDIT+57, AUDIT+85
$$BYPASS^PSOBPSU1	AUDIT+68
$$DOS^PSOBPSU1	AUDIT+65
$$LSTRFL^PSOBPSU1	AUDIT+26
$$ECMENUM^PSOBPSU2	AUDIT+61
$$RXSITE^PSOBPSUT	AUDIT+59
$$TRIC^PSOREJP1	AUDIT+37
$$PSOET^PSOREJP3	AUDIT+138
$$NOW^XLFDT	AUDIT+63
BMES^XPDUTL	AUDIT+147

FileNo	Call Tags
^PSRX - [#52]	GETS^DIQ
52.1	GETS^DIQ
52.2	GETS^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^PS(52.87 - [#52.87]	AUDIT+71
^PSRX - [#52]	AUDIT+24, AUDIT+29, AUDIT+79

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AUD	AUDIT~, AUDIT+40, AUDIT+68, AUDIT+74, AUDIT+125
DFN	AUDIT+21~
DUZ	AUDIT+67
ELIG	AUDIT~, AUDIT+32, AUDIT+35, AUDIT+68, AUDIT+135
FN	AUDIT+20~, AUDIT+45*, AUDIT+91, AUDIT+93, AUDIT+94, AUDIT+96, AUDIT+100, AUDIT+102, AUDIT+104, AUDIT+107 , AUDIT+109, AUDIT+111, AUDIT+113, AUDIT+115, AUDIT+117, AUDIT+119, AUDIT+121, AUDIT+123, AUDIT+125, AUDIT+127 , AUDIT+129, AUDIT+131, AUDIT+133, AUDIT+135
I	AUDIT+21~, AUDIT+142*
JST	AUDIT~, AUDIT+68, AUDIT+133
PDDATE	AUDIT+22~, AUDIT+79*
PFARR	AUDIT+22~
PFARR(	AUDIT+86, AUDIT+91, AUDIT+93
PFFLDS	AUDIT+22~, AUDIT+84*, AUDIT+85
PFIEN	AUDIT+22~, AUDIT+79*
PSOAIEN	AUDIT+21~, AUDIT+71*, AUDIT+107
PSODIV	AUDIT+20~, AUDIT+59*, AUDIT+115
PSODOA	AUDIT+21~, AUDIT+63*, AUDIT+79, AUDIT+129
PSODOS	AUDIT+21~, AUDIT+65*, AUDIT+131
PSOERR	AUDIT+21~, AUDIT+137
PSOERR("DIERR"	AUDIT+147
PSOET	AUDIT+20~, AUDIT+138*, AUDIT+139
PSOFDA	AUDIT+20~
PSOFDA(	AUDIT+91, AUDIT+93, AUDIT+94, AUDIT+96, AUDIT+100, AUDIT+102, AUDIT+104, AUDIT+107, AUDIT+109, AUDIT+111 , AUDIT+113, AUDIT+115, AUDIT+117, AUDIT+119, AUDIT+121, AUDIT+123, AUDIT+125, AUDIT+127, AUDIT+129, AUDIT+131 , AUDIT+133, AUDIT+135, AUDIT+144*
PSOIEN	AUDIT+20~, AUDIT+70*, AUDIT+91, AUDIT+93, AUDIT+94, AUDIT+96, AUDIT+100, AUDIT+102, AUDIT+104, AUDIT+107 , AUDIT+109, AUDIT+111, AUDIT+113, AUDIT+115, AUDIT+117, AUDIT+119, AUDIT+121, AUDIT+123, AUDIT+125, AUDIT+127 , AUDIT+129, AUDIT+131, AUDIT+133, AUDIT+135, AUDIT+143
PSOIENS	AUDIT+20~, AUDIT+143*, AUDIT+144
PSOPFIEN	AUDIT+22~, AUDIT+78, AUDIT+79, AUDIT+81, AUDIT+85, AUDIT+86, AUDIT+91, AUDIT+93
PSOPHRM	AUDIT+21~
PSOQTY	AUDIT+21~, AUDIT+86, AUDIT+96, AUDIT+98, AUDIT+104, AUDIT+121
PSOREJ	AUDIT+21~, AUDIT+137
PSOREJ(	AUDIT+140*, AUDIT+141, AUDIT+142
PSOTC	AUDIT+20~, AUDIT+37, AUDIT+139, AUDIT+140
PSOTRIC	AUDIT+20~, AUDIT+37*, AUDIT+139
PSOUNITCOST	AUDIT+22~, AUDIT+89*, AUDIT+96
PSOUSER	AUDIT+20~, AUDIT+67, AUDIT+68, AUDIT+127
PSOX	AUDIT+21~, AUDIT+142*, AUDIT+144
PSOY	AUDIT+21~, AUDIT+142, AUDIT+143
RFL	AUDIT~, AUDIT+26*, AUDIT+29, AUDIT+37, AUDIT+57, AUDIT+59, AUDIT+61, AUDIT+65, AUDIT+98, AUDIT+100 , AUDIT+102, AUDIT+111, AUDIT+137, AUDIT+138
RFLARR	AUDIT+21~
RFLARR(	AUDIT+98, AUDIT+100, AUDIT+102
RFLFLDS	AUDIT+20~, AUDIT+52*, AUDIT+57
RX	AUDIT~, AUDIT+24, AUDIT+26, AUDIT+29, AUDIT+37, AUDIT+55, AUDIT+57, AUDIT+59, AUDIT+61, AUDIT+65 , AUDIT+79, AUDIT+85, AUDIT+86, AUDIT+89, AUDIT+91, AUDIT+93, AUDIT+94, AUDIT+98, AUDIT+100, AUDIT+102 , AUDIT+104, AUDIT+109, AUDIT+113, AUDIT+117, AUDIT+123, AUDIT+137, AUDIT+138
RXARR	AUDIT+21~
RXARR(52	AUDIT+89, AUDIT+94, AUDIT+98, AUDIT+100, AUDIT+102, AUDIT+104, AUDIT+113, AUDIT+117, AUDIT+123
RXCOB	AUDIT~, AUDIT+43*, AUDIT+137, AUDIT+140, AUDIT+141, AUDIT+142
RXECME	AUDIT+20~, AUDIT+61*, AUDIT+119
RXFLDS	AUDIT+20~, AUDIT+49*, AUDIT+55
SFN	AUDIT+20~, AUDIT+45*, AUDIT+144
U	AUDIT+71, AUDIT+79

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOTRI

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 7

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Local Variables

Legend: