Welcome to the NEW Community Healthcare User Group ( the new CHUG)— your ultimate destination for insights and discussions at the intersection of healthcare and technology.

Please scroll to the bottom for “Centricity” related topics from the previous forum.

Notifications

Clear all

Need Help with Removing Medications from Text Translation in Vital Sign Form

MEL, SQL, Oracle

Last Post by Anonymous 1 second ago

3 Posts

3 Users

0 Reactions

106 Views

RSS

scottk

(@scottk)

Posts: 62

Estimable Member

Topic starter

We have a customized form that our GE Consultant did for us several years ago. When the medications appear in the note they are corrupted ( symbols and stuff). I did reach out to the consultant and she told me to removed the (MEDS_AFTER) in the text translation. I do simple VFE forms and I do not know how to write the MEL. I must not be removing the correct information because it gives me a compiler error or puts False in the note. Can someone tell me what statements I need to remove. I just need for the list of medications not to appear in the text but I still want the medication and allergies reviewed

DOCUMENT.TEMP_CCC_VS_3_PP + "\r\n" +

if DOCUMENT.TEMP_CCC_HPI_FORM_OPENED<>"" or DOCUMENT.CC="" then "" else "CC: \t\t" + DOCUMENT.CC + "\r\n" endif endif + "

" + if _OBS_ANY_HEIGHT="" and _OBS_ANY_HEIGHT_CM="" then "" else

if _OBS_NOW_HEIGHT="" and _OBS_NOW_HEIGHT_CM="" and _OBS_NOW_WEIGHT="" and _OBS_NOW_WEIGHT_KG="" and _OBS_NOW_TEMPERATURE="" and _OBS_NOW_TEMPERATURE_C="" and _OBS_NOW_PULSE_RATE="" and _OBS_NOW_PULSE_RHYTHM="" and _OBS_NOW_RESP_RATE="" and _OBS_NOW_BP_SYS_LYING="" and _OBS_NOW_BP_DIA_LYING="" and _OBS_NOW_BP_SYSTOLIC_SIT="" and _OBS_NOW_BP_DIASTOLIC_SIT="" and _OBS_NOW_BMI="" then "" else

"Height:" + "\t\t" + if _OBS_ANY_HEIGHT="" then _OBS_ANY_HEIGHT_CM + " cm" else if _OBS_ANY_HEIGHT_CM="" then _OBS_ANY_HEIGHT + " inches" else _OBS_ANY_HEIGHT + " inches (" + _OBS_ANY_HEIGHT_CM + " cm)" endif endif + "\r\n" endif endif + ccc_VS_weight_txt(_OBS_NOW_WEIGHT,_OBS_NOW_WEIGHT_KG) + if _OBS_NOW_HEAD_CIRC="" and _OBS_NOW_HEAD_CIRC_CM="" then "" else "Head Circ: " + "\t" + if _OBS_NOW_HEAD_CIRC="" then _OBS_NOW_HEAD_CIRC_CM + " cm" else if _OBS_NOW_HEAD_CIRC_CM="" then _OBS_NOW_HEAD_CIRC + " inches" else _OBS_NOW_HEAD_CIRC + " inches (" + _OBS_NOW_HEAD_CIRC_CM + " cm)" endif endif + "\r\n" endif + IF _OBS_NOW_BMI="" THEN "" ELSE "BMI:" + "\t\t" + _OBS_NOW_BMI + "

" ENDIF + IF _OBS_NOW_BSA="" THEN "" ELSE "BSA:" + "\t\t" + _OBS_NOW_BSA + "

" ENDIF + IF DOCUMENT.SHOW_PCTS == "Add Percentiles to note" then

