Last change
on this file since 1005 was 628, checked in by George Lilly, 15 years ago |
initial load of FOIAVistA 6/30/08 version
|
File size:
439 bytes
|
Line | |
---|
1 | PSURTQ ;BIR/RDC - PATIENT DEMOGRAPHIC QUEUE RETRANSMITION; 12 APR 2004
|
---|
2 | ;;4.0;PHARMACY BENEFITS MANAGEMENT;;MARCH, 2005
|
---|
3 | ;
|
---|
4 | EN ; ENTRY POINT TO QUEUE RETRANSMITION OF PATIENT
|
---|
5 | ; DEMOGRAPHICS FOR PBM EXTRACT
|
---|
6 | ;
|
---|
7 | S ZTDTH=PSUWHEN
|
---|
8 | S ZTRTN="QUEUE^PSURT2"
|
---|
9 | S ZTDESC="RETRANSMITION OF PATIENT DEMOGRAPHICS DATA FOR PBM"
|
---|
10 | S ZTIO=""
|
---|
11 | S ZTSAVE("PSUSTART")=""
|
---|
12 | S ZTSAVE("PSULAST")=""
|
---|
13 | S ZTSAVE("PSUMME")=""
|
---|
14 | S ZTSAVE("PSUMMSTR")=""
|
---|
15 | D ^%ZTLOAD
|
---|
16 | Q
|
---|
17 | ;
|
---|
Note:
See
TracBrowser
for help on using the repository browser.