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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BAR50P02

Package: IHS Accounts Receivable

Routine: BAR50P02


Information

BAR50P02 ; IHS/SD/LSL - PARSE SEGMENTS INTO ELEMENTS AND CONVERT ; 11 Jul 2011 2:50 PM

Source Information

Source file <BAR50P02.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 4 (,DD)^%DT  ^DIC  FILE^DICN  $$GET1^DIQ  
IHS VA Utilities 1 ($$DIC,$$VAL,ENP,ENPM)^XBDIQ1  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
IHS Accounts Receivable 4 BAR50BPR  BAR50P00  BAR50PZ1  BAREDBPR  

Entry Points

Name Comments DBIA/ICR reference
STNDTBL ; EP - Pull value from A/R EDI TABLES File
CONVERT ;
; Convert incoming data according to data type(s)
PLB ; EP
EN(TRDA,IMPDA)
LQCD ; EP
; This line tag called by .03 field in A/R EDI TABLES File
; Processing routine for Remark or NCPDP Reject Payment Codes.
; Whichever is passed in on LQ02
CLMADJCD ; EP
; .03 (processing routine) for this data type of this element
; Find standard claim level adjustment code
CLMCODE ; EP
; .03 (processing routine) for this data type of this element
; find claim reason code
RMKCODE ;
; find remark code
FIND(FILE,PATH,X)
TABLE ;
; perform lookup on table ; ELM(.07) contains path to table
DT ;
; Convert date to readable format for HIPAA 835
; ISA09 comes as YYMMDD all other elements are YYYYMMDD
LOADTR ;
; load element parsing specifications
HRMKCD ; EP
; This line tag called by .03 field in A/R EDI TABLES File
; Processing routine for Remark Code elements to look up in RPMS File
CHKS(IMPDA) ;EP - POPULATE CHECK/EFTS SUBFILE IN IMPORT FILE
PLVCODE ;
; find provider level reason code
; Not called for HIPAA - regular table entry.

External References

Name Field # of Occurrence
^%DT DT+5
DD^%DT DT+5
^DIC STNDTBL+8, CLMCODE+8, CLMADJCD+10, HRMKCD+8, LQCD+16, PLVCODE+8, FIND+9
FILE^DICN CHKS+49
$$GET1^DIQ EN+1, EN+9, TABLE+3, STNDTBL+1, CLMADJCD+13, HRMKCD+11, LQCD+19
$$DIC^XBDIQ1 CLMCODE+5, PLVCODE+5, FIND+5
$$VAL^XBDIQ1 CLMCODE+11, PLVCODE+10
ENP^XBDIQ1 EN+31, LOADTR+10
ENPM^XBDIQ1 EN+5, EN+21, LOADTR+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Processing Segment Elements into Values",!
  • Line Location: EN+20
Function Call: WRITE
  • Prompt: " ",COUNT,!
  • Line Location: EN+34
