|
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:
317 bytes
|
| Line | |
|---|
| 1 | ECX384PT ;ALB/GTS - Extract Log Report for DSS ; 10/26/05 1:45pm
|
|---|
| 2 | ;;3.0;DSS EXTRACTS;**84**;Dec 22, 1997
|
|---|
| 3 | ;
|
|---|
| 4 | EN ;entry point from option
|
|---|
| 5 | D BMES^XPDUTL("Creating new index for file 727 for START DATE/TIME field (#3) ")
|
|---|
| 6 | S DIK="^ECX(727,",DIK(1)="3^AE"
|
|---|
| 7 | D ENALL^DIK
|
|---|
| 8 | D BMES^XPDUTL("Indexing completed succesfully ")
|
|---|
| 9 | Q
|
|---|
Note:
See
TracBrowser
for help on using the repository browser.
