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 |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: BPSOS57

Package: E Claims Management Engine

Routine: BPSOS57


Information

BPSOS57 ;BHAM ISC/FCS/DRS/FLS - BPS Log of Transactions Utils ;06/01/2004

Source Information

Source file <BPSOS57.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
E Claims Management Engine 3 $$DFF2EXT^BPSECFM  $$RESP500^BPSOSQ4  ($$REFAPI1,$$RXAPI1)^BPSUTIL1  
VA FileMan 2 NOW^%DTC  $$GET1^DIQ  

Entry Points

Name Comments DBIA/ICR reference
DRGDFN() ; EP - BPS Log of Transaction field
DRGNAME() ; EP - BPS Log of Transaction field
RELDATE() ;EP - BPS Log of Transaction field
RXI()
RXR()
NDC()
QTY()
AMT()
CHG()
INSIEN()
PATIENT()
HRN() ; Health record number and facility abbreviation
; Called by BPS Log of Transaction field
USER()
NOW()
ISREVERS(N) ;EP - BPSOSIY
; Returns reversal claim #, else false
REVACC(N) ;EP - BPSOSIY
; was this an accepted reversal? return true or false
; Treat Duplicate of Accepted Reversal ("S") as accepted
REVRESP(N) ;
POSITION() ; return pointer to position within claim (D1)
IEN02() ; return pointer to claim
IEN03() ; return pointer to response
REVIEN02() ; return pointer to reversal claim
REVIEN03() ; return pointer to reversal response
FIELD(F,REV) ; EP - BPS Log of Transaction fields
; Retrieve field F from claim or response - Given IEN57
; Returns value
; Special for reject codes: F=511 gets ","-delimited string of codes
; F=511.01 gets first code, F=511.02 gets second one, etc.
REJCODES ; rejection codes for IEN03
; X = ","-delimited string of two-char codes
; X(j)=code_" "_description
STRIPID ; some fields have two-character field ID
MONEY ; some fields are money fields in signed overpunch format
OTHER ; other special conversions

External References

Name Field # of Occurrence
NOW^%DTC NOW
$$DFF2EXT^BPSECFM MONEY+4
$$RESP500^BPSOSQ4 REVRESP+3
$$REFAPI1^BPSUTIL1 RELDATE+4
$$RXAPI1^BPSUTIL1 DRGDFN+4, DRGNAME+4, RELDATE+5
$$GET1^DIQ FIELD+15, FIELD+16, FIELD+17, FIELD+19

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^BPSC - [#9002313.02] GET1^DIQ
9002313.0201 GET1^DIQ
^BPSR - [#9002313.03] GET1^DIQ
9002313.0301 GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BPSF(9002313.93 - [#9002313.93] REJCODES+7, REJCODES+8
^BPSR - [#9002313.03] REJCODES+5, REJCODES+6
^BPSTL - [#9002313.57] RXI, RXR, NDC, QTY, AMT, CHG, INSIEN, PATIENT, USER, ISREVERS+2
, REVRESP+1, POSITION+1, IEN02+1, IEN03+1, REVIEN02+1, REVIEN03+1

Label References

Name Line Occurrences
$$IEN02 FIELD+6
$$IEN03 FIELD+6
$$POSITION FIELD+6
$$REVIEN02 FIELD+7
$$REVIEN03 FIELD+7
$$REVRESP REVACC+4
$$RXI DRGDFN+2, DRGNAME+2, RELDATE+2
$$RXR RELDATE+2
MONEY FIELD+24
OTHER FIELD+25
REJCODES FIELD+18
STRIPID FIELD+23

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% NOW~
%H NOW~
%I NOW~
A REJCODES+6~*, REJCODES+7*, REJCODES+8*, REJCODES+9, REJCODES+10
>> D0 FIELD+5
DUZ USER
F FIELD~, FIELD+11, FIELD+12, FIELD+15, FIELD+16, FIELD+17, FIELD+18, FIELD+19, STRIPID+1, STRIPID+2
STRIPID+3, MONEY+1, MONEY+2, MONEY+3, OTHER+1
I REJCODES+4~*, REJCODES+5*, REJCODES+6
IEN02 FIELD+5~, FIELD+6*, FIELD+7*, FIELD+10, FIELD+15, FIELD+16
IEN03 FIELD+5~, FIELD+6*, FIELD+7*, FIELD+12, FIELD+17, FIELD+19, REJCODES+5, REJCODES+6
IEN57 RXI, RXR, NDC, QTY, AMT, CHG, INSIEN, PATIENT, USER, POSITION+1
, IEN02+1, IEN03+1, REVIEN02+1, REVIEN03+1, FIELD+5~*
J REJCODES+4~*, REJCODES+10*
N ISREVERS~, ISREVERS+2, REVACC~, REVACC+4, REVRESP~, REVRESP+1
POS FIELD+5~, FIELD+6*, FIELD+11, FIELD+16, FIELD+19, REJCODES+5, REJCODES+6
RESP REVRESP+1~*, REVRESP+2, REVRESP+3
REV FIELD~, FIELD+7
RXI DRGDFN+1~, DRGDFN+2*, DRGDFN+3, DRGDFN+4, DRGNAME+1~, DRGNAME+2*, DRGNAME+3, DRGNAME+4, RELDATE+1~, RELDATE+2*
, RELDATE+3, RELDATE+4, RELDATE+5
RXR RELDATE+1~, RELDATE+2*, RELDATE+4
U RXI, RXR, NDC, QTY, AMT, CHG, INSIEN, PATIENT, USER, ISREVERS+3
, REVRESP+1, POSITION+1, IEN02+1, IEN03+1, REVIEN02+1, REVIEN03+1, REJCODES+6, REJCODES+9, REJCODES+10
X USER~*, NOW~, ISREVERS+2~*, ISREVERS+3, REVACC+3~, REVACC+4*, REVACC+5, REVRESP+3~*, REVRESP+4, FIELD+5~
, FIELD+15*, FIELD+16*, FIELD+17*, FIELD+18*, FIELD+19*, FIELD+22*, FIELD+26, REJCODES+3!*, REJCODES+9*, STRIPID+4*
MONEY+4*, MONEY+5*, OTHER+1*
X( FIELD+18, REJCODES+10*
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All