//# target=server
return Global.CalculateAge(Subject.SubjectKey,Current.Inj_Dat);

//# target=server
if (History === null || Subject.SubjectKey === null)
  return null;
return Global.CalculateSex(Subject.SubjectKey);

var injDat=Current.Inj_Dat;
var minDat='2011-01-01';
if(injDat<minDat)
  return 'Skadedatum får inte vara tidigare än ' + minDat;
var fractForms=Global.ChildrenOf(Current, History);
var i=0;
var j=0;
var treatForms;
for (i = 0; i < fractForms.length; i++) {
  var fractForm=fractForms[i];
  if(fractForm.Fx_XrayDat && fractForm.Fx_XrayDat < injDat ){
    return 'Skadedatum kan inte vara senare än något röntgendatum';
  }
  treatForms=Global.ChildrenOf(fractForms[i], History);
  for (j = 0; j < treatForms.length; j++) {
    if(treatForms[j].Trt_Dat<injDat){
      return 'Skadedatum kan inte vara senare än något behandlingsdatum';
    }
  }
}  
return true;

enableIf(false, 'Inj_Cause');

Skadeorsak väljs ur listan. När denna markeras skapas skadekoden automatiskt.
Kodningen har betydelse för studiet av samband mellan skadeorsak och frakturtyp. V- och W-koder skapas men också M-koder möjliga här vid stressfraktur- eller patologisk fraktur.




Stressfraktur: Fraktur av utmattningskaraktär med typiskt utseende där någon akut skadeorsak inte kan spåras.




Patologisk fraktur: Fraktur i onormal skelettstruktur. Vid klinisk bild och röntgenutseende som vid primär eller sekundär skelettmalignitet ange patologisk fraktur liksom vid skelettsjukdomar som Osteogenesis imperfecta m fl. I frakturregistret räknas inte osteoporotiskt ben som patologiskt.




Spontanfraktur: En spontanfraktur har uppkommit utan trauma och utan föregående besvär vilket skiljer ut den från stressfrakturer och traumatiskt orsakade frakturer. Patologisk fraktur ska vara utesluten. Typiskt exempel är kotkompressionsfrakturer och vissa andra frakturer i mycket osteoporotiskt ben. Om datum är svårt att ange så använd första sjukvårdskontakt som skadedatum

enableIf (false, 'Inj_Place');
displayIf(!!Current.InjPlace, 'Inj_Place');

enableIf(false, 'Inj_Activity');
displayIf(!!Current.Inj_Activity, 'Inj_Activity');

var vals= ['V10.3',
'V10.4',
'V10.5',
'V10.9',
'V11.3',
'V11.4',
'V11.5',
'V11.9',
'V12.3',
'V12.4',
'V12.5',
'V12.9',
'V13.3',
'V13.4',
'V13.5',
'V13.9',
'V14.3',
'V14.4',
'V14.5',
'V14.9',
'V15.3',
'V15.4',
'V15.5',
'V15.9',
'V16.3',
'V16.4',
'V16.5',
'V16.9',
'V17.3',
'V17.4',
'V17.5',
'V17.9',
'V18.3',
'V18.4',
'V18.5',
'V18.9'];
var injCause=Current.Inj_Cause;

for (var i=0; i<vals.length; i++){
  if(vals[i]==injCause && Current.Inj_BikeType==null)
    return 'Obligatorisk'; 
}
return true;

var vals= ['V10.3',
'V10.4',
'V10.5',
'V10.9',
'V11.3',
'V11.4',
'V11.5',
'V11.9',
'V12.3',
'V12.4',
'V12.5',
'V12.9',
'V13.3',
'V13.4',
'V13.5',
'V13.9',
'V14.3',
'V14.4',
'V14.5',
'V14.9',
'V15.3',
'V15.4',
'V15.5',
'V15.9',
'V16.3',
'V16.4',
'V16.5',
'V16.9',
'V17.3',
'V17.4',
'V17.5',
'V17.9',
'V18.3',
'V18.4',
'V18.5',
'V18.9'];
var v=Current.Inj_Cause;
var disp=vals.indexOf(v) >= 0;
assignIf(!disp, 'Inj_BikeType');
displayIf(disp, 'Inj_BikeType');

var vals= ['W02'];
var injCause=Current.Inj_Cause;

for (var i=0; i<vals.length; i++){
  if(vals[i]==injCause && Current.Inj_SkiBoardSkate==null)
    return 'Obligatorisk'; 
}
return true;

var vals= ['W02'];
var v=Current.Inj_Cause;
var disp=vals.indexOf(v) >= 0;
assignIf(!disp, 'Inj_SkiBoardSkate');
displayIf(disp, 'Inj_SkiBoardSkate');

var vals= ['V86.0','V86.1','V86.2','V86.3','V86.4'];
var injCause=Current.Inj_Cause;

for (var i=0; i<vals.length; i++){
  if(vals[i]==injCause && Current.Inj_TerrainVehicType==null)
    return 'Obligatorisk'; 
}
return true;

var vals= ['V86.0','V86.1','V86.2','V86.3','V86.4'];
var v=Current.Inj_Cause;
var disp=vals.indexOf(v) >= 0;
assignIf(!disp, 'Inj_TerrainVehicType');
displayIf(disp, 'Inj_TerrainVehicType');

//# target=server
//# map=Inj_Cause

var injCause=Current.Inj_Cause;
if(injCause==null){
  injCause='';
}
if(isSpecialInjuryCause(injCause)){
  filterIf(true, 'Inj_Type', function(v){    
    return v.data.ValueCode==4;
  });
  assignIf(true, 'Inj_Type', '4');
  enableIf(false, 'Inj_Type');    
}
else {
  enableIf(true, 'Inj_Type');
  assignIf(Current.Inj_Type==4, 'Inj_Type', null);
  filterIf(true, 'Inj_Type', function(v){
    return v.data.ValueCode!=4;
  });
}

function isSpecialInjuryCause(injCause) {
  
  return injCause.indexOf('M84.3') == 0 || injCause.indexOf('M84.4') == 0 || injCause.indexOf('M84.8') == 0;
}

//# target=server
//# map=Inj_Unit

if (Global.IsRunningOnServer === false && Current.Inj_FromSHPR===1){ 
  return 'Du måste ändra värde till: Granskad och uppdaterad.';
}
return true;

displayIf(Current.Inj_FromSHPR!==null, 'Inj_FromSHPR');

//# target=server
return new Date();

  var r = Current;
  var injDate = Global.ParentOf(r, History).Inj_Dat;
  var xrayDat = r.Fx_XrayDat;
  var xrayTime = r.Fx_XrayTime;
  var d = r.Fx_ERDat;
  if (!d)
    return true;

  var t = r.Fx_ERTime;
  var h = null;
  var m = null;
  if (t) {
    var h = t.split(":")[0];
    var m = t.split(":")[1];
  }
  if (d < injDate) {
    return 'Datum för ankomst till akuten får inte vara tidigare än skadedatum';
  }
  if (xrayDat) {
    if (xrayDat < d)
      /*return 'Röntgendatum får inte vara tidigare än Ankomst till akuten';*/
    
    var xrayHours; 
    var xrayMinutes;
    if(xrayTime){
      xrayHours= xrayTime.split(":")[0];
      xrayMinutes=xrayTime.split(":")[1];
    }
    if (xrayTime && t && xrayHours < h) {
      /*return "Röntgen får ej vara tidigare än ankomst till akuten";*/
    }
    else if (xrayTime && t && xrayHours == h) {
      if (xrayMinutes < m) {
        /*return "Röntgen får ej vara tidigare än ankomst till akuten";*/
      }
    }
  }
  var treatForms = Global.ChildrenOf(r, History);
  var i = 0;
  for (i = 0; i < treatForms.length; i++) {
    var currentTreatForm = treatForms[i];
    var beDat = currentTreatForm.Trt_Dat;
    var knifeStartTime = currentTreatForm.Trt_KnifeStartTime;
    if (d) {
      if (beDat < d) {
        return "Behandlingsdatum får ej vara tidigare än ankomst till akuten";
      }
      else if (beDat == d) {
        if (knifeStartTime && t) {
          var h = t.split(":")[0];
          var m = t.split(":")[1];
          var knifeStartTimeHours = knifeStartTime.split(":")[0];
          var knifeStartTimeMinutes = knifeStartTime.split(":")[1];
          if (knifeStartTimeHours < h) {
            return "Knivstart får ej vara tidigare än ankomst till akuten";
          }
          else if (knifeStartTimeHours == h) {
            if (knifeStartTimeMinutes < m) {
              return "Knivstart får ej vara tidigare än ankomst till akuten";
            }
          }
        }
      }
    }
  }
  return true;

