Last change
on this file since 1150 was 623, checked in by George Lilly, 15 years ago |
revised back to 6/30/08 version
|
File size:
1.2 KB
|
Rev | Line | |
---|
[623] | 1 | PSODEA ;BHAM ISC/ - HELP TEXT FOR DEA FIELD IN DRUG FILE ; 06/03/92 17:28
|
---|
| 2 | ;;7.0;OUTPATIENT PHARMACY;;DEC 1997
|
---|
| 3 | W !,"THE SPECIAL HANDLING CODE IS A 2 TO 6 POSTION FIELD. IF APPLICABLE,",!,"A SCHEDULE CODE MUST APPEAR IN THE FIRST POSITION. FOR EXAMPLE,"
|
---|
| 4 | W !,"A SCHEDULE 3 NARCOTIC WILL BE CODED '3A' AND A SCHEDULE 2 DEPRESSANT",!,"WILL BE CODED '2L'. THE CODES ARE:",!
|
---|
| 5 | F I=1:1 S AA=$P($T(D+I),";",3,99) Q:AA="" W !?10,AA
|
---|
| 6 | D K AA Q
|
---|
| 7 | ;;0 MANUFACTURED IN PHARMACY
|
---|
| 8 | ;;1 SCHEDULE 1 ITEM
|
---|
| 9 | ;;2 SCHEDULE 2 ITEM
|
---|
| 10 | ;;3 SCHEDULE 3 ITEM
|
---|
| 11 | ;;4 SCHEDULE 4 ITEM
|
---|
| 12 | ;;5 SCHEDULE 5 ITEM
|
---|
| 13 | ;;6 LEGEND ITEM
|
---|
| 14 | ;;9 OVER-THE-COUNTER
|
---|
| 15 | ;;L DEPRESSANTS AND STIMULANTS
|
---|
| 16 | ;;A NARCOTICS AND ALCOHOLICS
|
---|
| 17 | ;;P DATED DRUGS
|
---|
| 18 | ;;I INVESTIGATIONAL DRUGS
|
---|
| 19 | ;;M BULK COMPOUND ITEMS
|
---|
| 20 | ;;C CONTROLLED SUBSTANCES - NON NARCOTIC
|
---|
| 21 | ;;R RESTRICTED ITEMS
|
---|
| 22 | ;;S SUPPLY ITEMS
|
---|
| 23 | ;;B ALLOW REFILL (SCH. 3, 4, 5 NARCOTICS ONLY)
|
---|
| 24 | ;;W NOT RENEWABLE
|
---|
| 25 | ;;
|
---|
| 26 | EDIT ;INPUT XFORM FOR DEA FIELD IN DRUG FILE
|
---|
| 27 | I X["B",(+X<3!(X'["A")) W !,"The B designation is only valid for schedule 3, 4, 5 narcotics !",$C(7) K X Q
|
---|
| 28 | Q
|
---|
Note:
See
TracBrowser
for help on using the repository browser.