Converting EFE form to VFE form, run process issue

Adam Daniel

(@adaniel)

Posts: 524

Prominent Member

Topic starter

Recently switch forms from EFE to VFE and so far no issues. When converting one of our larger forms (includes multiple buttons and many different call functions) I get this error in centricity:

{
/*FUNCTION DEFINITIONS*/
/*Function for RUNPROCESS Button Record Med Hx Obtained*/
fn fn5825_406_1377114880(){
(DOCUMENT.MED_HX_OBTAI_5825_359_1377114880) (DOCUMENT.DATE_5825_375_1377114880) rec_MedHx9() fn remove_MedHx9()
} <-COMPILER ERROR NEARBY: Expect LEFT CURLY BRACKET. Instead had RIGHT CURLY BRACE after RIGHT PAREN

So I found where this was located, not in VFE form editor but in a txt file that gets saved once saving the form in VFE.

Here is that contents of that text file (the text in red is where I located the above part):

{/*VARIABLES FOR MEL BUILT-IN SYMBOLS USED IN FORM*/
}{global F5825_53_1377173392 = OBSNOW("ConsentSignd") ""}{global F5825_69_1377173392 = OBSNOW("ctrldsubcont") ""}{global F5825_272_1377173392 = OBSNOW("DRUG SCR U") ""}{global F5825_84_1377173392 = OBSNOW("ncdrgreg") ""}{global F5825_459_1377173392 = OBSNOW("Pneumovax") ""}{global F5825_131_1377173392 = OBSNOW("Hemoccult") ""}{global F5825_288_1377173392 = OBSNOW("MCROALB/CR U") ""}{global F5825_303_1377173392 = OBSNOW("vit D 25-OH") ""}{global F5825_147_1377173392 = OBSNOW("OPHTH EXAM") ""}{global F5825_163_1377173392 = OBSNOW("PE date") ""}{global F5825_178_1377173392 = OBSNOW("CXR") ""}{global F5825_991_1377173391 = OBSNOW("WelcomeToMCR") ""}{global F5825_6_1377173392 = OBSNOW("MCRINITWELL") ""}{global F5825_22_1377173392 = OBSNOW("MCRSUBWELL") ""}{global F5825_38_1377173392 = OBSNOW("AD discussed") ""}{global F5825_100_1377173392 = OBSNOW("EKG") ""}{global F5825_116_1377173392 = OBSNOW("EGD") ""}{global F5825_194_1377173392 = OBSNOW("LASTBONESCAN") ""}{global F5825_209_1377173392 = OBSNOW("dbt ft ex dt") ""}{global F5825_225_1377173392 = OBSNOW("CT Scan") ""}{global F5825_241_1377173392 = OBSNOW("MRI") ""}{global F5825_256_1377173392 = OBSNOW("EMG") ""}{global F5825_319_1377173392 = OBSNOW("Magnesium") ""}{global F5825_334_1377173392 = OBSNOW("urine cultur") ""}{global F5825_350_1377173392 = OBSNOW("C3 complimen") ""}{global F5825_366_1377173392 = OBSNOW("C4 complimen") ""}{global F5825_381_1377173392 = OBSNOW("Anti-ds-DNA") ""}{global F5825_397_1377173392 = OBSNOW("flu vax") ""}{global F5825_413_1377173392 = OBSNOW("H1N1 #1 DS") ""}{global F5825_428_1377173392 = OBSNOW("DepoTest dos") ""}{global F5825_444_1377173392 = OBSNOW("B-12") ""}{global F5825_475_1377173392 = OBSNOW("PPD result") ""}{global F5825_491_1377173392 = OBSNOW("TB-PPD site") ""}{
/*FUNCTION DEFINITIONS*/
/*Function for RUNPROCESS Button Record Med Hx Obtained*/
fn fn5825_406_1377114880(){
(DOCUMENT.MED_HX_OBTAI_5825_359_1377114880) (DOCUMENT.DATE_5825_375_1377114880) rec_MedHx9() fn remove_MedHx9()
}
/*Function for RUNPROCESS Button Remove Med Hx Obtained*/
fn fn5825_421_1377114880(){
recmove2_MedHx9()
}
/*Function for RUNPROCESS Button Record Controlled Signed*/
fn fn5825_531_1377114880(){
test_txt9(DOCUMENT.CONTROLLED_S_5825_484_1377114880) test_dt9(DOCUMENT.DATE2_5825_500_1377114880) rec_ConSub9() fn remove_ConSub9()
}
/*Function for RUNPROCESS Button Remove Controlled Signed*/
fn fn5825_546_1377114880(){
recmove2_ConSub9()
}
/*Function for RUNPROCESS Button Record NC Drug Registry*/
fn fn5825_656_1377114880(){
test_txt9(DOCUMENT.NC_DRUG_REGI_5825_609_1377114880) test_dt9(DOCUMENT.DATE3_5825_625_1377114880) rec_ncdrgreg9() fn remove_ncdrgreg9()
}
/*Function for RUNPROCESS Button Remove NC Drug Registry*/
fn fn5825_671_1377114880(){
recmove2_ncdrgreg9()
}
/*Function for RUNPROCESS Button Record EKG*/
fn fn5825_781_1377114880(){
test_txt9(DOCUMENT.EKG_5825_734_1377114880) test_dt9(DOCUMENT.DATE4_5825_750_1377114880) rec_ekg9() fn remove_ekg9()
}
/*Function for RUNPROCESS Button Remove EKG*/
fn fn5825_796_1377114880(){
recmove2_ekg9()
}
/*Function for RUNPROCESS Button Record EGD*/
fn fn5825_906_1377114880(){
test_txt9(DOCUMENT.EGD_5825_859_1377114880) test_dt9(DOCUMENT.DATE5_5825_875_1377114880) rec_egd9() fn remove_egd9()
}
/*Function for RUNPROCESS Button Remove EGD*/
fn fn5825_921_1377114880(){
recmove2_egd9()
}
/*Function for RUNPROCESS Button Record Occult Stool*/
fn fn5825_31_1377114881(){
test_txt9(DOCUMENT.OCCULT_STOOL_5825_984_1377114880) test_dt9(DOCUMENT.DATE6_5825_0_1377114881) rec_OccultStool9() fn remove_OccultStool9()
}
/*Function for RUNPROCESS Button Remove Occult Stool*/
fn fn5825_46_1377114881(){
recmove2_OccultStool9()
}
/*Function for RUNPROCESS Button Record Ophthamology*/
fn fn5825_156_1377114881(){
test_txt9(DOCUMENT.OPHTHAMOLOGY_5825_109_1377114881) test_dt9(DOCUMENT.DATE7_5825_125_1377114881) rec_Ophthamology9() fn remove_Ophthamology9()
}
/*Function for RUNPROCESS Button Remove Ophthamology*/
fn fn5825_171_1377114881(){
recmove2_Ophthamology9()
}
/*Function for RUNPROCESS Button Record Last Physical*/
fn fn5825_281_1377114881(){
test_txt9(DOCUMENT.DATE_OF_LAST_5825_234_1377114881) test_dt9(DOCUMENT.DATE8_5825_250_1377114881) rec_physical9() fn remove_physical9()
}
/*Function for RUNPROCESS Button Remove Last Physical*/
fn fn5825_296_1377114881(){
recmove2_physical9()
}
/*Function for RUNPROCESS Button Record Last CXR*/
fn fn5825_406_1377114881(){
test_txt9(DOCUMENT.DATE_OF_LAST2_5825_359_1377114881) test_dt9(DOCUMENT.DATE9_5825_375_1377114881) rec_CXR9() fn remove_CXR9()
}
/*Function for RUNPROCESS Button Remove Last CXR*/
fn fn5825_421_1377114881(){
recmove2_CXR9()
}
/*Function for RUNPROCESS Button Record Last BMD*/
fn fn5825_531_1377114881(){
test_txt9(DOCUMENT.DATE_OF_LAST3_5825_484_1377114881) test_dt9(DOCUMENT.DATE10_5825_500_1377114881) rec_bmd9() fn remove_bmd9()
}
/*Function for RUNPROCESS Button Remove Last BMD*/
fn fn5825_546_1377114881(){
recmove2_bmd9()
}
/*Function for RUNPROCESS Button Record Last Foot Exam*/
fn fn5825_656_1377114881(){
test_txt9(DOCUMENT.DATE_OF_LAST4_5825_609_1377114881) test_dt9(DOCUMENT.DATE11_5825_625_1377114881) rec_footexm9() fn remove_footexm9()
}
/*Function for RUNPROCESS Button Remove Last Foot Exam*/
fn fn5825_671_1377114881(){
recmove2_footexm9()
}
/*Function for RUNPROCESS Button Record Date of Last CT*/
fn fn5825_781_1377114881(){
test_txt9(DOCUMENT.DATE_OF_LAST5_5825_734_1377114881) test_dt9(DOCUMENT.DATE12_5825_750_1377114881) rec_CT9() fn remove_CT9()
}
/*Function for RUNPROCESS Button Remove Date of Last CT*/
fn fn5825_796_1377114881(){
recmove2_CT9()
}
/*Function for RUNPROCESS Button Record Date of Last MRI*/
fn fn5825_906_1377114881(){
test_txt9(DOCUMENT.DATE_OF_LAST6_5825_859_1377114881) test_dt9(DOCUMENT.DATE13_5825_875_1377114881) rec_MRI9() fn remove_MRI9()
}
/*Function for RUNPROCESS Button Remove Date of Last MRI*/
fn fn5825_921_1377114881(){
recmove2_MRI9()
}
/*Function for RUNPROCESS Button Record Date of Last EMG*/
fn fn5825_31_1377114882(){
test_txt9(DOCUMENT.DATE_OF_LAST7_5825_984_1377114881) test_dt9(DOCUMENT.DATE14_5825_0_1377114882) rec_EMG9() fn remove_EMG9()
}
/*Function for RUNPROCESS Button Remove Date of Last EMG*/
fn fn5825_46_1377114882(){
recmove2_EMG9()
}
/*Function for RUNPROCESS Button Record Drug Screen*/
fn fn5825_797_1377114882(){
test_txt9(DOCUMENT.DRUG_SCREEN_5825_750_1377114882) test_dt9(DOCUMENT.DATE15_5825_765_1377114882) rec_drugscrn9() fn remove_drugscrn9()
}
/*Function for RUNPROCESS Button Remove Drug Screen*/
fn fn5825_812_1377114882(){
recmove2_drugscrn9()
}
/*Function for RUNPROCESS Button Record Micro/Creat*/
fn fn5825_922_1377114882(){
test_txt9(DOCUMENT.MICRO_CREAT_5825_875_1377114882) test_dt9(DOCUMENT.DATE16_5825_890_1377114882) rec_MicroCreat9() fn remove_MicroCreat9()
}
/*Function for RUNPROCESS Button Remove Micro/Creat*/
fn fn5825_937_1377114882(){
recmove2_MicroCreat9()
}
/*Function for RUNPROCESS Button Record Vitamin D*/
fn fn5825_47_1377114883(){
test_txt9(DOCUMENT.VITAMIN_D_5825_0_1377114883) test_dt9(DOCUMENT.DATE17_5825_15_1377114883) rec_VitD9() fn remove_VitD9()
}
/*Function for RUNPROCESS Button Remove Vitamin D*/
fn fn5825_62_1377114883(){
recmove2_VitD9()
}
/*Function for RUNPROCESS Button Record Magnesium*/
fn fn5825_172_1377114883(){
test_txt9(DOCUMENT.MAGNESIUM_5825_125_1377114883) test_dt9(DOCUMENT.DATE18_5825_140_1377114883) rec_Magnesium9() fn remove_Magnesium9()
}
/*Function for RUNPROCESS Button Remove Magnesium*/
fn fn5825_187_1377114883(){
recmove2_Magnesium9()
}
/*Function for RUNPROCESS Button Record Urine Culture*/
fn fn5825_297_1377114883(){
test_txt9(DOCUMENT.URINE_CULTUR_5825_250_1377114883) test_dt9(DOCUMENT.DATE19_5825_265_1377114883) rec_UrnCult9() fn remove_UrnCult9()
}
/*Function for RUNPROCESS Button Remove Urine Culture*/
fn fn5825_312_1377114883(){
recmove2_UrnCult9()
}
/*Function for RUNPROCESS Button Record C3*/
fn fn5825_422_1377114883(){
test_txt9(DOCUMENT.C3_5825_375_1377114883) test_dt9(DOCUMENT.DATE20_5825_390_1377114883) rec_C39() fn remove_C39()
}
/*Function for RUNPROCESS Button Remove C3*/
fn fn5825_437_1377114883(){
recmove2_C39()
}
/*Function for RUNPROCESS Button Record C4*/
fn fn5825_547_1377114883(){
test_txt9(DOCUMENT.C4_5825_500_1377114883) test_dt9(DOCUMENT.DATE21_5825_515_1377114883) rec_C49() fn remove_C49()
}
/*Function for RUNPROCESS Button Remove C4*/
fn fn5825_562_1377114883(){
recmove2_C49()
}
/*Function for RUNPROCESS Button Record dsDNA*/
fn fn5825_672_1377114883(){
test_txt9(DOCUMENT.DSDNA_5825_625_1377114883) test_dt9(DOCUMENT.DATE22_5825_640_1377114883) rec_AntidsDNA9() fn remove_AntidsDNA9()
}
/*Function for RUNPROCESS Button Remove dsDNA*/
fn fn5825_687_1377114883(){
recmove2_AntidsDNA9()
}
/*Function for RUNPROCESS Button Record Flu Vaccine*/
fn fn5825_250_1377114884(){
test_txt9(DOCUMENT.FLU_VACCINE_5825_203_1377114884) test_dt9(DOCUMENT.DATE23_5825_218_1377114884) rec_fluvac9() fn remove_fluvac9()
}
/*Function for RUNPROCESS Button Remove Flu Vaccine*/
fn fn5825_265_1377114884(){
recmove2_fluvac9()
}
/*Function for RUNPROCESS Button Record H1N1 (swine)*/
fn fn5825_375_1377114884(){
test_txt9(DOCUMENT.H1N1__SWINE__5825_328_1377114884) test_dt9(DOCUMENT.DATE24_5825_343_1377114884) rec_swine19() fn remove_swine19()
}
/*Function for RUNPROCESS Button Remove H1N1 (swine)*/
fn fn5825_390_1377114884(){
recmove2_swine19()
}
/*Function for RUNPROCESS Button Record Testosterone*/
fn fn5825_500_1377114884(){
test_txt9(DOCUMENT.TESTOSTERONE_5825_453_1377114884) test_dt9(DOCUMENT.DATE25_5825_468_1377114884) rec_Testosterone9() fn remove_Testosterone9()
}
/*Function for RUNPROCESS Button Remove Testosterone*/
fn fn5825_515_1377114884(){
recmove2_Testosterone9()
}
/*Function for RUNPROCESS Button Record B 12*/
fn fn5825_625_1377114884(){
test_txt9(DOCUMENT.B_12_5825_578_1377114884) test_dt9(DOCUMENT.DATE26_5825_594_1377114884) rec_b129() fn remove_b129()
}
/*Function for RUNPROCESS Button Remove B 12*/
fn fn5825_640_1377114884(){
recmove2_b129()
}
/*Function for RUNPROCESS Button Record Pneumovax*/
fn fn5825_750_1377114884(){
test_txt9(DOCUMENT.PNEUMOVAX_5825_703_1377114884) test_dt9(DOCUMENT.DATE27_5825_719_1377114884) rec_pnuemovax9() fn remove_pnuemovax9()
}
/*Function for RUNPROCESS Button Remove Pneumovax*/
fn fn5825_765_1377114884(){
recmove2_pnuemovax9()
}
/*Function for RUNPROCESS Button Record PPD*/
fn fn5825_875_1377114884(){
test_txt9(DOCUMENT.PPD_5825_828_1377114884) test_dt9(DOCUMENT.DATE28_5825_844_1377114884) rec_ppd9() fn remove_ppd9()
}
/*Function for RUNPROCESS Button Remove PPD*/
fn fn5825_890_1377114884(){
recmove2_ppd9()
}
/*Function for RUNPROCESS Button Record PPD Placed*/
fn fn5825_0_1377114885(){
test_txt9(DOCUMENT.PPD_PLACED_5825_953_1377114884) test_dt9(DOCUMENT.DATE29_5825_969_1377114884) rec_PPDPlaced9() fn remove_PPDPlaced9()
}
/*Function for RUNPROCESS Button Remove PPD Placed*/
fn fn5825_15_1377114885(){
recmove2_PPDPlaced9()
}

fn welcome() {
    local medicare = DOCUMENT.CHECK_5825_593_1377114879
    local medicare2 = ""
    local medicare3 = ""

if medicare <> "" then
medicare2 = "done"
else if medicare == "" then
medicare2 = ""
else ""
endif endif

medicare3 = OBSNOW("WelcomeToMCR",medicare2)
return medicare3
}

fn MedInital() {
    local medicare = DOCUMENT.CHECK2_5825_671_1377114879
    local medicare2 = ""
    local medicare3 = ""

if medicare <> "" then
medicare2 = "done"
else if medicare == "" then
medicare2 = ""
else ""
endif endif

medicare3 = OBSNOW("MCRINITWELL",medicare2)
return medicare3
}

fn MedSub() {
    local medicare = DOCUMENT.CHECK3_5825_749_1377114879
    local medicare2 = ""
    local medicare3 = ""

if medicare <> "" then
medicare2 = "done"
else if medicare == "" then
medicare2 = ""
else ""
endif endif

medicare3 = OBSNOW("MCRSUBWELL",medicare2)
return medicare3
}

fn advice7() {
    local advance = DOCUMENT.CHECK4_5825_843_1377114879
    local advance2 = ""
    local advance3 = ""

if advance <> "" then
advance2 = "Directives were discussed with patient. No decision made at this time."
else ""
endif

advance3 = OBSNOW("AD discussed",advance2)
return smoke3
}

fn rec_MedHx9(){OBSNOW("ConsentSignd", DOCUMENT.MED_HX_OBTAI_5825_359_1377114880, DOCUMENT.DATE_5825_375_1377114880) DOCUMENT.CHECK6_5825_453_1377114880 = "yes"}

fn recmove2_MedHx9() {

strdate = LASTOBSDATETIME("ConsentSignd")

OBSNOW("ConsentSignd"," ", strdate)}

fn rec_ConSub9(){OBSNOW("ctrldsubcont", DOCUMENT.CONTROLLED_S_5825_484_1377114880,
DOCUMENT.DATE2_5825_500_1377114880) DOCUMENT.CHECK7_5825_578_1377114880 = "yes"}

fn recmove2_ConSub9() {

strdate = LASTOBSDATETIME("ctrldsubcont")

OBSNOW("ctrldsubcont"," ", strdate)}

fn rec_ncdrgreg9(){OBSNOW("ncdrgreg", DOCUMENT.NC_DRUG_REGI_5825_609_1377114880,
DOCUMENT.DATE3_5825_625_1377114880) DOCUMENT.CHECK8_5825_703_1377114880 = "yes"}

fn recmove2_ncdrgreg9() {

strdate = LASTOBSDATETIME("ncdrgreg")

OBSNOW("ncdrgreg"," ", strdate)}

fn rec_ekg9(){OBSNOW("EKG", DOCUMENT.EKG_5825_734_1377114880, DOCUMENT.DATE4_5825_750_1377114880) DOCUMENT.CHECK9_5825_828_1377114880 = "yes"}

fn recmove2_ekg9() {

strdate = LASTOBSDATETIME("EKG")

OBSNOW("EKG"," ", strdate)}

fn rec_egd9(){OBSNOW("EGD", DOCUMENT.EGD_5825_859_1377114880, DOCUMENT.DATE5_5825_875_1377114880) DOCUMENT.CHECK10_5825_953_1377114880 = "yes"}

fn recmove2_egd9() {

strdate = LASTOBSDATETIME("EGD")

OBSNOW("EGD"," ", strdate)}

fn rec_OccultStool9(){OBSNOW("Hemoccult", DOCUMENT.OCCULT_STOOL_5825_984_1377114880, DOCUMENT.DATE6_5825_0_1377114881) DOCUMENT.CHECK11_5825_78_1377114881 = "yes"}

fn recmove2_OccultStool9() {

strdate = LASTOBSDATETIME("Hemoccult")

OBSNOW("Hemoccult"," ", strdate)}

fn rec_Ophthamology9(){OBSNOW("OPHTH EXAM", DOCUMENT.OPHTHAMOLOGY_5825_109_1377114881, DOCUMENT.DATE7_5825_125_1377114881) DOCUMENT.CHECK12_5825_203_1377114881 = "yes"}

fn recmove2_Ophthamology9() {

strdate = LASTOBSDATETIME("OPHTH EXAM")

OBSNOW("OPHTH EXAM"," ", strdate)}

fn rec_physical9(){OBSNOW("PE date", DOCUMENT.DATE_OF_LAST_5825_234_1377114881, DOCUMENT.DATE8_5825_250_1377114881) DOCUMENT.CHECK13_5825_328_1377114881 = "yes"}

fn recmove2_physical9() {

strdate = LASTOBSDATETIME("PE date")

OBSNOW("PE date"," ", strdate)}

fn rec_CXR9(){OBSNOW("CXR", DOCUMENT.DATE_OF_LAST2_5825_359_1377114881, DOCUMENT.DATE9_5825_375_1377114881) DOCUMENT.CHECK14_5825_453_1377114881 = "yes"}

fn recmove2_CXR9() {

strdate = LASTOBSDATETIME("CXR date dne")

OBSNOW("CXR date dne"," ", strdate)}

fn rec_bmd9(){OBSNOW("LASTBONESCAN", DOCUMENT.DATE_OF_LAST3_5825_484_1377114881, DOCUMENT.DATE10_5825_500_1377114881) DOCUMENT.CHECK15_5825_578_1377114881 = "yes"}

fn recmove2_bmd9() {

strdate = LASTOBSDATETIME("LASTBONESCAN")

OBSNOW("LASTBONESCAN"," ", strdate)}

fn rec_footexm9(){OBSNOW("dbt ft ex dt", DOCUMENT.DATE_OF_LAST4_5825_609_1377114881, DOCUMENT.DATE11_5825_625_1377114881) DOCUMENT.CHECK16_5825_703_1377114881 = "yes"}

fn recmove2_footexm9() {

strdate = LASTOBSDATETIME("dbt ft ex dt")

OBSNOW("dbt ft ex dt"," ", strdate)}

fn rec_CT9(){OBSNOW("CT Scan", DOCUMENT.DATE_OF_LAST5_5825_734_1377114881, DOCUMENT.DATE12_5825_750_1377114881) DOCUMENT.CHECK17_5825_828_1377114881 = "yes"}

fn recmove2_CT9() {

strdate = LASTOBSDATETIME("CT Scan")

OBSNOW("CT Scan"," ", strdate)}

fn rec_MRI9(){OBSNOW("MRI", DOCUMENT.DATE_OF_LAST6_5825_859_1377114881, DOCUMENT.DATE13_5825_875_1377114881) DOCUMENT.CHECK18_5825_953_1377114881 = "yes"}

fn recmove2_MRI9() {

strdate = LASTOBSDATETIME("MRI")

OBSNOW("MRI"," ", strdate)}

fn rec_EMG9(){OBSNOW("EMG", DOCUMENT.DATE_OF_LAST7_5825_984_1377114881, DOCUMENT.DATE14_5825_0_1377114882) DOCUMENT.CHECK19_5825_78_1377114882 = "yes"}

fn recmove2_EMG9() {

strdate = LASTOBSDATETIME("EMG")

OBSNOW("EMG"," ", strdate)}

fn rec_drugscrn9(){OBSNOW("DRUG SCR U", DOCUMENT.DRUG_SCREEN_5825_750_1377114882,
DOCUMENT.DATE15_5825_765_1377114882) DOCUMENT.CHECK21_5825_843_1377114882 = "yes"}

fn recmove2_drugscrn9() {

strdate = LASTOBSDATETIME("DRUG SCR U")

OBSNOW("DRUG SCR U"," ", strdate)}

fn rec_MicroCreat9(){OBSNOW("MCROALB/CR U", DOCUMENT.MICRO_CREAT_5825_875_1377114882, DOCUMENT.DATE16_5825_890_1377114882) DOCUMENT.CHECK22_5825_968_1377114882 = "yes"}

fn recmove2_MicroCreat9() {

strdate = LASTOBSDATETIME("MCROALB/CR U")

OBSNOW("MCROALB/CR U"," ", strdate)}

fn rec_VitD9(){OBSNOW("vit D 25-OH", DOCUMENT.VITAMIN_D_5825_0_1377114883, DOCUMENT.DATE17_5825_15_1377114883) DOCUMENT.CHECK23_5825_93_1377114883 = "yes"}

fn recmove2_VitD9() {

strdate = LASTOBSDATETIME("vit D 25-OH")

OBSNOW("vit D 25-OH"," ", strdate)}

fn rec_Magnesium9(){OBSNOW("Magnesium", DOCUMENT.MAGNESIUM_5825_125_1377114883, DOCUMENT.DATE18_5825_140_1377114883) DOCUMENT.CHECK24_5825_218_1377114883 = "yes"}

fn recmove2_Magnesium9() {

strdate = LASTOBSDATETIME("Magnesium")

OBSNOW("Magnesium"," ", strdate)}

fn rec_UrnCult9(){OBSNOW("urine cultur", DOCUMENT.URINE_CULTUR_5825_250_1377114883, DOCUMENT.DATE19_5825_265_1377114883) DOCUMENT.CHECK25_5825_343_1377114883 = "yes"}

fn recmove2_UrnCult9() {

strdate = LASTOBSDATETIME("urine cultur")

OBSNOW("urine cultur"," ", strdate)}

fn rec_C39(){OBSNOW("C3 complimen", DOCUMENT.C3_5825_375_1377114883, DOCUMENT.DATE20_5825_390_1377114883) DOCUMENT.CHECK26_5825_468_1377114883 = "yes"}

fn recmove2_C39() {

strdate = LASTOBSDATETIME("C3 complimen")

OBSNOW("C3 complimen"," ", strdate)}

fn rec_C49(){OBSNOW("C4 complimen", DOCUMENT.C4_5825_500_1377114883, DOCUMENT.DATE21_5825_515_1377114883) DOCUMENT.CHECK27_5825_593_1377114883 = "yes"}

fn recmove2_C49() {

strdate = LASTOBSDATETIME("C4 complimen")

OBSNOW("C4 complimen"," ", strdate)}

fn rec_AntidsDNA9(){OBSNOW("Anti-ds-DNA", DOCUMENT.DSDNA_5825_625_1377114883, DOCUMENT.DATE22_5825_640_1377114883) DOCUMENT.CHECK28_5825_718_1377114883 = "yes"}

fn recmove2_AntidsDNA9() {

strdate = LASTOBSDATETIME("Anti-ds-DNA")

OBSNOW("Anti-ds-DNA"," ", strdate)}

fn rec_fluvac9(){OBSNOW("flu vax", DOCUMENT.FLU_VACCINE_5825_203_1377114884, DOCUMENT.DATE23_5825_218_1377114884) DOCUMENT.CHECK30_5825_297_1377114884 = "yes"}

fn recmove2_fluvac9() {

strdate = LASTOBSDATETIME("flu vax")

OBSNOW("flu vax"," ", strdate)}

fn rec_swine19(){OBSNOW("H1N1 #1 DS", DOCUMENT.H1N1__SWINE__5825_328_1377114884, DOCUMENT.DATE24_5825_343_1377114884) DOCUMENT.CHECK31_5825_422_1377114884 = "yes"}

fn recmove2_swine19() {

strdate = LASTOBSDATETIME("H1N1 #1 DS")

OBSNOW("H1N1 #1 DS"," ", strdate)}

fn rec_Testosterone9(){OBSNOW("DepoTest dos", DOCUMENT.TESTOSTERONE_5825_453_1377114884, DOCUMENT.DATE25_5825_468_1377114884) DOCUMENT.CHECK32_5825_547_1377114884 = "yes"}

fn recmove2_Testosterone9() {

strdate = LASTOBSDATETIME("DepoTest dos")

OBSNOW("DepoTest dos"," ", strdate)}

fn rec_b129(){OBSNOW("B-12", DOCUMENT.B_12_5825_578_1377114884, DOCUMENT.DATE26_5825_594_1377114884) DOCUMENT.CHECK33_5825_672_1377114884 = "yes"}

fn recmove2_b129() {

strdate = LASTOBSDATETIME("B-12")

OBSNOW("B-12"," ", strdate)}

fn rec_pnuemovax9(){OBSNOW("Pneumovax", DOCUMENT.PNEUMOVAX_5825_703_1377114884, DOCUMENT.DATE27_5825_719_1377114884)DOCUMENT.CHECK34_5825_797_1377114884 = "yes"}

fn recmove2_pnuemovax9() {

strdate = LASTOBSDATETIME("Pneumovax")

OBSNOW("Pneumovax"," ", strdate)}

fn rec_ppd9(){OBSNOW("PPD result", DOCUMENT.PPD_5825_828_1377114884, DOCUMENT.DATE28_5825_844_1377114884) DOCUMENT.CHECK35_5825_922_1377114884 = "yes"}

fn recmove2_ppd9() {

strdate = LASTOBSDATETIME("PPD result")

OBSNOW("PPD result"," ", strdate)}

fn rec_PPDPlaced9(){OBSNOW("TB-PPD site", DOCUMENT.PPD_PLACED_5825_953_1377114884, DOCUMENT.DATE29_5825_969_1377114884) DOCUMENT.CHECK36_5825_47_1377114885 = "yes"}

fn recmove2_PPDPlaced9() {

strdate = LASTOBSDATETIME("TB-PPD site")

OBSNOW("TB-PPD site"," ", strdate)}

fn test_dt9(dateobs){
local date = dateobs

IF match(date,3,"/")== 3 and match(date,6,"/")== 6 THEN
local dt = getfield(date,"/","")
local mt = dt[1]
local dy = dt[2]
local yr = dt[3]
local yrsz = size(yr)
local dysz = size(dy)
local mtsz = size(mt)

   IF yrsz <> 4 OR dysz <> 2 OR mtsz <> 2 THEN
     return USEROK("#2.Please enter date in valid format – mm/dd/yyyy.")
   ELSE
    local cn = remove(yr,3,2)
     IF match(cn,1,"19")>0 OR match(cn,1,"20")>0 THEN

      IF mt == "02" AND (val(dy) > 0 and val(dy)<= 29) == true THEN
       return date
      ELSE IF mt == "09" OR mt == "04" OR mt == "06" OR mt = "11" AND (val(dy)> 0 and val(dy) <= 30) == true then
          return date
        ELSE IF mt == "01" OR mt == "03" OR mt == "05" OR mt == "07" OR mt == "08" OR mt == "10" OR mt == "12" AND ((val(dy)> 0 and val(dy) <= 31)) = true THEN
           return date
          ELSE
            return USEROK("#4.Please enter date in valid format – mm/dd/yyyy.")
          ENDIF
         ENDIF
       ENDIF

     ELSE
      return USEROK("#3.Please enter date in valid format – mm/dd/yyyy.")
     ENDIF
    ENDIF
ELSE
   return USEROK("#1.Please enter date in valid format – mm/dd/yyyy.")
ENDIF
}

fn test_txt9(stuff){
local strTest = ""

strTest = tolower(stuff)
if strTest == "" or strTest == "today" or strTest == "yes" or strTest == "none" or strTest == "0" then
return USEROK("Please enter a valid test/lab value.")
else
return strTest
endif
}

fn test_txtN(stuff){
local strTest = ""

strTest = tolower(stuff)
if strTest == "" or strTest == " " or strTest == "today" or strTest == "yes" then
return USEROK("Please enter a valid test value.")
else if match(strTest,1,"0")>0 or match(strTest,1,"1")>0 or match(strTest,1,"2")>0 or match(strTest,1,"3")>0 or match(strTest,1,"4")>0 or match(strTest,1,"5")>0 then
return USEROK("Please remove numbers 0 – 5")
else
return strTest
endif endif
}

}{/*START OF FORM TRANSLATION BODY*/
}{CFMT(DOCUMENT.CHECK_5825_593_1377114879, ",1", "", ",1", "
")}{CFMT(DOCUMENT.CHECK2_5825_671_1377114879, ",1", "", ",1", "
")}{CFMT(DOCUMENT.CHECK3_5825_749_1377114879, ",1", "", ",1", "
")}{CFMT(DOCUMENT.CHECK4_5825_843_1377114879, ",1", "", ",1", "
")}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.MED_HX_OBTAI_5825_359_1377114880, ",1", "Med Hx Consent Obtained: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE_5825_375_1377114880, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.CONTROLLED_S_5825_484_1377114880, ",1", "Controlled Sub Signed: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE2_5825_500_1377114880, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.NC_DRUG_REGI_5825_609_1377114880, ",1", "NC Drug Registry: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE3_5825_625_1377114880, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.EKG_5825_734_1377114880, ",1", "EKG: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE4_5825_750_1377114880, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.EGD_5825_859_1377114880, ",1", "EGD: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE5_5825_875_1377114880, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.OCCULT_STOOL_5825_984_1377114880, ",1", "Occult Stool: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE6_5825_0_1377114881, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.OPHTHAMOLOGY_5825_109_1377114881, ",1", "Ophthamology: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE7_5825_125_1377114881, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE_OF_LAST_5825_234_1377114881, ",1", "Date of Last Physical: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE8_5825_250_1377114881, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE_OF_LAST2_5825_359_1377114881, ",1", "Date of Last CXR: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE9_5825_375_1377114881, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE_OF_LAST3_5825_484_1377114881, ",1", "Date of Last BMD: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE10_5825_500_1377114881, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE_OF_LAST4_5825_609_1377114881, ",1", "Date of Last Foot Exam: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE11_5825_625_1377114881, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE_OF_LAST5_5825_734_1377114881, ",1", "Date of Last CT: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE12_5825_750_1377114881, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE_OF_LAST6_5825_859_1377114881, ",1", "Date of Last MRI: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE13_5825_875_1377114881, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE_OF_LAST7_5825_984_1377114881, ",1", "Date of Last EMG: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK5_5825_234_1377114880 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE14_5825_0_1377114882, ",1", "Date: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK20_5825_625_1377114882 <> "" THEN "" ELSE CFMT(DOCUMENT.DRUG_SCREEN_5825_750_1377114882, ",1", "Drug Screen: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK20_5825_625_1377114882 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE15_5825_765_1377114882, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK20_5825_625_1377114882 <> "" THEN "" ELSE CFMT(DOCUMENT.MICRO_CREAT_5825_875_1377114882, ",1", "Micro/Creat: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK20_5825_625_1377114882 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE16_5825_890_1377114882, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK20_5825_625_1377114882 <> "" THEN "" ELSE CFMT(DOCUMENT.VITAMIN_D_5825_0_1377114883, ",1", "Vitamin D: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK20_5825_625_1377114882 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE17_5825_15_1377114883, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK20_5825_625_1377114882 <> "" THEN "" ELSE CFMT(DOCUMENT.MAGNESIUM_5825_125_1377114883, ",1", "Magnesium: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK20_5825_625_1377114882 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE18_5825_140_1377114883, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK20_5825_625_1377114882 <> "" THEN "" ELSE CFMT(DOCUMENT.URINE_CULTUR_5825_250_1377114883, ",1", "Urine Culture: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK20_5825_625_1377114882 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE19_5825_265_1377114883, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK20_5825_625_1377114882 <> "" THEN "" ELSE CFMT(DOCUMENT.C3_5825_375_1377114883, ",1", "C3: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK20_5825_625_1377114882 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE20_5825_390_1377114883, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK20_5825_625_1377114882 <> "" THEN "" ELSE CFMT(DOCUMENT.C4_5825_500_1377114883, ",1", "C4: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK20_5825_625_1377114882 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE21_5825_515_1377114883, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK20_5825_625_1377114882 <> "" THEN "" ELSE CFMT(DOCUMENT.DSDNA_5825_625_1377114883, ",1", "dsDNA: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK20_5825_625_1377114882 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE22_5825_640_1377114883, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK29_5825_78_1377114884 <> "" THEN "" ELSE CFMT(DOCUMENT.FLU_VACCINE_5825_203_1377114884, ",1", "Flu Vaccine: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK29_5825_78_1377114884 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE23_5825_218_1377114884, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK29_5825_78_1377114884 <> "" THEN "" ELSE CFMT(DOCUMENT.H1N1__SWINE__5825_328_1377114884, ",1", "H1N1 (swine): ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK29_5825_78_1377114884 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE24_5825_343_1377114884, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK29_5825_78_1377114884 <> "" THEN "" ELSE CFMT(DOCUMENT.TESTOSTERONE_5825_453_1377114884, ",1", "Testosterone: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK29_5825_78_1377114884 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE25_5825_468_1377114884, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK29_5825_78_1377114884 <> "" THEN "" ELSE CFMT(DOCUMENT.B_12_5825_578_1377114884, ",1", "B 12: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK29_5825_78_1377114884 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE26_5825_594_1377114884, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK29_5825_78_1377114884 <> "" THEN "" ELSE CFMT(DOCUMENT.PNEUMOVAX_5825_703_1377114884, ",1", "Pneumovax: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK29_5825_78_1377114884 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE27_5825_719_1377114884, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK29_5825_78_1377114884 <> "" THEN "" ELSE CFMT(DOCUMENT.PPD_5825_828_1377114884, ",1", "PPD: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK29_5825_78_1377114884 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE28_5825_844_1377114884, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.CHECK29_5825_78_1377114884 <> "" THEN "" ELSE CFMT(DOCUMENT.PPD_PLACED_5825_953_1377114884, ",1", "PPD Placed: ", ",1", "     ") ENDIF}{IF DOCUMENT.CHECK29_5825_78_1377114884 <> "" THEN "" ELSE CFMT(DOCUMENT.DATE29_5825_969_1377114884, ",1", "Date: ", ",1", "
") ENDIF}

I referenced this txt file to the EFE txt file and noticed quite a difference (again text in red is what I think part was converted cause the issue):

{global F560753831_48_1 = LAST_SIGNED_OBS_VALUEDATE("ConsentSignd") ""}{global F560753831_48_2 = LAST_SIGNED_OBS_VALUEDATE("ctrldsubcont") ""}{global F560753831_48_3 = LAST_SIGNED_OBS_VALUEDATE("DRUG SCR U") ""}{global F560753831_48_4 = LAST_SIGNED_OBS_VALUEDATE("ncdrgreg") ""}{global F560753831_48_5 = LAST_SIGNED_OBS_VALUEDATE("Height") ""}{global F560753831_48_6 = LAST_SIGNED_OBS_VALUEDATE("functnl sta") ""}{global F560753831_48_7 = LAST_SIGNED_OBS_VALUEDATE("PainScrRheum") ""}{global F560753831_48_8 = LAST_SIGNED_OBS_VALUEDATE("Tetanus immu") ""}{global F560753831_48_9 = LAST_SIGNED_OBS_VALUEDATE("PPD RESULT") ""}{global F560753831_48_10 = LAST_SIGNED_OBS_VALUEDATE("Td booster") ""}{global F560753831_48_11 = LAST_SIGNED_OBS_VALUEDATE("Flu vax") ""}{global F560753831_48_12 = LAST_SIGNED_OBS_VALUEDATE("Pneumovax") ""}{global F560753831_48_13 = LAST_SIGNED_OBS_VALUEDATE("COLONOSCOPY") ""}{global F560753831_48_14 = LAST_SIGNED_OBS_VALUEDATE("Hemoccult") ""}{global F560753831_48_15 = LAST_SIGNED_OBS_VALUEDATE("Cholesterol") ""}{global F560753831_48_16 = LAST_SIGNED_OBS_VALUEDATE("Triglyceride") ""}{global F560753831_48_17 = LAST_SIGNED_OBS_VALUEDATE("HDL") ""}{global F560753831_48_18 = LAST_SIGNED_OBS_VALUEDATE("LDL") ""}{global F560753831_48_19 = LAST_SIGNED_OBS_VALUEDATE("MCROALB/CR U") ""}{global F560753831_48_20 = LAST_SIGNED_OBS_VALUEDATE("Creatinine") ""}{global F560753831_48_21 = LAST_SIGNED_OBS_VALUEDATE("ProstateExam") ""}{global F560753831_48_22 = LAST_SIGNED_OBS_VALUEDATE("PSA") ""}{global F560753831_48_23 = LAST_SIGNED_OBS_VALUEDATE("Pap smear") ""}{global F560753831_48_24 = LAST_SIGNED_OBS_VALUEDATE("Mammogram") ""}{global F560753831_48_25 = LAST_SIGNED_OBS_VALUEDATE("vit D 25-OH") ""}{global F560753831_48_26 = LAST_SIGNED_OBS_VALUEDATE("OPHTH EXAM") ""}{global F560753831_48_27 = LAST_SIGNED_OBS_VALUEDATE("PE date") ""}{global F560753831_48_28 = LAST_SIGNED_OBS_VALUEDATE("CXR") ""}{global F560753831_48_29 = LAST_SIGNED_OBS_VALUEDATE("lastbonescan") ""}{global F560753831_48_30 = LAST_SIGNED_OBS_VALUEDATE("SMOK STATUS") ""}{global F560753831_48_31 = LAST_SIGNED_OBS_VALUEDATE("SMOK ADVICE") ""}{global F560753831_48_32 = LAST_SIGNED_OBS_VALUEDATE("ADV DIR REV") ""}{global F560753831_48_33 = OBSANY("Other commen") ""}{global F560753831_48_34 = LAST_SIGNED_OBS_VALUEDATE("WelcomeToMCR") ""}{global F560753831_48_35 = LAST_SIGNED_OBS_VALUEDATE("MCRINITWELL") ""}{global F560753831_48_36 = LAST_SIGNED_OBS_VALUEDATE("MCRSUBWELL") ""}{global F560753831_48_37 = LAST_SIGNED_OBS_VALUEDATE("AD discussed") ""}{fn welcome() {
    local medicare = DOCUMENT.TEMP_547463721_48_34910436
    local medicare2 = ""
    local medicare3 = ""

if medicare <> "" then
medicare2 = "done"
else if medicare == "" then
medicare2 = ""
else ""
endif endif

medicare3 = OBSNOW("WelcomeToMCR",medicare2)
return medicare3
}

}{fn MedInital() {
    local medicare = DOCUMENT.TEMP_547463722_48_34910441
    local medicare2 = ""
    local medicare3 = ""

if medicare <> "" then
medicare2 = "done"
else if medicare == "" then
medicare2 = ""
else ""
endif endif

medicare3 = OBSNOW("MCRINITWELL",medicare2)
return medicare3
}

}{fn MedSub() {
    local medicare = DOCUMENT.TEMP_547463723_48_34910446
    local medicare2 = ""
    local medicare3 = ""

if medicare <> "" then
medicare2 = "done"
else if medicare == "" then
medicare2 = ""
else ""
endif endif

medicare3 = OBSNOW("MCRSUBWELL",medicare2)
return medicare3
}

}{fn advice7() {
    local advance = DOCUMENT.TEMP_519141493_48_34260536
    local advance2 = ""
    local advance3 = ""

if advance <> "" then
advance2 = "Directives were discussed with patient. No decision made at this time."
else ""
endif

advance3 = OBSNOW("AD discussed",advance2)
return smoke3
}

}{fn rec_MedHx9(){OBSNOW("ConsentSignd", DOCUMENT.TEMP_522266398_48_34425190, DOCUMENT.TEMP_522266399_48_34425191) DOCUMENT.TEMP_522266400_48_34425196 = "yes"}

}{fn recmove2_MedHx9() {

strdate = LASTOBSDATETIME("ConsentSignd")

OBSNOW("ConsentSignd"," ", strdate)}

}{fn rec_ConSub9(){OBSNOW("ctrldsubcont", DOCUMENT.TEMP_544565235_48_34769829,
DOCUMENT.TEMP_544565236_48_34769830) DOCUMENT.TEMP_544565237_48_34769835 = "yes"}

}{fn recmove2_ConSub9() {

strdate = LASTOBSDATETIME("ctrldsubcont")

OBSNOW("ctrldsubcont"," ", strdate)}

}{fn rec_ncdrgreg9(){OBSNOW("ncdrgreg", DOCUMENT.TEMP_544565241_48_34769837,
DOCUMENT.TEMP_544565242_48_34769838) DOCUMENT.TEMP_544565243_48_34769843 = "yes"}

}{fn recmove2_ncdrgreg9() {

strdate = LASTOBSDATETIME("ncdrgreg")

OBSNOW("ncdrgreg"," ", strdate)}

}{fn rec_ekg9(){OBSNOW("EKG", DOCUMENT.TEMP_517459389_48_8059914, DOCUMENT.TEMP_517459390_48_8059915) DOCUMENT.TEMP_517459391_48_33150517 = "yes"}

}{fn recmove2_ekg9() {

strdate = LASTOBSDATETIME("EKG")

OBSNOW("EKG"," ", strdate)}

}{fn rec_egd9(){OBSNOW("EGD", DOCUMENT.TEMP_517459392_48_33088859, DOCUMENT.TEMP_517459393_48_33088860) DOCUMENT.TEMP_517459394_48_33150518 = "yes"}

}{fn recmove2_egd9() {

strdate = LASTOBSDATETIME("EGD")

OBSNOW("EGD"," ", strdate)}

}{fn rec_OccultStool9(){OBSNOW("Hemoccult", DOCUMENT.TEMP_517459395_48_33088865, DOCUMENT.TEMP_517459396_48_33088866) DOCUMENT.TEMP_517459397_48_33150519 = "yes"}

}{fn recmove2_OccultStool9() {

strdate = LASTOBSDATETIME("Hemoccult")

OBSNOW("Hemoccult"," ", strdate)}

}{fn rec_Ophthamology9(){OBSNOW("OPHTH EXAM", DOCUMENT.TEMP_517459398_48_33130272, DOCUMENT.TEMP_517459399_48_33130273) DOCUMENT.TEMP_517459400_48_33150524 = "yes"}

}{fn recmove2_Ophthamology9() {

strdate = LASTOBSDATETIME("OPHTH EXAM")

OBSNOW("OPHTH EXAM"," ", strdate)}

}{fn rec_physical9(){OBSNOW("PE date", DOCUMENT.TEMP_517459401_48_8059882, DOCUMENT.TEMP_517459402_48_8059883) DOCUMENT.TEMP_517459403_48_33150525 = "yes"}

}{fn recmove2_physical9() {

strdate = LASTOBSDATETIME("PE date")

OBSNOW("PE date"," ", strdate)}

}{fn rec_CXR9(){OBSNOW("CXR", DOCUMENT.TEMP_517459404_48_33130279, DOCUMENT.TEMP_517459405_48_33130280) DOCUMENT.TEMP_517459406_48_33150526 = "yes"}

}{fn recmove2_CXR9() {

strdate = LASTOBSDATETIME("CXR date dne")

OBSNOW("CXR date dne"," ", strdate)}

}{fn rec_bmd9(){OBSNOW("LASTBONESCAN", DOCUMENT.TEMP_517459407_48_1202455, DOCUMENT.TEMP_517459408_48_1202456) DOCUMENT.TEMP_517459409_48_33150527 = "yes"}

}{fn recmove2_bmd9() {

strdate = LASTOBSDATETIME("LASTBONESCAN")

OBSNOW("LASTBONESCAN"," ", strdate)}

}{fn rec_footexm9(){OBSNOW("dbt ft ex dt", DOCUMENT.TEMP_517459410_48_33088846, DOCUMENT.TEMP_517459411_48_33088847) DOCUMENT.TEMP_517459412_48_33150528 = "yes"}

}{fn recmove2_footexm9() {

strdate = LASTOBSDATETIME("dbt ft ex dt")

OBSNOW("dbt ft ex dt"," ", strdate)}

}{fn rec_CT9(){OBSNOW("CT Scan", DOCUMENT.TEMP_517459413_48_8091398, DOCUMENT.TEMP_517459414_48_8091399) DOCUMENT.TEMP_517459415_48_33150529 = "yes"}

}{fn recmove2_CT9() {

strdate = LASTOBSDATETIME("CT Scan")

OBSNOW("CT Scan"," ", strdate)}

}{fn rec_MRI9(){OBSNOW("MRI", DOCUMENT.TEMP_517459416_48_8059888, DOCUMENT.TEMP_517459417_48_8059889) DOCUMENT.TEMP_517459418_48_33150530 = "yes"}

}{fn recmove2_MRI9() {

strdate = LASTOBSDATETIME("MRI")

OBSNOW("MRI"," ", strdate)}

}{fn rec_EMG9(){OBSNOW("EMG", DOCUMENT.TEMP_517459419_48_8059894, DOCUMENT.TEMP_517459420_48_8059895) DOCUMENT.TEMP_517459421_48_33150531 = "yes"}

}{fn recmove2_EMG9() {

strdate = LASTOBSDATETIME("EMG")

OBSNOW("EMG"," ", strdate)}

}{fn rec_drugscrn9(){OBSNOW("DRUG SCR U", DOCUMENT.TEMP_544566959_48_34769849,
DOCUMENT.TEMP_544566960_48_34769850) DOCUMENT.TEMP_544566961_48_34769855 = "yes"}

}{fn recmove2_drugscrn9() {

strdate = LASTOBSDATETIME("DRUG SCR U")

OBSNOW("DRUG SCR U"," ", strdate)}

}{fn rec_MicroCreat9(){OBSNOW("MCROALB/CR U", DOCUMENT.TEMP_517459423_48_33130265, DOCUMENT.TEMP_517459424_48_33130266) DOCUMENT.TEMP_517459425_48_33150543 = "yes"}

}{fn recmove2_MicroCreat9() {

strdate = LASTOBSDATETIME("MCROALB/CR U")

OBSNOW("MCROALB/CR U"," ", strdate)}

}{fn rec_VitD9(){OBSNOW("vit D 25-OH", DOCUMENT.TEMP_517459426_48_33437360, DOCUMENT.TEMP_517459427_48_33437361) DOCUMENT.TEMP_517459428_48_33437366 = "yes"}

}{fn recmove2_VitD9() {

strdate = LASTOBSDATETIME("vit D 25-OH")

OBSNOW("vit D 25-OH"," ", strdate)}

}{fn rec_Magnesium9(){OBSNOW("Magnesium", DOCUMENT.TEMP_517459429_48_33160386, DOCUMENT.TEMP_517459430_48_33160387) DOCUMENT.TEMP_517459431_48_33160391 = "yes"}

}{fn recmove2_Magnesium9() {

strdate = LASTOBSDATETIME("Magnesium")

OBSNOW("Magnesium"," ", strdate)}

}{fn rec_UrnCult9(){OBSNOW("urine cultur", DOCUMENT.TEMP_517459432_48_33116341, DOCUMENT.TEMP_517459433_48_33116342) DOCUMENT.TEMP_517459434_48_33150567 = "yes"}

}{fn recmove2_UrnCult9() {

strdate = LASTOBSDATETIME("urine cultur")

OBSNOW("urine cultur"," ", strdate)}

}{fn rec_C39(){OBSNOW("C3 complimen", DOCUMENT.TEMP_609667443_48_35863853, DOCUMENT.TEMP_609667444_48_35863854) DOCUMENT.TEMP_609667445_48_35863859 = "yes"}

}{fn recmove2_C39() {

strdate = LASTOBSDATETIME("C3 complimen")

OBSNOW("C3 complimen"," ", strdate)}

}{fn rec_C49(){OBSNOW("C4 complimen", DOCUMENT.TEMP_609667446_48_35863861, DOCUMENT.TEMP_609667447_48_35863862) DOCUMENT.TEMP_609667448_48_35863867 = "yes"}

}{fn recmove2_C49() {

strdate = LASTOBSDATETIME("C4 complimen")

OBSNOW("C4 complimen"," ", strdate)}

}{fn rec_AntidsDNA9(){OBSNOW("Anti-ds-DNA", DOCUMENT.TEMP_609667449_48_35863869, DOCUMENT.TEMP_609667450_48_35863870) DOCUMENT.TEMP_609667451_48_35863875 = "yes"}

}{fn recmove2_AntidsDNA9() {

strdate = LASTOBSDATETIME("Anti-ds-DNA")

OBSNOW("Anti-ds-DNA"," ", strdate)}

}{fn rec_fluvac9(){OBSNOW("flu vax", DOCUMENT.TEMP_517459436_48_33075765, DOCUMENT.TEMP_517459437_48_33075766) DOCUMENT.TEMP_517459438_48_33150583 = "yes"}

}{fn recmove2_fluvac9() {

strdate = LASTOBSDATETIME("flu vax")

OBSNOW("flu vax"," ", strdate)}

}{fn rec_swine19(){OBSNOW("H1N1 #1 DS", DOCUMENT.TEMP_517459439_48_33634752, DOCUMENT.TEMP_517459440_48_33634753) DOCUMENT.TEMP_517459441_48_33634758 = "yes"}

}{fn recmove2_swine19() {

strdate = LASTOBSDATETIME("H1N1 #1 DS")

OBSNOW("H1N1 #1 DS"," ", strdate)}

}{fn rec_Testosterone9(){OBSNOW("DepoTest dos", DOCUMENT.TEMP_517459442_48_33075770, DOCUMENT.TEMP_517459443_48_33075771) DOCUMENT.TEMP_517459444_48_33150584 = "yes"}

}{fn recmove2_Testosterone9() {

strdate = LASTOBSDATETIME("DepoTest dos")

OBSNOW("DepoTest dos"," ", strdate)}

}{fn rec_b129(){OBSNOW("B-12", DOCUMENT.TEMP_517459445_48_33075775, DOCUMENT.TEMP_517459446_48_33075776) DOCUMENT.TEMP_517459447_48_33150585 = "yes"}

}{fn recmove2_b129() {

strdate = LASTOBSDATETIME("B-12")

OBSNOW("B-12"," ", strdate)}

}{fn rec_pnuemovax9(){OBSNOW("Pneumovax", DOCUMENT.TEMP_517459448_48_33092562, DOCUMENT.TEMP_517459449_48_33092563)DOCUMENT.TEMP_517459450_48_33150591 = "yes"}

}{fn recmove2_pnuemovax9() {

strdate = LASTOBSDATETIME("Pneumovax")

OBSNOW("Pneumovax"," ", strdate)}

}{fn rec_ppd9(){OBSNOW("PPD result", DOCUMENT.TEMP_517459451_48_33084289, DOCUMENT.TEMP_517459452_48_33084290) DOCUMENT.TEMP_517459453_48_33150592 = "yes"}

}{fn recmove2_ppd9() {

strdate = LASTOBSDATETIME("PPD result")

OBSNOW("PPD result"," ", strdate)}

}{fn rec_PPDPlaced9(){OBSNOW("TB-PPD site", DOCUMENT.TEMP_517459454_48_33075790, DOCUMENT.TEMP_517459455_48_33075791) DOCUMENT.TEMP_517459456_48_33150593 = "yes"}

}{fn recmove2_PPDPlaced9() {

strdate = LASTOBSDATETIME("TB-PPD site")

OBSNOW("TB-PPD site"," ", strdate)}

}{fn test_dt9(dateobs){
local date = dateobs

IF match(date,3,"/")== 3 and match(date,6,"/")== 6 THEN
local dt = getfield(date,"/","")
local mt = dt[1]
local dy = dt[2]
local yr = dt[3]
local yrsz = size(yr)
local dysz = size(dy)
local mtsz = size(mt)

   IF yrsz <> 4 OR dysz <> 2 OR mtsz <> 2 THEN
     return USEROK("#2.Please enter date in valid format – mm/dd/yyyy.")
   ELSE
    local cn = remove(yr,3,2)
     IF match(cn,1,"19")>0 OR match(cn,1,"20")>0 THEN

      IF mt == "02" AND (val(dy) > 0 and val(dy)<= 29) == true THEN
       return date
      ELSE IF mt == "09" OR mt == "04" OR mt == "06" OR mt = "11" AND (val(dy)> 0 and val(dy) <= 30) == true then
          return date
        ELSE IF mt == "01" OR mt == "03" OR mt == "05" OR mt == "07" OR mt == "08" OR mt == "10" OR mt == "12" AND ((val(dy)> 0 and val(dy) <= 31)) = true THEN
           return date
          ELSE
            return USEROK("#4.Please enter date in valid format – mm/dd/yyyy.")
          ENDIF
         ENDIF
       ENDIF

     ELSE
      return USEROK("#3.Please enter date in valid format – mm/dd/yyyy.")
     ENDIF
    ENDIF
ELSE
   return USEROK("#1.Please enter date in valid format – mm/dd/yyyy.")
ENDIF
}

}{fn test_txt9(stuff){
local strTest = ""

strTest = tolower(stuff)
if strTest == "" or strTest == "today" or strTest == "yes" or strTest == "none" or strTest == "0" then
return USEROK("Please enter a valid test/lab value.")
else
return strTest
endif
}

}{fn test_txtN(stuff){
local strTest = ""

strTest = tolower(stuff)
if strTest == "" or strTest == " " or strTest == "today" or strTest == "yes" then
return USEROK("Please enter a valid test value.")
else if match(strTest,1,"0")>0 or match(strTest,1,"1")>0 or match(strTest,1,"2")>0 or match(strTest,1,"3")>0 or match(strTest,1,"4")>0 or match(strTest,1,"5")>0 then
return USEROK("Please remove numbers 0 – 5")
else
return strTest
endif endif
}

}{CFMT(DOCUMENT.TEMP_547463721_48_34910436, ",1", "", ",1", "
")}{CFMT(DOCUMENT.TEMP_547463722_48_34910441, ",1", "", ",1", "
")}{CFMT(DOCUMENT.TEMP_547463723_48_34910446, ",1", "", ",1", "
")}{CFMT(DOCUMENT.TEMP_519141493_48_34260536, ",1", "", ",1", "
")}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_522266398_48_34425190, ",1", "Med Hx Consent Obtained: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_522266399_48_34425191, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_544565235_48_34769829, ",1", "Controlled Sub Signed: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_544565236_48_34769830, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_544565241_48_34769837, ",1", "NC Drug Registry: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_544565242_48_34769838, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459389_48_8059914, ",1", "EKG: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459390_48_8059915, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459392_48_33088859, ",1", "EGD: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459393_48_33088860, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459395_48_33088865, ",1", "Occult Stool: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459396_48_33088866, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459398_48_33130272, ",1", "Ophthamology: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459399_48_33130273, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459401_48_8059882, ",1", "Date of Last Physical: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459402_48_8059883, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459404_48_33130279, ",1", "Date of Last CXR: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459405_48_33130280, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459407_48_1202455, ",1", "Date of Last BMD: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459408_48_1202456, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459410_48_33088846, ",1", "Date of Last Foot Exam: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459411_48_33088847, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459413_48_8091398, ",1", "Date of Last CT: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459414_48_8091399, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459416_48_8059888, ",1", "Date of Last MRI: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459417_48_8059889, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459419_48_8059894, ",1", "Date of Last EMG: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459388_48_33574779 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459420_48_8059895, ",1", "Date: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459422_48_33574782 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_544566959_48_34769849, ",1", "Drug Screen: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459422_48_33574782 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_544566960_48_34769850, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459422_48_33574782 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459423_48_33130265, ",1", "Micro/Creat: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459422_48_33574782 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459424_48_33130266, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459422_48_33574782 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459426_48_33437360, ",1", "Vitamin D: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459422_48_33574782 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459427_48_33437361, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459422_48_33574782 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459429_48_33160386, ",1", "Magnesium: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459422_48_33574782 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459430_48_33160387, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459422_48_33574782 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459432_48_33116341, ",1", "Urine Culture: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459422_48_33574782 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459433_48_33116342, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459422_48_33574782 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_609667443_48_35863853, ",1", "C3: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459422_48_33574782 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_609667444_48_35863854, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459422_48_33574782 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_609667446_48_35863861, ",1", "C4: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459422_48_33574782 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_609667447_48_35863862, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459422_48_33574782 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_609667449_48_35863869, ",1", "dsDNA: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459422_48_33574782 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_609667450_48_35863870, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459435_48_33574787 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459436_48_33075765, ",1", "Flu Vaccine: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459435_48_33574787 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459437_48_33075766, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459435_48_33574787 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459439_48_33634752, ",1", "H1N1 (swine): ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459435_48_33574787 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459440_48_33634753, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459435_48_33574787 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459442_48_33075770, ",1", "Testosterone: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459435_48_33574787 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459443_48_33075771, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459435_48_33574787 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459445_48_33075775, ",1", "B 12: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459435_48_33574787 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459446_48_33075776, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459435_48_33574787 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459448_48_33092562, ",1", "Pneumovax: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459435_48_33574787 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459449_48_33092563, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459435_48_33574787 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459451_48_33084289, ",1", "PPD: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459435_48_33574787 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459452_48_33084290, ",1", "on: ", ",1", "
") ENDIF}{IF DOCUMENT.TEMP_517459435_48_33574787 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459454_48_33075790, ",1", "PPD Placed: ", ",1", "     ") ENDIF}{IF DOCUMENT.TEMP_517459435_48_33574787 <> "" THEN "" ELSE CFMT(DOCUMENT.TEMP_517459455_48_33075791, ",1", "Date: ", ",1", "
") ENDIF}

Any help would be great, i'm completely stumped.

Thanks in advance

Posted : August 21, 2013 11:01 pm

marylongcore

(@marylongcore)

Posts: 54

Trusted Member

Hi. I won't claim to offer a fix for this particular problem, but in general, if I've had problems converting a large form (or small, for that matter), it usualy involved Suppressions. Once I've taken them out in the EFE, I was able to complete the conversion successfully, then put new Suppressions into the VFE version.

Good luck with the function difficulties - sorry I'm not strong enough with them myself to help.

Mary

Posted : August 29, 2013 4:53 am

Adam Daniel

(@adaniel)

Posts: 524

Prominent Member

Topic starter

Thank you, We are slowly moving forms over as they need updates. I'll keep that in mind.

Posted : August 29, 2013 5:16 am

DavidShower

(@davidshower)

Posts: 1255

Noble Member

This section you had highlighted:

/*FUNCTION DEFINITIONS*/
/*Function for RUNPROCESS Button Record Med Hx Obtained*/
fn fn5825_406_1377114880(){
(DOCUMENT.MED_HX_OBTAI_5825_359_1377114880) (DOCUMENT.DATE_5825_375_1377114880) rec_MedHx9() fn remove_MedHx9()
}

Is incorrect. Look at the button "Record Med Hx Obtained. If it really says

fn remove_MedHx9() - drop the fn. That function is defined elsewhere and the fn should not be in the button code shown.

Posted : September 4, 2013 12:25 am

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.