var icd10Code=Current.Fx_ICD10 || '';
/*if(Ext.isEmpty(icd10Code)){
  icd10Code='';
}*/
var isBf=icd10Code.indexOf('T08.9')>=0;
var bfFieldChanged=false;
if (Current.Fx_DISHBecht!==null){
  bfFieldChanged=true;
}

if (Current.Fx_Neurology!==null){
  bfFieldChanged=true;
}
if (Current.Fx_NeurologyExtended!==null){
  bfFieldChanged=true;
}
if(bfFieldChanged && !isBf){
  return 'Ryggfrakturrelaterade fält kan endast fyllas i om frakturen är en ryggfraktur';
}
var femurFieldChanged=false;
if (Current.Fx_XrayDat!==null){
  femurFieldChanged=true;
}
if (Current.Fx_XrayTime!==null){
  femurFieldChanged=true;
}
var isFemFract= icd10Code.indexOf('S72') === 0;
if(femurFieldChanged && !isFemFract){
  return 'Röntgendatum och tid får endast fyllas i för femurfrakturer';
}
var showAtypicalFracture= icd10Code.indexOf('S72') === 0 && icd10Code.indexOf('S72.0') !== 0 && icd10Code.indexOf('S72.1') !== 0 && Current.Fx_OpenPhyses=='0';
if( !showAtypicalFracture && Current.Fx_Atypical!=null){
  return 'Atypisk fraktur får inte anges för denna icd-kod.';
}
return true;

var isHighEnergy=Current.Parent.Inj_Type==1;
filterIf(true, 'Fx_OpenClass', function(v){
    return !isHighEnergy || v.data.ValueCode==31 || v.data.ValueCode==32 || v.data.ValueCode==33 || v.data.ValueCode==99;
});

enableIf(false, 'Fx_CloseToProsthesis'); enableIf(false, 'Fx_Open'); enableIf(false, 'Fx_Atypical'); enableIf(false, 'Fx_NeurologyExtended');
enableIf(false, 'Fx_Neurology'); enableIf(Current.Fx_Side && !Current.Fx_ICD10, 'Fx_ICD10');
enableIf(false, 'Fx_Side'); enableIf(false, 'Fx_Class'); enableIf(false, 'Fx_OpenPhyses'); enableIf(false, 'Fx_IliumLeft');
enableIf(false, 'Fx_IliumLeftDisplaced'); enableIf(false, 'Fx_IliumRight'); enableIf(false, 'Fx_IliumRightDisplaced'); enableIf(false, 'Fx_Sacrum'); enableIf(false, 'Fx_SacrumDisplaced');
enableIf(false, 'Fx_SacrumLeft'); enableIf(false, 'Fx_SacrumLeftDisplaced'); enableIf(false, 'Fx_SacrumRight'); enableIf(false, 'Fx_SacrumRightDisplaced'); enableIf(false, 'Fx_PubisLeft');
enableIf(false, 'Fx_PubisLeftDisplaced'); enableIf(false, 'Fx_PubisRight'); enableIf(false, 'Fx_PubisRightDisplaced'); enableIf(false, 'Fx_SIJointLeft');
enableIf(false, 'Fx_SIJointLeftDisplaced'); enableIf(false, 'Fx_SIJointRight'); enableIf(false, 'Fx_SIJointRightDisplaced'); enableIf(false, 'Fx_Symphysis');
enableIf(false, 'Fx_SymphysisDisplaced'); enableIf(false, 'Fx_DISHBecht');
displayIf(false, 'Fx_ERDat'); displayIf(false, 'Fx_ERTime');


