Last change
on this file since 1397 was 628, checked in by George Lilly, 15 years ago |
initial load of FOIAVistA 6/30/08 version
|
File size:
1.3 KB
|
Line | |
---|
1 | PSJDEA ;BIR/CML3-HELP TEXT FOR DEA FIELD IN DRUG FILE ;20 JUN 94 / 5:24 PM
|
---|
2 | ;;5.0; INPATIENT MEDICATIONS ;;16 DEC 97
|
---|
3 | N %,%Y,X,Y
|
---|
4 | W !,"The special handling code is 1 to 6 characters. If applicable, the schedule",!,"code must appear in the first position. For example, a schedule 3 narcotic",!,"would be coded as '3A' and a schedule 2 depressant would be coded as '2L'."
|
---|
5 | W ! F S %=2 W !,"Would you like a list of the codes" D YN^DICN Q:% W !!,"Answer 'YES' to view a list of the available codes.",!
|
---|
6 | I %=1 W ! F X=1:1 S Y=$P($T(L+X),";",3,99) Q:Y="" W !?10,Y
|
---|
7 | W ! Q
|
---|
8 | ;
|
---|
9 | L ; list of codes
|
---|
10 | ;;0 MANUFACTURED IN PHARMACY
|
---|
11 | ;;1 SCHEDULE 1 ITEM
|
---|
12 | ;;2 SCHEDULE 2 ITEM
|
---|
13 | ;;3 SCHEDULE 3 ITEM
|
---|
14 | ;;4 SCHEDULE 4 ITEM
|
---|
15 | ;;5 SCHEDULE 5 ITEM
|
---|
16 | ;;6 LEGEND ITEM
|
---|
17 | ;;9 OVER-THE-COUNTER
|
---|
18 | ;;L DEPRESSANTS AND STIMULANTS
|
---|
19 | ;;A NARCOTICS AND ALCOHOLICS
|
---|
20 | ;;P DATED DRUGS
|
---|
21 | ;;I INVESTIGATIONAL DRUGS
|
---|
22 | ;;M BULK COMPOUND ITEMS
|
---|
23 | ;;C CONTROLLED SUBSTANCES - NON NARCOTIC
|
---|
24 | ;;R RESTRICTED ITEMS
|
---|
25 | ;;S SUPPLY ITEMS
|
---|
26 | ;;B ALLOW REFILL (SCHEDULE 3, 4, 5 NARCOTICS ONLY)
|
---|
27 | ;;W NOT RENEWABLE
|
---|
28 | ;;
|
---|
29 | ;
|
---|
30 | EDIT ;
|
---|
31 | I X["B",X<3!(X'["A") W !," The B designation is only valid for schedule 3, 4, and 5 narcotics!",$C(7) K X Q
|
---|
32 | Q
|
---|
Note:
See
TracBrowser
for help on using the repository browser.