mod/scorm/datamodels/scorm_13.js.php

   1 <?php
   2     if (isset($userdata->status)) {
   3         //if ($userdata->status == ''&& (!(($userdata->{'cmi.exit'} == 'suspend') || ($userdata->{'cmi.exit'} == 'logout'))&& !($userdata->{'adl.nav.request'} == 'suspendAll'))||($userdata->{'cmi.exit'} == 'normal')) {      //antes solo llegaba esta línea hasta el &&
   4         if (!isset($userdata->{'cmi.exit'}) || (($userdata->{'cmi.exit'} == 'time-out') || ($userdata->{'cmi.exit'} == 'normal'))) {
   5                 $userdata->entry = 'ab-initio';
   6         } else {
   7             //if ((isset($userdata->{'cmi.exit'}) && (($userdata->{'cmi.exit'} == 'suspend') || ($userdata->{'cmi.exit'} == 'logout')))||(($userdata->{'adl.nav.request'} == 'suspendAll')&& isset($userdata->{'adl.nav.request'}) )) {
   8             if (isset($userdata->{'cmi.exit'}) && (($userdata->{'cmi.exit'} == 'suspend') || ($userdata->{'cmi.exit'} == 'logout'))) {
   9                 $userdata->entry = 'resume';
  10             } else {
  11                 $userdata->entry = '';
  12             }
  13         }
  14     }
  15 ?>
  16     var cmi = new Object(); // Used need to debug cmi content (if you uncomment this, you must comment the definition inside SCORMapi1_3)
  17
  18 //
  19 // SCORM 1.3 API Implementation
  20 //
  21 function SCORMapi1_3() {
  22     // Standard Data Type Definition
  23     CMIString200 = '^.{0,200}$';
  24     CMIString250 = '^.{0,250}$';
  25     CMILangString250 = '^(\{lang=([a-zA-Z]{2,3}|i|x)(\-[a-zA-Z0-9\-]{2,8})?\})?([^\{].{0,250}$)?';
  26     CMIString1000 = '^.{0,1500}$';
  27     CMIString4000 = '^.{0,4000}$';
  28     CMILangString4000 = '^(\{lang=([a-zA-Z]{2,3}|i|x)(\-[a-zA-Z0-9\-]{2,8})?\})?([^\{].{0,4000}$)?';
  29     CMIString64000 = '^.{0,64000}$';
  30     CMILang = '^([a-zA-Z]{2,3}|i|x)(\-[a-zA-Z0-9\-]{2,8})?$|^$';
  31     CMITime = '^(19[7-9]{1}[0-9]{1}|20[0-2]{1}[0-9]{1}|203[0-8]{1})((-(0[1-9]{1}|1[0-2]{1}))((-(0[1-9]{1}|[1-2]{1}[0-9]{1}|3[0-1]{1}))(T([0-1]{1}[0-9]{1}|2[0-3]{1})((:[0-5]{1}[0-9]{1})((:[0-5]{1}[0-9]{1})((\\.[0-9]{1,2})((Z|([+|-]([0-1]{1}[0-9]{1}|2[0-3]{1})))(:[0-5]{1}[0-9]{1})?)?)?)?)?)?)?)?$';
  32     CMITimespan = '^P(\\d+Y)?(\\d+M)?(\\d+D)?(T(((\\d+H)(\\d+M)?(\\d+(\.\\d{1,2})?S)?)|((\\d+M)(\\d+(\.\\d{1,2})?S)?)|((\\d+(\.\\d{1,2})?S))))?$';
  33     CMIInteger = '^\\d+$';
  34     CMISInteger = '^-?([0-9]+)$';
  35     CMIDecimal = '^-?([0-9]{1,4})(\\.[0-9]{1,18})?$';
  36     CMIIdentifier = '^\\S{0,200}[a-zA-Z0-9]$';
  37     CMILongIdentifier = '^\\S{0,4000}[a-zA-Z0-9]$';
  38     CMIFeedback = '^.*$'; // This must be redefined
  39     CMIIndex = '[._](\\d+).';
  40     CMIIndexStore = '.N(\\d+).';
  41     // Vocabulary Data Type Definition
  42     CMICStatus = '^completed$|^incomplete$|^not attempted$|^unknown$';
  43     CMISStatus = '^passed$|^failed$|^unknown$';
  44     CMIExit = '^time-out$|^suspend$|^logout$|^normal$|^$';
  45     CMIType = '^true-false$|^choice$|^(long-)?fill-in$|^matching$|^performance$|^sequencing$|^likert$|^numeric$|^other$';
  46     CMIResult = '^correct$|^incorrect$|^unanticipated$|^neutral$|^-?([0-9]{1,4})(\\.[0-9]{1,18})?$';
  47     NAVEvent = '^previous$|^continue$|^exit$|^exitAll$|^abandon$|^abandonAll$|^suspendAll$|^{target=\\S{0,200}[a-zA-Z0-9]}choice$';
  48     NAVBoolean = '^unknown$|^true$|^false$';
  49     NAVTarget = '^previous$|^continue$|^choice.{target=\\S{0,200}[a-zA-Z0-9]}$'
  50     // Children lists
  51     cmi_children = '_version, comments_from_learner, comments_from_lms, completion_status, credit, entry, exit, interactions, launch_data, learner_id, learner_name, learner_preference, location, max_time_allowed, mode, objectives, progress_measure, scaled_passing_score, score, session_time, success_status, suspend_data, time_limit_action, total_time';
  52     comments_children = 'comment, timestamp, location';
  53     score_children = 'max, raw, scaled, min';
  54     objectives_children = 'progress_measure, completion_status, success_status, description, score, id';
  55     student_data_children = 'mastery_score, max_time_allowed, time_limit_action';
  56     student_preference_children = 'audio_level, audio_captioning, delivery_speed, language';
  57     interactions_children = 'id, type, objectives, timestamp, correct_responses, weighting, learner_response, result, latency, description';
  58     // Data ranges
  59     scaled_range = '-1#1';
  60     audio_range = '0#*';
  61     speed_range = '0#*';
  62     text_range = '-1#1';
  63     progress_range = '0#1';
  64     // The SCORM 1.3 data model
  65     var datamodel =  {
  66         'cmi._children':{'defaultvalue':cmi_children, 'mod':'r'},
  67         'cmi._version':{'defaultvalue':'1.0', 'mod':'r'},
  68         'cmi.comments_from_learner._children':{'defaultvalue':comments_children, 'mod':'r'},
  69         'cmi.comments_from_learner._count':{'mod':'r', 'defaultvalue':'0'},
  70         'cmi.comments_from_learner.n.comment':{'format':CMILangString4000, 'mod':'rw'},
  71         'cmi.comments_from_learner.n.location':{'format':CMIString250, 'mod':'rw'},
  72         'cmi.comments_from_learner.n.timestamp':{'format':CMITime, 'mod':'rw'},
  73         'cmi.comments_from_lms._children':{'defaultvalue':comments_children, 'mod':'r'},
  74         'cmi.comments_from_lms._count':{'mod':'r', 'defaultvalue':'0'},
  75         'cmi.comments_from_lms.n.comment':{'format':CMILangString4000, 'mod':'r'},
  76         'cmi.comments_from_lms.n.location':{'format':CMIString250, 'mod':'r'},
  77         'cmi.comments_from_lms.n.timestamp':{'format':CMITime, 'mod':'r'},
  78         'cmi.completion_status':{'defaultvalue':'<?php echo isset($userdata->{'cmi.completion_status'})?$userdata->{'cmi.completion_status'}:'unknown' ?>', 'format':CMICStatus, 'mod':'rw'},
  79         'cmi.completion_threshold':{'defaultvalue':<?php echo isset($userdata->threshold)?'\''.$userdata->threshold.'\'':'null' ?>, 'mod':'r'},
  80         'cmi.credit':{'defaultvalue':'<?php echo isset($userdata->credit)?$userdata->credit:'' ?>', 'mod':'r'},
  81         'cmi.entry':{'defaultvalue':'<?php echo $userdata->entry ?>', 'mod':'r'},
  82         'cmi.exit':{'defaultvalue':'<?php echo isset($userdata->{'cmi.exit'})?$userdata->{'cmi.exit'}:'' ?>', 'format':CMIExit, 'mod':'w'},
  83         'cmi.interactions._children':{'defaultvalue':interactions_children, 'mod':'r'},
  84         'cmi.interactions._count':{'mod':'r', 'defaultvalue':'0'},
  85         'cmi.interactions.n.id':{'pattern':CMIIndex, 'format':CMILongIdentifier, 'mod':'rw'},
  86         'cmi.interactions.n.type':{'pattern':CMIIndex, 'format':CMIType, 'mod':'rw'},
  87         'cmi.interactions.n.objectives._count':{'pattern':CMIIndex, 'mod':'r', 'defaultvalue':'0'},
  88         'cmi.interactions.n.objectives.n.id':{'pattern':CMIIndex, 'format':CMILongIdentifier, 'mod':'rw'},
  89         'cmi.interactions.n.timestamp':{'pattern':CMIIndex, 'format':CMITime, 'mod':'rw'},
  90         'cmi.interactions.n.correct_responses._count':{'defaultvalue':'0', 'pattern':CMIIndex, 'mod':'r'},
  91         'cmi.interactions.n.correct_responses.n.pattern':{'pattern':CMIIndex, 'format':'CMIFeedback', 'mod':'rw'},
  92         'cmi.interactions.n.weighting':{'pattern':CMIIndex, 'format':CMIDecimal, 'mod':'rw'},
  93         'cmi.interactions.n.learner_response':{'pattern':CMIIndex, 'format':'CMIFeedback', 'mod':'rw'},
  94         'cmi.interactions.n.result':{'pattern':CMIIndex, 'format':CMIResult, 'mod':'rw'},
  95         'cmi.interactions.n.latency':{'pattern':CMIIndex, 'format':CMITimespan, 'mod':'rw'},
  96         'cmi.interactions.n.description':{'pattern':CMIIndex, 'format':CMILangString250, 'mod':'rw'},
  97         'cmi.launch_data':{'defaultvalue':<?php echo isset($userdata->datafromlms)?'\''.$userdata->datafromlms.'\'':'null' ?>, 'mod':'r'},
  98         'cmi.learner_id':{'defaultvalue':'<?php echo $userdata->student_id ?>', 'mod':'r'},
  99         'cmi.learner_name':{'defaultvalue':'<?php echo addslashes($userdata->student_name) ?>', 'mod':'r'},
 100         'cmi.learner_preference._children':{'defaultvalue':student_preference_children, 'mod':'r'},
 101         'cmi.learner_preference.audio_level':{'defaultvalue':'1', 'format':CMIDecimal, 'range':audio_range, 'mod':'rw'},
 102         'cmi.learner_preference.language':{'defaultvalue':'', 'format':CMILang, 'mod':'rw'},
 103         'cmi.learner_preference.delivery_speed':{'defaultvalue':'1', 'format':CMIDecimal, 'range':speed_range, 'mod':'rw'},
 104         'cmi.learner_preference.audio_captioning':{'defaultvalue':'0', 'format':CMISInteger, 'range':text_range, 'mod':'rw'},
 105         'cmi.location':{'defaultvalue':<?php echo isset($userdata->{'cmi.location'})?'\''.$userdata->{'cmi.location'}.'\'':'null' ?>, 'format':CMIString1000, 'mod':'rw'},
 106         'cmi.max_time_allowed':{'defaultvalue':<?php echo isset($userdata->maxtimeallowed)?'\''.$userdata->maxtimeallowed.'\'':'null' ?>, 'mod':'r'},
 107         'cmi.mode':{'defaultvalue':'<?php echo $userdata->mode ?>', 'mod':'r'},
 108         'cmi.objectives._children':{'defaultvalue':objectives_children, 'mod':'r'},
 109         'cmi.objectives._count':{'mod':'r', 'defaultvalue':'0'},
 110         'cmi.objectives.n.id':{'pattern':CMIIndex, 'format':CMILongIdentifier, 'mod':'rw'},
 111         'cmi.objectives.n.score._children':{'defaultvalue':score_children, 'pattern':CMIIndex, 'mod':'r'},
 112         'cmi.objectives.n.score.scaled':{'defaultvalue':null, 'pattern':CMIIndex, 'format':CMIDecimal, 'range':scaled_range, 'mod':'rw'},
 113         'cmi.objectives.n.score.raw':{'defaultvalue':null, 'pattern':CMIIndex, 'format':CMIDecimal, 'mod':'rw'},
 114         'cmi.objectives.n.score.min':{'defaultvalue':null, 'pattern':CMIIndex, 'format':CMIDecimal, 'mod':'rw'},
 115         'cmi.objectives.n.score.max':{'defaultvalue':null, 'pattern':CMIIndex, 'format':CMIDecimal, 'mod':'rw'},
 116         'cmi.objectives.n.success_status':{'defaultvalue':'unknown', 'pattern':CMIIndex, 'format':CMISStatus, 'mod':'rw'},
 117         'cmi.objectives.n.completion_status':{'defaultvalue':'unknown', 'pattern':CMIIndex, 'format':CMICStatus, 'mod':'rw'},
 118         'cmi.objectives.n.progress_measure':{'defaultvalue':null, 'format':CMIDecimal, 'range':progress_range, 'mod':'rw'},
 119         'cmi.objectives.n.description':{'pattern':CMIIndex, 'format':CMILangString250, 'mod':'rw'},
 120         'cmi.progress_measure':{'defaultvalue':<?php echo isset($userdata->{'cmi.progess_measure'})?'\''.$userdata->{'cmi.progress_measure'}.'\'':'null' ?>, 'format':CMIDecimal, 'range':progress_range, 'mod':'rw'},
 121         'cmi.scaled_passing_score':{'defaultvalue':<?php echo isset($userdata->{'cmi.scaled_passing_score'})?'\''.$userdata->{'cmi.scaled_passing_score'}.'\'':'null' ?>, 'format':CMIDecimal, 'range':scaled_range, 'mod':'r'},
 122         'cmi.score._children':{'defaultvalue':score_children, 'mod':'r'},
 123         'cmi.score.scaled':{'defaultvalue':<?php echo isset($userdata->{'cmi.score.scaled'})?'\''.$userdata->{'cmi.score.scaled'}.'\'':'null' ?>, 'format':CMIDecimal, 'range':scaled_range, 'mod':'rw'},
 124         'cmi.score.raw':{'defaultvalue':<?php echo isset($userdata->{'cmi.score.raw'})?'\''.$userdata->{'cmi.score.raw'}.'\'':'null' ?>, 'format':CMIDecimal, 'mod':'rw'},
 125         'cmi.score.min':{'defaultvalue':<?php echo isset($userdata->{'cmi.score.min'})?'\''.$userdata->{'cmi.score.min'}.'\'':'null' ?>, 'format':CMIDecimal, 'mod':'rw'},
 126         'cmi.score.max':{'defaultvalue':<?php echo isset($userdata->{'cmi.score.max'})?'\''.$userdata->{'cmi.score.max'}.'\'':'null' ?>, 'format':CMIDecimal, 'mod':'rw'},
 127         'cmi.session_time':{'format':CMITimespan, 'mod':'w', 'defaultvalue':'PT0H0M0S'},
 128         'cmi.success_status':{'defaultvalue':'<?php echo isset($userdata->{'cmi.success_status'})?$userdata->{'cmi.success_status'}:'unknown' ?>', 'format':CMISStatus, 'mod':'rw'},
 129         'cmi.suspend_data':{'defaultvalue':<?php echo isset($userdata->{'cmi.suspend_data'})?'\''.$userdata->{'cmi.suspend_data'}.'\'':'null' ?>, 'format':CMIString64000, 'mod':'rw'},
 130         'cmi.time_limit_action':{'defaultvalue':<?php echo isset($userdata->timelimitaction)?'\''.$userdata->timelimitaction.'\'':'null' ?>, 'mod':'r'},
 131         'cmi.total_time':{'defaultvalue':'<?php echo isset($userdata->{'cmi.total_time'})?$userdata->{'cmi.total_time'}:'PT0H0M0S' ?>', 'mod':'r'},
 132         'adl.nav.request':{'defaultvalue':'_none_', 'format':NAVEvent, 'mod':'rw'}
 133     };
 134     //
 135     // Datamodel inizialization
 136     //
 137 //    var cmi = new Object();
 138         cmi.comments_from_learner = new Object();
 139         cmi.comments_from_learner._count = 0;
 140         cmi.comments_from_lms = new Object();
 141         cmi.comments_from_lms._count = 0;
 142         cmi.interactions = new Object();
 143         cmi.interactions._count = 0;
 144         cmi.learner_preference = new Object();
 145         cmi.objectives = new Object();
 146         cmi.objectives._count = 0;
 147         cmi.score = new Object();
 148
 149     // Navigation Object
 150     var adl = new Object();
 151         adl.nav = new Object();
 152         adl.nav.request_valid = new Array();
 153
 154     for (element in datamodel) {
 155         if (element.match(/\.n\./) == null) {
 156             if ((typeof eval('datamodel["'+element+'"].defaultvalue')) != 'undefined') {
 157                 eval(element+' = datamodel["'+element+'"].defaultvalue;');
 158             } else {
 159                 eval(element+' = "";');
 160             }
 161         }
 162     }
 163
 164 <?php
 165     $count = 0;
 166     $objectives = '';
 167     foreach($userdata as $element => $value){
 168         if (substr($element,0,14) == 'cmi.objectives') {
 169             preg_match('/\.(\d+)\./',$element,$matches);
 170             $element = preg_replace('/\.(\d+)\./',".N\$1.",$element);
 171             if ($matches[1] == $count) {
 172                 $count++;
 173                 $end = strpos($element,$matches[1])+strlen($matches[1]);
 174                 $subelement = substr($element,0,$end);
 175                 echo '    '.$subelement." = new Object();\n";
 176                 echo '    '.$subelement.".score = new Object();\n";
 177                 echo '    '.$subelement.".score._children = score_children;\n";
 178             }
 179             echo '    '.$element.' = \''.$value."';\n";
 180         }
 181     }
 182     if ($count > 0) {
 183         echo '    cmi.objectives._count = '.$count.";\n";
 184     }
 185 ?>
 186
 187     if (cmi.completion_status == '') {
 188         cmi.completion_status = 'not attempted';
 189     }
 190
 191     //
 192     // API Methods definition
 193     //
 194     var Initialized = false;
 195     var Terminated = false;
 196     var diagnostic = "";
 197
 198     function Initialize (param) {
 199         errorCode = "0";
 200         if (param == "") {
 201             if ((!Initialized) && (!Terminated)) {
 202                 <?php
 203                     if (debugging('',DEBUG_DEVELOPER)) {
 204                         echo 'alert("Initialized SCORM 1.3");';
 205                     }
 206                 ?>
 207                 Initialized = true;
 208                 errorCode = "0";
 209                 return "true";
 210             } else {
 211                 if (Initialized) {
 212                     errorCode = "103";
 213                 } else {
 214                     errorCode = "104";
 215                 }
 216             }
 217         } else {
 218             errorCode = "201";
 219         }
 220         <?php
 221             if (debugging('',DEBUG_DEVELOPER)) {
 222                 echo 'alert("Initialize: "+GetErrorString(errorCode));';
 223             }
 224         ?>
 225         return "false";
 226     }
 227
 228     function Terminate (param) {
 229         errorCode = "0";
 230         if (param == "") {
 231             if ((Initialized) && (!Terminated)) {
 232                 <?php
 233                     if (debugging('',DEBUG_DEVELOPER)) {
 234                         echo 'alert("Terminated SCORM 1.3");';
 235                     }
 236                 ?>
 237                 Initialized = false;
 238                 Terminated = true;
 239                 result = StoreData(cmi,true);
 240                 if (adl.nav.request != '_none_') {
 241                     switch (adl.nav.request) {
 242                         case 'continue':
 243                             setTimeout('top.nextSCO();',500);
 244                         break;
 245                         case 'previous':
 246                             setTimeout('top.prevSCO();',500);
 247                         break;
 248                         case 'choice':
 249                         break;
 250                         case 'exit':
 251                         break;
 252                         case 'exitAll':
 253                         break;
 254                         case 'abandon':
 255                         break;
 256                         case 'abandonAll':
 257                         break;
 258                     }
 259                 } else {
 260                     if (<?php echo $scorm->auto ?> == 1) {
 261                         setTimeout('top.nextSCO();',500);
 262                     }
 263                 }
 264                 return "true";
 265             } else {
 266                 if (Terminated) {
 267                     errorCode = "113";
 268                 } else {
 269                     errorCode = "112";
 270                 }
 271             }
 272         } else {
 273             errorCode = "201";
 274         }
 275         <?php
 276             if (debugging('',DEBUG_DEVELOPER)) {
 277                 echo 'alert("Terminate: "+GetErrorString(errorCode));';
 278             }
 279         ?>
 280         return "false";
 281     }
 282
 283     function GetValue (element) {
 284         errorCode = "0";
 285         diagnostic = "";
 286         if ((Initialized) && (!Terminated)) {
 287             if (element !="") {
 288                 expression = new RegExp(CMIIndex,'g');
 289                 elementmodel = element.replace(expression,'.n.');
 290
 291                 if ((typeof eval('datamodel["'+elementmodel+'"]')) != "undefined") {
 292                     if (eval('datamodel["'+elementmodel+'"].mod') != 'w') {
 293
 294                         element = element.replace(/\.(\d+)\./, ".N$1.");
 295                         element = element.replace(/\.(\d+)\./, ".N$1.");
 296
 297                         elementIndexes = element.split('.');
 298                         subelement = element.substr(0,3);
 299                         i = 1;
 300
 301                         while ((i < elementIndexes.length) && (typeof eval(subelement) != "undefined")) {
 302                             subelement += '.'+elementIndexes[i++];
 303                         }
 304
 305                         if (subelement == element) {
 306
 307                             if ((typeof eval(subelement) != "undefined") && (eval(subelement) != null)) {
 308                                 errorCode = "0";
 309                                 <?php
 310                                     if (debugging('',DEBUG_DEVELOPER)) {
 311                                         echo 'alert("GetValue("+element+") -> "+eval(element));';
 312                                     }
 313                                 ?>
 314                                 return eval(element);
 315                             } else {
 316                                 errorCode = "403";
 317                             }
 318                         } else {
 319                             errorCode = "301";
 320                         }
 321                     } else {
 322                         //errorCode = eval('datamodel["'+elementmodel+'"].readerror');
 323                         errorCode = "405";
 324                     }
 325                 } else {
 326                     childrenstr = '._children';
 327                     countstr = '._count';
 328                     if (elementmodel.substr(elementmodel.length-childrenstr.length,elementmodel.length) == childrenstr) {
 329                         parentmodel = elementmodel.substr(0,elementmodel.length-childrenstr.length);
 330                         if ((typeof eval('datamodel["'+parentmodel+'"]')) != "undefined") {
 331                             errorCode = "301";
 332                             diagnostic = "Data Model Element Does Not Have Children";
 333                         } else {
 334                             errorCode = "401";
 335                         }
 336                     } else if (elementmodel.substr(elementmodel.length-countstr.length,elementmodel.length) == countstr) {
 337                         parentmodel = elementmodel.substr(0,elementmodel.length-countstr.length);
 338                         if ((typeof eval('datamodel["'+parentmodel+'"]')) != "undefined") {
 339                             errorCode = "301";
 340                             diagnostic = "Data Model Element Cannot Have Count";
 341                         } else {
 342                             errorCode = "401";
 343                         }
 344                     } else {
 345                         parentmodel = 'adl.nav.request_valid.';
 346                         if (element.substr(0,parentmodel.length) == parentmodel) {
 347                             if (element.substr(parentmodel.length).match(NAVTarget) == null) {
 348                                 errorCode = "301";
 349                             } else {
 350                                 if (adl.nav.request == element.substr(parentmodel.length)) {
 351                                     return "true";
 352                                 } else if (adl.nav.request == '_none_') {
 353                                     return "unknown";
 354                                 } else {
 355                                     return "false";
 356                                 }
 357                             }
 358                         } else {
 359                             errorCode = "401";
 360                         }
 361                     }
 362                 }
 363             } else {
 364                 errorCode = "301";
 365             }
 366         } else {
 367             if (Terminated) {
 368                 errorCode = "123";
 369             } else {
 370                 errorCode = "122";
 371             }
 372         }
 373         <?php
 374             if (debugging('',DEBUG_DEVELOPER)) {
 375                 echo 'alert("GetValue("+element+") -> "+GetErrorString(errorCode));';
 376             }
 377         ?>
 378         return "";
 379     }
 380
 381     function SetValue (element,value) {
 382         errorCode = "0";
 383         diagnostic = "";
 384         if ((Initialized) && (!Terminated)) {
 385             if (element != "") {
 386                 expression = new RegExp(CMIIndex,'g');
 387                 elementmodel = element.replace(expression,'.n.');
 388                 if ((typeof eval('datamodel["'+elementmodel+'"]')) != "undefined") {
 389                     if (eval('datamodel["'+elementmodel+'"].mod') != 'r') {
 390                         if (eval('datamodel["'+elementmodel+'"].format') != 'CMIFeedback') {
 391                             expression = new RegExp(eval('datamodel["'+elementmodel+'"].format'));
 392                         } else {
 393                             // cmi.interactions.n.type depending format accept everything at this stage
 394                             expression = new RegExp(CMIFeedback);
 395                         }
 396                         value = value+'';
 397                         matches = value.match(expression);
 398                         if ((matches != null) && ((matches.join('').length > 0) || (value.length == 0))) {
 399
 400                             //Create dynamic data model element
 401
 402                             if (element != elementmodel) {
 403                                 elementIndexes = element.split('.');
 404                                 subelement = 'cmi';
 405                                 parentelement = 'cmi';
 406                                 for (i=1;(i < elementIndexes.length-1) && (errorCode=="0");i++) {
 407                                     elementIndex = elementIndexes[i];
 408                                     if (elementIndexes[i+1].match(/^\d+$/)) {
 409                                         if ((parseInt(elementIndexes[i+1]) > 0) && (elementIndexes[i+1].charAt(0) == 0)) {
 410                                             // Index has a leading 0 (zero), this is not a number
 411                                             errorCode = "351";
 412                                         }
 413                                         parentelement = subelement+'.'+elementIndex;
 414                                         if ((typeof eval(parentelement) == "undefined") || (typeof eval(parentelement+'._count') == "undefined")) {
 415                                             errorCode="408";
 416                                         } else {
 417                                             if (elementIndexes[i+1] > eval(parentelement+'._count')) {
 418
 419                                                 errorCode = "351";
 420                                                 diagnostic = "Data Model Element Collection Set Out Of Order";
 421                                             }
 422                                             subelement = subelement.concat('.'+elementIndex+'.N'+elementIndexes[i+1]);
 423                                             i++;
 424
 425                                             if (((typeof eval(subelement)) == "undefined") && (i < elementIndexes.length-2)) {
 426                                                 errorCode="408";
 427                                             }
 428                                         }
 429                                     } else {
 430                                         subelement = subelement.concat('.'+elementIndex);
 431                                     }
 432                                 }
 433
 434                                 if (errorCode == "0") {
 435
 436                                     element = subelement.concat('.'+elementIndexes[elementIndexes.length-1]);
 437                                     elemlen = element.length;
 438
 439                                     if (((typeof eval(subelement)) == "undefined") && (errorCode == "0")) {
 440                                         parentmodel = 'cmi.objectives';
 441                                         if (subelement.substr(0,parentmodel.length) == parentmodel) {
 442
 443                                              if ((elementmodel==parentmodel+'.n.id') && (errorCode=="0")) {
 444
 445                                                 //This is a cmi.objectives.n.id element
 446                                                 if (!duplicatedID(parentmodel,value)) {
 447                                                     if (elementIndexes[elementIndexes.length-2] == eval(parentmodel+'._count')) {
 448                                                         eval(parentmodel+'._count++;');
 449                                                         eval(subelement+' = new Object();');
 450                                                         subobject = eval(subelement);
 451                                                         subobject.success_status = datamodel["cmi.objectives.n.success_status"].defaultvalue;
 452                                                         subobject.completion_status = datamodel["cmi.objectives.n.completion_status"].defaultvalue;
 453                                                         subobject.progress_measure = datamodel["cmi.objectives.n.progress_measure"].defaultvalue;
 454                                                         subobject.score = new Object();
 455                                                         subobject.score._children = score_children;
 456                                                         subobject.score.scaled = datamodel["cmi.objectives.n.score.scaled"].defaultvalue;
 457                                                         subobject.score.raw = datamodel["cmi.objectives.n.score.raw"].defaultvalue;
 458                                                         subobject.score.min = datamodel["cmi.objectives.n.score.min"].defaultvalue;
 459                                                         subobject.score.max = datamodel["cmi.objectives.n.score.max"].defaultvalue;
 460                                                     }
 461                                                 } else {
 462                                                     errorCode="351";
 463                                                     diagnostic = "Data Model Element ID Already Exists";
 464                                                 }
 465                                             } else {
 466
 467
 468                                                 if (typeof eval(subelement) == "undefined") {
 469                                                     errorCode="408";
 470                                                 } else {
 471                                                     if (duplicatedID(parentmodel,value)) {
 472                                                         errorCode="351";
 473                                                         diagnostic = "Data Model Element ID Already Exists";
 474                                                     }
 475                                                 }
 476                                             }
 477                                         } else {
 478
 479                                             parentmodel = 'cmi.interactions';
 480
 481                                             if (subelement.substr(0,parentmodel.length) == parentmodel) {
 482
 483                                                 if ((elementmodel==parentmodel+'.n.id') && (errorCode=="0")) {
 484
 485                                                     //This is a cmi.interactions.n.id element
 486                                                     if (!duplicatedID(parentmodel,value)) {
 487
 488                                                         if (elementIndexes[elementIndexes.length-2] == eval(parentmodel+'._count')) {
 489
 490                                                             eval(parentmodel+'._count++;');
 491
 492                                                             eval(subelement+' = new Object();');
 493
 494                                                             subobject = eval(subelement);
 495                                                             subobject.objectives = new Object();
 496                                                             subobject.objectives._count = 0;
 497                                                         }
 498                                                     } else {
 499                                                         errorCode="351";
 500                                                         diagnostic = "Data Model Element ID Already Exists";
 501                                                     }
 502                                                 } else {
 503 alert('element = '+element+"\nsubelement = "+subelement+"\nparentmodel = "+parentmodel+"\nparentelement = "+parentelement+"\nvalue = "+value);
 504                                                     if (typeof eval(subelement) == "undefined") {
 505                                                         if ((elementmodel=='cmi.interactions.n.objectives.n.id') && (typeof eval(parentelement) != "undefined")) {
 506                                                            if (!duplicatedID(parentelement,value)) {
 507                                                                if (elementIndexes[elementIndexes.length-2] == eval(parentelement+'._count')) {
 508                                                                    eval(parentelement+'._count++;');
 509
 510                                                                    eval(subelement+' = new Object();');
 511                                                                }
 512                                                            } else {
 513
 514                                                                errorCode="351";
 515                                                                diagnostic = "Data Model Element ID Already Exists";
 516                                                            }
 517                                                         } else if (elementmodel=='cmi.interactions.n.correct_responses.n.pattern') {
 518                                                             if (typeof eval(parentelement) != "undefined") {
 519                                                                 if (elementIndexes[elementIndexes.length-2] == eval(parentelement+'._count')) {
 520                                                                     eval(parentelement+'._count++;');
 521                                                                     eval(subelement+' = new Object();');
 522                                                                 }
 523                                                             }
 524                                                             // Use cmi.interactions.n.type value to check the right dataelement format
 525
 526                                                         } else {
 527                                                             errorCode="408";
 528                                                         }
 529                                                     } else {
 530                                                         errorCode="408";
 531                                                     }
 532                                                 }
 533                                             } else {
 534
 535                                                 if (errorCode == "0") {
 536                                                     if (elementIndexes[elementIndexes.length-2] == eval(parentelement+'._count')) {
 537                                                         eval(parentelement+'._count++;');
 538                                                         eval(subelement+' = new Object();');
 539                                                     }
 540                                                 }
 541                                             }
 542                                         }
 543                                      } else {
 544
 545                                          parentmodel = 'cmi.objectives';
 546                                          if (subelement.substr(0,parentmodel.length) == parentmodel) {
 547                                              if ((elementmodel==parentmodel+'.n.id') && (errorCode=="0")) {
 548
 549                                                  if (eval(element) != value) {
 550                                                      errorCode = "351";
 551                                                      diagnostic = "Write Once Violation";
 552                                                  }
 553                                              }
 554                                          } else {
 555
 556                                              parentmodel = 'cmi.interactions';
 557                                              if (subelement.substr(0,parentmodel.length) == parentmodel) {
 558                                                  if ((elementmodel==parentmodel+'.n.id') && (errorCode=="0")) {
 559                                                      if (eval(element) == value) {
 560                                                          errorCode = "351";
 561                                                          diagnostic = "Write Once Violation";
 562                                                      }
 563                                                  }
 564                                                 if (elementmodel=='cmi.interactions.n.learner_response') {
 565                                                     if (typeof eval(subelement+'.type') == "undefined") {
 566                                                         errorCode="408";
 567                                                     } else {
 568                                                         // Use cmi.interactions.n.type value to check the right dataelement format
 569                                                     }
 570                                                 }
 571                                                 if ((elementmodel==parentmodel+'.n.type') && (errorCode=="0")) {
 572                                                     subobject = eval(subelement);
 573                                                     subobject.correct_responses = new Object();
 574                                                     subobject.correct_responses._count = 0;
 575                                                 }
 576                                              }
 577                                          }
 578                                      }
 579                                 }
 580                             }
 581                             //Store data
 582                             if (errorCode == "0") {
 583
 584                                 if ((typeof eval('datamodel["'+elementmodel+'"].range')) != "undefined") {
 585                                     range = eval('datamodel["'+elementmodel+'"].range');
 586                                     ranges = range.split('#');
 587                                     value = value*1.0;
 588                                     if (value >= ranges[0]) {
 589                                         if ((ranges[1] == '*') || (value <= ranges[1])) {
 590                                             eval(element+'=value;');
 591                                             errorCode = "0";
 592                                             <?php
 593                                                 if (debugging('',DEBUG_DEVELOPER)) {
 594                                                     echo 'alert("SetValue("+element+","+value+") -> OK");';
 595                                                 }
 596                                             ?>
 597                                             return "true";
 598                                         } else {
 599                                             errorCode = '407';
 600                                         }
 601                                     } else {
 602                                         errorCode = '407';
 603                                     }
 604                                 } else {
 605                                     eval(element+'=value;');
 606                                     errorCode = "0";
 607                                     <?php
 608                                         if (debugging('',DEBUG_DEVELOPER)) {
 609                                             echo 'alert("SetValue("+element+","+value+") -> OK");';
 610                                         }
 611                                     ?>
 612                                     return "true";
 613                                 }
 614                             }
 615                         } else {
 616                             errorCode = "406";
 617                         }
 618                     } else {
 619                         errorCode = "404";
 620                     }
 621                 } else {
 622                     errorCode = "401"
 623                 }
 624             } else {
 625                 errorCode = "351";
 626             }
 627         } else {
 628             if (Terminated) {
 629                 errorCode = "133";
 630             } else {
 631                 errorCode = "132";
 632             }
 633         }
 634         <?php
 635             if (debugging('',DEBUG_DEVELOPER)) {
 636                 echo 'alert("SetValue("+element+","+value+") -> "+GetErrorString(errorCode));';
 637             }
 638         ?>
 639         return "false";
 640     }
 641
 642     function Commit (param) {
 643         errorCode = "0";
 644         if (param == "") {
 645             if ((Initialized) && (!Terminated)) {
 646                 result = StoreData(cmi,false);
 647                 <?php
 648                     if (debugging('',DEBUG_DEVELOPER)) {
 649                         echo 'alert("Data Commited");';
 650                     }
 651                 ?>
 652                 return "true";
 653             } else {
 654                 if (Terminated) {
 655                     errorCode = "143";
 656                 } else {
 657                     errorCode = "142";
 658                 }
 659             }
 660         } else {
 661             errorCode = "201";
 662         }
 663         <?php
 664             if (debugging('',DEBUG_DEVELOPER)) {
 665                 echo 'alert("Commit: "+GetErrorString(errorCode));';
 666             }
 667         ?>
 668         return "false";
 669     }
 670
 671     function GetLastError () {
 672         return errorCode;
 673     }
 674
 675     function GetErrorString (param) {
 676         if (param != "") {
 677             var errorString = "";
 678             switch(param) {
 679                 case "0":
 680                     errorString = "No error";
 681                 break;
 682                 case "101":
 683                     errorString = "General exception";
 684                 break;
 685                 case "102":
 686                     errorString = "General Inizialization Failure";
 687                 break;
 688                 case "103":
 689                     errorString = "Already Initialized";
 690                 break;
 691                 case "104":
 692                     errorString = "Content Instance Terminated";
 693                 break;
 694                 case "111":
 695                     errorString = "General Termination Failure";
 696                 break;
 697                 case "112":
 698                     errorString = "Termination Before Inizialization";
 699                 break;
 700                 case "113":
 701                     errorString = "Termination After Termination";
 702                 break;
 703                 case "122":
 704                     errorString = "Retrieve Data Before Initialization";
 705                 break;
 706                 case "123":
 707                     errorString = "Retrieve Data After Termination";
 708                 break;
 709                 case "132":
 710                     errorString = "Store Data Before Inizialization";
 711                 break;
 712                 case "133":
 713                     errorString = "Store Data After Termination";
 714                 break;
 715                 case "142":
 716                     errorString = "Commit Before Inizialization";
 717                 break;
 718                 case "143":
 719                     errorString = "Commit After Termination";
 720                 break;
 721                 case "201":
 722                     errorString = "General Argument Error";
 723                 break;
 724                 case "301":
 725                     errorString = "General Get Failure";
 726                 break;
 727                 case "351":
 728                     errorString = "General Set Failure";
 729                 break;
 730                 case "391":
 731                     errorString = "General Commit Failure";
 732                 break;
 733                 case "401":
 734                     errorString = "Undefinited Data Model";
 735                 break;
 736                 case "402":
 737                     errorString = "Unimplemented Data Model Element";
 738                 break;
 739                 case "403":
 740                     errorString = "Data Model Element Value Not Initialized";
 741                 break;
 742                 case "404":
 743                     errorString = "Data Model Element Is Read Only";
 744                 break;
 745                 case "405":
 746                     errorString = "Data Model Element Is Write Only";
 747                 break;
 748                 case "406":
 749                     errorString = "Data Model Element Type Mismatch";
 750                 break;
 751                 case "407":
 752                     errorString = "Data Model Element Value Out Of Range";
 753                 break;
 754                 case "408":
 755                     errorString = "Data Model Dependency Not Established";
 756                 break;
 757             }
 758             return errorString;
 759         } else {
 760            return "";
 761         }
 762     }
 763
 764     function GetDiagnostic (param) {
 765         if (diagnostic != "") {
 766             return diagnostic;
 767         }
 768         return param;
 769     }
 770
 771     function duplicatedID (element, value) {
 772         var found = false;
 773         var elements = eval(element+'._count');
 774         for (n=0;(n<elements) && (!found);n++) {
 775             if (eval(element+'.N'+n+'.id') == value) {
 776                 found = true;
 777             }
 778         }
 779         return found;
 780     }
 781
 782     function getElementModel(element) {
 783         if (typeof datamodel[element] != "undefined") {
 784             return element;
 785         } else {
 786             expression = new RegExp(CMIIndex,'g');
 787             elementmodel = element.replace(expression,'.n.');
 788             if (typeof datamodel[elementmodel] != "undefined") {
 789                 return elementmodel;
 790             }
 791         }
 792     }
 793
 794     function AddTime (first, second) {
 795         <?php
 796             if (debugging('',DEBUG_DEVELOPER)) {
 797                 echo 'alert("AddTime: "+first+" + "+second);';
 798             }
 799         ?>
 800         var timestring = 'P';
 801         var matchexpr = /^P((\d+)Y)?((\d+)M)?((\d+)D)?(T((\d+)H)?((\d+)M)?((\d+(\.\d{1,2})?)S)?)?$/;
 802         var firstarray = first.match(matchexpr);
 803         var secondarray = second.match(matchexpr);
 804         if ((firstarray != null) && (secondarray != null)) {
 805             var secs = parseFloat(firstarray[13],10)+parseFloat(secondarray[13],10);  //Seconds
 806             change = Math.floor(secs / 60);
 807             secs = secs - (change * 60);
 808             mins = parseInt(firstarray[11],10)+parseInt(secondarray[11],10)+change;   //Minutes
 809             change = Math.floor(mins / 60);
 810             mins = mins - (change * 60);
 811             hours = parseInt(firstarray[10],10)+parseInt(secondarray[10],10)+change;  //Hours
 812             change = Math.floor(hours / 24);
 813             hours = hours - (change * 24);
 814             days = parseInt(firstarray[6],10)+parseInt(secondarray[6],10)+change; // Days
 815             months = parseInt(firstarray[4],10)+parseInt(secondarray[4],10)
 816             years = parseInt(firstarray[2],10)+parseInt(secondarray[2],10)
 817         }
 818         if (years > 0) {
 819             timestring += years + 'Y';
 820         }
 821         if (months > 0) {
 822             timestring += months + 'M';
 823         }
 824         if (days > 0) {
 825             timestring += days + 'D';
 826         }
 827         if ((hours > 0) || (mins > 0) || (secs > 0)) {
 828             timestring += 'T';
 829             if (hours > 0) {
 830                 timestring += hours + 'H';
 831             }
 832             if (mins > 0) {
 833                 timestring += mins + 'M';
 834             }
 835             if (secs > 0) {
 836                 timestring += secs + 'S';
 837             }
 838         }
 839         return timestring;
 840     }
 841
 842     function TotalTime() {
 843         total_time = AddTime(cmi.total_time, cmi.session_time);
 844         return '&'+underscore('cmi.total_time')+'='+encodeURIComponent(total_time);
 845     }
 846
 847     function CollectData(data,parent) {
 848         var datastring = '';
 849         for (property in data) {
 850             if (typeof data[property] == 'object') {
 851                 datastring += CollectData(data[property],parent+'.'+property);
 852             } else {
 853                 element = parent+'.'+property;
 854                 expression = new RegExp(CMIIndexStore,'g');
 855                 elementmodel = element.replace(expression,'.n.');
 856                 if ((typeof eval('datamodel["'+elementmodel+'"]')) != "undefined") {
 857                     if (eval('datamodel["'+elementmodel+'"].mod') != 'r') {
 858                         elementstring = '&'+underscore(element)+'='+encodeURIComponent(data[property]);
 859                         if ((typeof eval('datamodel["'+elementmodel+'"].defaultvalue')) != "undefined") {
 860                             if (eval('datamodel["'+elementmodel+'"].defaultvalue') != data[property]) {
 861                                 datastring += elementstring;
 862                             }
 863                         } else {
 864                             datastring += elementstring;
 865                         }
 866                     }
 867                 }
 868             }
 869         }
 870         return datastring;
 871     }
 872
 873     function StoreData(data,storetotaltime) {
 874         datastring = '';
 875         if (storetotaltime) {
 876             if (cmi.mode == 'normal') {
 877                 if (cmi.credit == 'credit') {
 878                     if ((cmi.completion_threshold != null) && (cmi.progress_measure != null)) {
 879                         if (cmi.progress_measure >= cmi.completion_threshold) {
 880                             cmi.completion_status = 'completed';
 881                         } else {
 882                             cmi.completion_status = 'incomplete';
 883                         }
 884                     }
 885                     if ((cmi.scaled_passed_score != null) && (cmi.score.scaled != '')) {
 886                         if (cmi.score.scaled >= cmi.scaled_passed_score) {
 887                             cmi.success_status = 'passed';
 888                         } else {
 889                             cmi.success_status = 'failed';
 890                         }
 891                     }
 892                 }
 893             }
 894             datastring += TotalTime();
 895         }
 896         datastring += CollectData(data,'cmi');
 897         element = 'adl.nav.request';
 898         navrequest = eval(element) != datamodel[element].defaultvalue ? '&'+underscore(element)+'='+encodeURIComponent(eval(element)) : '';
 899         datastring += navrequest;
 900         datastring += '&attempt=<?php echo $attempt ?>';
 901         datastring += '&scoid=<?php echo $scoid ?>';
 902         <?php
 903             if (debugging('',DEBUG_DEVELOPER)) {
 904                 echo 'popupwin(datastring);';
 905             }
 906         ?>
 907         var myRequest = NewHttpReq();
 908         result = DoRequest(myRequest,"<?php p($CFG->wwwroot) ?>/mod/scorm/datamodel.php","id=<?php p($id) ?>&sesskey=<?php p($USER->sesskey) ?>"+datastring);
 909         <?php
 910             if (debugging('',DEBUG_DEVELOPER)) {
 911                 echo 'popupwin(result);';
 912             }
 913         ?>
 914         results = result.split('\n');
 915         if ((results.length > 2) && (navrequest != '')) {
 916             eval(results[2]);
 917         }
 918         errorCode = results[1];
 919         return results[0];
 920     }
 921
 922     this.Initialize = Initialize;
 923     this.Terminate = Terminate;
 924     this.GetValue = GetValue;
 925     this.SetValue = SetValue;
 926     this.Commit = Commit;
 927     this.GetLastError = GetLastError;
 928     this.GetErrorString = GetErrorString;
 929     this.GetDiagnostic = GetDiagnostic;
 930     this.version = '1.0';
 931 }
 932
 933 var API_1484_11 = new SCORMapi1_3();