var p = Current.Fx_CloseToProsthesis;
var i = Current.Fx_CloseToImplant;
displayIf(p && i, 'LabelWarningProstImp');
displayIf(Current.Fx_CloseToProsthesis != null, 'Fx_CloseToProsthesis');
var icd10Code = Current.Fx_ICD10;
if (icd10Code === null) {
  icd10Code = '';
}
var isBf = icd10Code.indexOf('T08.9') >= 0;
assignIf(!isBf, 'Fx_DISHBecht', null); displayIf(isBf, 'Fx_DISHBecht');
assignIf(!isBf, 'Fx_Neurology', null); displayIf(isBf, 'Fx_Neurology');
assignIf(!isBf, 'Fx_NeurologyExtended', null); displayIf(isBf, 'Fx_NeurologyExtended');
enableIf(false, 'Fx_C0'); enableIf(false, 'Fx_C1'); enableIf(false, 'Fx_C2'); enableIf(false, 'Fx_C3'); enableIf(false, 'Fx_C4');
enableIf(false, 'Fx_C5'); enableIf(false, 'Fx_C6'); enableIf(false, 'Fx_C7'); enableIf(false, 'Fx_Th1'); enableIf(false, 'Fx_Th2');
enableIf(false, 'Fx_Th3'); enableIf(false, 'Fx_Th4'); enableIf(false, 'Fx_Th5'); enableIf(false, 'Fx_Th6'); enableIf(false, 'Fx_Th7');
enableIf(false, 'Fx_Th8'); enableIf(false, 'Fx_Th9'); enableIf(false, 'Fx_Th10'); enableIf(false, 'Fx_Th11'); enableIf(false, 'Fx_Th12');
enableIf(false, 'Fx_L1'); enableIf(false, 'Fx_L2'); enableIf(false, 'Fx_L3'); enableIf(false, 'Fx_L4'); enableIf(false, 'Fx_L5');
var n1 = isBf && icd10Code.indexOf('.N1') >= 0;
var n2 = isBf && icd10Code.indexOf('.N2') >= 0;
var n3 = isBf && icd10Code.indexOf('.N3') >= 0;
var n4 = isBf && icd10Code.indexOf('.N4') >= 0;
assignIf(!n1, 'Fx_C0', null); displayIf(n1, 'Fx_C0');
assignIf(!n1, 'Fx_C1', null); displayIf(n1, 'Fx_C1');
assignIf(!n1, 'Fx_C2', null); displayIf(n1, 'Fx_C2');
assignIf(!n2, 'Fx_C3', null); displayIf(n2, 'Fx_C3');
assignIf(!n2, 'Fx_C4', null); displayIf(n2, 'Fx_C4');
assignIf(!n2, 'Fx_C5', null); displayIf(n2, 'Fx_C5');
assignIf(!n2, 'Fx_C6', null); displayIf(n2, 'Fx_C6');
assignIf(!n2, 'Fx_C7', null); displayIf(n2, 'Fx_C7');
assignIf(!n2, 'Fx_Th1', null); displayIf(n2, 'Fx_Th1');
assignIf(!n3, 'Fx_Th2', null); displayIf(n3, 'Fx_Th2');
assignIf(!n3, 'Fx_Th3', null); displayIf(n3, 'Fx_Th3');
assignIf(!n3, 'Fx_Th4', null); displayIf(n3, 'Fx_Th4');
assignIf(!n3, 'Fx_Th5', null); displayIf(n3, 'Fx_Th5');
assignIf(!n3, 'Fx_Th6', null); displayIf(n3, 'Fx_Th6');
assignIf(!n3, 'Fx_Th7', null); displayIf(n3, 'Fx_Th7');
assignIf(!n3, 'Fx_Th8', null); displayIf(n3, 'Fx_Th8');
assignIf(!n3, 'Fx_Th9', null); displayIf(n3, 'Fx_Th9');
assignIf(!n3, 'Fx_Th10', null); displayIf(n3, 'Fx_Th10');
assignIf(!n4, 'Fx_Th11', null); displayIf(n4, 'Fx_Th11');
assignIf(!n4, 'Fx_Th12', null); displayIf(n4, 'Fx_Th12');
assignIf(!n4, 'Fx_L1', null); displayIf(n4, 'Fx_L1');
assignIf(!n4, 'Fx_L2', null); displayIf(n4, 'Fx_L2');
assignIf(!n4, 'Fx_L3', null); displayIf(n4, 'Fx_L3');
assignIf(!n4, 'Fx_L4', null); displayIf(n4, 'Fx_L4');
assignIf(!n4, 'Fx_L5', null); displayIf(n4, 'Fx_L5');
var isPelvisFract = icd10Code == 'S32.70' || icd10Code == 'S32.71' || icd10Code == 'S32.80' || icd10Code == 'S32.81';
assignIf(!isPelvisFract, 'Fx_IliumLeft', null); displayIf(isPelvisFract, 'Fx_IliumLeft');
assignIf(!isPelvisFract, 'Fx_IliumLeftDisplaced', null); displayIf(Current.Fx_IliumLeftDisplaced != null, 'Fx_IliumLeftDisplaced');
assignIf(!isPelvisFract, 'Fx_IliumRight', null); displayIf(isPelvisFract, 'Fx_IliumRight');
assignIf(!isPelvisFract, 'Fx_IliumRightDisplaced', null); displayIf(Current.Fx_IliumRightDisplaced != null, 'Fx_IliumRightDisplaced');
assignIf(!isPelvisFract, 'Fx_Sacrum', null); displayIf(isPelvisFract, 'Fx_Sacrum');
assignIf(!isPelvisFract, 'Fx_SacrumDisplaced', null); displayIf(Current.Fx_SacrumDisplaced != null, 'Fx_SacrumDisplaced');
assignIf(!isPelvisFract, 'Fx_SacrumLeft', null); displayIf(isPelvisFract, 'Fx_SacrumLeft');
assignIf(!isPelvisFract, 'Fx_SacrumLeftDisplaced', null); displayIf(Current.Fx_SacrumLeftDisplaced != null, 'Fx_SacrumLeftDisplaced');
assignIf(!isPelvisFract, 'Fx_SacrumRight', null); displayIf(isPelvisFract, 'Fx_SacrumRight');
assignIf(!isPelvisFract, 'Fx_SacrumRightDisplaced', null); displayIf(Current.Fx_SacrumRightDisplaced != null, 'Fx_SacrumRightDisplaced');
assignIf(!isPelvisFract, 'Fx_PubisLeft', null); displayIf(isPelvisFract, 'Fx_PubisLeft');
assignIf(!isPelvisFract, 'Fx_PubisLeftDisplaced', null); displayIf(Current.Fx_PubisLeftDisplaced != null, 'Fx_PubisLeftDisplaced');
assignIf(!isPelvisFract, 'Fx_PubisRight', null); displayIf(isPelvisFract, 'Fx_PubisRight');
assignIf(!isPelvisFract, 'Fx_PubisRightDisplaced', null); displayIf(Current.Fx_PubisRightDisplaced != null, 'Fx_PubisRightDisplaced');
assignIf(!isPelvisFract, 'Fx_SIJointLeft', null); displayIf(isPelvisFract, 'Fx_SIJointLeft');
assignIf(!isPelvisFract, 'Fx_SIJointLeftDisplaced', null); displayIf(Current.Fx_SIJointLeftDisplaced != null, 'Fx_SIJointLeftDisplaced');
assignIf(!isPelvisFract, 'Fx_SIJointRight', null); displayIf(isPelvisFract, 'Fx_SIJointRight');
assignIf(!isPelvisFract, 'Fx_SIJointRightDisplaced', null); displayIf(Current.Fx_SIJointRightDisplaced != null, 'Fx_SIJointRightDisplaced');
assignIf(!isPelvisFract, 'Fx_Symphysis', null); displayIf(isPelvisFract, 'Fx_Symphysis');
assignIf(!isPelvisFract, 'Fx_SymphysisDisplaced', null); displayIf(Current.Fx_SymphysisDisplaced != null, 'Fx_SymphysisDisplaced');
var isFemurFract = icd10Code.indexOf('S72') === 0;
assignIf(!isFemurFract, 'Fx_XrayDat', null); displayIf(isFemurFract, 'Fx_XrayDat');
assignIf(!isFemurFract, 'Fx_XrayTime', null); displayIf(isFemurFract, 'Fx_XrayTime');
var showAtypicalFracture = icd10Code.indexOf('S72') === 0 && icd10Code.indexOf('S72.0') !== 0 && icd10Code.indexOf('S72.1') !== 0 && Current.Fx_OpenPhyses == '0';
assignIf(!showAtypicalFracture, 'Fx_Atypical', null); displayIf(showAtypicalFracture, 'Fx_Atypical');
var isOpen = Current.Fx_Open == 1; displayIf(isOpen, 'Fx_OpenClass');
assignIf(!isOpen, 'Fx_OpenClass', null); displayIf(isOpen, 'Fx_OpenClass');

var excludedAdultFractures=['T08.90.N1',
'T08.91.N1',
'T08.90.N2',
'T08.91.N2',
'T08.90.N3',
'T08.91.N3',
'T08.90.N4',
'T08.91.N4',
'S52.50',
'S52.51',
'S52.60',
'S52.61',
'S52.80',
'S52.81'];


var includedChildFractures=[
'S42.40',
'S42.41',
'S52.00',
'S52.01',
'S52.10',
'S52.11',
'S52.20',
'S52.21',
'S52.30',
'S52.31',
'S52.40',
'S52.41',
'S52.50',
'S52.51',
'S52.60',
'S52.61',
'S52.70',
'S52.71',
'S52.80',
'S52.81',
'S72.00',
'S72.01',
'S72.10',
'S72.11',
'S72.20',
'S72.21',
'S72.30',
'S72.31',
'S72.40',
'S72.41'];

displayIf(Current.Fx_OpenPhyses===0 && excludedAdultFractures.indexOf(Current.Fx_ICD10)<0, 'Fx_TypeInfoLabel1');
displayIf(Current.Fx_OpenPhyses===1 && includedChildFractures.indexOf(Current.Fx_ICD10)>=0, 'Fx_TypeInfoLabel2');

// Widget Loader //
function loadWidget(widget, widgetCallback) {
  var head = document.getElementsByTagName('head')[0];
  var element = document.createElement('script');
  element.src = '/api/rcwidgets/' + widget;
  element.onload = element.onreadystatechange = widgetCallback;
  head.appendChild(element);
}

if(typeof skeletonWidget !== 'undefined') {
  return;
}

var callback = function(){};
loadWidget('sfr/skeleton', function () {
  var start = skeletonWidget;
  start(Current, callback, true);
});

if(Current.Fx_Open==1 && Current.Fx_OpenClass==null){
  return 'Värde för Öppen fraktur-typ (Gustilo-Anderson) saknas';
}
return true;

var r = Current;
var icd10Code=r.Fx_ICD10 || '';
var isFemFract= icd10Code.indexOf('S72') === 0;
if(isFemFract && r.Fx_FromSHPR!=1 && r.Fx_XrayDat==null)
  return 'Obligatorisk';
var todayDate = new Date();
var dt = Global.ParseDate(r.Fx_XrayDat);
if (dt > todayDate){
  return 'Datumet får inte vara i framtiden.';
}
var injDate = Global.ParentOf(r, History).Inj_Dat;  
var xrayDate = r.Fx_XrayDat;
var xrayTime=r.Fx_XrayTime;

if(xrayDate<injDate){
  return 'Röntgendatum får inte vara tidigare än skadedatum';
}


