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

Package: E Claims Management Engine

Routine: BPSRPT3A


Information

BPSRPT3A ;AITC/CKB - ECME REPORTS ;9/28/2017

Source Information

Source file <BPSRPT3A.m>

Entry Points

Name Comments DBIA/ICR reference
SELPR(DFLT) ;
SELPRESC() ;
; Allow user to select a single or multiple PRESCRIBERS(s).
BPPRESC ;
SELPA(DFLT) ;
SELPAT() ;
; Allow user to select a single or multiple PATIENT(s).
BPPAT ;
SELBAMT() ;
SELBMIN() ;
SELBMAX() ;
SELDRG1() ;
DRG1 ;
SELDC() ;
DRGCL ;
SEL(FIELD,FILE,BPSARRAY,DEFAULT) ;
; Provides selection of one or many Drug, Prescriber and Patients.
; Note: if you to make changes to this subroutine you need to check DCSEL, RCSEL^BPSRPT4, CCRSEL^BPSRPT4
; they might require the same changes.
DCSEL(FIELD,FILE,BPSARRAY,DEFAULT) ;
; Provides selection of one or many for Drug Classes.
SELDUP() ;
; Select one or more Duplicate Claim types
;
; Return value -> BPDUP("DUP") = 0 - User Entered 'ALL'
; = 1 - contain the entries separated by comma's
; = "^" - User quit
BPSDUP ;
SELDUPEX ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?2,"Selected:"
  • Line Location: SEL+27
Function Call: WRITE
  • Prompt: ?12,X,!
  • Line Location: SEL+28
Function Call: WRITE
  • Prompt: !,?2,"Selected:"
  • Line Location: SEL+36
Function Call: WRITE
  • Prompt: ?12,X,!
  • Line Location: SEL+37
Function Call: WRITE
  • Prompt: !,?2,"Selected:"
  • Line Location: DCSEL+25
Function Call: WRITE
  • Prompt: ?12,$$GET1^DIQ(50.605,X,1)," ",$$GET1^DIQ(50.605,X,.01),!
  • Line Location: DCSEL+26
Function Call: WRITE
  • Prompt: !,?2,"Selected:"
  • Line Location: DCSEL+34
Function Call: WRITE
  • Prompt: ?12,$$GET1^DIQ(50.605,X,1)," ",$$GET1^DIQ(50.605,X,.01),!
  • Line Location: DCSEL+35
Function Call: WRITE
  • Prompt: !," ",BPSSEL," is not a valid entry."
  • Line Location: BPSDUP+41
Function Call: WRITE
  • Prompt: !,?5,$S(BPSX="D":"DUPLICATE OF PAID",BPSX="Q":"DUPLICATE OF CAPTURED",BPSX="S":"DUPLICATE OF APPROVED",1:"")
  • Line Location: BPSDUP+47

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(50.605 - [#50.605] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call