|
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:
408 bytes
|
| Line | |
|---|
| 1 | AFJXTEMA ;FO-OAKLAND/GMB-ONE-TIME ADD PTS TO DB ;1/17/96 13:11
|
|---|
| 2 | ;;5.1;Network Health Exchange;**31**;Jan 23, 1996
|
|---|
| 3 | ; Totally rewritten 11/2001. (Previously FJ/CWS.)
|
|---|
| 4 | ENTER ; Send data from patient file 0 node
|
|---|
| 5 | N ZTSAVE,ZTIO,ZTRTN,ZTDESC
|
|---|
| 6 | S ZTIO="",ZTRTN="PROCESS^AFJXTEMA",ZTDESC="ONE-TIME ADD PTS TO NETWORK FILE"
|
|---|
| 7 | D ^%ZTLOAD
|
|---|
| 8 | Q
|
|---|
| 9 | PROCESS ;
|
|---|
| 10 | D PROCESS^AFJXPNHA("ONE-TIME ADD PTS TO NETWORK FILE",2940420)
|
|---|
| 11 | Q
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
