Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSOREJP0

Package: Outpatient Pharmacy

Routine: PSOREJP0


Information

PSOREJP0 ;BIRM/MFR - Third Party Rejects Processing Screen ;04/28/05

Source Information

Source file <PSOREJP0.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Outpatient Pharmacy 4 $$RXSITE^PSOBPSUT  ($$CLOSED,$$ELIGDISP,$$EXP,$$REOPN,$$TRIC,EN)^PSOREJP1  SEL^PSOREJU1  GET^PSOREJU2  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  $$FMTE^XLFDT  
List Manager 3 EN^VALM  (FULL,INSTR)^VALM1  (CNTRL,RESTORE,SAVE)^VALM10  
VA FileMan 2 $$GET1^DIQ  ^DIR  
E Claims Management Engine 1 ^BPSVRX  
Registration 1 DEM^VADPT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 16

Package Total Caller Graph
Outpatient Pharmacy 15 PSO REJECTS CHAMPVA ON/OFF  PSO REJECTS DRUG SORT  PSO REJECTS GROUP BY INSURANCE  PSO REJECTS MENU  PSO REJECTS PATIENT SORT  PSO REJECTS PRINT TO EXCEL  PSO REJECTS REASON SORT  PSO REJECTS REFRESH  
PSO REJECTS RX SORT  PSO REJECTS SELECT  PSO REJECTS TRICARE ON/OFF   PSO REJECTS VIEW ECME RX  PSO REJECTS VIEW/PROCESS  PSO REJECTS WORKLIST  PSOREJP2  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
LST(PSOMENU) ; - Invokes Listmanager
HDR ; - Header code
SETHDR() ; - Displays the Header Line
INIT ; - Populates the Body section for ListMan
SETLINE ; - Sets the line to be displayed in ListMan
GROUP(LBL,LINE) ; Sets an insurance delimiter line
SETSORT(FIELD) ; - Sets the data sorted by the FIELD specified
SETTMP(RX,REJ,FIELD) ; - Sets ^TMP global that will be displayed in the body section
PAT ; - Sort by Patient
DRG ; - Sort by Drug
RX ; - Sort by Rx
REA ; - Sort by Reason
SORT(FIELD) ; - Sort entries by FIELD
REF ; - Screen Refresh
GI ; - Group by Insurance
TRICTOG ; - Toggle TRICARE display
CVATOG ; - Toggle CHAMPVA display
SEL ; - Process selection of one entry
EXIT ;
HELP
SITES() ; - Returns the list of sites along with their NCPDP #s
DIV(RX,FILL) ; - Check if the Division for the Prescription/Fill was selected by the user
PTNAME(RX) ; - Returns header displayable - Patient Name (Last 4 SSN)
FILTER(RX,INS) ; - Filter entries based on user's selection
FLTSTS(RX,REJ) ; - Filter for the Reject Status
FLTRC(RX,REJ) ; - Filter for user selected Reject Codes
NAME(TYPE) ; - Returns the name if ONE was selected or "MULTIPLE ..."
ENDT() ; Returns the upper limit for the date range
VER ;Do VER Hidden Action in Rejects Worklist
PRTEXCL ;
; Protocol to Print to Excel
PEXIT ;
; Reset before going back to ListMan
RUN ;

External References

Name Field # of Occurrence
^%ZIS PRTEXCL+26
HOME^%ZIS PRTEXCL+31
^%ZISC RUN+29
^BPSVRX VER+3
$$GET1^DIQ PSOREJP0+8, SETTMP+3, SETTMP+12, SETTMP+13, SITES+5, PTNAME+2, FILTER+3, FILTER+4, FLTSTS+2, FLTRC+2
, NAME+3, NAME+4, NAME+6, NAME+8, NAME+9, RUN+12, RUN+14, RUN+15
^DIR PRTEXCL+10, RUN+27
$$RXSITE^PSOBPSUT DIV+3
$$CLOSED^PSOREJP1 SETTMP+2
$$ELIGDISP^PSOREJP1 SETTMP+23
$$EXP^PSOREJP1 SETTMP+16, RUN+18
$$REOPN^PSOREJP1 SETTMP+2
$$TRIC^PSOREJP1 SETTMP+8
EN^PSOREJP1 SEL+5
SEL^PSOREJU1 PSOREJP0+8
GET^PSOREJU2 SETTMP+5, RUN+16
DEM^VADPT PTNAME+2
EN^VALM LST+2, LST+3
FULL^VALM1 LST+4, VER+2, PRTEXCL+4
INSTR^VALM1 SETHDR+4, SETHDR+7
CNTRL^VALM10 SETLINE+31, SETLINE+32, SETLINE+33, SETLINE+36, SETLINE+37, SETLINE+38
RESTORE^VALM10 SETLINE+7
SAVE^VALM10 SETLINE+25
$$FMTE^XLFDT HDR+14, HDR+15

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Please wait..."
  • Line Location: LST+1