var treatForms = Global.ChildrenOf(r, History);
var i=0;
for(i=0; i<treatForms.length; i++){
  var currentTreatForm=treatForms[i];
  var beDat=currentTreatForm.Trt_Dat;
  var knifeStartTime = currentTreatForm.Trt_KnifeStartTime;
  if(xrayDate){        
    if(beDat<xrayDate){
      return "Behandlingsdatum får ej vara tidigare än röntgendatum";
    }
    else if (beDat==xrayDate){
      if(knifeStartTime && xrayTime){          
        var xrayHours= xrayTime.split(":")[0];
        var xrayMinutes= xrayTime.split(":")[1];    
        
                          
        var knifeStartTimeHours= knifeStartTime.split(":")[0];
        var knifeStartTimeMinutes= knifeStartTime.split(":")[1];    
                
        
        if(knifeStartTimeHours<xrayHours){
          return "Knivstart får ej vara tidigare än röntgendatum";
        }
        else if (knifeStartTimeHours==xrayHours){
          if(knifeStartTimeMinutes<xrayMinutes){
            return "Knivstart får ej vara tidigare än röntgendatum";
          }
        }
      }
    }
  }
}

return true;

displayIf(isFemurFracture(Current.Fx_ICD10) && Current.Fx_XrayDat==null, 'LabelWarningXrDatMissing' );
function isFemurFracture(icd10Code) {
  if (Ext.isEmpty(icd10Code)) {
    return false;
  }
  return icd10Code.indexOf('S72') === 0;
}
displayIf(Current.Fx_XrayDat!=null && Current.Fx_XrayTime==null, 'LabelWarningXrTimeMissing');

var icd10Code=Current.Fx_ICD10 || '';
var isFemFract= icd10Code.indexOf('S72') === 0;
if(isFemFract && Current.Fx_FromSHPR!=1 && Current.Fx_XrayTime==null)
  return 'Obligatorisk';
return true;

// Control Script for the Fx_XrayTime (105008) field        
// BEGIN: HIPSTHER - Logic for showing or hiding Hipsther button    
var scope = Repository.Local.Methods.Hipsther.getFractureScope(Current, Subject);    
var eligibleForHipsther = Repository.Local.Methods.Hipsther.isEligible(scope);    
displayIf(eligibleForHipsther, "Hipsther");  
// END: HIPSTHER        
// BEGIN: DUALITY - Logic for showing or hiding Duality button    
var eligibleForDuality = Repository.Local.Methods.Duality.isEligible(Current, Subject);    
displayIf(eligibleForDuality, "Duality");    
// END: DUALITY      
// BEGIN: SUNBURST - Logic for showing or hiding SunBurst button    
var eligibleForSunBurst = Repository.Local.Methods.SunBurst.isEligible(Current, Subject);    
displayIf(eligibleForSunBurst, "SunBurst");    
// END: SUNBURST  

//# target=server
//# map=Fx_ICD10

//# target=server
//# map=Fx_ICD10

//# target=server
//# map=Fx_ICD10

//# target=server
//# map=Fx_Class

var distRadICD10Codes=[
'S52.50',
'S52.51',
'S52.60',
'S52.61',
'S52.80',
'S52.81'
];

var distRadClassCodes=[
'MAO-23-A1',
'MAO-23-A2.1',
'MAO-23-A2.2',
'MAO-23-A2.3',
'MAO-23-A3',
'MAO-23-B1',
'MAO-23-B2',
'MAO-23-B3',
'MAO-23-C1',
'MAO-23-C2',
'MAO-23-C3'
];
var dispDistRad=distRadICD10Codes.indexOf(Current.Fx_ICD10) >= 0 && distRadClassCodes.indexOf(Current.Fx_Class) >= 0;
return dispDistRad && Current.Fx_DistRadFunc===null ? 'Obligatorisk' : true;

var distRadICD10Codes=[
'S52.50',
'S52.51',
'S52.60',
'S52.61',
'S52.80',
'S52.81'
];

var distRadClassCodes=[
'MAO-23-A1',
'MAO-23-A2.1',
'MAO-23-A2.2',
'MAO-23-A2.3',
'MAO-23-A3',
'MAO-23-B1',
'MAO-23-B2',
'MAO-23-B3',
'MAO-23-C1',
'MAO-23-C2',
'MAO-23-C3'
];

var dispDistRad=distRadICD10Codes.indexOf(Current.Fx_ICD10) >= 0 && distRadClassCodes.indexOf(Current.Fx_Class) >= 0;
displayIf(dispDistRad, 'Fx_DistRadLabel1');
displayIf(dispDistRad, 'Fx_DistRadLabel2');
displayIf(dispDistRad, 'Fx_DistRadLabel3');
assignIf(!dispDistRad, 'Fx_DistRadFunc', null);
displayIf(dispDistRad, 'Fx_DistRadFunc');

//# target=server
//# map=Fx_Unit

if (Global.IsRunningOnServer === false && Current.Fx_FromSHPR===1){ 
  return 'Du måste ändra värde till: Granskad och uppdaterad.';
}
return true;

displayIf(Current.Fx_FromSHPR!==null, 'Fx_FromSHPR');

enableIf(false, 'Fx_Consensus');
displayIf(Current.Fx_Consensus!==null, 'Fx_Consensus');

  var r = Current;
  var beTyp = r.Trt_Type;
  var treatForms = Global.ChildrenOf(Parent, History);
  var injuryDate = Global.ParentOf(Parent, History).Inj_Dat;
  var xrayDate = Global.ParentOf(r, History).Fx_XrayDat;
  var xrayTime=Global.ParentOf(r, History).Fx_XrayTime;
  var erDate=Global.ParentOf(r, History).Fx_ERDat;
  var erTime=Global.ParentOf(r, History).Fx_ERTime;
  var knifeStartTime = r.Trt_KnifeStartTime;
  var beDat = Current.Trt_Dat;
  var trtCode=Current.Trt_Code;
  if(xrayDate){      
    if(beDat<xrayDate){
      return "Behandlingsdatum får ej vara tidigare än röntgendatum";
    }
    else if (beDat==xrayDate){
      if(knifeStartTime && xrayTime){        
        var xrayHours= xrayTime.split(":")[0];
        var xrayMinutes= xrayTime.split(":")[1];    
              
        var knifeStartTimeHours= knifeStartTime.split(":")[0];
        var knifeStartTimeMinutes= knifeStartTime.split(":")[1];    
                        
        if(knifeStartTimeHours<xrayHours){
          return "Knivstart får ej vara tidigare än röntgendatum";
        }
        else if (knifeStartTimeHours==xrayHours){
          if(knifeStartTimeMinutes<xrayMinutes){
            return "Knivstart får ej vara tidigare än röntgendatum";
          }
        }
      }
    }
  }
  
  if(erDate){
    if(beDat<erDate){
      return "Behandlingsdatum får ej vara tidigare än ankomst till akuten";
    }
    else if (beDat==erDate){
      if(knifeStartTime && erTime){        
        var erHours= erTime.split(":")[0];
        var erMinutes= erTime.split(":")[1];    
              
        var knifeStartTimeHours= knifeStartTime.split(":")[0];
        var knifeStartTimeMinutes= knifeStartTime.split(":")[1];    
                        
        if(knifeStartTimeHours<erHours){
          return "Knivstart får ej vara tidigare än ankomst till akuten";
        }
        else if (knifeStartTimeHours==erHours){
          if(knifeStartTimeMinutes<erMinutes){
            return "Knivstart får ej vara tidigare än ankomst till akuten";
          }
        }
      }
    }
  }
  
  var current = null;
  var minBeTyp;
  var minBeDat;
  var maxBeTyp;
  var maxBeDat;
  var i = 0;
  if (beDat < injuryDate) {
    return 'Behandlingsdatum kan inte vara tidigare än skadedatum';
  }
  for (i = 0; i < treatForms.length; i++) {
    if (r.EventID === treatForms[i].EventID) {
      continue;
    }
    current = treatForms[i];
    if(current.Trt_Type===undefined){      
      continue;
    }
    var currentBeTyp = current.Trt_Type;
    var currentBeDat = current.Trt_Dat;
    var currentTrtCode = current.Trt_Code;
    if(currentTrtCode==trtCode && currentBeDat==beDat){
      return 'Det går inte att registrera två identiska behandlingskoder på samma datum.';
    }
    if (currentBeTyp <= beTyp) {
      minBeTyp = currentBeTyp;
      minBeDat = currentBeDat;
      maxBeTyp = beTyp;
      maxBeDat = beDat;
    }
    else {
      minBeTyp = beTyp;
      minBeDat = beDat;
      maxBeTyp = currentBeTyp;
      maxBeDat = currentBeDat;
    }
    if (minBeTyp == 2 && maxBeTyp == 2) {
      if (minBeDat < maxBeDat || minBeDat > maxBeDat) {
        return 'Operation som första behandlingsval kan inte registreras två gånger på olika datum';
      }
    }
    if (minBeTyp == 3 && maxBeTyp == 3) {
      if (minBeDat < maxBeDat || minBeDat > maxBeDat) {
        return 'Operation efter att icke-kirurgisk behandling tidigt överges kan inte registreras två gånger på olika datum';
      }
    }
    if (minBeTyp == 1 && maxBeTyp == 3) {
      if (minBeDat > maxBeDat) {
        return 'En Icke-kirurgisk behandling kan inte tidsmässigt ligga efter Operation efter att icke-kirurgisk behandling tidigt överges';
      }
    }
    if ((minBeTyp == 1 || minBeTyp == 2) && maxBeTyp >= 4) {
      if (minBeDat > maxBeDat) {
        return 'En primärbehandling kan inte tidsmässigt ligga efter Planerat följdingrepp eller Re-operation/Op i sent skede';
      }
    }
    if (minBeTyp == 3 && maxBeTyp >= 4) {
      if (minBeDat > maxBeDat) {
        return 'Operation efter att icke-kirurgisk behandling tidigt överges kan inte tidsmässigt ligga efter Planerat följdingrepp eller Re-operation/Operation i sent skede';
      }
    }
  }
  return true;