Routine Call
  • DIC
  • Line Location:
    • STNDTBL+8
    • CLMCODE+8
    • CLMADJCD+10
    • HRMKCD+8
    • LQCD+16
    • PLVCODE+8
    • FIND+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ABSPF(9002313.93 - [#9002313.93] Classic Fileman Calls,  GET1^DIQ
^BAREDI("1T" - [#90056.01] GET1^DIQ
90056.0105 GET1^DIQ
^BARETBL - [#90056.04] GET1^DIQ
^BAREDT - [#90056.05] GET1^DIQ
^BARADJ - [#90056.06] Classic Fileman Calls,  GET1^DIQ
^BARMKCD - [#90056.23] Classic Fileman Calls,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BAREDI("I" LOADTR+17!, LOADTR+19*, LOADTR+26*, CHKS+3, CHKS+4, CHKS+13, CHKS+14, CHKS+15, CHKS+22, CHKS+26
, CHKS+29, PLB+5, PLB+7
^BAREDT - [#90056.05] EN+8
^DD(90056.02 CHKS+38
^TMP($J EN+19!, LOADTR+3!, LOADTR+8

Label References

Name Line Occurrences
$$FIND TABLE+6
CONVERT LOADTR+13
HRMKCD LQCD+9
LOADTR EN+33
PLB CHKS+33
STNDTBL CONVERT+3
TABLE CONVERT+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT DT+4*
ARRAY LOADTR+3!
ARRAY( LOADTR+15*, LOADTR+25, LOADTR+26
ARRAY("" LOADTR+18
>> BAR15 PLB+7*, PLB+8, PLB+9, PLB+14, PLB+15, PLB+16, PLB+17, PLB+18, PLB+19
>> BARCCNT CHKS+2*, CHKS+8, CHKS+13, CHKS+14, CHKS+15, CHKS+26, CHKS+29, CHKS+30, CHKS+31*, CHKS+32*
, CHKS+34*, CHKS+40, CHKS+41, CHKS+42, CHKS+43, CHKS+44, CHKS+45, CHKS+46, CHKS+47, PLB+11*
, PLB+12*, PLB+13, PLB+14, PLB+15, PLB+16, PLB+17, PLB+18, PLB+19
BARCDA PLB+2~, PLB+3*, PLB+5*, PLB+7
BARCTMP CHKS+1~
BARCTMP( CHKS+8*, CHKS+13*, CHKS+14*, CHKS+15*, CHKS+26*, CHKS+29*, CHKS+30*, CHKS+34, CHKS+40, CHKS+41
, CHKS+42, CHKS+43, CHKS+44, CHKS+45, CHKS+46, CHKS+47, PLB+12, PLB+13, PLB+14*, PLB+15*
, PLB+16*, PLB+17*, PLB+18*, PLB+19*
>> BARCTYP LQCD+8*, LQCD+9, LQCD+10
BARI EN+7*, EN+8*, EN+9, EN+10!
BARJ EN+9*, EN+10!
>> BARQ CHKS+19*, CHKS+20, CHKS+23*
BARSCK PLB+2~, PLB+4*
BARSEG PLB+2~, PLB+8*, PLB+9, PLB+10
BARVCK PLB+2~, PLB+4*, PLB+9*, PLB+13
>> C FIND+8*
CNT PLB+2~, PLB+5*, PLB+6
>> COUNT EN+24*, EN+27, EN+28, EN+29*, EN+34
DA CLMCODE+4!, CLMADJCD+5!, HRMKCD+4!, LQCD+12!, PLVCODE+4!, FIND+2!, CHKS+35!
DA( FIND+8*
DA(1 STNDTBL+5*, STNDTBL+6, CLMCODE+6*, PLVCODE+6*, CHKS+36*, CHKS+37
DAT EN+4!, EN+6
DAT( EN+9*, EN+14, EN+16*, CONVERT+4
DAT("ID" EN+11!
>> DATDA EN+13*, EN+14*, EN+16
>> DAZ( FIND+7*, FIND+8
DD CLMADJCD+9!, HRMKCD+7!, LQCD+15!, CHKS+48!
DIC STNDTBL+6*, CLMCODE+4!, CLMCODE+5*, CLMADJCD+5!, CLMADJCD+7*, HRMKCD+4!, HRMKCD+5*, LQCD+12!, LQCD+13*, PLVCODE+4!
, PLVCODE+5*, FIND+2!, FIND+5*, CHKS+35!, CHKS+37*
DIC("DR" CHKS+41*, CHKS+42*, CHKS+43*, CHKS+44*, CHKS+45*, CHKS+46*, CHKS+47*
DIC("P" CHKS+38*
DIC(0 STNDTBL+7*, CLMCODE+7*, CLMADJCD+8*, HRMKCD+6*, LQCD+14*, PLVCODE+7*, FIND+6*, CHKS+39*
DIE CHKS+35!
DIR CHKS+35!
DO CLMADJCD+9!, HRMKCD+7!, LQCD+15!, CHKS+48!
DT LOADTR+19
DUZ(2 LOADTR+17, LOADTR+19, LOADTR+26, CHKS+3, CHKS+4, CHKS+13, CHKS+14, CHKS+15, CHKS+22, CHKS+26
, CHKS+29, CHKS+37, PLB+5, PLB+7
>> E LOADTR+2*, LOADTR+12, LQCD+8, CHKS+7, CHKS+8, CHKS+13, CHKS+14, CHKS+15, CHKS+22, CHKS+26
, CHKS+29, PLB+8, PLB+9, PLB+14, PLB+15, PLB+16, PLB+17, PLB+18, PLB+19
ELM LOADTR+9!
ELM( LOADTR+11, CONVERT+2, CONVERT+3, CONVERT+4, TABLE+3, TABLE+6, STNDTBL+1, STNDTBL+5
>> ELMDA LOADTR+7*, LOADTR+8*, LOADTR+24*, LOADTR+25*, LOADTR+26
FILE FIND~, FIND+5
>> I LOADTR+18*, LOADTR+19, FIND+7*, FIND+8, CHKS+2*, CHKS+3*, CHKS+4, CHKS+9*, CHKS+13, CHKS+14
, CHKS+15, CHKS+16*, CHKS+22*, CHKS+26, CHKS+27*, CHKS+29
IMPDA EN~, LOADTR+17, LOADTR+19, LOADTR+26, CHKS~, CHKS+3, CHKS+4, CHKS+13, CHKS+14, CHKS+15
, CHKS+22, CHKS+26, CHKS+29, CHKS+36, PLB+5, PLB+7
>> IREC CHKS+4*, CHKS+7, CHKS+8
>> MCODE TABLE+3*, TABLE+4*, TABLE+5, STNDTBL+1*, STNDTBL+2*, STNDTBL+3
PATH FIND~, FIND+7
>> PATHS EN+32*, LOADTR+4
REC EN+30!
REC( EN+32, LOADTR+12, LQCD+8
>> RECDA EN+25*, EN+26*, LOADTR+17, LOADTR+19, LOADTR+26
>> RECM EN+22*, EN+26
>> SEGXDA LOADTR+4*
>> SEQ LOADTR+11*, LOADTR+12, LOADTR+15
>> TABID EN+1*
TRDA EN~, EN+1, CLMCODE+6, PLVCODE+6
U STNDTBL+10, FIND+11, CHKS+8, CHKS+13, CHKS+14, CHKS+15, CHKS+26, CHKS+29, CHKS+30, CHKS+38
, CHKS+40, CHKS+41, CHKS+42, CHKS+43, CHKS+44, CHKS+45, CHKS+46, CHKS+47, PLB+13, PLB+14
, PLB+15, PLB+16, PLB+17, PLB+18, PLB+19
X LOADTR+12*, LOADTR+15, CONVERT+5*, TABLE+6*, STNDTBL+9*, STNDTBL+10*, DT+3*, DT+6*, CLMCODE+3, CLMCODE+9*
, CLMCODE+11*, CLMADJCD+3*, CLMADJCD+4, CLMADJCD+6*, CLMADJCD+11*, CLMADJCD+13*, RMKCODE+2, RMKCODE+3*, HRMKCD+3, HRMKCD+9*
, HRMKCD+11*, LQCD+7, LQCD+11*, LQCD+17*, LQCD+19*, PLVCODE+3, PLVCODE+9*, PLVCODE+10*, FIND~, FIND+3
, FIND+10*, FIND+11*, FIND+12, CHKS+35!, CHKS+40*
>> XDA CLMCODE+10*, CLMADJCD+12*, CLMADJCD+13, HRMKCD+10*, HRMKCD+11, LQCD+18*, LQCD+19, PLVCODE+10*
>> XX CONVERT+4*
Y STNDTBL+9, DT+6, CLMCODE+9, CLMCODE+10, CLMADJCD+11, CLMADJCD+12, HRMKCD+9, HRMKCD+10, LQCD+17, LQCD+18
, PLVCODE+9, PLVCODE+10, FIND+10, CHKS+35!
Y(0 STNDTBL+10, FIND+11
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All