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 |  Caller 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: BPSOSH2

Package: E Claims Management Engine

Routine: BPSOSH2


Information

BPSOSH2 ;BHAM ISC/SD/LWJ/DLF - Assemble formatted claim ;06/01/2004

Source Information

Source file <BPSOSH2.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
E Claims Management Engine 4 $$NFF^BPSECFM  $$VNUM^BPSECMPS  CLINICAL^BPSOSH3  GETFLDS^BPSOSHF  
VA FileMan 1 $$GET1^DIQ  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
E Claims Management Engine 2 BPSECA1  BPSOSH3  

Entry Points

Name Comments DBIA/ICR reference
XLOOP(NODES,IEN,BPS,REC) ;EP - from BPSECA1
SEGID(ND) ; function, returns Segment ID
; Field 111 is the Segment Identifier - for each segment, other than
; the header, a unique value must be sent in this field
; to identify which segment is being sent. This value is not stored
; in the claim - as it changes with each of the 20 segments. The
; field does appear as part of the NCPDP Format, but is simply not stored.
; 01 = Patient 02 = Pharmacy Provider 03 = Prescriber
; 04 = Insurance 05 = COB/Other Payment 06 = Workers' Comp
; 07 = Claim 08 = DUR/PPS 09 = Coupon
; 10 = Compound 11 = Pricing 12 = Prior Auth
; 13 = Clinical 14 = Additional Doc 15 = Facility
; 16 = Narrative 17 = Purchaser 18 = Service Provider
; 19 = Intermediary 37 = Last Known 4Rx
PROCDUR ; The DUR/PPS segment can repeat itself for any given
; transaction within a claim. This means we have to have special
; programming to handle the repeating fields.
PROCCOB ;The COB OTHER PAYMENTS segment can repeat itself for any given
; transaction within a claim. This means we have to have special
; programming to handle the repeating fields.
AMTPAID ; (#342) OTHER PAYER AMT PAID QUALIFIER multiple
REJCODES ; (#472) OTHER PAYER REJECT CODE
PATPAID ; (#353.01) OTHER PAYER-PATIENT RESPONSIBILITY multiple
BENSTAGE ; (#392.01) BENEFIT STAGE MLTPL multiple
SUBCLAR(DATAFND,BPSIEN,SEGREC) ;
; BPSIEN, SEGREC passed by ref., SEGREC is updated with repeating fields
; 420-DK Submission Clarification Code, a repeating group
OAMTCLMD(DATAFND,BPSIEN,SEGREC) ;
; BPSIEN, SEGREC passed by ref., SEGREC updated with pairs of repeating fields
; (#478.01) OTHER AMT CLAIMED MULTIPLE (sub-file 9002313.0601)

External References

Name Field # of Occurrence
$$NFF^BPSECFM SEGID+17
$$VNUM^BPSECMPS XLOOP+64, XLOOP+146
CLINICAL^BPSOSH3 XLOOP+36
GETFLDS^BPSOSHF PROCDUR+23, PROCCOB+16
$$GET1^DIQ XLOOP+124, XLOOP+125, XLOOP+135, XLOOP+144

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^BPSC - [#9002313.02] GET1^DIQ
9002313.5112 GET1^DIQ
^BPST - [#9002313.59] GET1^DIQ
^BPSF(9002313.91 - [#9002313.91] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BPS(9002313.511 - [#9002313.511] XLOOP+134
^BPSC - [#9002313.02] SUBCLAR+11, SUBCLAR+15, SUBCLAR+16, OAMTCLMD+11, OAMTCLMD+12
^BPSF(9002313.9 - [#9002313.9] XLOOP+131
^BPSF(9002313.91 - [#9002313.91] XLOOP+57, XLOOP+66, PROCDUR+34, PROCCOB+26, AMTPAID+9, REJCODES+9, PATPAID+8, BENSTAGE+9
^BPSF(9002313.92 - [#9002313.92] XLOOP+6, XLOOP+17, XLOOP+45, XLOOP+48, XLOOP+51

Label References

Name Line Occurrences
$$SEGID XLOOP+77, PROCDUR+18, PROCCOB+12
AMTPAID PROCCOB+38
BENSTAGE PROCCOB+40
OAMTCLMD XLOOP+83
PATPAID PROCCOB+39
PROCCOB XLOOP+33
PROCDUR XLOOP+30
REJCODES PROCCOB+37
SUBCLAR XLOOP+80

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BPCOB PROCCOB+6~, PROCCOB+19*, PROCCOB+20*, PROCCOB+28, AMTPAID+1~, AMTPAID+2*, AMTPAID+3*, AMTPAID+11, REJCODES+1~, REJCODES+2*
, REJCODES+3*, REJCODES+11, PATPAID+1~, PATPAID+2*, PATPAID+3*, PATPAID+10, BENSTAGE+2~, BENSTAGE+3*, BENSTAGE+4*, BENSTAGE+11
BPS XLOOP~
BPS( XLOOP+7, XLOOP+69, XLOOP+72, XLOOP+98, XLOOP+109, XLOOP+148, XLOOP+149, PROCDUR+15, PROCDUR+28, PROCDUR+36
, PROCCOB+9, PROCCOB+20, PROCCOB+28, AMTPAID+3, AMTPAID+11, REJCODES+3, REJCODES+11, PATPAID+3, PATPAID+10, BENSTAGE+4
, BENSTAGE+11
BPSD0 SUBCLAR+7~, SUBCLAR+9*, SUBCLAR+11, SUBCLAR+15, SUBCLAR+16, OAMTCLMD+7~, OAMTCLMD+9*, OAMTCLMD+11, OAMTCLMD+12
BPSD1 SUBCLAR+7~, SUBCLAR+9*, SUBCLAR+11, SUBCLAR+15, SUBCLAR+16, OAMTCLMD+7~, OAMTCLMD+9*, OAMTCLMD+11, OAMTCLMD+12
BPSD2 SUBCLAR+7~, SUBCLAR+9*, SUBCLAR+15*, SUBCLAR+16, OAMTCLMD+7~, OAMTCLMD+9*, OAMTCLMD+11*, OAMTCLMD+12
BPSIEN SUBCLAR~, OAMTCLMD~
BPSIEN( SUBCLAR+4, SUBCLAR+5, SUBCLAR+9, OAMTCLMD+4, OAMTCLMD+5, OAMTCLMD+9
BPSX XLOOP+3~, XLOOP+133*, XLOOP+134*, XLOOP+135
DATAFND XLOOP+2~, XLOOP+26*, XLOOP+73*, XLOOP+80, XLOOP+83, XLOOP+115, PROCDUR+39*, PROCCOB+34*, AMTPAID+17*, REJCODES+17*
, PATPAID+15*, BENSTAGE+16*, SUBCLAR~, SUBCLAR+19*, OAMTCLMD~, OAMTCLMD+19*
DUR PROCDUR+12~, PROCDUR+27*, PROCDUR+28*, PROCDUR+36
FDATA XLOOP+2~, XLOOP+57*, XLOOP+58, XLOOP+60
FIELD PROCDUR+12~, PROCDUR+23, PROCCOB+6~, PROCCOB+16
FIELD( PROCDUR+30, PROCDUR+31, PROCDUR+32, PROCCOB+22, PROCCOB+23, PROCCOB+24, AMTPAID+5, AMTPAID+6, AMTPAID+7, REJCODES+5
, REJCODES+6, REJCODES+7, PATPAID+5, PATPAID+6, PATPAID+7, BENSTAGE+6, BENSTAGE+7, BENSTAGE+8
FLAG XLOOP+2~
FLD SEGID+14~, SEGID+16*, SEGID+17*, SEGID+19, PROCDUR+12~, PROCDUR+32*, PROCDUR+33*, PROCDUR+36, PROCCOB+6~, PROCCOB+24*
, PROCCOB+25*, PROCCOB+28, PROCCOB+37, PROCCOB+38, PROCCOB+39, PROCCOB+40, AMTPAID+1~, AMTPAID+7*, AMTPAID+8*, AMTPAID+11
, REJCODES+1~, REJCODES+7*, REJCODES+8*, REJCODES+11, PATPAID+1~, PATPAID+7*, PATPAID+10, BENSTAGE+2~, BENSTAGE+8*, BENSTAGE+11
FLDDATA XLOOP+2~, XLOOP+69*, XLOOP+72*, XLOOP+73, XLOOP+77*, XLOOP+86, XLOOP+88, XLOOP+89, XLOOP+98*, XLOOP+99
, XLOOP+109*, XLOOP+110, XLOOP+148*, XLOOP+149*, XLOOP+151, XLOOP+156, XLOOP+157, PROCDUR+12~, PROCDUR+18*, PROCDUR+19
, PROCDUR+36*, PROCDUR+37, PROCDUR+39, PROCDUR+41, PROCCOB+12*, PROCCOB+13, PROCCOB+28*, PROCCOB+30, PROCCOB+31, PROCCOB+32
, PROCCOB+34, PROCCOB+35, AMTPAID+1~, AMTPAID+11*, AMTPAID+14, AMTPAID+15, AMTPAID+18, REJCODES+1~, REJCODES+11*, REJCODES+14
, REJCODES+15, REJCODES+17, REJCODES+19, PATPAID+1~, PATPAID+10*, PATPAID+13, PATPAID+16, BENSTAGE+2~, BENSTAGE+11*, BENSTAGE+14
, BENSTAGE+17
FLDID XLOOP+2~, XLOOP+66*, PROCDUR+12~, PROCDUR+34*, PROCDUR+39, PROCCOB+26*, PROCCOB+34, AMTPAID+1~, AMTPAID+9*, AMTPAID+15
, REJCODES+1~, REJCODES+9*, REJCODES+15, REJCODES+17, PATPAID+1~, PATPAID+8*, PATPAID+13, BENSTAGE+2~, BENSTAGE+9*, BENSTAGE+14
FLDIEN XLOOP+2~, XLOOP+54*, XLOOP+55, XLOOP+57, XLOOP+66, XLOOP+135*, XLOOP+144, PROCDUR+12~, PROCDUR+31*, PROCDUR+34
, PROCCOB+23*, PROCCOB+26, AMTPAID+1~, AMTPAID+6*, AMTPAID+9, REJCODES+1~, REJCODES+6*, REJCODES+9, PATPAID+1~, PATPAID+6*
, PATPAID+8, BENSTAGE+2~, BENSTAGE+7*, BENSTAGE+9
FLDNUM XLOOP+2~, XLOOP+60*, XLOOP+61, XLOOP+64*, XLOOP+69, XLOOP+72, XLOOP+77, XLOOP+80, XLOOP+83, XLOOP+84
, XLOOP+144*, XLOOP+145, XLOOP+146*, XLOOP+148, XLOOP+149
IEN XLOOP~, XLOOP+80, XLOOP+83
IEN( XLOOP+6, XLOOP+7, XLOOP+17, XLOOP+45, XLOOP+48, XLOOP+51, XLOOP+69, XLOOP+72, XLOOP+98, XLOOP+109
, XLOOP+124, XLOOP+148, XLOOP+149, PROCDUR+23, PROCCOB+16
IEN511 XLOOP+2~, XLOOP+125*, XLOOP+126, XLOOP+134, XLOOP+135
IEN59 XLOOP+2~, XLOOP+124*, XLOOP+125
INDEX XLOOP+2~, XLOOP+10*, XLOOP+11
MDATA XLOOP+2~, XLOOP+51*, XLOOP+52, XLOOP+54
ND SEGID~, SEGID+16
NODE XLOOP+2~, XLOOP+11*, XLOOP+14, XLOOP+17, XLOOP+20, XLOOP+21, XLOOP+24, XLOOP+30, XLOOP+33, XLOOP+36
, XLOOP+41, XLOOP+42, XLOOP+43, XLOOP+45, XLOOP+48, XLOOP+51, XLOOP+69, XLOOP+72, XLOOP+77, XLOOP+88
, XLOOP+89, XLOOP+95, XLOOP+106, XLOOP+131, XLOOP+148, XLOOP+149, XLOOP+156, XLOOP+157, XLOOP+162, XLOOP+163
, XLOOP+164, XLOOP+165, PROCDUR+18, PROCDUR+23, PROCCOB+12, PROCCOB+16
NODEIEN XLOOP+2~, XLOOP+131*, XLOOP+132, XLOOP+134
NODES XLOOP~, XLOOP+10, XLOOP+11
ORD PROCDUR+12~, PROCDUR+29*, PROCDUR+30*, PROCDUR+31, PROCDUR+32, PROCCOB+6~, PROCCOB+21*, PROCCOB+22*, PROCCOB+23, PROCCOB+24
, AMTPAID+1~, AMTPAID+4*, AMTPAID+5*, AMTPAID+6, AMTPAID+7, REJCODES+1~, REJCODES+4*, REJCODES+5*, REJCODES+6, REJCODES+7
, PATPAID+1~, PATPAID+4*, PATPAID+5*, PATPAID+6, PATPAID+7, BENSTAGE+2~, BENSTAGE+5*, BENSTAGE+6*, BENSTAGE+7, BENSTAGE+8
ORDER XLOOP+2~, XLOOP+38*, XLOOP+39, XLOOP+45*, XLOOP+46, XLOOP+48
PMODE XLOOP+2~
REC XLOOP~, XLOOP+164*
REC( XLOOP+162*, XLOOP+164*, XLOOP+165*
RECMIEN XLOOP+2~, XLOOP+48*, XLOOP+49, XLOOP+51
SEGREC XLOOP+2~, XLOOP+27*, XLOOP+80, XLOOP+83, XLOOP+88*, XLOOP+89*, XLOOP+97, XLOOP+99*, XLOOP+108, XLOOP+110*
, XLOOP+156*, XLOOP+157*, XLOOP+162, XLOOP+165, PROCDUR+19*, PROCDUR+41*, PROCCOB+13*, PROCCOB+35*, AMTPAID+18*, REJCODES+19*
, PATPAID+16*, BENSTAGE+17*, SUBCLAR~, SUBCLAR+18*, OAMTCLMD~, OAMTCLMD+18*
TYPE XLOOP+3~, XLOOP+7*, XLOOP+20, XLOOP+21, XLOOP+24, XLOOP+95, XLOOP+106
U XLOOP+6, XLOOP+10, XLOOP+11, XLOOP+54, XLOOP+60, XLOOP+66, PROCDUR+31, PROCDUR+32, PROCDUR+34, PROCCOB+23
, PROCCOB+24, PROCCOB+26, AMTPAID+6, AMTPAID+7, AMTPAID+9, REJCODES+6, REJCODES+7, REJCODES+9, PATPAID+6, PATPAID+7
, PATPAID+8, BENSTAGE+7, BENSTAGE+8, BENSTAGE+9, SUBCLAR+11, SUBCLAR+16, OAMTCLMD+14, OAMTCLMD+15
VER XLOOP+3~, XLOOP+6*, XLOOP+21
X OAMTCLMD+7~, OAMTCLMD+12*, OAMTCLMD+13, OAMTCLMD+14, OAMTCLMD+15
X1 SUBCLAR+7~, SUBCLAR+16*, SUBCLAR+17, SUBCLAR+18
X2 OAMTCLMD+7~, OAMTCLMD+14*, OAMTCLMD+16, OAMTCLMD+18
X3 OAMTCLMD+7~, OAMTCLMD+15*, OAMTCLMD+17, OAMTCLMD+18
X4 SUBCLAR+7~, SUBCLAR+11*, SUBCLAR+13
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All