var diff = new Date(Current.Trt_Dat) - new Date(Parent.Parent.Inj_Dat);
var milisecPerDay = 86400000;
displayIf((Current.Trt_Type == 1 || Current.Trt_Type == 2) && diff > milisecPerDay * 7, 'LabelWarning1');
displayIf((Current.Trt_Type == 3 || Current.Trt_Type == 4) && diff > milisecPerDay * 14, 'LabelWarning2');
var distRadICD10Codes=[
'S52.50',
'S52.51',
'S52.60',
'S52.61',
'S52.80',
'S52.81'
];

var distRadClassCodes=[
'MAO-23-A1',
'MAO-23-A2.1',
'MAO-23-A2.2',
'MAO-23-A2.3',
'MAO-23-A3',
'MAO-23-B1',
'MAO-23-B2',
'MAO-23-B3',
'MAO-23-C1',
'MAO-23-C2',
'MAO-23-C3'
];

var dispDistRad=distRadICD10Codes.indexOf(Parent.Fx_ICD10) >= 0 && distRadClassCodes.indexOf(Parent.Fx_Class) >= 0;
displayIf(dispDistRad, 'Trt_DistRadLabel');
displayIf(dispDistRad, 'Trt_DistRadLabel2');
displayIf(dispDistRad, 'Trt_DistRadLabel3');

var isFemFract= Parent.Fx_ICD10.indexOf('S72') === 0;
var showKnifeStart=isFemFract && Current.Trt_Type!=null && Current.Trt_Type==2;
if(showKnifeStart && Current.Trt_FromSHPR !=1 && Current.Trt_KnifeStartTime==null)
  return 'Obligatorisk';
return true

var isFemFract= Parent.Fx_ICD10.indexOf('S72') === 0;
var showKnifeStart=isFemFract && Current.Trt_Type!=null && Current.Trt_Type==2;
assignIf(!showKnifeStart, 'Trt_KnifeStartTime', null);
displayIf(showKnifeStart && !Current.Trt_KnifeStartTime, 'LabelWarning3');
displayIf(showKnifeStart, 'Trt_KnifeStartTime');

var r = Current;
  var beTyp = r.Trt_Type;
  if (!requiredTreatmentsExists([1]) && beTyp == '3') {
    return 'För att registrera en Kirurgisk behandling efter att icke kirurgi övergivits måste först den icke-kirurigska behandlingen registreras';
  }
  if (!requiredTreatmentsExists([2, 3]) && beTyp == '4') {
    return 'Du försöker registrera ett planerat följdingrepp men det saknas en registrering av en operation som första behandlingsval eller Operation efter att icke-kirurgisk behandling tidigt överges.<br/><br/>Registrera denna nu även om ingreppet är gjort på annan enhet och kryssa i denna ruta också på panelen.<br/><br/>Gör sedan registreringen av det planerade följdingreppet som en ny behandling';
  }

  if (!requiredTreatmentsExists( [1, 2]) && (beTyp == '5' || beTyp == '6' || beTyp == '7' || beTyp == '9' || beTyp == '11' || beTyp == '12')) {
    return 'Du försöker registrera en reoperation/operation i sent skede men det saknas en registrering av en operation som första behandlingsval eller icke-kirurgisk behandling.<br/><br/>Registrera denna nu även om ingreppet är gjort på annan enhet och kryssa i denna ruta också på panelen.<br/><br/>Gör sedan registreringen av reoperationen som en ny behandling';
  }    
  var treatForms = Global.ChildrenOf(Parent, History);
  var i = 0;
  var currentTrtFrm = null;
  for (i = 0; i < treatForms.length; i++) {
    currentTrtFrm = treatForms[i];
    if(currentTrtFrm.Trt_Type===undefined){
      continue;
    }
    if(r.EventID===treatForms[i].EventID){
      continue;
    }
    var min = Math.min(parseInt(beTyp), parseInt(currentTrtFrm.Trt_Type));
    var max = Math.max(parseInt(beTyp), parseInt(currentTrtFrm.Trt_Type));
    if (min === 1 && max === 1) {
      return 'En fraktur kan endast ha 1 icke-kirurgisk behandling';
    }
    if (max <= 3) {
      if (min === 1 && max === 2) {
        return 'En fraktur kan inte både ha Operation som första behandlingsval och Icke-kirurgisk behandling';
      }
      if (min === 2 && max === 3) {
        return 'En fraktur kan inte både ha Operation som första behandlingsval och Operation efter att icke-kirurgisk behandling tidigt överges';
      }
    }
  }
  return true;

function requiredTreatmentsExists(requiredTreatmentTypes) {
  var trtForms=Global.ChildrenOf(Parent, History);
  var i=0;
  for(i=0; i<trtForms.length; i++){
    var currentFrm=trtForms[i];
    if(currentFrm.EventID!=Current.EventID){
      var j=0;
      for(j=0; j<requiredTreatmentTypes.length; j++){
        if(requiredTreatmentTypes[j]==currentFrm.Trt_Type){
          return true;
        }
      }
    }
  }  
  return false;
}

enableIf(false, 'Trt_Type');
var icd10Code=Parent.Fx_ICD10;
var isFemFract=icd10Code.indexOf('S72') === 0;
displayIf(requiredTreatmentsExists([2]) && Current.Trt_Type == '2' && icd10Code.indexOf('T08.90') >= 0, 'LabelWarning4');
displayIf(requiredTreatmentsExists([4]) && Current.Trt_Type == '4' && icd10Code.indexOf('T08.90') >= 0, 'LabelWarning5');
function requiredTreatmentsExists(requiredTreatmentTypes) {
  var trtForms=Global.ChildrenOf(Parent, History);
  var i=0;
  for(i=0; i<trtForms.length; i++){
    var currentFrm=trtForms[i];
    if(currentFrm.EventID!=Current.EventID){
      var j=0;
      for(j=0; j<requiredTreatmentTypes.length; j++){
        if(requiredTreatmentTypes[j]==currentFrm.Trt_Type){
          return true;
        }
      }
    }
  }  
  return false;
}


  
  
  
  
  
  

 

