Welcome to the NEW CHUG— your ultimate destination for cutting-edge insights and discussions at the intersection of healthcare and technology.

Our platform is dedicated to exploring the dynamic landscape of healthcare technology, empowering professionals, enthusiasts, and innovators alike with the knowledge and resources to navigate the rapidly evolving field.

From telemedicine revolutionizing patient care to the transformative potential of artificial intelligence in diagnostics, we delve into a myriad of topics shaping the future of healthcare delivery. Whether you’re a seasoned healthcare IT professional, an aspiring entrepreneur in the digital health space, or simply curious about the latest innovations, our curated content, expert interviews, and thought-provoking articles provide a comprehensive exploration of healthcare technology’s most pressing issues.

Join us as we navigate the forefront of innovation, driving forward the transformation of healthcare for a healthier, more connected world.

Have questions or suggestions? Please use the contact button below.

Notifications

Clear all

VFE - Form crashes

Trading Post

Last Post by Anonymous 1 second ago

4 Posts

3 Users

0 Reactions

82 Views

RSS

Anonymous

(@Anonymous)

Posts: 0

New Member Guest

Topic starter

Any feedback would be greatly appreciated!

Edited a form in VFE, no build errors when it is saved, but when imported in EMR, it gives following coding below as soon as I open a chart. After that any form I open for the patient gives the same coding. Has anyone seen it?

