©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
ABSPOSH5 ; IHS/SD/lwj - Post 5.1 Claim Response ;8/7/02 [ 09/04/2002 12:57 PM ]
Source file <ABSPOSH5.m>
| Package | Total | Call Graph |
|---|---|---|
| Pharmacy Point of Sale | 4 | (RESPCLM,RESPSTS)^ABSPOSH6 (RESPDUR,RESPPA,RESPPRC)^ABSPOSH7 CLNDATA^ABSPOSHU $$IMPOSS^ABSPOSUE |
| Package | Total | Caller Graph |
|---|---|---|
| Pharmacy Point of Sale | 2 | ABSPDR ABSPOSH4 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| WRTTMSN | ; The purpose of this subroutine is to read through the
; FDATA transmission level fields, and write out the data ; to the ^ABSPR (ABSP Responses) file. |
|
| FILE(RESPIEN) | ;EP - from ABSPOSH4
|
|
| WRTTRAN | ;The purpose of this routine is to write the transaction level
; information out to the ^ABSPR (ABSP Responses) file. ; **Special Note - the cross references and header for the subfiles ; are hard set within this subroutine - this is done to stay ; consistent with the original POS software (please see ABSPECA5) |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ABSPC - [#9002313.02] | WRTTRAN+15 |
| ^ABSPR - [#9002313.03] | WRTTMSN+5*, WRTTMSN+6*, WRTTMSN+7*, WRTTMSN+8*, WRTTMSN+9*, WRTTMSN+10*, WRTTMSN+11*, WRTTMSN+14*, WRTTMSN+17*, WRTTMSN+18* , WRTTMSN+19*, WRTTMSN+20*, WRTTMSN+21*, WRTTRAN+14, WRTTRAN+29*, WRTTRAN+42*, WRTTRAN+45* |
| Name | Line Occurrences |
|---|---|
| WRTTMSN | FILE+7 |
| WRTTRAN | FILE+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CLAIMIEN | FILE+4~, WRTTRAN+11~, WRTTRAN+14*, WRTTRAN+15 |
| COUNT | FILE+4~, WRTTRAN+11~, WRTTRAN+17*, WRTTRAN+26*, WRTTRAN+45 |
| >> FDATA("M" | WRTTRAN+23 |
| >> FDATA(102 | WRTTMSN+5 |
| >> FDATA(103 | WRTTMSN+6 |
| >> FDATA(109 | WRTTMSN+7 |
| >> FDATA(201 | WRTTMSN+9 |
| >> FDATA(202 | WRTTMSN+10 |
| >> FDATA(301 | WRTTMSN+17 |
| >> FDATA(401 | WRTTMSN+11 |
| >> FDATA(501 | WRTTMSN+8 |
| >> FDATA(504 | WRTTMSN+14 |
| >> FDATA(524 | WRTTMSN+18 |
| >> FDATA(545 | WRTTMSN+19 |
| >> FDATA(568 | WRTTMSN+20 |
| >> FDATA(569 | WRTTMSN+21 |
| INDEX | FILE+4~, WRTTRAN+11~, WRTTRAN+15*, WRTTRAN+16*, WRTTRAN+27*, WRTTRAN+29, WRTTRAN+42, WRTTRAN+45 |
| MEDN | FILE+4~, WRTTRAN+11~, WRTTRAN+21*, WRTTRAN+22, WRTTRAN+23*, WRTTRAN+24 |
| NEXT | FILE+4~ |
| RESPIEN | FILE~, FILE+2, WRTTMSN+5, WRTTMSN+6, WRTTMSN+7, WRTTMSN+8, WRTTMSN+9, WRTTMSN+10, WRTTMSN+11, WRTTMSN+14 , WRTTMSN+17, WRTTMSN+18, WRTTMSN+19, WRTTMSN+20, WRTTMSN+21, WRTTRAN+14, WRTTRAN+29, WRTTRAN+42, WRTTRAN+45 |
| RJTCODE | FILE+4~ |
| RJTCOUNT | FILE+4~ |
| RJTN | FILE+4~ |
| U | WRTTMSN+5, WRTTMSN+6, WRTTMSN+7, WRTTMSN+8, WRTTMSN+9, WRTTMSN+10, WRTTMSN+11, WRTTMSN+14, WRTTMSN+17, WRTTMSN+18 , WRTTMSN+19, WRTTMSN+20, WRTTMSN+21, WRTTRAN+14 |
| Name | Field # of Occurrence |
|---|---|
| $T( | FILE+2 |