enableIf(false, 'Trt_Code');

// Widget Loader // 
function loadWidget(widget, widgetCallback) {
  var head = document.getElementsByTagName('head')[0];
  var element = document.createElement('script');
  element.src = '/api/rcwidgets/' + widget;
  element.onload = element.onreadystatechange = widgetCallback;
  head.appendChild(element);
}

var callback = function(){};

loadWidget('sfr/treatment', function () {
  var start = treatmentWidget;
  start(Current, callback, true);
});

//# target=server
//# map=Trt_Code

//# target=server
//# map=Trt_Unit

if (Global.IsRunningOnServer === false && Current.Trt_FromSHPR===1){ 
  return 'Du måste ändra värde till: Granskad och uppdaterad.';
}
return true;

displayIf(Current.Trt_FromSHPR!==null, 'Trt_FromSHPR');

return new Date();

enableIf(false, 'PRO0_RegDat');

if(Current.PRO0_RespDat)
  return Current.PRO0_RespDat;
return new Date();

//# target=server

//# target=server

//# target=server

//# target=server

//# target=server //# archived

//# target=server

//# target=server
/*function burstromsIndex(rorlighet, hygien, huvudsakligaAktiviteter, smartor, oro, eventid, xtable, prefix) {
                                                          var n3Term = 0;
                                                          var level3 = false;

                                                          if (rorlighet == null || hygien == null || huvudsakligaAktiviteter == null || smartor == null || oro == null) {
                                                                                       return null;
                                                          }
                                                          if (rorlighet == 2) {
                                                                                       rorlighet = -0.0666;
                                                          }
                                                          else if (rorlighet == 3) {
                                                                                       rorlighet = -0.1247;
                                                                                       worst = true;
                                                                                       level3 = true;
                                                          }
                                                          else {
                                                                                       rorlighet = 0;
                                                          }
                                                          if (hygien == 2 || hygien == 3) {
                                                                                      
                                                                                       if(hygien == 3){
                                                                                                                    level3 = true;
                                                                                       }
                       hygien = -0.0276;
                                                          }                                                        
                                                          else {
                                                                                       hygien = 0;
                                                          }
                                                          if (huvudsakligaAktiviteter == 2) {
                                                                                       huvudsakligaAktiviteter = -0.1012;                                                
                                                          }
                                                          else if (huvudsakligaAktiviteter == 3) {
                                                                                       huvudsakligaAktiviteter = -0.1355;
                                                                                       level3 = true;
                                                          }
                                                          else {
                                                                                       huvudsakligaAktiviteter = 0;
                                                          }
                                                          if (smartor == 2) {
                                                                                       smartor = -0.0345;
                                                                                       
                                                          }
                                                          else if (smartor == 3) {
                                                                                       smartor = -0.0904;                                                   
                                                                                       level3 = true;                                                            
                                                          }
                                                          else {
                                                                                       smartor = 0;
                                                          }
                                                          if (oro == 2) {
                                                                                       oro = -0.0552;                                                           
                                                          }
                                                          else if (oro == 3) {
                                                                                       oro = -0.2077;
                                                                                       level3 = true;
                                                          }
                                                          else {
                                                                                       oro = 0;
                                                          }
                                                          
                                                          if (level3) {
                                                                                       n3Term = -0.0433;
                                                          }
                                                          result = 0.9694 + rorlighet + hygien + huvudsakligaAktiviteter + smartor + oro + n3Term;
                                                          return result;
                //console.log('update ' + xtable + ' set ' + prefix + '_EQ5DIndex=' + result + ' where eventid= ' + eventid);
                              //return result;
                             }*/

var r=Current; return Local.getEQ5Dvalue(r.PRO0_EQ5DMobility,     r.PRO0_EQ5DSelfCare,     r.PRO0_EQ5DUsualAct,     r.PRO0_EQ5DPain,     r.PRO0_EQ5DAnxiety);

var r=Current;  return Local.calcSMFAScoreForFunctionQuestions([r.PRO0_DifficShop, r.PRO0_DifficGoOutYourself, r.PRO0_DifficDriveCar, r.PRO0_DifficPhysRecreaActivity, r.PRO0_DifficUsualLeisureAct, r.PRO0_DifficSexAct, r.PRO0_DifficLightHousework, r.PRO0_DifficHeavyHousework, r.PRO0_DifficUsualWork, r.PRO0_OftenFeelDisabled]);

var r=Current;  return Local.calcSMFAScoreForFunctionQuestions([r.PRO0_DifficComfortSleep, r.PRO0_OftenAvoidUsingPainful,r.PRO0_OftenProblConcentration,r.PRO0_OftenOverworkAffect,r.PRO0_OftenActIrritable,r.PRO0_OftenTired,r.PRO0_OftenAngryFrustrated]);

var r=Current;  return Local.calcSMFAScoreForFunctionQuestions([r.PRO0_DifficOpenMedBottle, r.PRO0_DifficTightFist, r.PRO0_DifficUseButtonsZippers, r.PRO0_DifficCutFingernails, r.PRO0_DifficDressYourself, r.PRO0_DifficCleanAfterBathroom, r.PRO0_DifficUseHandle, r.PRO0_DifficWriteType]);

var r=Current;  return Local.calcSMFAScoreForFunctionQuestions([r.PRO0_DifficChair, r.PRO0_DifficStairs, r.PRO0_DifficShower, r.PRO0_DifficBendKneelDown, r.PRO0_DifficWalk, r.PRO0_DifficGetMoving, r.PRO0_DifficTurning, r.PRO0_OftenLimp, r.PRO0_OftenLegLock]);

var r=Current;  return Local.calcSMFAScoreForFunctionQuestions([r.PRO0_DifficChair, r.PRO0_DifficOpenMedBottle, r.PRO0_DifficShop,r.PRO0_DifficStairs,r.PRO0_DifficTightFist,r.PRO0_DifficShower,r.PRO0_DifficComfortSleep,r.PRO0_DifficBendKneelDown,r.PRO0_DifficUseButtonsZippers,r.PRO0_DifficCutFingernails,r.PRO0_DifficDressYourself,r.PRO0_DifficWalk,r.PRO0_DifficGetMoving,r.PRO0_DifficGoOutYourself,r.PRO0_DifficDriveCar,r.PRO0_DifficCleanAfterBathroom,r.PRO0_DifficUseHandle,r.PRO0_DifficWriteType,r.PRO0_DifficTurning,r.PRO0_DifficPhysRecreaActivity,r.PRO0_DifficUsualLeisureAct,r.PRO0_DifficSexAct,r.PRO0_DifficLightHousework,r.PRO0_DifficHeavyHousework,r.PRO0_DifficUsualWork,r.PRO0_OftenLimp,r.PRO0_OftenAvoidUsingPainful,r.PRO0_OftenLegLock,r.PRO0_OftenProblConcentration,r.PRO0_OftenOverworkAffect,r.PRO0_OftenActIrritable,r.PRO0_OftenTired,r.PRO0_OftenFeelDisabled,r.PRO0_OftenAngryFrustrated]);

var r=Current;  return Local.calcSMAScoreForBothersomeQuestions([r.PRO0_BotherUseHandArmLeg,r.PRO0_BotherUseBack,r.PRO0_BotherWorkHome,r.PRO0_BotherPersonalCare,r.PRO0_BotherSleepRest,r.PRO0_BotherLeisureRecreAct,r.PRO0_BotherFriendsFamily,r.PRO0_BotherThinkConcRem,r.BesvaradHanteraSkada,r.PRO0_BotherUsualWork,r.PRO0_BotherFeelDepend,r.PRO0_BotherStiffPain], true);

//# target=server
//# map=PRO0_Unit

return new Date();

enableIf(false, 'PRO1_RegDat');

if(Current.PRO1_RespDat)
  return Current.PRO1_RespDat;
return new Date();

//# target=server

//# target=server

