©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
ABSPOSIH ; IHS/FCS/DRS - NCPDP 5.1 DUR Overrides form ; [ 06/03/2002 4:40 AM ]
Source file <ABSPOSIH.m>
| Package | Total | Call Graph |
|---|---|---|
| Pharmacy Point of Sale | 3 | ($$CHKDUR,$$NEW,NEWSUB)^ABSPOSD2 LOG^ABSPOSL2 $$GETDUR^ABSPOSO |
| VA Fileman | 3 | HLP^DDSUTL ($$GET,PUT)^DDSVAL FILE^DIE |
| Package | Total | Caller Graph |
|---|---|---|
| Pharmacy Point of Sale | 2 | ABSPOSI ABSPOSIZ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NOCLM | ;EP - called from ABSPOSI when the claims are NOT filed - we
; still must clean up the empty records if they called upon ; the DUR overrides |
|
| PREINIT | ;EP - check for existing record
; This is the pre-init routine tied to the ; ABSP INPUT 5.1 DUR INPUT block on the ABSP Input Data screen ; This is used during the creation of the "new" claim from ; within POS (called from the "USER" screen) to capture ; NCPDP 5.1 DUR override values. |
|
| UPDRX(RXI,RXR,OVERDUR) | ; update the prescription with the DUR 5.1 information
; and the ABSP Data Input file with the appropriate value |
|
| CLNDUR(IEN,ENTRY) | ;EP - clean up the DUR file of empty entries
; and update the RX file when no override information ; was actually entered for the 5.1 DUR segment. ; This routine called from ABSPOSIZ - subroutine FILE |
| Name | Field # of Occurrence |
|---|---|
| $$CHKDUR^ABSPOSD2 | CLNDUR+16, NOCLM+12 |
| $$NEW^ABSPOSD2 | PREINIT+25 |
| NEWSUB^ABSPOSD2 | PREINIT+30 |
| LOG^ABSPOSL2 | CLNDUR+23, UPDRX+13, UPDRX+18 |
| $$GETDUR^ABSPOSO | PREINIT+17 |
| HLP^DDSUTL | PREINIT+22, PREINIT+27 |
| $$GET^DDSVAL | PREINIT+11, PREINIT+12 |
| PUT^DDSVAL | PREINIT+34 |
| FILE^DIE | CLNDUR+22, UPDRX+12, UPDRX+17 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ABSP(9002313.51 - [#9002313.51] | CLNDUR+8 |
| ^TMP("ABSPOSIH" | PREINIT+39*, NOCLM+7, NOCLM+9 |
| Name | Line Occurrences |
|---|---|
| UPDRX | PREINIT+33, CLNDUR+19, NOCLM+13 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CLNDUR | NOCLM+4~, NOCLM+8~, NOCLM+12*, NOCLM+13 |
| >> DA | PREINIT+11, PREINIT+12, PREINIT+34 |
| DATAREC | CLNDUR+6~, CLNDUR+8*, CLNDUR+10, CLNDUR+13, CLNDUR+14 |
| >> DIE | PREINIT+11, PREINIT+12, PREINIT+34 |
| DURIEN | NOCLM+4~, NOCLM+5*, NOCLM+7*, NOCLM+9, NOCLM+12 |
| DURREC | NOCLM+8~, NOCLM+9*, NOCLM+10, NOCLM+11 |
| ENTRY | CLNDUR~, CLNDUR+8, CLNDUR+21 |
| FDA | PREINIT+8~, CLNDUR+20~, UPDRX+3~ |
| FDA( | CLNDUR+21*, UPDRX+16* |
| FDA(52 | UPDRX+11* |
| IEN | CLNDUR~, CLNDUR+8, CLNDUR+21 |
| OVERDUR | PREINIT+8~, PREINIT+13*, PREINIT+17*, PREINIT+19, PREINIT+24, PREINIT+25*, PREINIT+26, PREINIT+30, PREINIT+33, PREINIT+34 , PREINIT+39, CLNDUR+6~, CLNDUR+10*, CLNDUR+11, CLNDUR+16*, CLNDUR+18, CLNDUR+19, CLNDUR+21, UPDRX~, UPDRX+11 , UPDRX+16 |
| RXI | PREINIT+8~, PREINIT+11*, PREINIT+15, PREINIT+17, PREINIT+20, PREINIT+33, PREINIT+39, CLNDUR+13*, CLNDUR+19, UPDRX~ , UPDRX+11, UPDRX+16, NOCLM+8~, NOCLM+10*, NOCLM+13 |
| RXR | PREINIT+8~, PREINIT+12*, PREINIT+17, PREINIT+21, PREINIT+33, PREINIT+39, CLNDUR+14*, CLNDUR+19, UPDRX~, UPDRX+10 , UPDRX+15, UPDRX+16, NOCLM+8~, NOCLM+11*, NOCLM+13 |
| STRING | PREINIT+8~, PREINIT+22, PREINIT+27 |
| STRING(1 | PREINIT+20*, PREINIT+21*, PREINIT+26* |
| ZERR | CLNDUR+20~, CLNDUR+23, UPDRX+3~, UPDRX+13, UPDRX+18 |