{global F4544_1340653100_224 = OBSNOW("EDD by LMP") "" <-FUNCTION DEFINITION IS NOT EXECUTABLE{global F4544_1340653098_210 = OBSNOW("AFI") "" <-FUNCTION DEFINITION IS NOT EXECUTABLE{global F4544_1340653098_241 = OBSNOW("PLACENTA LOC") "" <-FUNCTION DEFINITION IS NOT EXECUTABLE{global F4544_1340653098_257 = OBSNOW("PLACENTA GR") "" <-FUNCTION DEFINITION IS NOT EXECUTABLE{global F4544_1340653098_272 = OBSNOW("GA SONO date") "" <-FUNCTION DEFINITION IS NOT EXECUTABLE{global F4544_1340653098_288 = OBSNOW("GA SONO") "" <-FUNCTION DEFINITION IS NOT EXECUTABLE{global F4544_1340653098_335 = OBSNOW("EDC sonogram") "" <-FUNCTION DEFINITION IS NOT EXECUTABLE{global F4544_1340653098_382 = OBSNOW("CARD MOTION") "" <-FUNCTION DEFINITION IS NOT EXECUTABLE{global F4544_1340653098_397 = OBSNOW("FHR") "" <-FUNCTION DEFINITION IS NOT EXECUTABLE{global F4544_1340653098_413 = OBSNOW("FETAL POS1US") "" <-FUNCTION DEFINITION IS NOT EXECUTABLE{global F4544_1340653098_428 = OBSNOW("CRL") "" <-FUNCTION DEFINITION IS NOT EXECUTABLE{global F4544_1340653098_507 = OBSNOW("Ultrasound") "" <-FUNCTION DEFINITION IS NOT EXECUTABLE{global F4544_1340653098_538 = OBSNOW("Head diam") "" <-FUNCTION DEFINITION IS NOT EXECUTABLE{global F4544_1340653098_616 = OBSNOW("Head c(old)") "" <-FUNCTION DEFINITION IS NOT EXECUTABLE{global F4544_1340653098_694 = OBSNOW("OFD") "" <-FUNCTION DEFINITION IS NOT EXECUTABLE{global F4544_1340653098_741 = OBSNOW("AC") "" <-FUNCTION DEFINITION IS NOT EXECUTABLE{global F4544_1340653098_819 = OBSNOW("SONO FL") "" <-FUNCTION DEFINITION IS NOT EXECUTABLE{global F4544_1340653099_818 = OBSNOW("CEPHAL INDEX") "" <-FUNCTION DEFINITION IS NOT EXECUTABLE{global F4544_1340653099_834 = OBSNOW("head c/abd c") "" <-FUNCTION DEFINITION IS NOT EXECUTABLE{

/*FUNCTION DEFINITIONS*/

/*Function for SetValues Button Normal*/

fn fn4544_1340300164_610(){

IF DOCUMENT.UTERUS1_4544_1340300164_595 == "" THEN DOCUMENT.UTERUS1_4544_1340300164_595 = ("Normal") ENDIF

}

/*Function for SetValues Button Observed-Appears Normal*/

fn fn4544_1340300164_673(){

DOCUMENT.RIGHT_OVARY1_4544_1340300164_657 = ("Observed-Appears Normal")

}

/*Function for SetValues Button Not Observed*/

fn fn4544_1340300164_688(){

DOCUMENT.RIGHT_OVARY1_4544_1340300164_657 = ("Not Observed")

}

/*Function for SetValues Button Observed-Appears Normal*/

fn fn4544_1340300164_735(){

DOCUMENT.LEFT_OVARY1_4544_1340300164_719 = ("Observed-Appears Normal")

}

/*Function for SetValues Button Not Observed*/

fn fn4544_1340300164_751(){

DOCUMENT.LEFT_OVARY1_4544_1340300164_719 = ("Not Observed")

}

/*Function for SetValues Button Do Calc (CGA Method)*/

fn fn4544_1340300166_171(){

OBSNOW("GA SONO date", (str(getdate())))

OBSNOW("GA SONO", (str(if DOCUMENT.CRL1_4544_1340300165_703 == "Use CRL in CGA Calculation" then GAfromCRL(obsnow("CRL")) else if DOCUMENT.BPD1_4544_1340300165_781== "Use BPD in CGA Calculation" and DOCUMENT.HC1_4544_1340300165_859<> "Use HC in CGA Calculation" and DOCUMENT.AC1_4544_1340300166_15 <> "Use AC in CGA Calculation" and DOCUMENT.FL1_4544_1340300166_93<> "Use FL in CGA Calculation" then GAfromANYBPD(obsnow("Head diam")) else if DOCUMENT.BPD1_4544_1340300165_781<> "Use BPD in CGA Calculation" and DOCUMENT.HC1_4544_1340300165_859== "Use HC in CGA Calculation" and DOCUMENT.AC1_4544_1340300166_15 <> "Use AC in CGA Calculation" and DOCUMENT.FL1_4544_1340300166_93<> "Use FL in CGA Calculation" then GAfromHC(obsnow("Head c(old)")) else if DOCUMENT.BPD1_4544_1340300165_781<> "Use BPD in CGA Calculation" and DOCUMENT.HC1_4544_1340300165_859<> "Use HC in CGA Calculation" and DOCUMENT.AC1_4544_1340300166_15 == "Use AC in CGA Calculation" and DOCUMENT.FL1_4544_1340300166_93<> "Use FL in CGA Calculation" then GafromAC(obsnow("AC")) else if DOCUMENT.BPD1_4544_1340300165_781<> "Use BPD in CGA Calculation" and DOCUMENT.HC1_4544_1340300165_859<> "Use HC in CGA Calculation" and DOCUMENT.AC1_4544_1340300166_15 <> "Use AC in CGA Calculation" and DOCUMENT.FL1_4544_1340300166_93== "Use FL in CGA Calculation" then GAfromFL(obsnow("SONO FL")) else if DOCUMENT.BPD1_4544_1340300165_781== "Use BPD in CGA Calculation" and DOCUMENT.HC1_4544_1340300165_859== "Use HC in CGA Calculation" and DOCUMENT.AC1_4544_1340300166_15 <> "Use AC in CGA Calculation" and DOCUMENT.FL1_4544_1340300166_93<> "Use FL in CGA Calculation" then GAfromBPDHC(obsnow("Head diam"),obsnow("Head c(old)")) else if DOCUMENT.BPD1_4544_1340300165_781== "Use BPD in CGA Calculation" and DOCUMENT.HC1_4544_1340300165_859<> "Use HC in CGA Calculation" and DOCUMENT.AC1_4544_1340300166_15 == "Use AC in CGA Calculation" and DOCUMENT.FL1_4544_1340300166_93<> "Use FL in CGA Calculation" then GAfromBPDAC(obsnow("Head diam"),obsnow("AC")) else if DOCUMENT.BPD1_4544_1340300165_781== "Use BPD in CGA Calculation" and DOCUMENT.HC1_4544_1340300165_859<> "Use HC in CGA Calculation" and DOCUMENT.AC1_4544_1340300166_15 <> "Use AC in CGA Calculation" and DOCUMENT.FL1_4544_1340300166_93== "Use FL in CGA Calculation" then GAfromBPDFL(obsnow("Head diam"),obsnow("SONO FL")) else if DOCUMENT.BPD1_4544_1340300165_781<> "Use BPD in CGA Calculation" and DOCUMENT.HC1_4544_1340300165_859== "Use HC in CGA Calculation" and DOCUMENT.AC1_4544_1340300166_15 == "Use AC in CGA Calculation" and DOCUMENT.FL1_4544_1340300166_93<> "Use FL in CGA Calculation" then GAfromHCAC(obsnow("Head c(old)"),obsnow("AC")) else if DOCUMENT.BPD1_4544_1340300165_781<> "Use BPD in CGA Calculation" and DOCUMENT.HC1_4544_1340300165_859== "Use HC in CGA Calculation" and DOCUMENT.AC1_4544_1340300166_15 <> "Use AC in CGA Calculation" and DOCUMENT.FL1_4544_1340300166_93== "Use FL in CGA Calculation" then GAfromHCFL(obsnow("Head c(old)"),obsnow("SONO FL")) else if DOCUMENT.BPD1_4544_1340300165_781<> "Use BPD in CGA Calculation" and DOCUMENT.HC1_4544_1340300165_859<> "Use HC in CGA Calculation" and DOCUMENT.AC1_4544_1340300166_15 == "Use AC in CGA Calculation" and DOCUMENT.FL1_4544_1340300166_93== "Use FL in CGA Calculation" then GAfromACFL(obsnow("AC"),obsnow("SONO FL")) else if DOCUMENT.BPD1_4544_1340300165_781== "Use BPD in CGA Calculation" and DOCUMENT.HC1_4544_1340300165_859== "Use HC in CGA Calculation" and DOCUMENT.AC1_4544_1340300166_15 == "Use AC in CGA Calculation" and DOCUMENT.FL1_4544_1340300166_93<> "Use FL in CGA Calculation" then GAfromHCACBPD(obsnow("Head c(old)"),obsnow("AC"),obsnow("Head diam")) else if DOCUMENT.BPD1_4544_1340300165_781<> "Use BPD in CGA Calculation" and DOCUMENT.HC1_4544_1340300165_859== "Use HC in CGA Calculation" and DOCUMENT.AC1_4544_1340300166_15 == "Use AC in CGA Calculation" and DOCUMENT.FL1_4544_1340300166_93== "Use FL in CGA Calculation" then GAfromHCACFL(obsnow("Head c(old)"),obsnow("AC"),obsnow("SONO FL")) else if DOCUMENT.BPD1_4544_1340300165_781== "Use BPD in CGA Calculation" and DOCUMENT.HC1_4544_1340300165_859== "Use HC in CGA Calculation" and DOCUMENT.AC1_4544_1340300166_15 <> "Use AC in CGA Calculation" and DOCUMENT.FL1_4544_1340300166_93== "Use FL in CGA Calculation" then GAfromHCBPDFL(obsnow("Head c(old)"),obsnow("Head diam"),obsnow("SONO FL")) else if DOCUMENT.BPD1_4544_1340300165_781== "Use BPD in CGA Calculation" and DOCUMENT.HC1_4544_1340300165_859<> "Use HC in CGA Calculation" and DOCUMENT.AC1_4544_1340300166_15 == "Use AC in CGA Calculation" and DOCUMENT.FL1_4544_1340300166_93== "Use FL in CGA Calculation" then GAfromBPDACFL(obsnow("Head diam"),obsnow("AC"),obsnow("SONO FL")) else if DOCUMENT.BPD1_4544_1340300165_781== "Use BPD in CGA Calculation" and DOCUMENT.HC1_4544_1340300165_859== "Use HC in CGA Calculation" and DOCUMENT.AC1_4544_1340300166_15 == "Use AC in CGA Calculation" and DOCUMENT.FL1_4544_1340300166_93== "Use FL in CGA Calculation" then GAfromUS(obsnow("Head diam"),obsnow("Head c(old)"),obsnow("AC"),obsnow("SONO FL")) else "" endif endif endif endif endif endif endif endif endif endif endif endif endif endif endif endif)))

OBSNOW("EDC sonogram", (str(GETEDC2(obsnow("GA SONO")))))

OBSNOW("CEPHAL INDEX", (str(GETCI(obsnow("Head diam"),obsnow("OFD")))))

DOCUMENT.FL_BPD1_4544_1340300166_327 = (str(GETFLBPD(obsnow("SONO FL"),obsnow("Head diam"))))

DOCUMENT.FL_AC1_4544_1340300166_405 = (str(GETFLAC(obsnow("SONO FL"),obsnow("AC"))))

OBSNOW("head c/abd c", (str(GETHCAC(obsnow("Head c(old)"),obsnow("AC")))))

DOCUMENT.EFW1_4544_1340300166_561 = (str(EFW1(obsnow("Head diam"),obsnow("Head c(old)"),obsnow("AC"),obsnow("SONO FL"))))

}

/*Function for SetValues Button Do Calc (Avg Method)*/

fn fn4544_1340300166_187(){

OBSNOW("GA SONO date", (str(getdate())))

OBSNOW("GA SONO", (str(GetAveGA(AveGAWeeks()))))

OBSNOW("EDC sonogram", (str(GETEDC2(obsnow("GA SONO")))))

OBSNOW("CEPHAL INDEX", (str(GETCI(obsnow("Head diam"),obsnow("OFD")))))

DOCUMENT.FL_BPD1_4544_1340300166_327 = (str(GETFLBPD(obsnow("SONO FL"),obsnow("Head diam"))))

DOCUMENT.FL_AC1_4544_1340300166_405 = (str(GETFLAC(obsnow("SONO FL"),obsnow("AC"))))

OBSNOW("head c/abd c", (str(GETHCAC(obsnow("Head c(old)"),obsnow("AC")))))

DOCUMENT.EFW1_4544_1340300166_561 = (str(EFW1(obsnow("Head diam"),obsnow("Head c(old)"),obsnow("AC"),obsnow("SONO FL"))))

}

/*Function for SetValues Button Observed-Appears Normal*/

fn fn4544_1340300166_764(){

IF DOCUMENT.HEART_4_CHAM_4544_1340300166_748 == "" THEN DOCUMENT.HEART_4_CHAM_4544_1340300166_748 = ("Observed-Appears Normal") ENDIF

}

/*Function for SetValues Button Not Observed*/

fn fn4544_1340300166_780(){

IF DOCUMENT.HEART_4_CHAM_4544_1340300166_748 == "" THEN DOCUMENT.HEART_4_CHAM_4544_1340300166_748 = ("Not Observed") ENDIF

}

/*Function for SetValues Button Observed-Appears Normal*/

fn fn4544_1340300166_826(){

IF DOCUMENT.RIGHT_KIDNEY1_4544_1340300166_811 == "" THEN DOCUMENT.RIGHT_KIDNEY1_4544_1340300166_811 = ("Observed-Appears Normal") ENDIF

}

/*Function for SetValues Button Not Observed*/

fn fn4544_1340300166_842(){

IF DOCUMENT.RIGHT_KIDNEY1_4544_1340300166_811 == "" THEN DOCUMENT.RIGHT_KIDNEY1_4544_1340300166_811 = ("Not Observed") ENDIF

}

/*Function for SetValues Button Observed-Appears Normal*/

fn fn4544_1340300166_889(){

IF DOCUMENT.LEFT_KIDNEY1_4544_1340300166_873 == "" THEN DOCUMENT.LEFT_KIDNEY1_4544_1340300166_873 = ("Observed-Appears Normal") ENDIF

}

/*Function for SetValues Button Not Observed*/

fn fn4544_1340300166_904(){

IF DOCUMENT.LEFT_KIDNEY1_4544_1340300166_873 == "" THEN DOCUMENT.LEFT_KIDNEY1_4544_1340300166_873 = ("Not Observed") ENDIF

}

/*Function for SetValues Button Observed-Appears Normal*/

fn fn4544_1340300166_951(){

IF DOCUMENT.BLADDER1_4544_1340300166_936 == "" THEN DOCUMENT.BLADDER1_4544_1340300166_936 = ("Observed-Appears Normal") ENDIF

}

/*Function for SetValues Button Not Observed*/

fn fn4544_1340300166_967(){

IF DOCUMENT.BLADDER1_4544_1340300166_936 == "" THEN DOCUMENT.BLADDER1_4544_1340300166_936 = ("Not Observed") ENDIF

}

/*Function for SetValues Button Observed-Appears Normal*/

fn fn4544_1340300167_14(){

IF DOCUMENT.CORD_INSERTI1_4544_1340300166_998 == "" THEN DOCUMENT.CORD_INSERTI1_4544_1340300166_998 = ("Observed-Appears Normal") ENDIF

}

/*Function for SetValues Button Not Observed*/

fn fn4544_1340300167_29(){

IF DOCUMENT.CORD_INSERTI1_4544_1340300166_998 == "" THEN DOCUMENT.CORD_INSERTI1_4544_1340300166_998 = ("Not Observed") ENDIF

}

/*Function for SetValues Button Observed-3 Vessel*/

fn fn4544_1340300167_76(){

IF DOCUMENT.CORD1_4544_1340300167_61 == "" THEN DOCUMENT.CORD1_4544_1340300167_61 = ("Observed-3 Vessel") ENDIF

}

/*Function for SetValues Button Not Observed*/

fn fn4544_1340300167_92(){

IF DOCUMENT.CORD1_4544_1340300167_61 == "" THEN DOCUMENT.CORD1_4544_1340300167_61 = ("Not Observed") ENDIF

}

/*Function for SetValues Button Observed-Appears Normal*/

fn fn4544_1340300167_139(){

IF DOCUMENT.STOMACH1_4544_1340300167_123 == "" THEN DOCUMENT.STOMACH1_4544_1340300167_123 = ("Observed-Appears Normal") ENDIF

}

/*Function for SetValues Button Not Observed*/

fn fn4544_1340300167_154(){

IF DOCUMENT.STOMACH1_4544_1340300167_123 == "" THEN DOCUMENT.STOMACH1_4544_1340300167_123 = ("Not Observed") ENDIF

}

/*Function for SetValues Button Observed-Appear Normal*/

fn fn4544_1340300167_201(){

IF DOCUMENT.NOSTRILS1_4544_1340300167_185 == "" THEN DOCUMENT.NOSTRILS1_4544_1340300167_185 = ("Observed-Appear Normal") ENDIF

}

/*Function for SetValues Button Not Observed*/

fn fn4544_1340300167_217(){

IF DOCUMENT.NOSTRILS1_4544_1340300167_185 == "" THEN DOCUMENT.NOSTRILS1_4544_1340300167_185 = ("Not Observed") ENDIF

}

/*Function for SetValues Button Observed-Appear Normal*/

fn fn4544_1340300167_263(){

IF DOCUMENT.LIPS1_4544_1340300167_248 == "" THEN DOCUMENT.LIPS1_4544_1340300167_248 = ("Observed-Appear Normal") ENDIF

}

/*Function for SetValues Button Not Observed*/

fn fn4544_1340300167_279(){

IF DOCUMENT.LIPS1_4544_1340300167_248 == "" THEN DOCUMENT.LIPS1_4544_1340300167_248 = ("Not Observed") ENDIF

}

/*Function for SetValues Button Observed-Appears Normal*/

fn fn4544_1340300167_326(){

IF DOCUMENT.SPINE1_4544_1340300167_310 == "" THEN DOCUMENT.SPINE1_4544_1340300167_310 = ("Observed-Appears Normal") ENDIF

}

/*Function for SetValues Button Not Observed*/

fn fn4544_1340300167_341(){

IF DOCUMENT.SPINE1_4544_1340300167_310 == "" THEN DOCUMENT.SPINE1_4544_1340300167_310 = ("Not Observed") ENDIF

}

/*Function for SetValues Button Observed-Appear Normal*/

fn fn4544_1340300167_388(){

IF DOCUMENT.EXTREMITIES1_4544_1340300167_373 == "" THEN DOCUMENT.EXTREMITIES1_4544_1340300167_373 = ("Observed-Appear Normal") ENDIF

}

/*Function for SetValues Button Not Observed*/

fn fn4544_1340300167_404(){

IF DOCUMENT.EXTREMITIES1_4544_1340300167_373 == "" THEN DOCUMENT.EXTREMITIES1_4544_1340300167_373 = ("Not Observed") ENDIF

}

/*Function for SetValues Button Observed-Appear Normal*/

fn fn4544_1340300167_466(){

IF DOCUMENT.LATERAL_VENT1_4544_1340300167_451 == "" THEN DOCUMENT.LATERAL_VENT1_4544_1340300167_451 = ("Observed-Appear Normal") ENDIF

}

/*Function for SetValues Button Not Observed*/

fn fn4544_1340300167_482(){

IF DOCUMENT.LATERAL_VENT1_4544_1340300167_451 == "" THEN DOCUMENT.LATERAL_VENT1_4544_1340300167_451 = ("Not Observed") ENDIF

}

/*Function for SetValues Button Observed-Appears Normal*/

fn fn4544_1340300167_529(){

IF DOCUMENT.CISTERNA_MAG1_4544_1340300167_513 == "" THEN DOCUMENT.CISTERNA_MAG1_4544_1340300167_513 = ("Observed-Appears Normal") ENDIF

}

/*Function for SetValues Button Not Observed*/

fn fn4544_1340300167_544(){

IF DOCUMENT.CISTERNA_MAG1_4544_1340300167_513 == "" THEN DOCUMENT.CISTERNA_MAG1_4544_1340300167_513 = ("Not Observed") ENDIF

}

/*Function for SetValues Button Observed-Appear Normal*/

fn fn4544_1340300167_591(){

IF DOCUMENT.NUCHAL_FOLD1_4544_1340300167_576 == "" THEN DOCUMENT.NUCHAL_FOLD1_4544_1340300167_576 = ("Observed-Appear Normal") ENDIF

}

/*Function for SetValues Button Not Observed*/

fn fn4544_1340300167_607(){

IF DOCUMENT.NUCHAL_FOLD1_4544_1340300167_576 == "" THEN DOCUMENT.NUCHAL_FOLD1_4544_1340300167_576 = ("Not Observed") ENDIF

}

fn AveGAWeeks(){if DOCUMENT.CRL == "" and DOCUMENT.BPD == "" and DOCUMENT.HC == "" and DOCUMENT.AC == "" and DOCUMENT.FL == "" then "" else ((if DOCUMENT.CRL <> "" then GAfromCRLWeeks(obsnow("CRL")) else "" endif) + (if DOCUMENT.BPD <> "" and obsnow("Head diam") <> "" then (9.54+(1.482*( (obsnow("Head diam"))/10))+(.1676*((obsnow("Head diam"))/10)*( (obsnow("Head diam"))/10))) else "" endif) + (if DOCUMENT.HC <> "" and obsnow("Head c(old)") <> "" then 8.96+(.540*(obsnow("Head c(old)")/10))+(.0003*(obsnow("Head c(old)")/10)*(obsnow("Head c(old)")/10)*(obsnow("Head c(old)")/10)) else "" endif) + (if DOCUMENT.AC <> "" and obsnow("AC") <> "" then 8.14+(.753*( obsnow("AC")/10))+(.0036*( obsnow("AC")/10)*( obsnow("AC")/10)) else "" endif) + (if DOCUMENT.FL <> "" and obsnow("SONO FL") <> "" then 10.35+(2.460*( obsnow("SONO FL")/10))+(.170*( obsnow("SONO FL")/10)*(obsnow("SONO FL")/10)) else "" endif))/((if DOCUMENT.CRL <> "" then 1 else "" endif) + (if DOCUMENT.BPD <> "" then 1 else "" endif) + (if DOCUMENT.HC <> "" then 1 else "" endif) + (if DOCUMENT.AC <> "" then 1 else "" endif) + (if DOCUMENT.FL <> "" then 1 else "" endif)) endif}

fn GAfromCRLWeeks(CRL){local e2 = (1.684969 + (.315646*(CRL/10)) - (.049306*(CRL/10)*(CRL/10)) + (.004057*(CRL/10)*(CRL/10)*(CRL/10)) - (.000120456*(CRL/10)*(CRL/10)*(CRL/10)*(CRL/10))) local crlweeks = (2.7182818^(e2)) if crlweeks > 14 or CRL == "" then "" else crlweeks endif}

fn GetAveGA(Weeks){

local AVEWKS = div(Weeks,1)

local AVEDYS = div((mod(Weeks,1))*7,1)

local AVEGA = AVEWKS + "W" + AVEDYS + "D"

if AVEWKS < 3 or AVEWKS > 43 then "" else AVEGA endif}

fn GAfromANYBPD(anybpd){local bpdweeks = div((7*(9.54+(1.482*( anybpd/10))+(.1676*( anybpd/10)*( anybpd/10)))),7) local bpddays = div(mod((7*(9.54+(1.482*( anybpd/10))+(.1676*( anybpd/10)*( anybpd/10)))),7),1) local egabpd = (bpdweeks + "W" + bpddays + "D") if anybpd == "" or bpdweeks < "12" or bpdweeks > "42" then "" else egabpd endif}

fn GAfromHC(HC){local hcweeks = div((7*(8.96+(.540*(HC/10))+(.0003*(HC/10)*(HC/10)*(HC/10)))),7) local hcdays = div(mod((7*(8.96+(.540*(HC/10))+(.0003*(HC/10)*(HC/10)*(HC/10)))),7),1) local egahc = (hcweeks + "W" + hcdays + "D") if HC == "" or hcweeks < "12" or hcweeks > "42" then "" else egahc endif}

fn GAfromAC(AC){local acweeks = div((7*(8.14+(.753*( AC/10))+(.0036*( AC/10)*( AC/10)))),7) local acdays = div(mod((7*(8.14+(.753*( AC/10))+(.0036*( AC/10)*( AC/10)))),7),1) local acega = (acweeks + "W" + acdays + "D") if AC == "" or acweeks < "12" or acweeks > "42" then "" else acega endif}

fn GAfromFL(FL){local flweeks = div((7*(10.35+(2.460*( FL/10))+(.170*( FL/10)*(FL/10)))),7) local fldays = div(mod((7*(10.35+(2.460*( FL/10))+(.170*( FL/10)*( FL/10)))),7),1) local flega = (flweeks + "W" + fldays + "D") if FL == "" or flweeks < "12" or flweeks > "42" then "" else flega endif}

fn GAfromUS(BPD,HC,AC,FL){local usweeks = div((7*(10.85+(.060*( HC/10)*( FL/10)+(.6700*( BPD/10))+(.1680*(AC/10))))),7) local usdays = div(mod((7*(10.85+(.060*( HC/10)*( FL/10)+(.6700*( BPD/10))+(.1680*(AC/10))))),7),1) local usega = (usweeks + "W" + usdays + "D") if FL == "" or BPD == "" or HC == "" or AC == "" or usweeks < "12" or usweeks > "42" then "" else usega endif}

fn GAfromCRL(CRL){local e2 = (1.684969 + (.315646*(CRL/10)) - (.049306*(CRL/10)*(CRL/10)) + (.004057*(CRL/10)*(CRL/10)*(CRL/10)) - (.000120456*(CRL/10)*(CRL/10)*(CRL/10)*(CRL/10))) local crld = (7*(2.7182818^(e2))) local crlweeks = div(crld,7) local crldays = div(mod(crld,7),1) local egacrl = (crlweeks + "W" + crldays + "D") if CRL == "" or crlweeks < "6" or crlweeks > "14" then "" else egacrl endif}

fn GAfromHCACBPD(HC,AC,BPD){local hcacbpdweeks = div((7*(10.58+(.005*( HC/10)*(HC/10)+(.3635*(AC/10)) +(.02864*(AC/10)*(BPD/10))))),7) local hcacbpddays = div(mod((7*(10.58+(.005*( HC/10)*( HC/10)+(.3635*( AC/10))+(.02864*(AC/10)*(BPD/10))))),7),1) local hcacbpdega = (hcacbpdweeks + "W" + hcacbpddays + "D") if BPD == "" or HC == "" or AC == "" or hcacbpdweeks < "12" or hcacbpdweeks > "42" then "" else hcacbpdega endif}

fn GAfromHCACFL(HC,AC,FL){local hcacflweeks = div((7*(10.33+(.031*( HC/10)*(FL/10)+(.3610*(HC/10)) +(.0298*(AC/10)*(FL/10))))),7) local hcacfldays = div(mod((7*(10.33+(.031*( HC/10)*( FL/10)+(.3610*( HC/10))+(.0298*(AC/10)*(FL/10))))),7),1) local hcacflega = (hcacflweeks + "W" + hcacfldays + "D") if FL == "" or HC == "" or AC == "" or hcacflweeks < "12" or hcacflweeks > "42" then "" else hcacflega endif}

fn GAfromHCBPDFL(HC,BPD,FL){local hcbpdflweeks = div((7*(11.38+(.070*( HC/10)*(FL/10)+(.9800*(BPD/10))))),7) local hcbpdfldays = div(mod((7*(11.38+(.070*( HC/10)*( FL/10)+(.9800*( BPD/10))))),7),1) local hcbpdflega = (hcbpdflweeks + "W" + hcbpdfldays + "D") if FL == "" or HC == "" or BPD == "" or hcbpdflweeks < "12" or hcbpdflweeks > "42" then "" else hcbpdflega endif}

fn GAfromBPDACFL(BPD,AC,FL){local bpdacflweeks = div((7*(10.61+(.175*( BPD/10)*(FL/10)+(.2970*(AC/10)) +(.7100*(FL/10))))),7) local BPDacfldays = div(mod((7*(10.61+(.175*( BPD/10)*( FL/10)+(.2970*( AC/10))+(.7100*(FL/10))))),7),1) local bpdacflega = (bpdacflweeks + "W" + bpdacfldays + "D") if FL == "" or BPD == "" or AC == "" or bpdacflweeks < "12" or bpdacflweeks > "42" then "" else bpdacflega endif}

fn GAfromBPDAC(BPD,AC){local bpdacweeks = div((7*(9.57+(.524*( AC/10))+(.1220*( BPD/10)*(BPD/10)))),7) local bpdacdays = div(mod((7*(9.57+(.524*( AC/10))+(.1220*( BPD/10)*( BPD/10)))),7),1) local bpdacega = (bpdacweeks + "W" + bpdacdays + "D") if BPD == "" or AC == "" or bpdacweeks < "12" or bpdacweeks > "42" then "" else bpdacega endif}

fn GAfromBPDHC(BPD,HC){local bpdhcweeks = div((7*(10.32+(.009*( HC/10)*( HC/10)+(1.3200*( BPD/10))+(.00012*(HC/10)*(HC/10)*(HC/10))))),7) local bpdhcdays = div(mod((7*(10.32+(.009*( HC/10)*( HC/10)+(1.3200*( BPD/10))+(.00012*(HC/10)*(HC/10)*(HC/10))))),7),1) local bpdhcega = (bpdhcweeks + "W" + bpdhcdays + "D") if BPD == "" or HC == "" or bpdhcweeks < "12" or bpdhcweeks > "42" then "" else bpdhcega endif}

fn GAfromBPDFL(BPD,FL){local bpdflweeks = div((7*(10.50+(.197*( BPD/10)*( FL/10)+(.9500*( FL/10))+(.7300*(HC/10)*(BPD/10))))),7) local bpdfldays = div(mod((7*(10.50+(.197*( BPD/10)*( FL/10)+(.9500*( FL/10))+(.7300*(HC/10)*(BPD/10))))),7),1) local bpdflega = (bpdflweeks + "W" + bpdfldays + "D") if BPD == "" or FL == "" or bpdflweeks < "12" or bpdflweeks > "42" then "" else bpdflega endif}

fn GAfromHCAC(HC,AC){local hcacweeks = div((7*(10.31+(.012*( HC/10)*(HC/10))+(.3850*( AC/10)))),7) local hcacdays = div(mod((7*(10.31+(.012*( HC/10)*(HC/10))+(.3850*( AC/10)))),7),1) local hcacega = (hcacweeks + "W" + hcacdays + "D") if HC == "" or AC == "" or hcacweeks < "12" or hcacweeks > "42" then "" else hcacega endif}

fn GAfromHCFL(HC,FL){local hcflweeks = div((7*(11.19+(.070*( HC/10)*(FL/10))+(.2630*( HC/10)))),7) local hcfldays = div(mod((7*(11.19+(.070*( HC/10)*(FL/10))+(.2630*( HC/10)))),7),1) local hcflega = (hcflweeks + "W" + hcfldays + "D") if HC == "" or FL == "" or hcflweeks < "12" or hcflweeks > "42" then "" else hcflega endif}

fn GAfromACFL(AC,FL){local acflweeks = div((7*(10.47+(.442*( AC/10))+(.3140*( FL/10)*(FL/10))-(.0121*(FL/10)*(FL/10)*(FL/10)))),7) local acfldays = div(mod((7*(10.47+(.442*( AC/10))+(.3140*( FL/10)*(FL/10))-(.0121*(FL/10)*(FL/10)*(FL/10)))),7),1) local acflega = (acflweeks + "W" + acfldays + "D") if AC == "" or FL == "" or acflweeks < "12" or acflweeks > "42" then "" else acflega endif}

fn obsnow(GA SONO <-COMPILER ERROR NEARBY: Expect COMMA OR RIGHT PARENTHESIS. Instead had IDENTIFIER after IDENTIFIER

OB ULTRASOUND

Age:

35 Years Old

/ 10

Posted : June 25, 2012 6:24 am

jjordet

(@jjordet)

Posts: 545

Honorable Member

I would start an empty update, start a trace, add the problem form, stop the trace, and search the trace for 'error'.

Posted : June 25, 2012 6:37 am

DavidShower

(@davidshower)

Posts: 1255

Noble Member

fn obsnow(GA SONO <-COMPILER ERROR NEARBY: Expect COMMA OR RIGHT PARENTHESIS. Instead had IDENTIFIER after IDENTIFIER

There should be quotes around the GA SONO... Don't know if that is it or not...

And if that is really a function there isn't a function name after the fn...

But that all could just be crash mess and not the real issue.

David Shower

Posted : June 25, 2012 7:28 am

Anonymous

(@Anonymous)

Posts: 0

New Member Guest

Topic starter

Thank you, I'll try that!

Posted : June 25, 2012 9:47 pm

24 Forums
9,940 Topics
39.9 K Posts
0 Online
6,470 Members

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

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