Changeset 1620 for fmts

Timestamp:

May 2, 2013, 12:09:35 PM (11 years ago)

Author:

Sam Habiel

Message:

Added processing for encounters, pass 1

Location:

fmts/trunk/p

Files:

• C0XPT0.m (modified) (2 diffs)
• C0XPT1.m (modified) (1 diff)
• C0XPT2.m (modified) (1 diff)
• C0XPT4.m (added)

fmts/trunk/p/C0XPT0.m

@@ -1 @@
-C0XPT0 ; VEN/SMH - Get patient data and do something about it ;2013-04-10  4:23 PM
+C0XPT0 ; VEN/SMH - Get patient data and do something about it ;2013-05-01  9:54 AM
  ;;1.1;FILEMAN TRIPLE STORE;;
+ ; (C) Sam Habiel 2013
+ ; Proprietary code. Stay out!
  ;
  ; Get all graphs
@@ -34 +36 @@
  D ADR^C0XPT2(G,DFN) ; Extract Allergies and File
  D MEDS^C0XPT3(G,DFN) ; Extract Medicaments and File
+ D ENC^C0XPT4(G,DFN) ; Extract Encounters and File
  ;
  QUIT

fmts/trunk/p/C0XPT1.m

@@ -1 @@
-C0XPT1 ; VEN/SMH - Obtain and Store Problems ;2013-02-19  11:55 AM
+C0XPT1 ; VEN/SMH - Obtain and Store Problems ;2013-05-01  9:54 AM
  ;;1.1;FILEMAN TRIPLE STORE;;
+        ; (C) Sam Habiel 2013
+        ; Proprietary code. Stay out!
  ;
 PROBLEMS(G,DFN) ; Private EP; Process Problems for a patient graph

fmts/trunk/p/C0XPT2.m

@@ -1 @@
-C0XPT2 ; VEN/SMH - Get and Store Allergies/ADRs ;2013-02-19  12:03 PM
+C0XPT2 ; VEN/SMH - Get and Store Allergies/ADRs ;2013-05-01  9:54 AM
  ;;1.1;FILEMAN TRIPLE STORE;;
+        ; (C) Sam Habiel 2013
+        ; Proprietary code. Stay out!
  ;
 ADR(G,DFN) ;  Private Proc; Extract Allergies and ADRs from Graph and add to Patient's Record