Changeset 636 for FOIAVistA/tag/r/DSS_EXTRACTS-ECX/ECXTREX.m
- Timestamp:
- Dec 4, 2009, 8:26:01 PM (14 years ago)
- Location:
- FOIAVistA/tag/r
- Files:
-
- 1 edited
- 1 copied
Legend:
- Unmodified
- Added
- Removed
-
FOIAVistA/tag/r/DSS_EXTRACTS-ECX/ECXTREX.m
r628 r636 1 ECXTREX ;BPFO/JRP - Queue DSS Fiscal Year Specific Extract;8-AUG-2003 ; 6/11/07 12:46pm2 ;;3.0;DSS EXTRACTS;**49,71,84,92 ,105**;Dec 22, 1997;Build 701 ECXTREX ;BPFO/JRP - Queue DSS Fiscal Year Specific Extract;8-AUG-2003 ; 11/2/06 9:02am 2 ;;3.0;DSS EXTRACTS;**49,71,84,92**;Dec 22, 1997;Build 30 3 3 ; 4 4 EN ;Main entry point … … 71 71 S DIR("A")="Select fiscal year logic to use for extract" 72 72 S DIR(0)="SO^" 73 F X=2003,2004,2005,2006,2007 ,2008D73 F X=2003,2004,2005,2006,2007 D 74 74 .S Y=$E(X,5) 75 75 .S Y=$S((Y="")!(Y=" "):"",1:"Revision "_Y_" of ")
Note:
See TracChangeset
for help on using the changeset viewer.