GMVUTL ;HOIFO/RM,MD,FT-CALLABLE ENTRY POINTS FOR PROGRAMMER UTILITIES ;08/12/09 17:15
Source file <GMVUTL.m>
| Package | Total | Call Graph |
|---|---|---|
| General Medical Record - Vitals | 2 | $$GETIEN^GMVGETQL $$GETIEN^GMVGETVT |
| Uncategorized | 2 | (QRYDATE,QRYOBS)^MDCLIO1 $$CVTVAL^MDTERM |
| Kernel | 1 | ($$FMADD,$$NOW)^XLFDT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| 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 (^) ; |
|
| 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 |
|
| 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 (^) |
|
| 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 |
| Name | Field # of Occurrence |
|---|---|
| $$GETIEN^GMVGETQL | CLIO+52, CLIO+58, CLIO+64, CLIO+70, CLIO+76, CLIO+82, CLIO+95 |
| $$GETIEN^GMVGETVT | CLIO+13, CLIO+14, CLIO+23 |
| QRYDATE^MDCLIO1 | QRYDATE+22, QRYDATE+31 |
| QRYOBS^MDCLIO1 | CLIO+10, CLIO+11 |
| $$CVTVAL^MDTERM | CLIO+37, CLIO+39, CLIO+41, CLIO+43 |
| $$FMADD^XLFDT | QRYDATE+26 |
| $$NOW^XLFDT | QRYDATE+26, QRYDATE+27 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^GMR(120.5 - [#120.5] | F1205+16, F1205+18, F1205+26, F1205+28, F1205+32 |
| ^TMP($J | QRYDATE+25! |
| Name | Line Occurrences |
|---|---|
| CLIO | GETREC+25 |
| F1205 | GETREC+22 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| EDATE | QRYDATE~, QRYDATE+27*, QRYDATE+28, QRYDATE+31 |
| GMV1205 | F1205~ |
| GMV1205(0 | F1205+13*, F1205+18*, F1205+21, F1205+23* |
| GMV1205(2 | F1205+13*, F1205+23*, F1205+24*, F1205+30* |
| GMV1205(5 | F1205+13*, F1205+23*, F1205+34* |
| GMVARRAY | CLIO+8~, GETREC~, GETREC+22, GETREC+25 |
| GMVARRAY("CONTEXT" | CLIO+88, CLIO+89, CLIO+90, CLIO+91, CLIO+92, CLIO+93 |
| GMVARRAY("CUFF_SIZE_ID" | CLIO+50 |
| GMVARRAY("ENTERED_BY_ID" | CLIO+19 |
| GMVARRAY("ENTERED_DATE_TIME" | CLIO+17 |
| GMVARRAY("HOSPITAL_LOCATION_ID" | CLIO+18 |
| GMVARRAY("LOCATION_ID" | CLIO+56 |
| GMVARRAY("METHOD_ID" | CLIO+62 |
| GMVARRAY("OBSERVED_DATE_TIME" | CLIO+12, CLIO+15 |
| GMVARRAY("PATIENT_ID" | CLIO+16 |
| GMVARRAY("POSITION_ID" | CLIO+68 |
| GMVARRAY("QUALITY_ID" | CLIO+80 |
| GMVARRAY("SITE_ID" | CLIO+74 |
| GMVARRAY("SVALUE" | CLIO+20, CLIO+28 |
| GMVARRAY("TERM_ID" | CLIO+21 |
| GMVARRAY("UNIT_ID" | CLIO+36, CLIO+38, CLIO+40, CLIO+42 |
| GMVCLIO | CLIO~ |
| GMVCLIO(0 | CLIO+7*, CLIO+10*, CLIO+12*, CLIO+15*, CLIO+16*, CLIO+17*, CLIO+18*, CLIO+19*, CLIO+20*, CLIO+24* , CLIO+27, CLIO+28*, CLIO+32, CLIO+34*, CLIO+37*, CLIO+39*, CLIO+41*, CLIO+43*, CLIO+86, CLIO+106* |
| GMVCLIO(2 | CLIO+45*, CLIO+46*, CLIO+47* |
| GMVCLIO(5 | CLIO+10*, CLIO+12*, CLIO+34*, CLIO+49*, CLIO+54*, CLIO+60*, CLIO+66*, CLIO+72*, CLIO+78*, CLIO+84* , CLIO+98, CLIO+99* |
| GMVCNT | CLIO+8~, CLIO+13*, CLIO+49*, CLIO+53*, CLIO+54, CLIO+59*, CLIO+60, CLIO+65*, CLIO+66, CLIO+71* , CLIO+72, CLIO+77*, CLIO+78, CLIO+83*, CLIO+84, CLIO+99*, F1205+11~, F1205+25*, F1205+27*, F1205+28 , F1205+31*, F1205+33*, F1205+34 |
| GMVCS | CLIO+8~, CLIO+50*, CLIO+51, CLIO+52*, CLIO+54 |
| GMVDATE | CLIO+8~ |
| GMVDY | CLIO+8~ |
| GMVERR | GETREC~, GETREC+18*, GETREC+20*, GETREC+22 |
| GMVFLAG | CLIO+8~, CLIO+30*, CLIO+31, CLIO+32*, CLIO+34, F1205+11~, F1205+19*, F1205+20, F1205+21*, F1205+23 |
| GMVFLD | CLIO+8~ |
| GMVFR | CLIO+8~, CLIO+14*, CLIO+92*, CLIO+101*, CLIO+102, CLIO+103, CLIO+104, CLIO+105 |
| GMVGUID | CLIO~, CLIO+7, CLIO+11 |
| GMVHR | CLIO+8~ |
| GMVID | GETREC~, GETREC+18*, GETREC+19, GETREC+21, GETREC+22, GETREC+24, GETREC+25 |
| GMVIEN1 | F1205+11~, F1205+25*, F1205+26*, F1205+28, F1205+31*, F1205+32*, F1205+34 |
| GMVL | CLIO+8~, CLIO+56*, CLIO+57, CLIO+58*, CLIO+60 |
| GMVLIST | F1205+11~, F1205+25*, F1205+28*, F1205+30 |
| GMVLOOP | CLIO+8~, CLIO+31*, CLIO+32, CLIO+87*, CLIO+88*, CLIO+89, CLIO+90, CLIO+91, CLIO+92, CLIO+93 , F1205+11~, F1205+20*, F1205+21 |
| GMVM | CLIO+8~, CLIO+62*, CLIO+63, CLIO+64*, CLIO+66, CLIO+93*, CLIO+94, CLIO+95*, CLIO+96, CLIO+98 , CLIO+99 |
| GMVMI | CLIO+8~ |
| GMVMO | CLIO+8~ |
| GMVNODE | F1205+11~ |
| GMVNODE2 | F1205+11~, F1205+16*, F1205+17, F1205+24 |
| GMVO2 | CLIO+9~, CLIO+14*, CLIO+90*, CLIO+100*, CLIO+102, CLIO+103, CLIO+104, CLIO+105 |
| GMVP | CLIO+9~, CLIO+68*, CLIO+69, CLIO+70*, CLIO+72 |
| GMVPAIN | CLIO+9~, CLIO+13*, CLIO+27 |
| GMVPO2 | CLIO+9~, CLIO+14*, CLIO+86 |
| GMVQ | CLIO+9~, CLIO+80*, CLIO+81, CLIO+82*, CLIO+84 |
| GMVQFLAG | CLIO+9~, CLIO+97*, CLIO+98*, CLIO+99 |
| GMVQLOOP | CLIO+9~, CLIO+98* |
| GMVS | CLIO+9~, CLIO+74*, CLIO+75, CLIO+76*, CLIO+78 |
| GMVSC | CLIO+9~ |
| GMVSUP | CLIO+9~, CLIO+14*, CLIO+102*, CLIO+103*, CLIO+104*, CLIO+105*, CLIO+106 |
| GMVTIME | CLIO+9~ |
| GMVU | CLIO+9~ |
| GMVX | CLIO+9~, CLIO+21*, CLIO+22, CLIO+23*, CLIO+24, F1205~, F1205+12*, F1205+14, F1205+16, F1205+18 , F1205+26, F1205+28, F1205+32 |
| GMVY | CLIO+9~, F1205~, F1205+12*, F1205+15*, F1205+17 |
| GMVYR | CLIO+9~ |
| RESULT | QRYDATE~, QRYDATE+23, QRYDATE+25, QRYDATE+29, QRYDATE+31 |
| SDATE | QRYDATE~, QRYDATE+26*, QRYDATE+28, QRYDATE+31 |
| U | CLIO+15, CLIO+16, CLIO+17, CLIO+18, CLIO+19, CLIO+20, CLIO+24, CLIO+27, CLIO+28, CLIO+32 , CLIO+37, CLIO+39, CLIO+41, CLIO+43, CLIO+45, CLIO+46, CLIO+47, CLIO+54, CLIO+60, CLIO+66 , CLIO+72, CLIO+78, CLIO+84, CLIO+86, CLIO+98, CLIO+99, CLIO+106, F1205+17, F1205+21, F1205+28 , F1205+30, F1205+34 |
| X | EN1+2, EN2+2, EN3+2, CLIO+9~ |
| Y | EN1+2*, EN2+2*, EN3+2*, CLIO+9~ |
| Name | Field # of Occurrence |
|---|---|
| $T(QRYDATE^MDCLIO1 | QRYDATE+22 |
| $T(QRYOBS^MDCLIO1 | CLIO+10 |