Function Call: WRITE
  • Prompt: ?52,"Please wait..."
  • Line Location: REF+1
Function Call: WRITE
  • Prompt: ?52,"Please wait..."
  • Line Location: GI+1
Function Call: WRITE
  • Prompt: ?52,"Please wait..."
  • Line Location: TRICTOG+1
Function Call: WRITE
  • Prompt: ?52,"Please wait..."
  • Line Location: CVATOG+1
Function Call: WRITE
  • Prompt: !!?5,"Before continuing, please set up your terminal to capture the"
  • Line Location: PRTEXCL+14
Function Call: WRITE
  • Prompt: !?5,"detail report data. On some terminals, this can be done by"
  • Line Location: PRTEXCL+15
Function Call: WRITE
  • Prompt: !?5,"clicking on the 'Tools' menu above, then click on 'Capture"
  • Line Location: PRTEXCL+16
Function Call: WRITE
  • Prompt: !?5,"Incoming Data' to save to Desktop"
  • Line Location: PRTEXCL+17
Function Call: WRITE
  • Prompt: !!?5,"Note: To avoid undesired wrapping of the data saved to the"
  • Line Location: PRTEXCL+18
Function Call: WRITE
  • Prompt: !?10,"file, please enter '0;256;999' at the 'DEVICE:' prompt."
  • Line Location: PRTEXCL+19
Function Call: WRITE
  • Prompt: !,"Sorry, the output for this action cannot be queued. Please select a device that"
  • Line Location: PRTEXCL+32
Function Call: WRITE
  • Prompt: !,"does not requiring queuing."
  • Line Location: PRTEXCL+33
Function Call: WRITE
  • Prompt: !,"Section/Insurance^RX#^Patient(ID)^Drug^Reason^Payer Message"
  • Line Location: RUN+4
Function Call: WRITE
  • Prompt: RXNUM_U_PTNAME_U_DRNAME_U_REASON_U_MSG
  • Line Location: RUN+20
Function Call: WRITE
  • Prompt: !,@IOF
  • Line Location: RUN+23
Routine Call
  • %ZIS
  • Line Location:
    • PRTEXCL+26
Routine Call
  • %ZIS
  • Line Location:
    • PRTEXCL+31
Routine Call
  • DIR
  • Line Location:
    • PRTEXCL+10
    • RUN+27
