©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
ABSPOSI2 ; IHS/FCS/DRS - support for the NDC/HCPCS/CPT field ; [ 09/12/2002 10:10 AM ]
Source file <ABSPOSI2.m>
| Package | Total | Call Graph |
|---|---|---|
| Pharmacy Point of Sale | 4 | ($$NAME,$$NDC10,$$NDC11)^ABSPOS9 ($$MMMDD,MSGWAIT)^ABSPOSI1 RECALC1^ABSPOSI7 IMPOSS^ABSPOSUE |
| VA Fileman | 3 | HLP^DDSUTL ($$GET,PUT)^DDSVAL ^DIC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ASKINS() | ||
| ASKPRE() | ||
| MSGWAIT(X) | ||
| VALIDATE(X) | ||
| HELP | ;
|
|
| HELP1(X) | ||
| PRINTNAM(X) | ||
| ASKPRI() | ||
| STOREAWP | ; not implemented - we don't have a readily-available AWP pointer
|
|
| ASKDATE() | ||
| LOOKUP(DICX,X) | ||
| VALID | ; this is what's called from the field's Data Validation field
|
|
| EFFECTS | ;
; Force an update of pricing when you enter page 7, by wiping out ; any unit price that might already be stored there. |
|
| BRANCH | ;
|
|
| UPPER(X) | ||
| VAL1 | ||
| VAL0 | ;
|
|
| CPT(X) | ; Lookup CPT code. If found, return CPTIEN.
|
|
| MMMDD(Y) |
| Name | Field # of Occurrence |
|---|---|
| $$NAME^ABSPOS9 | PRINTNAM+3 |
| $$NDC10^ABSPOS9 | VAL1+2 |
| $$NDC11^ABSPOS9 | VAL1+8 |
| $$MMMDD^ABSPOSI1 | MMMDD |
| MSGWAIT^ABSPOSI1 | MSGWAIT |
| RECALC1^ABSPOSI7 | EFFECTS+32 |
| IMPOSS^ABSPOSUE | VALID+7 |
| HLP^DDSUTL | VAL1+4, VAL1+5, VAL1+10, VAL1+11, VAL1+20, VAL1+31, PRINTNAM+4, HELP+4 |
| $$GET^DDSVAL | EFFECTS+3, EFFECTS+16, ASKPRE, ASKINS, ASKPRI, ASKDATE |
| PUT^DDSVAL | EFFECTS+4, EFFECTS+19, EFFECTS+20, EFFECTS+21, EFFECTS+22, EFFECTS+23, EFFECTS+24, EFFECTS+25, EFFECTS+26, EFFECTS+27 , EFFECTS+28, EFFECTS+29, EFFECTS+31 |
| ^DIC | LOOKUP+5 |
| FileNo | Call Tags |
|---|---|
| ^ABSP(9002313.51 - [#9002313.51] | GET^DDSVAL |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ABSCPT(9002300 | EFFECTS+12 |
| ^AUPNVSIT - [#9000010] | EFFECTS+17, EFFECTS+21 |
| ^TMP("DDS" | VALID+1 |
| Name | Line Occurrences |
|---|---|
| $$ASKDATE | BRANCH+1 |
| $$ASKINS | BRANCH+1 |
| $$ASKPRE | BRANCH+1 |
| $$ASKPRI | BRANCH+1 |
| $$CPT | VAL1+28 |
| $$LOOKUP | CPT+1, EFFECTS+10 |
| $$MMMDD | EFFECTS+21 |
| $$UPPER | VAL1+21, VAL1+23 |
| $$VALIDATE | VALID+2 |
| HELP1 | HELP+2, HELP+3 |
| PRINTNAM | VAL1+6, VAL1+13 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AR | HELP+1~, HELP+4 |
| AR( | HELP1* |
| C0 | EFFECTS+12~*, EFFECTS+13, EFFECTS+14, EFFECTS+15 |
| CPTCODE | EFFECTS+9~*, EFFECTS+10 |
| CPTDESC | EFFECTS+13~*, EFFECTS+14*, EFFECTS+20 |
| CPTIEN | EFFECTS+10~*, EFFECTS+12, EFFECTS+25 |
| >> DA | EFFECTS+3, EFFECTS+4, EFFECTS+16, EFFECTS+19, EFFECTS+20, EFFECTS+21, EFFECTS+22, EFFECTS+23, EFFECTS+24, EFFECTS+25 , EFFECTS+26, EFFECTS+27, EFFECTS+28, EFFECTS+29, EFFECTS+31 |
| >> DA(1 | EFFECTS+3, ASKPRE, ASKINS, ASKPRI, ASKDATE |
| >> DDS | VALID+1 |
| >> DDSDA | VALID+1 |
| DDSERROR | VALID+1*, VALID+4, VALIDATE+7!, VAL1+3*, VAL1+19*, VAL1+29*, VAL1+30 |
| >> DDSEXT | VALID+9* |
| >> DDSSTACK | BRANCH+1* |
| DIC | LOOKUP+2~, LOOKUP+3* |
| DIC("S" | LOOKUP+4* |
| DIC(0 | LOOKUP+3* |
| DICX | LOOKUP~, LOOKUP+3 |
| >> DIE | EFFECTS+3, EFFECTS+4, EFFECTS+16, EFFECTS+19, EFFECTS+20, EFFECTS+21, EFFECTS+22, EFFECTS+23, EFFECTS+24, EFFECTS+25 , EFFECTS+26, EFFECTS+27, EFFECTS+28, EFFECTS+29, EFFECTS+31 |
| DINUM | LOOKUP+2~ |
| DLAYGO | LOOKUP+2~ |
| DTIME | LOOKUP+2~ |
| DTOUT | LOOKUP+2~ |
| DUOUT | LOOKUP+2~ |
| N | HELP+1~*, HELP1* |
| NAME | PRINTNAM+3~*, PRINTNAM+4 |
| PRICE | EFFECTS+15~*, EFFECTS+27 |
| RET | VALIDATE+7~, VAL1+2*, VAL1+3, VAL1+8*, VAL1+9, VAL1+12*, VAL1+15*, VAL1+16*, VAL1+17*, VAL1+18* , VAL1+19!, VAL1+22*, VAL1+28*, VAL1+29!, VAL1+32!, VAL1+33 |
| U | VALID+1, EFFECTS+13, EFFECTS+14, EFFECTS+15, EFFECTS+17, EFFECTS+21 |
| VCN | EFFECTS+17~*, EFFECTS+18*, EFFECTS+19 |
| VISITIEN | EFFECTS+16~*, EFFECTS+17, EFFECTS+18, EFFECTS+21 |
| X | VALID+2, VALID+8, VALID+9*, VALIDATE~, VAL0+1, VAL0+2*, VAL0+3*, VAL1+1, VAL1+2, VAL1+4 , VAL1+6, VAL1+7, VAL1+8, VAL1+10, VAL1+12, VAL1+13, VAL1+14, VAL1+15, VAL1+16, VAL1+17 , VAL1+18, VAL1+21, VAL1+23, VAL1+27*, VAL1+28, VAL1+31, CPT~, CPT+1, EFFECTS+7, EFFECTS+9 , MSGWAIT~, LOOKUP~, PRINTNAM~, PRINTNAM+3, PRINTNAM+4, HELP1~, UPPER~ |
| Y | MMMDD~, LOOKUP+2~, LOOKUP+6 |
| Z | VALID+2~*, VALID+4, VALID+6, VALID+8, VALID+9 |
| Name | Field # of Occurrence |
|---|---|
| $T( | VALID+7 |