//# target=server

//# target=server

//# target=server

//# target=server
/*function burstromsIndex(rorlighet, hygien, huvudsakligaAktiviteter, smartor, oro, eventid, xtable, prefix) {
                                                          var n3Term = 0;
                                                          var level3 = false;

                                                          if (rorlighet == null || hygien == null || huvudsakligaAktiviteter == null || smartor == null || oro == null) {
                                                                                       return null;
                                                          }
                                                          if (rorlighet == 2) {
                                                                                       rorlighet = -0.0666;
                                                          }
                                                          else if (rorlighet == 3) {
                                                                                       rorlighet = -0.1247;
                                                                                       worst = true;
                                                                                       level3 = true;
                                                          }
                                                          else {
                                                                                       rorlighet = 0;
                                                          }
                                                          if (hygien == 2 || hygien == 3) {
                                                                                      
                                                                                       if(hygien == 3){
                                                                                                                    level3 = true;
                                                                                       }
                       hygien = -0.0276;
                                                          }                                                        
                                                          else {
                                                                                       hygien = 0;
                                                          }
                                                          if (huvudsakligaAktiviteter == 2) {
                                                                                       huvudsakligaAktiviteter = -0.1012;                                                
                                                          }
                                                          else if (huvudsakligaAktiviteter == 3) {
                                                                                       huvudsakligaAktiviteter = -0.1355;
                                                                                       level3 = true;
                                                          }
                                                          else {
                                                                                       huvudsakligaAktiviteter = 0;
                                                          }
                                                          if (smartor == 2) {
                                                                                       smartor = -0.0345;
                                                                                       
                                                          }
                                                          else if (smartor == 3) {
                                                                                       smartor = -0.0904;                                                   
                                                                                       level3 = true;                                                            
                                                          }
                                                          else {
                                                                                       smartor = 0;
                                                          }
                                                          if (oro == 2) {
                                                                                       oro = -0.0552;                                                           
                                                          }
                                                          else if (oro == 3) {
                                                                                       oro = -0.2077;
                                                                                       level3 = true;
                                                          }
                                                          else {
                                                                                       oro = 0;
                                                          }
                                                          
                                                          if (level3) {
                                                                                       n3Term = -0.0433;
                                                          }
                                                          result = 0.9694 + rorlighet + hygien + huvudsakligaAktiviteter + smartor + oro + n3Term;
                                                          return result;
                //console.log('update ' + xtable + ' set ' + prefix + '_EQ5DIndex=' + result + ' where eventid= ' + eventid);
                              //return result;
                             }*/

var r=Current; return Local.getEQ5Dvalue(r.PRO1_EQ5DMobility,     r.PRO1_EQ5DSelfCare,     r.PRO1_EQ5DUsualAct,     r.PRO1_EQ5DPain,     r.PRO1_EQ5DAnxiety);

var r=Current;  return Local.calcSMFAScoreForFunctionQuestions([r.PRO1_DifficShop, r.PRO1_DifficGoOutYourself, r.PRO1_DifficDriveCar, r.PRO1_DifficPhysRecreaActivity, r.PRO1_DifficUsualLeisureAct, r.PRO1_DifficSexAct, r.PRO1_DifficLightHousework, r.PRO1_DifficHeavyHousework, r.PRO1_DifficUsualWork, r.PRO1_OftenFeelDisabled]);

var r=Current;  return Local.calcSMFAScoreForFunctionQuestions([r.PRO1_DifficComfortSleep, r.PRO1_OftenAvoidUsingPainful,r.PRO1_OftenProblConcentration,r.PRO1_OftenOverworkAffect,r.PRO1_OftenActIrritable,r.PRO1_OftenTired,r.PRO1_OftenAngryFrustrated]);

var r=Current;  return Local.calcSMFAScoreForFunctionQuestions([r.PRO1_DifficOpenMedBottle, r.PRO1_DifficTightFist, r.PRO1_DifficUseButtonsZippers, r.PRO1_DifficCutFingernails, r.PRO1_DifficDressYourself, r.PRO1_DifficCleanAfterBathroom, r.PRO1_DifficUseHandle, r.PRO1_DifficWriteType]);

var r=Current;  return Local.calcSMFAScoreForFunctionQuestions([r.PRO1_DifficChair, r.PRO1_DifficStairs, r.PRO1_DifficShower, r.PRO1_DifficBendKneelDown, r.PRO1_DifficWalk, r.PRO1_DifficGetMoving, r.PRO1_DifficTurning, r.PRO1_OftenLimp, r.PRO1_OftenLegLock]);

var r=Current;  return Local.calcSMFAScoreForFunctionQuestions([r.PRO1_DifficChair, r.PRO1_DifficOpenMedBottle, r.PRO1_DifficShop,r.PRO1_DifficStairs,r.PRO1_DifficTightFist,r.PRO1_DifficShower,r.PRO1_DifficComfortSleep,r.PRO1_DifficBendKneelDown,r.PRO1_DifficUseButtonsZippers,r.PRO1_DifficCutFingernails,r.PRO1_DifficDressYourself,r.PRO1_DifficWalk,r.PRO1_DifficGetMoving,r.PRO1_DifficGoOutYourself,r.PRO1_DifficDriveCar,r.PRO1_DifficCleanAfterBathroom,r.PRO1_DifficUseHandle,r.PRO1_DifficWriteType,r.PRO1_DifficTurning,r.PRO1_DifficPhysRecreaActivity,r.PRO1_DifficUsualLeisureAct,r.PRO1_DifficSexAct,r.PRO1_DifficLightHousework,r.PRO1_DifficHeavyHousework,r.PRO1_DifficUsualWork,r.PRO1_OftenLimp,r.PRO1_OftenAvoidUsingPainful,r.PRO1_OftenLegLock,r.PRO1_OftenProblConcentration,r.PRO1_OftenOverworkAffect,r.PRO1_OftenActIrritable,r.PRO1_OftenTired,r.PRO1_OftenFeelDisabled,r.PRO1_OftenAngryFrustrated]);

var r=Current;  return Local.calcSMAScoreForBothersomeQuestions([r.PRO1_BotherUseHandArmLeg,r.PRO1_BotherUseBack,r.PRO1_BotherWorkHome,r.PRO1_BotherPersonalCare,r.PRO1_BotherSleepRest,r.PRO1_BotherLeisureRecreAct,r.PRO1_BotherFriendsFamily,r.PRO1_BotherThinkConcRem,r.PRO1_BotherAdjustCope,r.PRO1_BotherUsualWork,r.PRO1_BotherFeelDepend,r.PRO1_BotherStiffPain], false);

//# target=server
//# map=PRO1_Unit

return new Date();

var glabelCmps = [];
function setHtml(lbl, html){
  console.log(lbl + ': before setting html: ' + html);  
  try{
    lbl.setHtml(html);
  }
  catch(ex){
    console.log('error setting html: ' + html);
  }
}
function setLabels(aGtinList) {  
    for(var i=0; i<aGtinList.length; i++){
      if(aGtinList[i].gtin===null){
        var index = aGtinList[i].index;
        if(index<=topImp){
          setHtml(glabelCmps[index-1], '');
        }
      }
    }
    var nonEmptyGtins = aGtinList.filter(function(el){return el.gtin!==null});
    if(nonEmptyGtins.length==0){
      return;
    }
    var onlyGtins = nonEmptyGtins.map(function(el){return el.gtin});
    var query = '?query=IRF_GTIN in ' + onlyGtins.join('|');    
    Ext.Ajax.request({
      url: '/stratum/api/registrations/form/2404' + query,
      method: 'get',
      success: function(r) {
        //debugger;
        var regs=Ext.decode(r.responseText).data;
        var i=0;
        for(i=0; i<nonEmptyGtins.length; i++){
          var labelCmp=glabelCmps[nonEmptyGtins[i].index-1];
          var gtin = nonEmptyGtins[i].gtin;          
          var reg = regs.find(function(el){return el.IRF_GTIN==gtin});
          if(reg!==undefined){            
            setHtml(labelCmp, '<b>' + reg.IRF_BrandName + '</b>: <i>' + reg.IRF_FunctionalName + '</i>');
          } else {
            setHtml(labelCmp,'<i>För denna produkt saknas förnärvarande produktbeteckning</i>');
          }          
        }
      },
      failure: function(a,b,c){        
        console.log('failure:' + a);
      }
    });  
}

