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

Package: E Claims Management Engine

Routine: BPSSCRCL


Information

BPSSCRCL ;BHAM ISC/SS - ECME SCREEN CLOSE CLAIMS ;05-APR-05

Source Information

Source file <BPSSCRCL.m>

Call Graph

Call Graph

Call Graph Total: 22

Package Total Call Graph
E Claims Management Engine 14 $$RELDATE^BPSBCKJ  CLOSE^BPSBUTL  $$PAYABLE^BPSOSRX5  ($$CLOSED02,$$EREJTXT,$$NB)^BPSSCR03  $$MKNEWARR^BPSSCR05  $$PROMPT^BPSSCRCV  $$YESNO^BPSSCRRS  ($$PATNAME,$$RXREF)^BPSSCRU2  
$$CLAIMST^BPSSCRU3  $$ASKLINES^BPSSCRU4  CH2NDINS^BPSSCRU5  DISPREJ^BPSSCRU6  REDRAW^BPSSCRUD  $$PAYBLSEC^BPSUTIL2  
VA FileMan 4 ^DIC  ^DIE  $$GET1^DIQ  ^DIR  
Integrated Billing 1 $$INSUR^IBBAPI  
Kernel 1 $$NOW^XLFDT  
List Manager 1 (FULL,PAUSE)^VALM1  
Outpatient Pharmacy 1 $$FIND^PSOREJUT  

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

Package Total Caller Graph
E Claims Management Engine 7 BPS PRTCL USRSCR CLOSE  BPSCMT01  BPSPSOU1  BPSSCRN0  BPSSCRRV  BPSSCRU5  BPSWRKLS  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
CLO ;entry point to close claims
CLOSE(BP59ARR) ;
QUITCL() ;
ASKQUEST(BPRELCOP,BPREAZ,BPCOMZ,BP90ANSZ,BPRCOPAZ) ;*/
REASON() ;
COMMENT(BPSTR,BPMLEN) ;*/
CLOSEIT(BPSTRA,REASON,BPSCLCM,BPDROP,BPRELCOP) ;
DSPERR(MSG) ; Display the ERROR message
NEXTINS(BP59,BPINSNAM) ;get insurance info by the pointer of #9002313.59
PROCINS(BPZZ) ;

External References

Name Field # of Occurrence
$$RELDATE^BPSBCKJ CLOSE+57
CLOSE^BPSBUTL CLOSEIT+8
$$PAYABLE^BPSOSRX5 CLOSE+35
$$CLOSED02^BPSSCR03 CLOSE+23
$$EREJTXT^BPSSCR03 CLOSE+18
$$NB^BPSSCR03 CLOSE+17
$$MKNEWARR^BPSSCR05 CLOSE+4
$$PROMPT^BPSSCRCV ASKQUEST+10
$$YESNO^BPSSCRRS CLOSE+66, ASKQUEST+20, ASKQUEST+23
$$PATNAME^BPSSCRU2 CLOSE+8, CLOSE+61
$$RXREF^BPSSCRU2 CLOSE+25, CLOSE+55
$$CLAIMST^BPSSCRU3 CLOSE+32
$$ASKLINES^BPSSCRU4 CLO+5
CH2NDINS^BPSSCRU5 CLOSE+61
DISPREJ^BPSSCRU6 CLOSE+14
REDRAW^BPSSCRUD CLO+10
$$PAYBLSEC^BPSUTIL2 CLOSE+35
^DIC REASON+5
^DIE CLOSEIT+11
$$GET1^DIQ CLOSEIT+2, CLOSEIT+3, CLOSEIT+7
^DIR COMMENT+10
$$INSUR^IBBAPI NEXTINS+13
$$FIND^PSOREJUT CLOSE+26
FULL^VALM1 CLO+3
PAUSE^VALM1 CLOSE+10, CLOSE+84, QUITCL+2
$$NOW^XLFDT CLOSEIT+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Enter the line numbers for the claim(s) to be closed."
  • Line Location: CLO+4
Function Call: WRITE
  • Prompt: !!,"You've chosen to close the following prescription(s) for",!,$E($$PATNAME^BPSSCRU2(BPDFN),1,13)_" :"
  • Line Location: CLOSE+8
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CLOSE+10
Function Call: WRITE
  • Prompt: !,@VALMAR@(+$G(BPNEWARR(BPDFN,BP59)),0)
  • Line Location: CLOSE+13
