|
Last change
on this file since 628 was 628, checked in by George Lilly, 14 years ago |
|
initial load of FOIAVistA 6/30/08 version
|
|
File size:
332 bytes
|
| Line | |
|---|
| 1 | RMPFPRE2 ;DDC/KAW-CONTINUATION OF RMPFPRE [ 06/16/95 3:06 PM ]
|
|---|
| 2 | ;;2.0;REMOTE ORDER/ENTRY SYSTEM;;JUN 16, 1995
|
|---|
| 3 | I $D(^DD(791810)) S DIE=1,DA=791810,DR=".01////STATION ORDER" D ^DIE
|
|---|
| 4 | I $D(^DD(791810.1)) S DIE=1,DA=791810.1,DR=".01////ORDER TYPE" D ^DIE
|
|---|
| 5 | I $D(^DD(791810.2)) S DIE=1,DA=791810.2,DR=".01////ORDER STATUS" D ^DIE
|
|---|
| 6 | END Q
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
