ABSPECA4 ; IHS/FCS/DRS - Parse Claim Response ; [ 08/09/2002 11:08 AM ]
Source file <ABSPECA4.m>
Package | Total | Call Graph |
---|---|---|
Pharmacy Point of Sale | 3 | FILE^ABSPECA5 $$PAID^ABSPECA7 PARSE51^ABSPOSH4 |
Name | Comments | DBIA/ICR reference |
---|---|---|
AROUND | ;
|
|
OPTR(MEDN,RDATAO) | ;
|
|
PARSE32 | ;IHS/SD/lwj 8/6/02 NCPDP 5.1 forced the splitting of the parsing -
; this subroutine is the original code that will parse 3.2 still |
|
PCSREV | ; split off of PCS REVERSAL processing - RHEADER has everything
; Make it look like a prescription multiple ; It has no GS or FS stuff, so everything is in RHEADERR |
|
PARSE(RREC,RESPIEN) | ;EP - from ABSPOSQL from ABSPOSQ4
|
|
AKMEDFIX | ; as noted, above ; Alaska Medicaid while sleeping - you get
; this corrupt message. May be true of other insurers, too. ; This looks like it might be an NDC message. ; We'll find out as time goes on. ; Here - we make sure that it's one of those packets, ; and we insert GS characters so that it parses correctly. |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ABSPR - [#9002313.03] | PARSE+7 |
Name | Line Occurrences |
---|---|
AKMEDFIX | PARSE+14 |
AROUND | PARSE32+14 |
OPTR | PARSE32+79 |
PARSE32 | PARSE+26 |
PCSREV | PARSE32+14 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
FDATA | PARSE+2~, OPTR+9*, OPTR+10, OPTR+12, OPTR+13 |
FDATA("M" | PARSE32+29*, PARSE32+32, PARSE32+33*, PARSE32+36*, PARSE32+39, PARSE32+40*, PARSE32+41*, PARSE32+42*, PARSE32+43*, PARSE32+44* , PARSE32+45*, PARSE32+46*, PARSE32+49, PARSE32+50*, PARSE32+51*, PARSE32+54, PARSE32+55*, PARSE32+56*, PARSE32+57*, PARSE32+58* , PARSE32+59*, PARSE32+60*, PARSE32+61*, PARSE32+62*, PARSE32+63*, PARSE32+64*, PARSE32+65*, PARSE32+66*, PARSE32+67*, PARSE32+68* , PARSE32+69*, PARSE32+70*, PARSE32+71*, PARSE32+72*, PARSE32+73*, PARSE32+74*, PARSE32+75*, PARSE32+76*, PCSREV+5*, PCSREV+6* , PCSREV+8*, PCSREV+10*, PCSREV+11*, PCSREV+13*, OPTR+14*, OPTR+15*, OPTR+16*, OPTR+17*, OPTR+18*, OPTR+19* , OPTR+20*, OPTR+21*, OPTR+22*, OPTR+23*, OPTR+24*, OPTR+27*, OPTR+28* |
FDATA(102 | PARSE+25*, PARSE+26, PARSE+28, PARSE32+6* |
FDATA(103 | PARSE32+7*, PARSE32+14 |
FDATA(501 | PARSE32+8*, PCSREV+4, PCSREV+7 |
FDATA(524 | PARSE32+17* |
FS | PARSE+1~, PARSE+10*, PARSE+18, PARSE32+3, PARSE32+25, PARSE32+26, OPTR+8, OPTR+9, AKMEDFIX+8 |
GS | PARSE+1~, PARSE+10*, PARSE+14, PARSE+17, PARSE32+20, PARSE32+23, PARSE32+24, AKMEDFIX+20 |
I | PCSREV+9~*, PCSREV+10, AKMEDFIX+20~* |
ID | PARSE+2~, OPTR+2~, OPTR+12*, OPTR+14, OPTR+15, OPTR+16, OPTR+17, OPTR+18, OPTR+19, OPTR+20 , OPTR+21, OPTR+22, OPTR+23, OPTR+24, OPTR+25, OPTR+28 |
INDEX | PARSE+2~, OPTR+2~, OPTR+8*, OPTR+9 |
MEDN | PARSE+1~, PARSE32+23*, PARSE32+24, PARSE32+29, PARSE32+32, PARSE32+33, PARSE32+36, PARSE32+39, PARSE32+40, PARSE32+41 , PARSE32+42, PARSE32+43, PARSE32+44, PARSE32+45, PARSE32+46, PARSE32+49, PARSE32+50, PARSE32+51, PARSE32+54, PARSE32+55 , PARSE32+56, PARSE32+57, PARSE32+58, PARSE32+59, PARSE32+60, PARSE32+61, PARSE32+62, PARSE32+63, PARSE32+64, PARSE32+65 , PARSE32+66, PARSE32+67, PARSE32+68, PARSE32+69, PARSE32+70, PARSE32+71, PARSE32+72, PARSE32+73, PARSE32+74, PARSE32+75 , PARSE32+76, PARSE32+79, PCSREV+14*, OPTR~, OPTR+5, OPTR+14, OPTR+15, OPTR+16, OPTR+17, OPTR+18 , OPTR+19, OPTR+20, OPTR+21, OPTR+22, OPTR+23, OPTR+24, OPTR+27, OPTR+28 |
NPIECES | AKMEDFIX+11~*, AKMEDFIX+12, AKMEDFIX+17 |
RDATA | PARSE+1~, PARSE32+24*, PARSE32+25, PARSE32+26 |
RDATAO | PARSE+1~, PARSE32+26*, PARSE32+79, OPTR~, OPTR+6, OPTR+8, OPTR+9 |
RDATAR | PARSE+1~, PARSE32+25*, PARSE32+29, PARSE32+33, PARSE32+35, PARSE32+40, PARSE32+41, PARSE32+42, PARSE32+43, PARSE32+44 , PARSE32+45, PARSE32+46, PARSE32+50, PARSE32+51, PARSE32+55, PARSE32+56, PARSE32+57, PARSE32+58, PARSE32+59, PARSE32+60 , PARSE32+61, PARSE32+62, PARSE32+63, PARSE32+64, PARSE32+65, PARSE32+66, PARSE32+67, PARSE32+68, PARSE32+69, PARSE32+70 , PARSE32+71, PARSE32+72, PARSE32+73, PARSE32+74, PARSE32+75, PARSE32+76 |
RESPIEN | PARSE~, PARSE+6, PARSE+7, PARSE+28, AROUND+2 |
RHEADER | PARSE+1~, PARSE+17*, PARSE+18, PARSE32+3 |
RHEADERO | PARSE+1~, PARSE32+3*, PARSE32+17 |
RHEADERR | PARSE+1~, PARSE+18*, PARSE+25, PARSE32+6, PARSE32+7, PARSE32+8, PCSREV+3 |
RINFO | PARSE+2~, PARSE32+20*, PARSE32+23, PARSE32+24 |
RREC | PARSE~, PARSE+5, PARSE+14, PARSE+17, PARSE+28, PARSE32+20, AKMEDFIX+6, AKMEDFIX+7, AKMEDFIX+8, AKMEDFIX+9 , AKMEDFIX+10, AKMEDFIX+11, AKMEDFIX+12, AKMEDFIX+17, AKMEDFIX+19, AKMEDFIX+20, AKMEDFIX+21* |
X | PARSE32+35~*, PARSE32+36, PCSREV+3~*, PCSREV+5, PCSREV+6, PCSREV+8, PCSREV+10, PCSREV+11, PCSREV+13, AKMEDFIX+19~* , AKMEDFIX+20*, AKMEDFIX+21 |
XDATA | PARSE+2~, OPTR+2~, OPTR+13*, OPTR+14, OPTR+15, OPTR+16, OPTR+17, OPTR+18, OPTR+19, OPTR+20 , OPTR+21, OPTR+22, OPTR+23, OPTR+24, OPTR+26, OPTR+27, OPTR+28 |