Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

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 ;

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

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
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call