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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: BPSPSOU1

Package: E Claims Management Engine

Routine: BPSPSOU1


Information

BPSPSOU1 ;ALB/CFS - ECME VALIDATIONS FOR REVERSE AND RESUBMIT CALLED FROM OUTPATIENT PHARMACY ;15-OCT-05

Source Information

Source file <BPSPSOU1.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
E Claims Management Engine 5 $$GETCOB^BPSBUTL  $$PAYABLE^BPSOSRX5  ($$CLOSED02,$$NB)^BPSSCR03  $$COMMENT^BPSSCRCL  $$CLAIMST^BPSSCRU3  
List Manager 1 PAUSE^VALM1  
Outpatient Pharmacy 1 $$LSTRFL^PSOBPSU1  
Registration 1 DEM^VADPT  
VA FileMan 1 ^DIR  

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: 1

Package Total Caller Graph
Outpatient Pharmacy 1 PSOBPSU3  

Entry Points

Name Comments DBIA/ICR reference
VAL(RXIEN,FILL,PSOELIG,ACTION,COB,REVREAS,BPSSKIPCON) ;
; Input:
; RXIEN = Prescription ien
; FILL = FILL #
; PSOELIG = TRICARE or CHAMPVA
; ACTION = "REV" - Reverse or "RES" - Resubmit
; BPSSKIPCON = If 1, then skip the confirmation at the end
YESNO(PSOSTR,PSOFL) ; Default - YES

External References

Name Field # of Occurrence
$$GETCOB^BPSBUTL VAL+25
$$PAYABLE^BPSOSRX5 VAL+38
$$CLOSED02^BPSSCR03 VAL+33
$$NB^BPSSCR03 VAL+31
$$COMMENT^BPSSCRCL VAL+51
$$CLAIMST^BPSSCRU3 VAL+36
^DIR YESNO+5
$$LSTRFL^PSOBPSU1 VAL+21
DEM^VADPT VAL+30
PAUSE^VALM1 VAL+26, VAL+28, VAL+31, VAL+33, VAL+38, VAL+52

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Claim not found. Cannot "_$S(ACTION="REV":"Reverse.",1:"Resubmit.")
  • Line Location: VAL+27
Function Call: WRITE
  • Prompt: !!,"Primary and Secondary claims exist. Please contact OPECC."
  • Line Location: VAL+28
Function Call: WRITE
  • Prompt: !!,$S(ACTION="REV":"REVERSE",1:"RESUBMIT")_" not allowed for "_PSOELIG_" Non-Billable claim."
  • Line Location: VAL+32
Function Call: WRITE
  • Prompt: !!,"The claim is Closed and cannot be "_$S(ACTION="REV":"Reversed.",1:"Resubmitted.")
  • Line Location: VAL+34
Function Call: WRITE
  • Prompt: !," Please reopen the claim and try again."
  • Line Location: VAL+35
Function Call: WRITE
  • Prompt: !!,"The claim is NOT Payable and cannot be Reversed."
  • Line Location: VAL+39
Function Call: WRITE
  • Prompt: !!,"The claim you've chosen to "_$S(ACTION="REV":"REVERSE",1:"RESUBMIT")_" for "_$E(PATNAME,1,13)_" is in progress."
  • Line Location: VAL+42
Function Call: WRITE
  • Prompt: !,"The "_$S(ACTION="REV":"reversal",1:"resubmittal")_" request will be scheduled and processed after the previous"
  • Line Location: VAL+43
Function Call: WRITE
  • Prompt: !,"request(s) are completed. Please be aware that the result of the "_$S(ACTION="REV":"reversal",1:"resubmittal")
  • Line Location: VAL+44
Function Call: WRITE
  • Prompt: !,"depends on the payer's response to the prior incomplete requests."
  • Line Location: VAL+45
Function Call: WRITE
  • Prompt: !!,"You've chosen to "_$S(ACTION="REV":"REVERSE",1:"RESUBMIT")_" the following prescription for "_$E(PATNAME,1,13)_"."
  • Line Location: VAL+48
Function Call: WRITE
  • Prompt: !,"Please provide the reason or enter ^ to abandon the reversal."
  • Line Location: VAL+50
Function Call: WRITE
  • Prompt: !!,"The claim was NOT reversed!"
  • Line Location: VAL+52
Routine Call
  • DIR
  • Line Location:
    • YESNO+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BPST - [#9002313.59] VAL+29, VAL+33

Label References

Name Line Occurrences
$$YESNO VAL+41, VAL+54

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACTION VAL~, VAL+23, VAL+27, VAL+32, VAL+34, VAL+38, VAL+42, VAL+43, VAL+44, VAL+47
, VAL+48, VAL+49
BPINPROG VAL+19~, VAL+24*, VAL+37*, VAL+38, VAL+41, VAL+46
BPSSKIPCON VAL~, VAL+47, VAL+53
BPSTATS VAL+19~, VAL+36*, VAL+37, VAL+38
BPSTIEN VAL+19~, VAL+25*, VAL+29, VAL+31, VAL+33, VAL+36
BPSYN VAL+19~, VAL+40*, VAL+41*, VAL+46, VAL+54*, VAL+55
COB VAL~, VAL+25*, VAL+26, VAL+28
DFN VAL+19~, VAL+29*
DIR YESNO+1~
DIR("A" YESNO+3*
DIR("B" YESNO+4*
DIR(0 YESNO+2*
DUOUT YESNO+1~, YESNO+6
FILL VAL~, VAL+21*, VAL+25
PATNAME VAL+19~, VAL+30*, VAL+42, VAL+48
PSOELIG VAL~, VAL+22*, VAL+32
PSOFL YESNO~, YESNO+4
PSOSTR YESNO~, YESNO+3
REVREAS VAL~, VAL+51*, VAL+52
RXIEN VAL~, VAL+20, VAL+21, VAL+25
U VAL+25, VAL+29, VAL+33, VAL+36
VADM VAL+19~
VADM(1 VAL+30
Y YESNO+1~, YESNO+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All