Routine: PSOREJP5

Information

PSOREJP5 ;ALB/BNT - Third Party Reject Additional Reject Information Screen ;02/14/11

Package	Total	Call Graph
Outpatient Pharmacy	4	(SET,SETLN)^PSOREJP1 $$RXINFO^PSOREJP3 BPSRESP^PSOREJP6 ($$DVINFO,$$PTINFO)^PSOREJU2
List Manager	3	EN^VALM FULL^VALM1 (CNTRL,RESTORE,SAVE)^VALM10
E Claims Management Engine	2	($$ADDFLDS,$$NFLDT)^BPSBUTL DURRESP^BPSNCPD3
Kernel	2	$$FMTE^XLFDT DISP^XQORM1
VA FileMan	1	$$GET1^DIQ

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 8

Package	Total	Caller Graph
Outpatient Pharmacy	7	PSO REJECT DISPLAY ADDITIONAL INFO PSO REJECT DISPLAY ADDTNL INFO PSOREJP1 PSOREJP2 PSOREJP3 PSOREJP6 PSOREJU3
Kernel	1	^ORD(101

Entry Points

Name	Comments	DBIA/ICR reference
EN	; -- main entry point for PSO REJECT DISPLAY ADDTNL INFO
ADDTXT	; Entry point for DUR Hidden action
ISDUR(RX,REJ)	; ; Returns 1 if there is DUR PPS RESPONSE data for the reject
HDR	; -- header code
INIT	; -- init variables and list array
LABEL(FIELD)	; Sets the label for the field
SET(FIELD,L,UND,TXT)	; Sets the lines for fields that require text wrapping
SETLN(TEXT,REV,UND,HIG)	; Sets a line to be displayed in the Body section
RXCOB(RX,REJ)	; Return the COB Indicator for the reject ; Input: RX = RX IEN ; REJ = Reject Info multiple IEN
RESPIEN(RX,REJ)	; Return the RESPONSE ID from the Reject Info multiple ; Input: RX = RX IEN ; REJ = Reject Info multiple IEN
HELP	; -- help code
EXIT	; -- exit code
EXPND	; -- expand code
REJ	; - DUR Information - called from REJ^PSOREJP1 ; this code moved from PSOREJP1, routine was too large
PSOETEC(RX,FILL)	; Returns flag for TRICARE or CHAMPVA non-billable claims

External References

Name	Field # of Occurrence
$$ADDFLDS^BPSBUTL	REJ+5
$$NFLDT^BPSBUTL	REJ+3
DURRESP^BPSNCPD3	ISDUR+9, INIT+7
$$GET1^DIQ	ADDTXT+3, RXCOB+6, RESPIEN+5, PSOETEC+10, PSOETEC+15
SET^PSOREJP1	REJ+21, REJ+22, REJ+24
SETLN^PSOREJP1	REJ+4, REJ+6, REJ+7, REJ+8, REJ+9, REJ+10, REJ+11, REJ+12, REJ+13, REJ+14 , REJ+15, REJ+16, REJ+17, REJ+18, REJ+19, REJ+25
$$RXINFO^PSOREJP3	HDR+6, HDR+7
BPSRESP^PSOREJP6	INIT+21
$$DVINFO^PSOREJU2	HDR+2
$$PTINFO^PSOREJU2	HDR+3
EN^VALM	EN+1
FULL^VALM1	ADDTXT+4
CNTRL^VALM10	SETLN+9, SETLN+10, SETLN+11, SETLN+13
RESTORE^VALM10	INIT+2
SAVE^VALM10	SETLN+6
$$FMTE^XLFDT	REJ+4, REJ+11, REJ+12, REJ+23
DISP^XQORM1	HELP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Routine Call	VALM Line Location: EN+1

FileNo	Call Tags
52.25	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PSRX - [#52]	PSOETEC+6, PSOETEC+9, PSOETEC+11, PSOETEC+14
^TMP("PSOREJP2"	INIT+3!, SETLN+4*

Label References

Name	Line Occurrences
$$LABEL	INIT+13, INIT+16, INIT+17, INIT+19, INIT+27, INIT+28, INIT+29, INIT+30, INIT+31, INIT+36 , INIT+38, INIT+39, INIT+40, INIT+41, SET+2, SET+4
$$RESPIEN	ISDUR+5, INIT+4
$$RXCOB	ISDUR+7, INIT+6
EN	ADDTXT+5
SET	INIT+13, INIT+16, INIT+19, INIT+27, INIT+28, INIT+29, INIT+30, INIT+31, INIT+36, INIT+38 , INIT+39, INIT+40, INIT+41
SETLN	INIT+9, INIT+10, INIT+12, INIT+15, INIT+26, SET+2, SET+4, SET+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ADDREJ	INIT+1~, INIT+7
ADDREJ(	INIT+8, INIT+13, INIT+16, INIT+18, INIT+19, INIT+24, INIT+27, INIT+28, INIT+29, INIT+30 , INIT+31, INIT+35, INIT+38, INIT+39, INIT+40, INIT+41
DATA	INIT+1~
DATA(	REJ+23
DURIEN	ISDUR+4~, ISDUR+5, ISDUR+6, ISDUR+9, INIT+1~, INIT+4, INIT+5, INIT+7, INIT+21
DURPPS	ISDUR+4~, ISDUR+9
DURPPS(	ISDUR+10
FIELD	LABEL~, LABEL+1, LABEL+2, LABEL+3, LABEL+4, LABEL+5, LABEL+6, LABEL+7, LABEL+8, LABEL+9 , LABEL+10, LABEL+11, LABEL+12, LABEL+13, LABEL+14, LABEL+15, LABEL+16, LABEL+17, LABEL+18, LABEL+19 , LABEL+20, LABEL+21, LABEL+22, LABEL+23, LABEL+24, LABEL+25, LABEL+26, LABEL+27, LABEL+28, LABEL+29 , SET~, SET+2, SET+4
FILL	ADDTXT+2~, ADDTXT+3*, HDR+2, HDR+6, HDR+7, REJ+3, REJ+5, PSOETEC~
HIG	SETLN~, SETLN+12, SETLN+13
I	INIT+1~, INIT+2, INIT+18, INIT+19, SET+1~, SET+3*, SET+4
>> IOINHI	SETLN+13
>> IOINORM	SETLN+9, SETLN+10, SETLN+11, SETLN+13
>> IORVON	SETLN+9
>> IOUON	SETLN+10, SETLN+11, SETLN+13
L	SET~, SET+2, SET+4, SET+5
LASTLN	ADDTXT+2~, INIT+2, SETLN+6*
LINE	INIT+1~, INIT+3, INIT+42, SETLN+4, SETLN+6, SETLN+9, SETLN+10, SETLN+11, SETLN+13
LINE1	HDR+1~
LINE2	HDR+1~
NDX	INIT+1~, INIT+23, INIT+24, INIT+27, INIT+28, INIT+29, INIT+30, INIT+31, INIT+35, INIT+38 , INIT+39, INIT+40, INIT+41
>> PFLDT	REJ+23*, REJ+24, REJ+25
>> PSOADD	REJ+5*, REJ+6, REJ+7, REJ+8, REJ+9, REJ+10, REJ+11, REJ+12, REJ+13, REJ+14 , REJ+15, REJ+16, REJ+17, REJ+18, REJ+19
>> PSOCOB	REJ+5
>> PSONAF	REJ+3*, REJ+4
PSOQ	PSOETEC+4~, PSOETEC+6, PSOETEC+8, PSOETEC+10, PSOETEC+11, PSOETEC+13, PSOETEC+15
PSRXIEN	PSOETEC+4~, PSOETEC+7, PSOETEC+9, PSOETEC+10, PSOETEC+12, PSOETEC+14, PSOETEC+15
PTINFO	HDR+1~, HDR+3*, HDR+4, HDR+5
QPF	INIT+25~, INIT+34, INIT+35, INIT+36
REJ	ADDTXT+3, ISDUR~, ISDUR+3, ISDUR+5, ISDUR+7, HDR+7, INIT+4, INIT+6, RXCOB~, RXCOB+4 , RXCOB+6, RESPIEN~, RESPIEN+4, RESPIEN+5, REJ+23
REV	SETLN~, SETLN+8
RX	ADDTXT+3, ISDUR~, ISDUR+2, ISDUR+5, ISDUR+7, HDR+2, HDR+3, HDR+6, HDR+7, INIT+4 , INIT+6, RXCOB~, RXCOB+3, RXCOB+6, RESPIEN~, RESPIEN+3, RESPIEN+5, REJ+3, REJ+5, PSOETEC~ , PSOETEC+5, PSOETEC+6, PSOETEC+9, PSOETEC+10, PSOETEC+11, PSOETEC+14, PSOETEC+15
RXCOB	ISDUR+4~, ISDUR+7, ISDUR+8, ISDUR+9, ISDUR+10, INIT+1~, INIT+6, INIT+7, INIT+8, INIT+13 , INIT+16, INIT+18, INIT+19, INIT+24, INIT+27, INIT+28, INIT+29, INIT+30, INIT+31, INIT+35 , INIT+38, INIT+39, INIT+40, INIT+41, RXCOB+5~, RXCOB+6, RXCOB+7
T	SET+1~, SET+5*
TEXT	SETLN~, SETLN+2, SETLN+3, SETLN+4, SETLN+9, SETLN+10
TXT	SET~, SET+2, SET+3, SET+4, SET+5
U	HDR+4, HDR+5, REJ+6, REJ+7, REJ+8, REJ+9, REJ+10, REJ+11, REJ+12, REJ+13 , REJ+14, REJ+15, REJ+16, REJ+17, REJ+18, REJ+19
UND	SET~, SET+2, SET+5, SETLN~, SETLN+10, SETLN+11, SETLN+13
>> VALMAR	ADDTXT+1
>> VALMCNT	INIT+3, INIT+42
>> VALMHDR(1	HDR+2*
>> VALMHDR(2	HDR+4*
>> VALMHDR(3	HDR+5*
>> VALMHDR(4	HDR+6*
>> VALMHDR(5	HDR+7*
X	HDR+1~, INIT+1~, INIT+17, INIT+19, SETLN+1~, HELP+1

Customize PDF page

Package: Outpatient Pharmacy