Notifications
Clear all
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
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
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
Topic starter
Thank you, I'll try that!
Posted : June 25, 2012 9:47 pm