var GTIN_LENGTH = 14;
var applicationIdentifierPrefixToApplicationIdentifierLength = {
'00':2,
'01':2 ,
'02':2 ,
'10':2 ,
'11':2 ,
'12':2 ,
'13':2 ,
'15':2 ,
'16':2 ,
'17':2 ,
'20':2 ,
'21':2 ,
'22':2 ,
'23':3 ,
'24':3 ,
'25':3 ,
'30':2 ,
'31':4 ,
'32':4 ,
'33':4 ,
'34':4 ,
'35':4 ,
'36':4 ,
'37':2 ,
'39':4 ,
'40':3 ,
'41':3 ,
'42':3 ,
'43':4 ,
'70':4 ,
'71':3 ,
'72':4 ,
'80':4 ,
'81':4 ,
'82':4 ,
'90':2 ,
'91':2 ,
'92':2 ,
'93':2 ,
'94':2 ,
'95':2 ,
'96':2 ,
'97':2 ,
'98':2 ,
'99':2,
'C1': 2,
'e0': 2,
'd2': 2,
'Q3': 2,
'J1': 2
}

var applicationIdentifierPrefixToElementStringLength = {
"00": 18,
"01": GTIN_LENGTH,
"02": 14,
"03": 14,
"04": 16,
"11": 6,
"12": 6,
"13": 6,
"14": 6,
"15": 6,
"16": 6,
"17": 6,
"18": 6,
"19": 6,
"20": 2,
"31": 8,
"32": 8,
"33": 8,
"34": 8,
"35": 8,
"36": 8,
"41": 14,
'C1': 0,
'e0': 0,
'd2': 0,
'Q3': 0,
'J1': 0
}

var applicationIdentifierToName = {
  '01' : 'gtin',
  //'10': 'lot',
  //'21': 'serial',
  '17': 'exp'
  
}

function parse(rawString){    
  console.log('Rawstring:' + rawString);
  if(rawString===null || rawString.length==0){
    return null;
  }
  var k=0;
  console.log('Textlängd:' + rawString.length);
  for(k=0; k< rawString.length; k++){
    var str=rawString[k].toLowerCase();
    var desc = str >= 'a' && str <= 'z' ? ' (Bokstav)' : str >= '0' && str <= '9' ? ' (Siffra)' : ' (Annat)';
    console.log(rawString.charCodeAt(k) + ':' + rawString[k] + desc) ;    
  }
  rawString = rawString.replace('¨', '');
  var currentESindex=-1;
  var currentESlength = 0;
  var currentAIindex=0;
  var currentAI='';
  var result = {};
  if(rawString[0]==']'){
    currentAIindex++;
  }
  var aisDebug=[];
  var esDebug = [];
  var esVarLengthDebug = [];
  while(currentAIindex<rawString.length-1){        
    var currentAIprefix = rawString.substring(currentAIindex, currentAIindex + 2);
    var currentAIlength=0;
    if(applicationIdentifierPrefixToApplicationIdentifierLength[currentAIprefix]!==undefined){
      currentAIlength = applicationIdentifierPrefixToApplicationIdentifierLength[currentAIprefix];
    } else {
      displayErrorMsg('Ett fel uppstod. Kunde inte mappa Application Identifier prefix: ' + currentAIprefix + ' mot någon Application Identifier (string index: ' + currentAIindex + ')<br/>Inskannad sträng:<br/>' + rawString);
      return null;
    }
    currentAI = rawString.substring(currentAIindex, currentAIindex + currentAIlength);
    aisDebug.push(currentAI);
    currentESindex= currentAIindex + currentAIlength;
    var skipSeperatorChar = 0;
    if(applicationIdentifierPrefixToElementStringLength[currentAIprefix]!==undefined){
        currentESlength = applicationIdentifierPrefixToElementStringLength[currentAIprefix];
        esVarLengthDebug.push(0);
    }
    else{
      esVarLengthDebug.push(1);
      skipSeperatorChar=1;
      var seperatorIndex = getSeperatorIndex(rawString, currentESindex);            
      currentESlength = seperatorIndex - currentESindex;      
    }
    if(applicationIdentifierToName[currentAI]!==undefined){
      var name = applicationIdentifierToName[currentAI];
      result[name]=rawString.substring(currentESindex, currentESindex + currentESlength);
    }
    esDebug.push(rawString.substring(currentESindex, currentESindex + currentESlength));
    currentAIindex += (currentESindex - currentAIindex) + currentESlength + skipSeperatorChar;
  }
  if(!result.gtin){
    displayErrorMsg('GTIN kunde inte hittas.');
    return null;
  }
  return result;
}

function getSeperatorIndex(str, startIndex){
  while(!(str.charCodeAt(startIndex)==29 || str[startIndex]==']' /**|| str.charCodeAt(startIndex)==168*/)){
    startIndex++;
    if(startIndex==str.length){
      return startIndex; /*If current applicationIdentifier is the last one in the string, there is no seperator*/
    }
  }
  return startIndex;
}

function displayErrorMsg(msg){
   Ext.Msg.show({
    title: 'Fel!',
    msg: msg,
    buttons: Ext.Msg.OK,
    icon: Ext.MessageBox.INFO,
    width: 1000
     });                 
}

var MAX=25;
function getLabelCmps(){  
  for(var i=1; i<=MAX; i++){
    var cmp = Ext.ComponentQuery.query('[name=Imp_Lbl_' + i + ']');
    glabelCmps.push(cmp[0]);    
  }
}
var i=0;
var gtinList = [];
for(i=1; i<=MAX; i++){
  var gtin = 'Imp_GTIN_' + i;
  var lot = 'Imp_LOT_' + i;
  var ser = 'Imp_Serial_' + i;
  var exp = 'Imp_ExpDat_' + i;  
  if(Current[gtin]!== null && Current[gtin].length===GTIN_LENGTH){
    gtinList.push({gtin: Current[gtin], index:i});
    continue;
  }  
  var result = parse(Current[gtin]);
  gtinList.push({gtin: result!== null ? result.gtin : null, index:i});
  enableIf(false, lot);
  enableIf(false, ser);
  enableIf(false, exp);
  if(result!==null){
    assignIf(true, gtin ,result.gtin );
    assignIf(result.lot !== undefined, lot ,result.lot );
    assignIf(result.serial !== undefined, ser, result.serial);
    assignIf(result.exp !== undefined, exp, result.exp);    
  } else {
    assignIf(true, gtin, null);
    assignIf(true, lot, null);
    assignIf(true, ser, null);
    assignIf(true, exp, null);
  }
}

var topImp=1;
for(i=1; i<=MAX; i++){  
  var gtin = 'Imp_GTIN_' + i;  
  if(Current[gtin] && Current[gtin].length===GTIN_LENGTH){
    topImp=i+1;
  }
}

for(i=1; i<=MAX; i++){  
  var gtin = 'Imp_GTIN_' + i;
  var lot = 'Imp_LOT_' + i;
  var ser = 'Imp_Serial_' + i;
  var exp = 'Imp_ExpDat_' + i;
  var lbl = 'Imp_Lbl_' + i;
  var disp = i<=topImp;  
  displayIf(disp, lbl);
  displayIf(disp, gtin);
  displayIf(false, lot);
  displayIf(false, ser);
  displayIf(disp, exp);
}

//setFocus('Imp_GTIN_' + topImp);
getLabelCmps();
setLabels(gtinList);
function setFocus(aFieldName) {  
  var fc = fieldFromName(aFieldName, setFocus);
  if (fc /*&& fc.ownerCt.hidden === aCondition*/) {    
    fc.focus(true);    
  }
}