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
Print Page as PDF
Routine: BPSRPT7

Package: E Claims Management Engine

Routine: BPSRPT7


Information

BPSRPT7 ;BHAM ISC/BEE - ECME REPORTS ;14-FEB-05

Source Information

Source file <BPSRPT7.m>

Entry Points

Name Comments DBIA/ICR reference
CLRSN(BP59)
RVSRSN(BP59)
TTYPE(BPRX,BPREF,BPSEQ)
RESPONSE(BPRX,BPREF,BPSEQ)
TOTALS(BPRTYPE,BPDIV,BPTBIL,BPTINS,BPTCOLL,BPTDPAY,BPCNT,BPELTM,BPRICE) ;
HDR(BPRTYPE,BPRPTNAM,BPPAGE) ;
BPDIV(BPDIV)
BPINS(BPINSINF) ;
ELIG(ELIG) ;
; Display multiple eligibilities
; Input:
; ELIG - Array of multiple eligibilities
; Output
; Text of eligibilities
NBSTS(NBSTS) ;
; Display multiple non-billable statuses
; Input:
; NBSTS - Array of multiple non-billable statuses
; Output
; Text of non-billable statuses

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: "ECME "_BPRPTNAM_" "_$S(BPSUMDET=1:"SUMMARY",1:"DETAIL")_" REPORT"
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: ?89,"Print Date: "_$G(BPNOW)_" Page:",$J(BPPAGE,3)
  • Line Location: HDR+11
Function Call: WRITE
  • Prompt: !,"DIVISION(S): ",$$GETDIVS^BPSRPT4(72,.BPPHARM)
  • Line Location: HDR+12
Function Call: WRITE
  • Prompt: ?86,"Fill Locations: "_$S(BPMWC="A":"C,M,W",1:BPMWC)
  • Line Location: HDR+13
Function Call: WRITE
  • Prompt: ?87,"Print Date: "_$G(BPNOW)_" Page:",$J(BPPAGE,3)
  • Line Location: HDR+16
Function Call: WRITE
  • Prompt: !,"DIVISION(S): ",$$GETDIVS^BPSRPT4(72,.BPPHARM)
  • Line Location: HDR+17
Function Call: WRITE
  • Prompt: ?84,"Fill Locations: "_$S(BPMWC="A":"C,M,W",1:BPMWC)
  • Line Location: HDR+18
Function Call: WRITE
  • Prompt: ?110,"Fill Type: "
  • Line Location: HDR+21
Function Call: WRITE
  • Prompt: "RT,BB,P2,RS"
  • Line Location: HDR+22
Function Call: WRITE
  • Prompt: $S(RTBCKX=2:"RT",RTBCKX=3:"BB",RTBCKX=4:"P2",RTBCKX=5:"RS",1:"")
  • Line Location: HDR+23
Function Call: WRITE
  • Prompt: !,"Insurance: "_$S(BPINSINF=0:"ALL",1:"SELECTED")
  • Line Location: HDR+25
Function Call: WRITE
  • Prompt: ?110,"Fill type: "_$S(BPRTBCK=2:"RT",BPRTBCK=3:"BB",BPRTBCK=4:"P2",BPRTBCK=5:"RS",1:"RT,BB,P2,RS")
  • Line Location: HDR+28
Function Call: WRITE
  • Prompt: !,"Insurance: "_$S(BPINSINF=0:"ALL",1:$$BPINS(BPINSINF))
  • Line Location: HDR+29
Function Call: WRITE
  • Prompt: ?44,$J($S(BPAUTREV=0:"ALL",1:"AUTO"),4)," Reversals"
  • Line Location: HDR+33
Function Call: WRITE
  • Prompt: ?60,$J($S(BPACREJ=1:"REJECTED",BPACREJ=2:"ACCEPTED",1:"ALL"),8)," Returned Status"
  • Line Location: HDR+34
Function Call: WRITE
  • Prompt: ?87,"Drugs/Classes: "_$S(BPQSTDRG=2:$$DRGNAM^BPSRPT6(BPDRUG,30),BPQSTDRG=3:$E(BPDRGCL,1,30),1:"ALL")
  • Line Location: HDR+36
Function Call: WRITE
  • Prompt: ?87,"Eligibility: "
  • Line Location: HDR+41
Function Call: WRITE
  • Prompt: "CVA,TRI,VET"
  • Line Location: HDR+42
Function Call: WRITE
  • Prompt: $E(LIST,1,$L(LIST)-1)
  • Line Location: HDR+45
Function Call: WRITE
  • Prompt: ?113,"Open/Closed: ",$S(BPOPCL=1:"CLOSED",BPOPCL=2:"OPEN",1:"ALL")
  • Line Location: HDR+46
Function Call: WRITE
  • Prompt: !,"Eligibility: "
  • Line Location: HDR+51
Function Call: WRITE
  • Prompt: "CVA,TRI,VET"
  • Line Location: HDR+52
Function Call: WRITE
  • Prompt: $E(LIST,1,$L(LIST)-1)
  • Line Location: HDR+55
Function Call: WRITE
  • Prompt: !,"NON-BILLABLE STATUS: "_$S(BPNBSTS=0:"ALL",1:$$NBSTS(.BPNBSTS))
  • Line Location: HDR+58
Function Call: WRITE
  • Prompt: ?87,"Print Date: "_$G(BPNOW)_" Page:",$J(BPPAGE,3)
  • Line Location: HDR+61
Function Call: WRITE
  • Prompt: !,"DIVISION(S): ",$$GETDIVS^BPSRPT4(68,.BPPHARM)
  • Line Location: HDR+62
Function Call: WRITE
  • Prompt: ?86,"Fill Locations: ALL"
  • Line Location: HDR+64
Function Call: WRITE
  • Prompt: ?110,"Fill Type: ALL"
  • Line Location: HDR+65
Function Call: WRITE
  • Prompt: !,"Insurance: "_$S(BPINSINF=0:"ALL",1:$$BPINS(BPINSINF))
  • Line Location: HDR+66
Function Call: WRITE
  • Prompt: ?87,"Drugs/Classes: ALL"
  • Line Location: HDR+67
Function Call: WRITE
  • Prompt: !,"Eligibility: "
  • Line Location: HDR+68
Function Call: WRITE
  • Prompt: "CVA,TRI,VET"
  • Line Location: HDR+69
Function Call: WRITE
  • Prompt: $E(LIST,1,$L(LIST)-1)
  • Line Location: HDR+72
Function Call: WRITE
  • Prompt: !,"Status: "_$S(BPDUP=0:"ALL",1:BPDUP)
  • Line Location: HDR+74
Function Call: WRITE
  • Prompt: !,$S(BPRTYPE=5:"PRESCRIPTIONS",BPRLNRL=2:"RELEASED PRESCRIPTIONS",BPRLNRL=3:"PRESCRIPTIONS (NOT RELEASED)",1:"ALL PRESCRIPTIONS")
  • Line Location: HDR+76
Function Call: WRITE
  • Prompt: " BY "_$S(BPRTYPE=7:"CLOSE",1:"TRANSACTION")_" DATE: "
  • Line Location: HDR+77
Function Call: WRITE
  • Prompt: "From "_$$DATTIM^BPSRPT1(BPBEGDT)_" through "_$$DATTIM^BPSRPT1($P(BPENDDT,"."))
  • Line Location: HDR+78
Function Call: WRITE
  • Prompt: !!,"Status Codes: S= Duplicate of Approved, D= Duplicate of Paid, Q= Duplicate of Capture"
  • Line Location: HDR+81
Info |  Source |  Entry Points |  Interaction Calls