Changeset 65

Timestamp:

Jul 16, 2008, 2:42:13 PM (16 years ago)

Author:

Christopher Edwards

Message:

created skeleton for Meds

Location:

ccr/trunk/p

Files:

• GPLMEDS.m (added)
• GPLVITALS.m (modified) (2 diffs)

ccr/trunk/p/GPLVITALS.m

@@ -1 @@
-GPLVITALS ; CCDCCR/CJE - CCR/CCD PROCESSING FOR VITALS ; 07/03/08
- ;;0.1;CCDCCR;;JUL 3,2008;
+GPLVITALS ; CCDCCR/CJE - CCR/CCD PROCESSING FOR VITALS ; 07/16/08
+ ;;0.1;CCDCCR;;JUL 16,2008;
  ;Copyright 2008 WorldVistA.  Licensed under the terms of the GNU
  ;General Public License See attached copy of the License.
@@ -18 +18 @@
  ;51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  ;
-EXTRACT(VITXML,DFN,VITOUTXML)          ; EXTRACT PROBLEMS INTO PROVIDED XML TEMPLATE
+          W "NO ENTRY FROM TOP",!
+          W !
+          Q
+          ;
+EXTRACT(VITXML,DFN,VITOUTXML)          ; EXTRACT VITALS INTO PROVIDED XML TEMPLATE
           ;
           ; VITXML AND OUTXML ARE PASSED BY NAME SO GLOBALS CAN BE USED