Changeset 69 for ccr/trunk/p/CCRDPTT.m
- Timestamp:
- Jul 17, 2008, 3:55:07 PM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
ccr/trunk/p/CCRDPTT.m
r40 r69 1 1 CCRDPTT ; Unit Tester... 2 2 ; 3 ;Copyright 2008 WorldVistA. Licensed under the terms of the GNU 4 ;General Public License See attached copy of the License. 5 ; 6 ;This program is free software; you can redistribute it and/or modify 7 ;it under the terms of the GNU General Public License as published by 8 ;the Free Software Foundation; either version 2 of the License, or 9 ;(at your option) any later version. 10 ; 11 ;This program is distributed in the hope that it will be useful, 12 ;but WITHOUT ANY WARRANTY; without even the implied warranty of 13 ;MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14 ;GNU General Public License for more details. 15 ; 16 ;You should have received a copy of the GNU General Public License along 17 ;with this program; if not, write to the Free Software Foundation, Inc., 18 ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. 3 19 ; Get the functions in the routine using Rick's routine 4 20 ; STATS(0)="CCRDPT^3080626.190908^396^14094^6414499860" … … 11 27 ; STATS(111,0)="MIDDLE() ; Middle Name; PUBLIC; Extrinsic " 12 28 ; etc. 13 29 14 30 ; Load Routine Entry points; We get a sweeeeeet array 15 31 D ANALYZE^ARJTXRD("CCRDPT",.OUT) ; Analyze a routine in the directory
Note:
See TracChangeset
for help on using the changeset viewer.