Function Call: WRITE
  • Prompt: !?6,$$EREJTXT^BPSSCR03(BP59)
  • Line Location: CLOSE+18
Function Call: WRITE
  • Prompt: !,"Entry is NON BILLABLE. There is no claim to close."
  • Line Location: CLOSE+19
Function Call: WRITE
  • Prompt: !,"This claim is already closed."
  • Line Location: CLOSE+23
Function Call: WRITE
  • Prompt: !,"The Prescription is currently open in the pharmacist's Third Party Payer"
  • Line Location: CLOSE+27
Function Call: WRITE
  • Prompt: !,"Reject Worklist. The claim cannot be closed until action is taken by the"
  • Line Location: CLOSE+28
Function Call: WRITE
  • Prompt: !,"pharmacist."
  • Line Location: CLOSE+29
Function Call: WRITE
  • Prompt: !,"The claim cannot be closed if the secondary claim is payable.",!,"Please reverse the secondary claim first."
  • Line Location: CLOSE+36
Function Call: WRITE
  • Prompt: !,"The CLOSE action can only be applied to an E REJECTED or E REVERSAL ACCEPTED",!,"secondary claim. This claim is ",$P(BPCLST,U),".",!,"The secondary claim is also closed when the primary claim is closed."
  • Line Location: CLOSE+38
Function Call: WRITE
  • Prompt: !!,"ALL Selected Rxs will be CLOSED using the same information gathered in the",!,"following prompts.",!
  • Line Location: CLOSE+65
Function Call: WRITE
  • Prompt: !!
  • Line Location: CLOSE+69
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CLOSE+72
Function Call: WRITE
  • Prompt: !!,"0 claims have been closed."
  • Line Location: QUITCL+1
Function Call: WRITE
  • Prompt: !!,"This response must have no more than "_BPMLEN_" characters"
  • Line Location: COMMENT+13
Function Call: WRITE
  • Prompt: !,"and must not contain embedded uparrow.",!
  • Line Location: COMMENT+14
Function Call: WRITE
  • Prompt: !,"Closing Claim ",$$GET1^DIQ(9002313.02,BPSCLA,.01),"..."
  • Line Location: CLOSEIT+3
Function Call: WRITE
  • Prompt: !," *** CLAIM ",$$GET1^DIQ(9002313.02,BPSCLA,.01)," IN USE ***"
  • Line Location: CLOSEIT+7
Function Call: WRITE
  • Prompt: "NOT OK"
  • Line Location: CLOSEIT+9
Function Call: WRITE
  • Prompt: "OK"
  • Line Location: CLOSEIT+13
Function Call: WRITE
  • Prompt: !,"Error: *** ",MSG," ***"
  • Line Location: DSPERR+1
Routine Call
  • DIC
  • Line Location:
    • REASON+5
Routine Call
  • DIE
  • Line Location:
    • CLOSEIT+11