cfmt(OBSNOW("height %tile"),"","Height %:\t","","% ") + cfmt(OBSNOW("HC %tile"),"","

Head Circumference %:\t\t","","% ") + cfmt(OBSNOW("weight %tile"),"","

Weight %:\t","","% ") + cfmt(OBSNOW("BMI%ile"),"","

BMI %:\t\t","","% ") + "

" ELSE "" ENDIF + IF _OBS_NOW_O2SAT="" THEN "" ELSE "O2 Sat: " + "\t" + _OBS_NOW_O2SAT + " %" + "

" ENDIF + IF OBSNOW("O2sa rst air")="" THEN "" ELSE "O2 Sat: " + "\t" + OBSNOW("O2sa rst air") + " % on room air" + "

" ENDIF + IF _OBS_NOW_TEMPERATURE="" and _OBS_NOW_TEMPERATURE_C="" THEN "" ELSE "Temp:" + + "\t\t" + if _OBS_NOW_TEMPERATURE="" then _OBS_NOW_TEMPERATURE_C + " degrees C" else if _OBS_NOW_TEMPERATURE_C="" then _OBS_NOW_TEMPERATURE + " degrees F" else _OBS_NOW_TEMPERATURE + " degrees F (" + _OBS_NOW_TEMPERATURE_C + " degrees C)" endif endif + if _OBS_NOW_TEMP_SITE="" then "" else " " + _OBS_NOW_TEMP_SITE endif + "\r\n" ENDIF + IF _OBS_NOW_PULSE_RATE="" THEN "" ELSE "Pulse rate:" + "\t" + _OBS_NOW_PULSE_RATE + " / minute\r\n" ENDIF + if OBSNOW("Pulse stand")="" then "" else "Pulse (ortho):" + "\t" + OBSNOW("Pulse stand") + " / minute" + "\r\n" endif + IF _OBS_NOW_PULSE_RHYTHM="" THEN "" else "Pulse rhythm:" + "\t" + _OBS_NOW_PULSE_RHYTHM + "

" ENDIF + IF _OBS_NOW_RESP_RATE="" THEN "" ELSE "Resp:" + "\t\t" + _OBS_NOW_RESP_RATE + " per minute" + "

" ENDIF + IF _OBS_NOW_BP_SYS_LYING="" THEN "" ELSE "BP supine:" + "\t" + _OBS_NOW_BP_SYS_LYING ENDIF + IF _OBS_NOW_BP_DIA_LYING="" THEN "" ELSE IF DOCUMENT.TEMP_529865630_139_13063369="" THEN " / " + _OBS_NOW_BP_DIA_LYING + "

" ELSE " / " + _OBS_NOW_BP_DIA_LYING + " " ENDIF ENDIF + IF DOCUMENT.TEMP_529865630_139_13063369="" THEN "" ELSE IF DOCUMENT.TEMP_529865630_139_13063369="R. arm supine" THEN "(right arm)" + "

" ELSE "(left arm)" + "

" ENDIF ENDIF + IF _OBS_NOW_BP_SYSTOLIC_SIT="" THEN "" ELSE "BP sitting:" + "\t" + _OBS_NOW_BP_SYSTOLIC_SIT ENDIF + IF _OBS_NOW_BP_DIASTOLIC_SIT="" THEN "" ELSE IF DOCUMENT.TEMP_529865631_139_13063374="" THEN " / " + _OBS_NOW_BP_DIASTOLIC_SIT + "

" ELSE " / " + _OBS_NOW_BP_DIASTOLIC_SIT + " " ENDIF ENDIF + IF DOCUMENT.TEMP_529865631_139_13063374="" THEN "" ELSE IF DOCUMENT.TEMP_529865631_139_13063374="R. arm sitting" THEN "(right arm)" + "

" ELSE "(left arm)" + "

" ENDIF ENDIF + IF _OBS_NOW_BP_SYS_STAND="" THEN "" ELSE "BP standing:" + "\t" + _OBS_NOW_BP_SYS_STAND ENDIF + IF _OBS_NOW_BP_DIA_STAND="" THEN "" ELSE IF DOCUMENT.SITE="" THEN " / " + _OBS_NOW_BP_DIA_STAND + "

" ELSE " / " + _OBS_NOW_BP_DIA_STAND + " " ENDIF ENDIF + IF DOCUMENT.SITE="" THEN "" ELSE IF DOCUMENT.SITE="R. arm standing" THEN "(right arm)" + "

" ELSE "(left arm)" + "

" ENDIF ENDIF + IF OBSNOW("BP cuff size")="" THEN "" ELSE "Cuff size:" + "\t" + OBSNOW("BP cuff size") + "

" ENDIF + if OBSNOW("ASSESS PM")="" then "" else "\r\n" + "Pt. in pain?\t" + OBSNOW("ASSESS PM") + "\r\n" endif + CFMT(OBSNOW("pain locatio"), "", " Location:\t", "", "

") + CFMT(OBSNOW("Pain Intens"), "", " Intensity:\t", "", "

") + CFMT(OBSNOW("pain charac"), "", " Type: \t", "", "

") + if DOCUMENT.VS_ENTERED_B="" then "" else "\r\n" + "Vitals Entered By: " + DOCUMENT.VS_ENTERED_B + "\r\n" endif + ccc_VS3_men_hx_txt(DOCUMENT.RADIO,obs_list_changes())}{CFMT(OBSNOW("BG FASTING"), "", "FBS ", "B", "

")}{CFMT(OBSNOW("BG RANDOM"), "", "RBS ", "B", "

")}{CFMT(OBSNOW("FLU VAX"), "", "Last Flu Shot ", "B", "

")}{CFMT(OBSNOW("PNEUMOVAX"), "", "Last Pneumovax ", "B", "

")}{CFMT(OBSNOW("EYELASTEXAMD"), "", "Last Eye Exam ", "B", "

")}{CFMT(OBSNOW("LT DENT VST"), "", "Last Dental Exam ", "B", "

")}{If OBSANY("NKMED") == "T" then CFMT("No Known Medications","","

Medications:

", "B", "

") else CFMT(MEDS_AFTER("LIST"), "", "

Medications:

", "B", "")endif + If OBSNOW("MEDS REVIEW") == "Done" then CFMT("Medications were reviewed with the patient during this visit.","","

Medications:

","B","

") else "" endif}{If OBSANY("NKA") == "T" then CFMT("No Known Allergies","","

Allergies:

", "B", "

") else CFMT(ALL_AFTER("LIST"), "", "

Allergies:

", "B", "")endif + If OBSNOW("ALLERGY REV") == "Done" then CFMT("Allergies were reviewed with the patient during this visit.","","

Allergies:

","B","

") else "" endif + "

Posted : November 16, 2017 4:37 am

jfitzmd

(@jfitzmd)

Posts: 419

Reputable Member

Just a suggestion: You are doing way too much work on the text translation. Let the form do the work for you, keep the majority of the translation within the field translation itself. If data has to be extracted form MEL symbols, then do it as a function in the code segment. I would be glad to help you in any event. Contact me directly and we will solve your problem.

Posted : November 16, 2017 5:01 am

joeg1962

(@joeg1962)

Posts: 843

Noble Member

OK, this line

“) else CFMT(MEDS_AFTER(“LIST”), “”, ”

perhaps change to

“) else "", “”, ”

MEL likes the else to do something

One last thing - MEL can get funny about the actual characters, so take a look at the subtle differences in the double quote characters as the ones I typed look a little different from yours. This sometimes happens with cut/paste, but MEL can be very particular.

Posted : November 20, 2017 2:54 am

24 Forums
9,943 Topics
39.9 K Posts
3 Online
6,472 Members

Forum Icons: Forum contains no unread posts Forum contains unread posts

Topic Icons: Not Replied Replied Active Hot Sticky Unapproved Solved Private Closed