GMVUTL ;HOIFO/RM,MD,FT-CALLABLE ENTRY POINTS FOR PROGRAMMER UTILITIES ;08/12/09 17:15
Source file <GMVUTL.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN1 | ; CALL TO CONVERT TEMPERATURE (F) IN VARIABLE X TO TEMPERATURE (C)
; IN VARIABLE Y |
|
| EN2 | ; CALL TO CONVERT AN INCHES MEASUREMENT IN X TO A CENTIMETER
; MEASUREMENT IN Y |
|
| EN3 | ; CALL TO CONVERT A WEIGHT (LBS) IN VARIABLE X TO A WEIGHT (KG)
; IN VARIABLE Y |
|
| CLIO(GMVCLIO,GMVGUID) | ; Calls Clinical Observations to get a single record
; Input: ; GMVCLIO = array name (required) ; GMVGUID = Global Unique ID (required) ; Output: ; GMVCLIO(0) = |
|
| F1205(GMV1205,GMVX,GMVY) | ; Return file 120.5 record as nodes
; Input: GMV1205 = array name to hold nodes (required) ; GMVX = File 120.5 IEN or CliO GUID (required) ; GMVY = Return records marked as errors? (optional) ; 0 = don't return, 1 = return error records ; (default = 0) ; Output:GMV1205(0) = file 120.5 zero node ; (2) = 120.5,#2 ^ 120.5, #3 ^ 120.5, #4 delimited by ; tilde (~) ; (3) = qualifier IENS delimited by caret (^) ; |
|
| GETREC(GMVARRAY,GMVID,GMVERR) | ; Checks CLIO and Vitals databases. Returns
; record as nodes with internal values. ; Input: GMVARRAY = array name passed by reference (required) ; GMVID = File 120.5 IEN or CliO GUID (required) ; GMVERR = Return records marked as errors? (optional) ; 0 = don't return, 1 = return error records ; (default = 0) ; Output:GMVARRAY(0) = same as File 120.5 zero node ; (2) = 120.5, #2 ^ 120.5, #3 ^ 120.5, #4 delimited by ; tilde (~) ; (3) = qualifier IENS (File 120.52) delimited by caret (^) |
|
| QRYDATE(RESULT,SDATE,EDATE) | ; Returns a list of GUIDs found in the
; Clinical Observations package for the date range specified ; Input: RESULT = array name surrounded by quotes (required) ; ex: "ARRAY", "^TMP($J)" ; SDATE = start date of search range in FileMan internal ; format (optional) ; default is T-24 hours ; EDATE = end date in FileMan internal format (optional) ; default is current date/time ; Output: RESULT(0)=number of entries returned ; or "-1^error message" ; RESULT(n)=Global Unique ID (aka GUID) ; where n is a sequential number starting with 1 |
