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

Package: E Claims Management Engine

Routine: BPSRES


Information

BPSRES ;BHAM ISC/BEE - ECME SCREEN RESUBMIT W/EDITS ;3/12/08 14:01

Source Information

Source file <BPSRES.m>

Entry Points

Name Comments DBIA/ICR reference
RESED
XRESED
DOSELCTD(BPRXI) ;
XRES ;
XRES2 ;
PROMPTS(BP59,BP02,BPRXIEN,BPRXR,BPCOB,BPDOSDT,BPSECOND,BPADDLTXT) ;
P1 ;
XPROMPTS ;
BPSKIP(BPSRX,BPSFILL) ; Determine whether to skip the enter/edit of Submission Clarification Codes
; This function will return a '1' if the enter/edit of Submission
; Clarification Codes should be skipped (not allowed).

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Enter the line number for the claim to be resubmitted."
  • Line Location: RESED+7
Function Call: WRITE
  • Prompt: !!,"No Initial Claim Submission Found - Data Elements are NOT Editable for Re-Submission",!
  • Line Location: DOSELCTD+10
Function Call: WRITE
  • Prompt: !!,"Entry is NON BILLABLE. There is no claim to edit or resubmit.",!
  • Line Location: DOSELCTD+14
Function Call: WRITE
  • Prompt: !!,"No Initial Claim Submission Found - Data Elements are NOT Editable for Re-Submission",!
  • Line Location: DOSELCTD+16
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DOSELCTD+20
Function Call: WRITE
  • Prompt: !,"You've chosen to RESUBMIT the following prescription for "_$E($$PATNAME^BPSSCRU2(BPDFN),1,13)
  • Line Location: DOSELCTD+22
Function Call: WRITE
  • Prompt: !,@VALMAR@(+$P(BPRXI,U,5),0)
  • Line Location: DOSELCTD+23
Function Call: WRITE
  • Prompt: !!,"The claim: ",!,@VALMAR@(+$P(BPRXI,U,5),0),!,"cannot be Resubmitted w/EDITS because it has been deleted in Pharmacy.",!
  • Line Location: DOSELCTD+31
Function Call: WRITE
  • Prompt: !!,"The claim: ",!,@VALMAR@(+$P(BPRXI,U,5),0),!,"is still In Progress and cannot be Resubmitted w/EDITS",!
  • Line Location: DOSELCTD+33
Function Call: WRITE
  • Prompt: !!,"The claim: ",!,@VALMAR@(+$P(BPRXI,U,5),0),!,"is NOT Rejected and cannot be Resubmitted w/EDITS",!
  • Line Location: DOSELCTD+34
Function Call: WRITE
  • Prompt: !!,"The claim: ",!,@VALMAR@(+$P(BPRXI,U,5),0),!,"is NOT Rejected and cannot be Resubmitted w/EDITS",!
  • Line Location: DOSELCTD+35
Function Call: WRITE
  • Prompt: !,"The claim: ",!,@VALMAR@(+$P(BPRXI,U,5),0),!,"cannot be Resubmitted if the secondary claim is payable.",!,"Please reverse the secondary claim first."
  • Line Location: DOSELCTD+37
Function Call: WRITE
  • Prompt: !!,"The claim: ",!,@VALMAR@(+$P(BPRXI,U,5),0),!,"is Closed and cannot be Resubmitted w/EDITS.",!
  • Line Location: DOSELCTD+41
Function Call: WRITE
  • Prompt: !,"The secondary claim cannot be Resubmitted unless the primary is either payable",!,"or closed. Please resubmit or close the primary claim first."
  • Line Location: DOSELCTD+52
Function Call: WRITE
  • Prompt: !!
  • Line Location: DOSELCTD+70
Function Call: WRITE
  • Prompt: $S(+BPBILL=10:"Reversal but no Resubmit:",1:"Not Processed:"),!," "
  • Line Location: DOSELCTD+71
Function Call: WRITE
  • Prompt: $P(BPBILL,U,2)
  • Line Location: DOSELCTD+73
Function Call: WRITE
  • Prompt: !,"Submission Clarification Code ",BP35401,": ",BPSX
  • Line Location: PROMPTS+75
Function Call: WRITE
  • Prompt: ?44,BPCLCDN
  • Line Location: PROMPTS+77
Function Call: WRITE
  • Prompt: !," **OPECC cannot edit Sub. Clar. Code field for this reject - refer to Pharmacist"
  • Line Location: PROMPTS+79
Function Call: WRITE
  • Prompt: !," Duplicates not allowed"
  • Line Location: PROMPTS+101
Function Call: WRITE
  • Prompt: !," Duplicates not allowed"
  • Line Location: PROMPTS+115
Function Call: WRITE
  • Prompt: !
  • Line Location: P1+136

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
52.25 GET1^DIQ
52.3 GET1^DIQ
9002313.0201 GET1^DIQ
^BPST - [#9002313.59] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call