Routine Call
  • DIR
  • Line Location:
    • COMMENT+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBE(356.8 - [#356.8] Classic Fileman Calls
^BPSC - [#9002313.02] Classic Fileman Calls,  GET1^DIQ
^BPST - [#9002313.59] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BPSC - [#9002313.02] CLOSEIT+5, CLOSEIT+10, CLOSEIT+12
^BPST - [#9002313.59] CLOSE+23, CLOSE+34, CLOSE+35, NEXTINS+4, NEXTINS+5, NEXTINS+6, NEXTINS+7

Label References

Name Line Occurrences
$$ASKQUEST CLOSE+70
$$CLOSE CLO+10
$$CLOSEIT CLOSE+80
$$COMMENT ASKQUEST+12
$$QUITCL CLOSE+40, CLOSE+41, CLOSE+63, CLOSE+67, CLOSE+70
$$REASON ASKQUEST+6
DSPERR CLOSEIT+9
PROCINS NEXTINS+18

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BP0 PROCINS+1~
BP1 NEXTINS+14*, NEXTINS+16, PROCINS+1~, PROCINS+2*, PROCINS+4, PROCINS+6, PROCINS+8
BP2 PROCINS+1~
BP3568 REASON+1~
BP36 NEXTINS+1~
BP59 CLOSE+2~, CLOSE+9*, CLOSE+12, CLOSE+13, CLOSE+14, CLOSE+17, CLOSE+18, CLOSE+23, CLOSE+25, CLOSE+32
, CLOSE+34, CLOSE+35, CLOSE+49*, CLOSE+51*, CLOSE+52, CLOSE+53, CLOSE+76*, CLOSE+77, CLOSE+79, CLOSE+80
, NEXTINS~, NEXTINS+4, NEXTINS+5, NEXTINS+6, NEXTINS+7
BP59ARR CLOSE~, CLOSE+4
BP59ARR( CLOSE+53
BP59FRST CLOSE+3~, CLOSE+48*, CLOSE+52*, CLOSE+55, CLOSE+61
BP90ANSW CLOSE+3~, CLOSE+70, CLOSE+80
BP90ANSZ ASKQUEST~, ASKQUEST+2*, ASKQUEST+10*, ASKQUEST+11, ASKQUEST+18
BPCLST CLOSE+2~, CLOSE+32*, CLOSE+35, CLOSE+37, CLOSE+38
BPCLTOT CLOSE+3~, CLOSE+74*, CLOSE+81*, CLOSE+83, CLOSE+85
BPCOMM CLOSE+3~, CLOSE+70, CLOSE+80
BPCOMZ ASKQUEST~, ASKQUEST+1*, ASKQUEST+12*, ASKQUEST+13, ASKQUEST+14*
BPCOORD NEXTINS+2~, NEXTINS+22*, NEXTINS+23*, NEXTINS+24, PROCINS+1~, PROCINS+6*, PROCINS+8
BPCOP CLOSE+3~, CLOSE+78*, CLOSE+79*, CLOSE+80
BPDFN CLOSE+2~, CLOSE+6*, CLOSE+7*, CLOSE+8, CLOSE+9, CLOSE+12, CLOSE+13, CLOSE+46*, CLOSE+47, CLOSE+51
, CLOSE+61, CLOSE+75*, CLOSE+76, CLOSE+77, CLOSE+79, NEXTINS+1~, NEXTINS+7*, NEXTINS+13
BPDOS NEXTINS+1~, NEXTINS+5*, NEXTINS+6*, NEXTINS+13, NEXTINS+27
BPDROP CLOSEIT~, CLOSEIT+8, CLOSEIT+11
BPFOUND NEXTINS+2~, NEXTINS+20*, NEXTINS+23, NEXTINS+25*, NEXTINS+26, NEXTINS+27
BPHONE NEXTINS+1~, NEXTINS+4*
BPIFANY CLOSE+2~, CLOSE+5*, CLOSE+11*
BPINS CLOSE+3~, CLOSE+4, NEXTINS+2~, NEXTINS+24*, NEXTINS+25
BPINS( CLOSE+46, CLOSE+47, CLOSE+51
BPINSNAM NEXTINS~, NEXTINS+25
BPINSNM CLOSE+3~, CLOSE+47*, CLOSE+51, CLOSE+61, NEXTINS+1~
BPLCK CLOSEIT+1~, CLOSEIT+4*, CLOSEIT+6*, CLOSEIT+10, CLOSEIT+12
BPMLEN COMMENT~, COMMENT+3*, COMMENT+6, COMMENT+12, COMMENT+13, COMMENT+15
BPNEWARR CLOSE+1~, CLOSE+4
BPNEWARR( CLOSE+7, CLOSE+9, CLOSE+12, CLOSE+13, CLOSE+75, CLOSE+76, CLOSE+77, CLOSE+79
BPPHARM NEXTINS+2~, NEXTINS+16*, NEXTINS+21*, NEXTINS+23, NEXTINS+24, PROCINS+1~, PROCINS+4*, PROCINS+8
BPPHONE PROCINS+1~
BPQ CLOSE+2~, CLOSE+5*, CLOSE+7, CLOSE+9, CLOSE+10*, CLOSE+11*, CLOSE+17*, CLOSE+23*, CLOSE+30*, CLOSE+35*
, CLOSE+37*, CLOSE+41, CLOSE+44*, CLOSE+46, CLOSE+47, CLOSE+51, CLOSE+63, CLOSE+66*, CLOSE+67, ASKQUEST+23*
, ASKQUEST+24, ASKQUEST+25, COMMENT+1~, COMMENT+8*, COMMENT+9, COMMENT+11*, COMMENT+12*, COMMENT+16
BPRCOPAY CLOSE+3~, CLOSE+70, CLOSE+79
BPRCOPAZ ASKQUEST~, ASKQUEST+3*, ASKQUEST+20*, ASKQUEST+21
BPREAS CLOSE+3~, CLOSE+70, CLOSE+80
BPREASNM REASON+1~
BPREAZ ASKQUEST~, ASKQUEST+6*, ASKQUEST+7, ASKQUEST+8
BPREJFLG CLOSE+1~, CLOSE+5*, CLOSE+12*, CLOSE+39
BPRELCOP ASKQUEST~, ASKQUEST+18, CLOSEIT~, CLOSEIT+8
BPRET CLO+1~, CLO+5*, CLO+6
BPRETV CLOSE+1~, CLOSE+4*, CLOSE+40, CLOSE+70
BPRXINFO CLOSE+3~, CLOSE+50!, CLOSE+61
BPRXINFO( CLOSE+53*
BPS52 CLOSE+2~, CLOSE+56*, CLOSE+57
BPSARR59 CLO+1~, CLO+5, CLO+10
BPSCLA CLOSEIT+1~, CLOSEIT+2*, CLOSEIT+3, CLOSEIT+5, CLOSEIT+7, CLOSEIT+8, CLOSEIT+10, CLOSEIT+11, CLOSEIT+12
BPSCLCM CLOSEIT~, CLOSEIT+8
BPSECOND CLOSE+2~, CLOSE+5*, CLOSE+34*, CLOSE+37, CLOSE+45
BPSRF CLOSE+2~, CLOSE+56*, CLOSE+57
BPSTR COMMENT~, COMMENT+2*, COMMENT+5
BPSTRA CLOSEIT~, CLOSEIT+2, CLOSEIT+8
BPSZ CLOSE+2~, CLOSE+25*, CLOSE+26, CLOSE+55*, CLOSE+56
BPX NEXTINS+1~, NEXTINS+13*, NEXTINS+17
BPY NEXTINS+1~, NEXTINS+3*
BPZZ NEXTINS+1~, NEXTINS+13, NEXTINS+18, PROCINS~
BPZZ("IBBAPI" NEXTINS+14, NEXTINS+16, NEXTINS+25, NEXTINS+27, PROCINS+2, PROCINS+4, PROCINS+6
BPZZ("RES" NEXTINS+23, NEXTINS+24, PROCINS+8*
DA CLOSEIT+1~, CLOSEIT+11*
DIC REASON+1~, REASON+3*
DIC("S" REASON+4*
DIC(0 REASON+3*
DIE CLOSEIT+1~, CLOSEIT+11*
DIR COMMENT+1~
DIR("?" COMMENT+6*, COMMENT+7*
DIR("A" COMMENT+5*
DIR("B" COMMENT+15*
DIR(0 COMMENT+4*
DR CLOSEIT+1~, CLOSEIT+11*
DTOUT COMMENT+1~, COMMENT+11
DUOUT COMMENT+1~, COMMENT+11
DUZ CLOSEIT+11
ERROR CLOSEIT+1~, CLOSEIT+8, CLOSEIT+9
IOF CLOSE+10, CLOSE+72
MSG DSPERR~, DSPERR+1
REASON CLOSEIT~, CLOSEIT+8, CLOSEIT+11
U CLOSE+12, CLOSE+23, CLOSE+26, CLOSE+34, CLOSE+35, CLOSE+38, CLOSE+56, CLOSE+70, CLOSE+77, CLOSE+79
, CLOSE+80, ASKQUEST+8, REASON+7, NEXTINS+4, NEXTINS+5, NEXTINS+6, NEXTINS+7, NEXTINS+25, NEXTINS+27
>> VALMAR CLO+2, CLO+5, CLOSE+13, CLOSE+53
>> VALMBCK CLO+6*, CLO+11*
X CLOSE+1~, CLOSE+10
Y REASON+1~, REASON+6, REASON+7, COMMENT+12, COMMENT+15, COMMENT+17
Y(0 REASON+7
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