|
Last change
on this file since 629 was 613, checked in by George Lilly, 16 years ago |
|
initial load of WorldVistAEHR
|
|
File size:
464 bytes
|
| Line | |
|---|
| 1 | PSNHEADR ;BIR/WRT-Header routine for NDF Info From Your Local Drug File Report ;01/12/98 5:18 PM
|
|---|
| 2 | ;;4.0; NATIONAL DRUG FILE;; 30 Oct 98
|
|---|
| 3 | BEGIN D TITLE
|
|---|
| 4 | DONE K MJT
|
|---|
| 5 | Q
|
|---|
| 6 | TITLE W !,?33,"NATIONAL DRUG INFO FROM YOUR LOCAL FILE"
|
|---|
| 7 | S %DT="",X="T" D ^%DT X ^DD("DD") W !?100,"Date printed: ",Y,!?100,"Page: ",DC,!
|
|---|
| 8 | W !,"LOCAL DRUG INFO",?42,"NDF INFO",?110,"NDF",?122,"NDF",!,"LOCAL DRUG NAME",?42,"VA PRODUCT NAME",?108,"PKG SIZE",?120,"PKG TYPE",!
|
|---|
| 9 | F MJT=1:1:132 W "-"
|
|---|
| 10 | Q
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
