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

Package: E Claims Management Engine

Routine: BPSRCRI


Information

BPSRCRI ;BHAM ISC/NSS - ECME REPORTS ;08-FEB-07

Source Information

Source file <BPSRCRI.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; Routine entry point
BPIEN(BPCFILE) ; User is prompted for input, cross-ref "B" lookup
DEVICE() ;
RUNRPT ;
BPFLDS ; Build BPLARR array of data
PRNTRPT ; Output the reports
PRTTRANS ; Print transaction file report
PRT02
PRT03 ; Response file output
CHKP(BPLINES) ;
PAUSE ;
PAUSE2 ;
EXIT ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !,"ECME Claims-Response Inquiry Report",!
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !!,"Note: This report contains three separate sections - transaction data, claims"
  • Line Location: DEVICE+4
Function Call: WRITE
  • Prompt: !," data, and response data. There will be a page break/form feed after"
  • Line Location: DEVICE+5
Function Call: WRITE
  • Prompt: !," each section regardless of the page length specified in the device input.",!
  • Line Location: DEVICE+6
Function Call: WRITE
  • Prompt: !,$S($D(ZTSK):"REQUEST QUEUED TASK="_ZTSK,1:"REQUEST CANCELLED")
  • Line Location: DEVICE+16
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRNTRPT+3
Function Call: WRITE
  • Prompt: "ECME Claims-Response Inquiry Report"
  • Line Location: PRNTRPT+5
Function Call: WRITE
  • Prompt: ?48,"Print Date: "_$E(DT,4,5)_"/"_$E(DT,6,7)_"/"_$E(DT,2,3)
  • Line Location: PRNTRPT+6
Function Call: WRITE
  • Prompt: !,"VA CLAIM ID: "_BPVAX,!
  • Line Location: PRNTRPT+7
Function Call: WRITE
  • Prompt: !,@IOF
  • Line Location: PRNTRPT+9
Function Call: WRITE
  • Prompt: !,@IOF
  • Line Location: PRNTRPT+13
Function Call: WRITE
  • Prompt: !,@IOF
  • Line Location: PRNTRPT+18
Function Call: WRITE
  • Prompt: !,"BPS TRANSACTION/BPS LOG OF TRANSACTION DATA: ",!
  • Line Location: PRTTRANS+1
Function Call: WRITE
  • Prompt: !,"NO TRANSACTION MATCHES FOUND",!!
  • Line Location: PRTTRANS+2
Function Call: WRITE
  • Prompt: !,BPLARR(BPX)
  • Line Location: PRTTRANS+8
Function Call: WRITE
  • Prompt: ?40,BPLARR(BPX)
  • Line Location: PRTTRANS+9
Function Call: WRITE
  • Prompt: !,BPLARR(BPX)
  • Line Location: PRTTRANS+10
Function Call: WRITE
  • Prompt: !,"BPS CLAIMS FILE DATA: "
  • Line Location: PRT02+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRT02+4
Function Call: WRITE
  • Prompt: !!,"BPS RESPONSE FILE DATA: ",!
  • Line Location: PRT03+1
Function Call: WRITE
  • Prompt: !,"NO RESPONSE FILE DATA FOUND",!!
  • Line Location: PRT03+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^BPSR - [#9002313.03] ROOT^DILFD
^BPSTL - [#9002313.57] GET1^DIQ
9002313.57902 GETS^DIQ
^BPST - [#9002313.59] GET1^DIQ
9002313.59902 GETS^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call