Routine Call
  • VALM
  • Line Location:
    • LST+2
    • LST+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^PSDRUG - [#50] GET1^DIQ
^PSRX - [#52] GET1^DIQ
52.25 GET1^DIQ
^PS(59 - [#59] GET1^DIQ
^BPSF(9002313.93 - [#9002313.93] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BPSF(9002313.93 - [#9002313.93] FLTRC+3
^PSRX - [#52] SETSORT+13
^PSRX("REJDAT" SETSORT+17, SETSORT+18, SETSORT+20
^PSRX("REJSTS" SETSORT+6, SETSORT+7
^TMP("PSOREJP0" INIT+1!, SETLINE+3*, SETLINE+4*, SETLINE+10!, SETLINE+19*, SETLINE+21*, SETLINE+22*, GROUP+4*, SEL+3, EXIT+1!
^TMP("PSOREJSR" SETLINE+2, SETLINE+11, SETLINE+12, SETLINE+15, SETLINE+16, SETSORT+2!, SETTMP+27*, EXIT+1!, RUN+7, RUN+8
, RUN+9, RUN+11

Label References

Name Line Occurrences
$$DIV SETTMP+4
$$ENDT SETSORT+17
$$FILTER SETSORT+19, SETTMP+6
$$FLTRC SETSORT+22
$$FLTSTS SETSORT+14, SETSORT+21
$$NAME HDR+5, HDR+6, HDR+7, HDR+8, HDR+12
$$PTNAME SETTMP+11, RUN+13
$$SITES HDR+2
EXIT PSOREJP0+8, PSOREJP0+15
GROUP SETLINE+14
HDR GI+1, TRICTOG+1, CVATOG+1
INIT REF+1, GI+1, TRICTOG+1, CVATOG+1
LST PSOREJP0+14
PEXIT PRTEXCL+11, PRTEXCL+34
REF SORT+3, SEL+5
RUN PRTEXCL+37
SETHDR HDR+18
SETLINE INIT+2
SETSORT INIT+2
SETTMP SETSORT+8, SETSORT+15, SETSORT+23
SORT PAT+1, DRG+1, RX+1, REA+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS PRTEXCL+22~, PRTEXCL+25*
BPSVRX VER+1~
CNT SITES+1~, NAME+1~
CODE SETTMP+1~, SETTMP+7*, SETTMP+9, SETTMP+10, SETTMP+15, SETTMP+16, SETTMP+23, SETTMP+24, RUN+1~, RUN+17*
, RUN+18
DAT SETSORT+1~, SETSORT+16*, SETSORT+17*, SETSORT+18, SETSORT+20
DFN PTNAME+1~, PTNAME+2*
DIR PRTEXCL+7~, RUN+25~
DIR("A" PRTEXCL+9*
DIR("B" PRTEXCL+9*
DIR(0 PRTEXCL+8*, RUN+26*
DIROUT PRTEXCL+7~, RUN+25~
DIRUT PRTEXCL+7~, RUN+25~
DRNAME SETTMP+1~, SETTMP+12*, SETTMP+18, SETTMP+19, RUN+1~, RUN+14*, RUN+20
DTOUT PRTEXCL+7~, RUN+25~
DUOUT PRTEXCL+7~, RUN+25~
ENDT ENDT+1~, ENDT+2*, ENDT+3, ENDT+4, ENDT+5, ENDT+6
FIELD SETSORT~, SETSORT+8, SETSORT+15, SETSORT+23, SETTMP~, SETTMP+19, SORT~, SORT+1, SORT+2
FILL SETTMP+1~, SETTMP+3*, SETTMP+4, SETTMP+5, SETTMP+8, SETTMP+23, DIV~, DIV+3, RUN+1~, RUN+12*
, RUN+16
FILTER FILTER+1~, FILTER+2*, FILTER+3, FILTER+4, FILTER+5
HDR SETHDR+1~, SETHDR+3*, SETHDR+4*
HIGHLN PSOREJP0+5~, SETLINE+8!
HIGHLN( SETLINE+19*, SETLINE+30
I SETLINE+1~, SETLINE+3*, SETLINE+7*, SETLINE+25*, SETTMP+1~, NAME+1~
INS SETLINE+1~, SETLINE+10*, SETLINE+12*, SETLINE+13, SETLINE+14, SETLINE+15, SETLINE+16, SETTMP+1~, SETTMP+20*, SETTMP+21*
, SETTMP+23*, SETTMP+25*, SETTMP+26*, SETTMP+27, FILTER~, FILTER+5, RUN+1~, RUN+8*, RUN+9, RUN+10
, RUN+11
INSLN PSOREJP0+5~, SETLINE+8!
INSLN( SETLINE+34, SETLINE+35, GROUP+4*
IO RUN+2
IO("Q" PRTEXCL+28, PRTEXCL+29, PRTEXCL+30!
IOF RUN+23
>> IOINHI SETHDR+7, SETLINE+31, SETLINE+33, SETLINE+36, SETLINE+37, SETLINE+38
>> IOINORM SETHDR+4, SETHDR+7, SETLINE+31, SETLINE+32, SETLINE+33, SETLINE+36, SETLINE+37, SETLINE+38
>> IORVOFF SETLINE+37
>> IORVON SETHDR+4, SETHDR+7, SETLINE+37
IOST RUN+23, RUN+24
>> IOUON SETLINE+32, SETLINE+36, SETLINE+38
LASTLN PSOREJP0+5~, SETLINE+7, SETLINE+24, SETLINE+25, SETLINE+26*
LBL SETLINE+35*, SETLINE+37, SETLINE+38, GROUP~, GROUP+2, GROUP+3, GROUP+4
LINE SETLINE+1~, SETLINE+10*, SETLINE+14, SETLINE+19*, SETLINE+21*, SETLINE+24, SETLINE+25, SETLINE+26, SETLINE+29, SETLINE+40
, GROUP~, GROUP+4*
LINE1 HDR+1~, HDR+2*, HDR+10
LINE2 HDR+1~, HDR+4*, HDR+5*, HDR+6*, HDR+7*, HDR+8*, HDR+9*, HDR+10
LINE3 HDR+1~, HDR+12*, HDR+14*, HDR+15*, HDR+16
>> LN SETLINE+29*, SETLINE+30, SETLINE+31, SETLINE+32, SETLINE+33, SETLINE+34, SETLINE+35, SETLINE+36, SETLINE+37, SETLINE+38
MSG SETTMP+1~, SETTMP+14*, SETTMP+18, RUN+1~, RUN+19*, RUN+20
NAME SITES+1~, SITES+5*, SITES+6
OK PRTEXCL+22~, PRTEXCL+23*, PRTEXCL+24, PRTEXCL+28*
ORD SETHDR+1~, SETHDR+5*, SETHDR+7
OREJ SETTMP+1~
POP PRTEXCL+22~, PRTEXCL+24, PRTEXCL+27, PRTEXCL+34
POS SETHDR+6*, SETHDR+7, SETLINE+35*, SETLINE+36, SETLINE+37, SETLINE+38, GROUP+1~, GROUP+2*, GROUP+3
PSOCHNG SEL+1~, SEL+5*
PSOCVATG PSOREJP0+5~, PSOREJP0+12*, SETTMP+10, CVATOG+1*
PSODRFLT PSOREJP0+4~, PSOREJP0+11*, HDR+6, FILTER+4
PSODRFLT( FILTER+4, NAME+4
PSODRFLT("" NAME+4
>> PSODTRNG HDR+14, HDR+15, SETSORT+16, ENDT+2
PSOEKEY PSOREJP0+5~
PSOINFLT PSOREJP0+4~, PSOREJP0+11*, HDR+7, FILTER+5
PSOINFLT( FILTER+5, NAME+5
PSOINFLT("" NAME+5
PSOINGRP PSOREJP0+4~, PSOREJP0+12*, HDR+9, SETTMP+21, GI+1*
PSOMENU LST~, LST+2, LST+3, HDR+11, SETHDR+4, SETHDR+7, SETSORT+5, SETSORT+11
PSOPTFLT PSOREJP0+4~, PSOREJP0+11*, HDR+5, FILTER+3
PSOPTFLT( FILTER+3, NAME+3
PSOPTFLT("" NAME+3
PSORCFLT PSOREJP0+5~, PSOREJP0+11*, HDR+8, SETSORT+22
PSORCFLT( FLTRC+4, NAME+7
PSORCFLT("" NAME+7, NAME+8, NAME+9
PSOREJST PSOREJP0+4~, PSOREJP0+8, SITES+2, SITES+3, DIV+2
PSOREJST( SITES+4, DIV+3
PSORJASC PSOREJP0+4~, PSOREJP0+11*, SETHDR+5, SETLINE+15, SORT+1*, SORT+2*
PSORJSRT PSOREJP0+4~, PSOREJP0+11*, SETHDR+6, INIT+2, SORT+1, SORT+2*
PSORXFLT PSOREJP0+4~, PSOREJP0+11*, HDR+12, SETSORT+12, SETSORT+13, SETSORT+14, SETSORT+15, SETTMP+2, NAME+6
PSOSEL SEL+1~, SEL+2*, SEL+3
>> PSOSITE PSOREJP0+8
PSOSTFLT PSOREJP0+4~, PSOREJP0+11*, HDR+4, FLTSTS+3, FLTSTS+4
PSOTRIC SETTMP+1~, SETTMP+8*, SETTMP+9, SETTMP+10, SETTMP+23, SETTMP+24
PSOTRITG PSOREJP0+4~, PSOREJP0+12*, SETTMP+9, TRICTOG+1*
PTNAME SETTMP+1~, SETTMP+11*, SETTMP+17, SETTMP+19, PTNAME+1~, PTNAME+3*, PTNAME+4, RUN+1~, RUN+13*, RUN+20
RC NAME+1~, NAME+7, NAME+10*
RC01 NAME+1~, NAME+8*, NAME+10
RC02 NAME+1~, NAME+9*, NAME+10
REASON SETTMP+1~, SETTMP+15*, SETTMP+16*, SETTMP+18, SETTMP+19, RUN+1~, RUN+18*, RUN+20
REJ SETSORT+1~, SETSORT+7*, SETSORT+8, SETSORT+13*, SETSORT+14, SETSORT+15, SETSORT+16*, SETSORT+20*, SETSORT+21, SETSORT+22
, SETSORT+23, SETTMP~, SETTMP+2, SETTMP+3, SETTMP+6, SETTMP+7, SETTMP+14, SETTMP+15, SETTMP+17, SETTMP+19
, SETTMP+21, SETTMP+25, SEL+1~, SEL+4*, SEL+5, FLTSTS~, FLTSTS+2, FLTRC~, FLTRC+2, RUN+1~
, RUN+11*, RUN+12, RUN+17, RUN+18, RUN+19
REJCD FLTRC+1~, FLTRC+2*, FLTRC+3*, FLTRC+4
REJLST SETTMP+1~, SETTMP+5!, RUN+1~, RUN+16!
REJLST( SETTMP+6, SETTMP+7, SETTMP+14, SETTMP+15, SETTMP+21, SETTMP+25, RUN+17, RUN+18, RUN+19
RX SETSORT+1~, SETSORT+6*, SETSORT+7, SETSORT+8, SETSORT+16*, SETSORT+18*, SETSORT+19, SETSORT+20, SETSORT+21, SETSORT+22
, SETSORT+23, SETTMP~, SETTMP+2, SETTMP+3, SETTMP+4, SETTMP+5, SETTMP+8, SETTMP+11, SETTMP+12, SETTMP+13
, SETTMP+17, SETTMP+19, SETTMP+23, SEL+1~, SEL+4*, SEL+5, DIV~, DIV+3, PTNAME~, PTNAME+2
, FILTER~, FILTER+3, FILTER+4, FLTSTS~, FLTSTS+2, FLTRC~, FLTRC+2, RUN+1~, RUN+11*, RUN+12
, RUN+13, RUN+14, RUN+15, RUN+16
RXNUM SETTMP+1~, SETTMP+13*, SETTMP+17, SETTMP+19, RUN+1~, RUN+15*, RUN+20
SEQ SETLINE+1~, SETLINE+17*, SETLINE+22
SITE SITES+1~, SITES+4*, SITES+5
SITES SITES+1~, SITES+6*, SITES+7*, SITES+8
SORT SETTMP+1~, SETTMP+19*, SETTMP+27, RUN+1~, RUN+9*, RUN+11
SORTA SETLINE+1~, SETLINE+10*, SETLINE+11*, SETLINE+12, SETLINE+15, SETLINE+16, SETTMP+1~, SETTMP+3*, SETTMP+23*, SETTMP+25*
, SETTMP+26*, SETTMP+27, RUN+1~, RUN+7*, RUN+8, RUN+9, RUN+11
STS SETSORT+1~, FLTSTS+1~, FLTSTS+2*, FLTSTS+3, FLTSTS+4
SUB SETLINE+1~, SETLINE+10*, SETLINE+15*, SETLINE+16
TYPE NAME~, NAME+3, NAME+4, NAME+5, NAME+6, NAME+7, NAME+11
U RUN+10, RUN+20
VADM PTNAME+1~
VADM(1 PTNAME+3
VADM(2 PTNAME+3
>> VALMBCK REF+1*, GI+1*, TRICTOG+1*, CVATOG+1*, SEL+2*, SEL+4*, VER+4*, PEXIT+2*
>> VALMCNT SETLINE+5*, SETLINE+40*
>> VALMHDR(1 HDR+10*
>> VALMHDR(2 HDR+10*
>> VALMHDR(3 HDR+16*
>> VALMSG INIT+3*, SEL+2*, SEL+4*
X SETLINE+1~, GROUP+1~, GROUP+3*, GROUP+4, SETTMP+1~, PRTEXCL+7~
X1 SETLINE+1~, SETLINE+17*, SETLINE+18*, SETLINE+19
X2 SETLINE+1~, SETLINE+20*, SETLINE+21
XQORM SEL+1~
Y PRTEXCL+7~, PRTEXCL+11
Y(1 SEL+2
Z SETLINE+1~, SETLINE+16*, SETLINE+18, SETLINE+20, SETLINE+22, SETTMP+1~, SETTMP+17*, SETTMP+18*, SETTMP+27, SEL+1~
, SEL+3*, SEL+4
ZTDESC PRTEXCL+22~
ZTIO PRTEXCL+22~
>> ZTQUEUED RUN+28
>> ZTREQ RUN+28*
ZTRTN PRTEXCL+22~
ZTSAVE PRTEXCL+22~
ZTSK PRTEXCL+22~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All