ABSPOSI1 ; IHS/FCS/DRS - support for the prescrip. field on the form ; [ 09/12/2002 10:10 AM ]
Source file <ABSPOSI1.m>
Package | Total | Call Graph |
---|---|---|
Pharmacy Point of Sale | 5 | $$NDCVAL^ABSPFUNC HELP^ABSPOSI1 ERASEALL^ABSPOSI8 $$RXFIND^ABSPOSIF IMPOSS^ABSPOSUE |
VA Fileman | 3 | (HLP,REFRESH,UNED)^DDSUTL ($$GET,PUT)^DDSVAL ^DIC |
Package | Total | Caller Graph |
---|---|---|
Pharmacy Point of Sale | 3 | ABSPOSI1 ABSPOSI2 ABSPOSI8 |
Name | Comments | DBIA/ICR reference |
---|---|---|
DISABASK | ||
VALIDATE(X) | ||
HELP | ;EP -
|
|
HELP1(X) | ||
FULLSCRE | ; adapted from FULL^VALM1
|
|
EFFECTS | ||
ENABASK | ||
VALID | ; VALID is the Data Validation action for the field.
; It may invoke prescription or visit lookup. ; It might reset X and DDSEXT. |
|
RXLOOKUP(X,DIC0) | ||
THEASKS(N) | ||
VAL2 | ;
|
|
VAL1 | ||
MMMDD(Y) | ;EP
|
|
UPPER(X) | ||
MSGWAIT(X) | ;EP - from ABSPOSI2,ABSPOSI8
|
Name | Field # of Occurrence |
---|---|
$$NDCVAL^ABSPFUNC | EFFECTS+21 |
HELP^ABSPOSI1 | VAL2+40 |
ERASEALL^ABSPOSI8 | EFFECTS+58 |
$$RXFIND^ABSPOSIF | VAL2+14, VAL2+22 |
IMPOSS^ABSPOSUE | VAL2+41, EFFECTS+10 |
HLP^DDSUTL | HELP+7, MSGWAIT+3, MSGWAIT+4 |
REFRESH^DDSUTL | VAL2+15, VAL2+23, RXLOOKUP+6 |
UNED^DDSUTL | THEASKS+5 |
$$GET^DDSVAL | HELP+6, EFFECTS+49 |
PUT^DDSVAL | EFFECTS+47, EFFECTS+49, EFFECTS+50, EFFECTS+51, EFFECTS+52, EFFECTS+57, EFFECTS+61, EFFECTS+62, EFFECTS+63, EFFECTS+64 , EFFECTS+65, EFFECTS+66, EFFECTS+67 |
^DIC | RXLOOKUP+4 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^PSRX - [#52] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ABSP(9002313.51 - [#9002313.51] | EFFECTS+4 |
^ABSP(9002313.99 - [#9002313.99] | VAL1+6 |
^AUPNVMED - [#9000010.14] | EFFECTS+32 |
^AUPNVSIT - [#9000010] | EFFECTS+34, EFFECTS+35 |
^AUPNVSIT("VCN" | VAL2+20 |
^DD("DD" | MMMDD+1 |
^DPT - [#2] | EFFECTS+12, EFFECTS+39 |
^PSDRUG - [#50] | EFFECTS+15 |
^PSRX - [#52] | EFFECTS+8, EFFECTS+10, EFFECTS+18, EFFECTS+24, EFFECTS+26, EFFECTS+27, EFFECTS+29 |
Name | Line Occurrences |
---|---|
$$MMMDD | EFFECTS+30, EFFECTS+42 |
$$RXLOOKUP | VAL1+4, VAL1+9, VAL1+12, VAL2+5 |
$$UPPER | VAL2+1, VAL2+3, VAL2+9, VAL2+26 |
$$VALIDATE | VALID+4 |
HELP1 | HELP+2, HELP+3, HELP+4, HELP+5, HELP+6 |
THEASKS | ENABASK, DISABASK |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AR | HELP+1~, HELP+7, MSGWAIT+1~, MSGWAIT+3 |
AR( | HELP1* |
AR(1 | MSGWAIT+1* |
AWPMED | EFFECTS+2~, EFFECTS+41*, EFFECTS+65 |
BLOCK | THEASKS+2~*, THEASKS+5 |
>> DA | HELP+6, EFFECTS+47, EFFECTS+49, EFFECTS+50, EFFECTS+51, EFFECTS+52, EFFECTS+57, EFFECTS+61, EFFECTS+62, EFFECTS+63 , EFFECTS+64, EFFECTS+65, EFFECTS+66, EFFECTS+67 |
>> DA(1 | EFFECTS+4 |
>> DDSBR | EFFECTS+59* |
DDSERROR | VALIDATE+3!, VAL1+5*, VAL1+10*, VAL1+12*, VAL2+6*, VAL2+16*, VAL2+24*, VAL2+29* |
>> DDSEXT | VALID+6* |
DIC | RXLOOKUP+1~* |
DIC(0 | RXLOOKUP+1* |
DIC0 | RXLOOKUP~, RXLOOKUP+1, RXLOOKUP+6 |
>> DIE | HELP+6, EFFECTS+47, EFFECTS+49, EFFECTS+50, EFFECTS+51, EFFECTS+52, EFFECTS+57, EFFECTS+61, EFFECTS+62, EFFECTS+63 , EFFECTS+64, EFFECTS+65, EFFECTS+66, EFFECTS+67 |
DRUG | EFFECTS+2~, EFFECTS+13*, EFFECTS+15, EFFECTS+63 |
DRUGNAME | EFFECTS+1~, EFFECTS+15*, EFFECTS+16*, EFFECTS+40*, EFFECTS+44*, EFFECTS+51 |
DTOUT | RXLOOKUP+1~ |
DUOUT | RXLOOKUP+1~ |
ERR | EFFECTS~ |
F | THEASKS+3~*, THEASKS+5, EFFECTS+55~, EFFECTS+56*, EFFECTS+57 |
FILLDATE | EFFECTS+1~, EFFECTS+18*, EFFECTS+26*, EFFECTS+30*, EFFECTS+42*, EFFECTS+44*, EFFECTS+52 |
IEN59 | EFFECTS+2~, EFFECTS+67 |
>> IOBM | FULLSCRE+1* |
IOF | VAL2+13, VAL2+21 |
>> IORC | FULLSCRE+1 |
>> IOSC | FULLSCRE+1 |
IOSL | FULLSCRE+1 |
>> IOSTBM | FULLSCRE+1 |
>> IOTM | FULLSCRE+1* |
N | THEASKS~, THEASKS+5, HELP+1~*, HELP1* |
NDC | EFFECTS+1~, EFFECTS+21*, EFFECTS+23*, EFFECTS+27*, EFFECTS+28*, EFFECTS+37*, EFFECTS+44*, EFFECTS+49 |
NDCDEF | EFFECTS+4~*, EFFECTS+21, EFFECTS+27 |
PAGE | THEASKS+2~*, THEASKS+5 |
PAT | EFFECTS+2~, EFFECTS+11*, EFFECTS+12, EFFECTS+38*, EFFECTS+39, EFFECTS+64 |
PATNAME | EFFECTS+1~, EFFECTS+12*, EFFECTS+39*, EFFECTS+44*, EFFECTS+50 |
R0 | EFFECTS+10~*, EFFECTS+11, EFFECTS+13 |
RET | RXLOOKUP+5~*, RXLOOKUP+8 |
RX | EFFECTS+1~, EFFECTS+9*, EFFECTS+35*, EFFECTS+36*, EFFECTS+44*, EFFECTS+47 |
RXI | EFFECTS+2~, EFFECTS+9*, EFFECTS+10, EFFECTS+18, EFFECTS+21, EFFECTS+24, EFFECTS+26, EFFECTS+27, EFFECTS+29, EFFECTS+41* , EFFECTS+61 |
RXR | EFFECTS+2~, EFFECTS+7*, EFFECTS+8*, EFFECTS+17, EFFECTS+18, EFFECTS+21, EFFECTS+24, EFFECTS+26*, EFFECTS+41*, EFFECTS+62 |
TYPE | VALIDATE+4~, VAL1+2*, VAL1+7*, VAL1+12*, VAL2+2*, VAL2+10*, VAL2+17*, VAL2+19*, VAL2+25*, VAL2+32 , VAL2+34 |
U | VAL1+6, VAL2+17, VAL2+25, EFFECTS+4, EFFECTS+7, EFFECTS+11, EFFECTS+12, EFFECTS+13, EFFECTS+15, EFFECTS+18 , EFFECTS+24, EFFECTS+26, EFFECTS+27, EFFECTS+29, EFFECTS+32, EFFECTS+35, EFFECTS+38, EFFECTS+39, EFFECTS+42 |
V0 | EFFECTS+34~*, EFFECTS+38, EFFECTS+42 |
VISIT | EFFECTS+2~, EFFECTS+24*, EFFECTS+29*, EFFECTS+31, EFFECTS+32*, EFFECTS+34*, EFFECTS+35, EFFECTS+66 |
X | VALID+4, VALID+6*, VALIDATE~, VAL1+1, VAL1+3*, VAL1+4*, VAL1+5, VAL1+6, VAL1+8*, VAL1+9* , VAL1+10, VAL1+11, VAL1+12*, VAL2+1, VAL2+3, VAL2+4*, VAL2+5*, VAL2+6, VAL2+7, VAL2+8* , VAL2+9, VAL2+14*, VAL2+16, VAL2+17, VAL2+18, VAL2+20*, VAL2+22*, VAL2+24*, VAL2+25, VAL2+26 , VAL2+27*, VAL2+29*, VAL2+31, VAL2+33*, VAL2+35*, VAL2+36, VAL2+37, VAL2+38, VAL2+39, VAL2+41 , VAL2+42, RXLOOKUP~, HELP1~, MSGWAIT~, MSGWAIT+1, EFFECTS+5, EFFECTS+7*, EFFECTS+8, EFFECTS+9, EFFECTS+33 , EFFECTS+34, EFFECTS+36, EFFECTS+43, EFFECTS+53, UPPER~ |
Y | RXLOOKUP+1~, RXLOOKUP+5, MMMDD~, MMMDD+1 |
Z | VALID+4~*, VALID+6 |
Name | Field # of Occurrence |
---|---|
$T( | VAL2+41, EFFECTS+10 |