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