![\"Not](\"/lorsm/resources/icons/flag_white.gif\"){kind=icon}
"
+ } else {
+ switch -regexp $lesson_status {
+ null { append icon "" }
+ incomplete { append icon "![\"Incomplete\"](\"/lorsm/resources/icons/flag_orange.gif\"){kind=icon}
" }
+ complete { append icon "![\"Completed\"](\"/lorsm/resources/icons/flag_green.gif\"){kind=icon}
" }
+ failed { append icon "![\"Failed\"](\"/lorsm/resources/icons/flag_red.gif\"){kind=icon}
" }
+ "not attempted" { append icon "" }
+ passed { append icon "![\"Passed\"](\"/lorsm/resources/icons/icon_accept.gif\"){kind=icon}
" }
+ default { append icon " $lesson_status ** ![\"$lesson_status\"](\"/lorsm/resources/icons/flag_blue.gif\"){kind=icon}
"}
+ }
+ }
+ set lesson_status $icon
+ }
+
# DEDS: these are expensive
# and for demo purposes only
+
db_0or1row get_last_viewed { }
set all_items [db_list get_total_items { }]
set total_item_count [llength $all_items]
Index: openacs-4/packages/lorsm/sql/postgresql/lorsm-cmi-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/sql/postgresql/lorsm-cmi-create.sql,v
diff -u -N -r1.1 -r1.2
--- openacs-4/packages/lorsm/sql/postgresql/lorsm-cmi-create.sql 26 May 2005 18:14:59 -0000 1.1
+++ openacs-4/packages/lorsm/sql/postgresql/lorsm-cmi-create.sql 13 Aug 2007 09:20:14 -0000 1.2
@@ -59,7 +59,7 @@
constraint lorsm_cmi_core_man_id_fk foreign key
(man_id) references ims_cp_manifests (man_id),
constraint lorsm_cmi_core_item_id_fk foreign key
- (item_id) references ims_cp_items(ims_item_id)
+ (item_id) references acs_objects (object_id)
);
create index lorsm_cmi_core__stud_id_idx on lorsm_cmi_core (student_id);
@@ -212,7 +212,7 @@
on delete cascade,
student_id varchar(100),
mastery_score varchar(10), -- not mandatory, gettable, not settable
- max_time_allowed character varying(12), -- mandatory, not gettable, settable
+ max_time_allowed character varying(14), -- mandatory, not gettable, settable
time_limit_action varchar(100) -- not mandatory, gettable, not settable
);
Index: openacs-4/packages/lorsm/sql/postgresql/upgrade/upgrade-0.8d-0.8d2.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/sql/postgresql/upgrade/upgrade-0.8d-0.8d2.sql,v
diff -u -N
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/lorsm/sql/postgresql/upgrade/upgrade-0.8d-0.8d2.sql 13 Aug 2007 09:20:14 -0000 1.2
@@ -0,0 +1,10 @@
+-- making column larger
+ALTER TABLE lorsm_cmi_core DROP CONSTRAINT lorsm_cmi_core_item_id_fk;
+
+-- making constraint less restrictive
+ALTER TABLE lorsm_cmi_core
+ ADD CONSTRAINT lorsm_cmi_core_item_id_fk FOREIGN KEY (item_id)
+ REFERENCES acs_objects (object_id) MATCH SIMPLE
+ ON UPDATE NO ACTION ON DELETE NO ACTION;
+
+ALTER TABLE lorsm_cmi_student_data ALTER max_time_allowed TYPE character varying(14);
Index: openacs-4/packages/lorsm/src/java/.classpath
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/src/java/.classpath,v
diff -u -N
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/lorsm/src/java/.classpath 13 Aug 2007 09:20:14 -0000 1.2
@@ -0,0 +1,9 @@
+
+
+
Unfortunately the same context contains a course with same exact name. hit back and change name.
" + ad_script_abort + } + set new_items_parent_id [lors::cr::add_folder -parent_id $parent_id -folder_name "${cr_dir}_items"] # PERMISSIONS FOR FILE-STORAGE Index: openacs-4/packages/lorsm/www/admin/tracking-rte/drill-student-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/admin/tracking-rte/drill-student-2.tcl,v diff -u -N -r1.1 -r1.2 --- openacs-4/packages/lorsm/www/admin/tracking-rte/drill-student-2.tcl 31 Dec 2006 00:36:09 -0000 1.1 +++ openacs-4/packages/lorsm/www/admin/tracking-rte/drill-student-2.tcl 13 Aug 2007 09:20:16 -0000 1.2 @@ -82,13 +82,17 @@ # { title "" "no_sort" "| Organization: $org_title ($org_id) | " + append orgs_list "$org_title (id: $org_id) | " + set indent_items [lorsm::get_items_indent -org_id $org_id] + db_foreach organization_item { SELECT o.object_id, - repeat(' ', (tree_level(tree_sortkey) - :indent)* 2) as indent, + --repeat(' ', (tree_level(tree_sortkey) - :indent)* 2) as indent, i.ims_item_id, i.item_title as item_title, i.hasmetadata, @@ -101,32 +105,46 @@ FROM acs_objects o, ims_cp_items i, ims_cp_manifests m WHERE - o.object_type = 'ims_item' + o.object_type like 'ims_item_object' AND i.org_id = :org_id AND o.object_id = i.ims_item_id AND m.man_id = :man_id ORDER BY - object_id, tree_sortkey + object_id + --, tree_sortkey } { + foreach indent_item $indent_items { + set indent_item_id [lindex $indent_item 0] + set indent_indent [lindex $indent_item 1] + if { [string equal $indent_item_id $ims_item_id] } { + set indent $indent_indent + } + } + + set table_item "" + + for {set x 0} {$x<$indent} {incr x} { + append table_item "" + } + append table_item " |
| "
}
+ append orgs_list "
|---|
"+APIFinder.LastServerError; - parent.frames['menu'].writit(message,'usermessage'); -
The menu returns when you exit the module.
','usermessage'); - parent.frames['menu'].writit('Abort Course
(clicking this will not record tracking information)','abort'); -
"+APIFinder.LastServerError+""; - parent.frames['menu'].writit(message,'usermessage'); -
"+APIFinder.LastServerError+""; - parent.frames['menu'].writit(message,'usermessage'); -
"+APIFinder.LastServerError+""; - parent.frames['menu'].writit(message,'usermessage'); -
"); + } + } + return; + } + +function messaging(message) { + if (debuglevel ==1) { + try { + parent.frames['content'].document.write(message); + } catch (err) { + debug("Messaging error."); + } + } + return; +} + + +function BlurListener(evt) { +evt = evt || window.event; +//debug('blurlistener'); +menu_frameset=parent.document.getElementById("menuvscontent"); +menu_frameset.cols="5%,*"; +menu_frame=parent.frames['menu']; +menu_frame.toggleBox('abort',0); +menu_frame.toggleBox('btn_finish',0); +} + +function FocusListener(evt) { +evt = evt || window.event; +//debug('focuslistener'); +menu_frameset=parent.document.getElementById("menuvscontent"); +menu_frameset.cols="15%,*"; +menu_frame=parent.frames['menu']; +menu_frame.toggleBox('abort',1); +menu_frame.toggleBox('btn_finish',1); +} + +function appletending() { + // try { + // selfcheck(); + // } catch (o) { + // debug(o); + // } + self.document.location.href="blank.html"; + self.document.location.replace("blank.html"); + self.document.src="blank.html"; + self.document.write("TERMINATING"); + parent.API=null; + APIFinder=null; + APIHolder=null; + API=null; + return(true); +} + + +// function selfcheck() { + // alert(parent.window.name); + // if ( parent.window.name=='LRN_delivery_window' ) { + // parent.close(); + //alert('eeh'); + // } +// } + +function KeepAlive() { + //number of seconds * 1000 + reloadtime=this.ses_renew*1000; + myTimer=setTimeout("AliveReLoad()",reloadtime); + debug("scheduling keepalive every "+reloadtime/1000+" seconds"); +} + +function AliveReLoad() { + //keepalive will always be there: no more just initialized if( ! initialized ) { debug("deactivating keepalive");return; } + debug("within AliveReload()"); + var rnumb = Math.floor(Math.random()*999); + temp = "keepalive?Rand="+rnumb; + parent.frames['keepalive'].location.href="blank.html"; + parent.frames['keepalive'].document.location.replace("blank.html"); + parent.frames['keepalive'].document.location.reload(true); + parent.frames['keepalive'].document.location.href=temp; + parent.frames['keepalive'].document.location.replace(temp); + parent.frames['keepalive'].document.location.reload(true); + parent.frames['keepalive'].document.src ="keepalive?Rand="+rnumb; + isalive=APIFinder.KeepAlive(); + if(!(isalive=='true')) { + if (menu_off < 1 ) { + message="Server failure: Error in communication to server:
"+APIFinder.LastServerError; + parent.frames['menu'].writit(message,'usermessage'); + } else { + debug("server error in keepalive"); + } + APIFinder.LastServerError=""; + } else { + if (menu_off < 1 ) { + message="Server online"; + parent.frames['menu'].writit(message,'usermessage'); + } else { + debug("server OK in keepalive"); + } + } + KeepAlive(); +} + +function BackToBody() { + try { + debug("doing backtobody"); + if (menu_off < 1 ) { + parent.frames['menu'].writit('','abort'); + parent.frames['menu'].writit('','usermessage'); + } + messaging("Unloading course"); + if (menu_off < 1) { + parent.frames['content'].document.location.href = main_body_url; + } else { + top.document.location.href = return_url; + } + } catch (err) { + debug("FAILURE calling backtobody FAILED"); + } + debug("ending backtobody"); + finishing=false; +} + +function waitforapplet() { + debug("in waitforapplet"); + + if (megatries>5) { + debug("giving up"); + if(bored==0) { + bored=1; + alert("Your browser seems not to let me communicate with the applet. Please check:\n1) Java support is installed and active in the browser\n2)That your browser supports java-javascript connectivity (most versions of IE and Mozilla-compatible would be ok)\n3) If you are currentely installing Java support, please try again accesing the course after installation completion\n"); + } + this.releasemenu=-1; + return; + } + tries++; + if (tries>3) { + debug("bored with loading applet - trying something else"); + var temp=this.document.location.href; + debug(temp); + this.document.location.href="blank.html"; + this.document.location.replace("blank.html"); + this.document.location.reload(true); + this.document.location.href=temp; + this.document.location.replace(temp); + this.document.location.reload(true); + debug("waiting again"); + tries=0; megatries++; + setTimeout("waitforapplet();",1000) + } + + try { + var active=this.document.applets[0].isActive(); //mozilla error on this, IE just gives out (doesnt' go in the catch ???) + } catch (err) { + try { + var active=this.document.applets[0].isActive; //this is mozilla specific, IE is just allergic (we have enough wars not to think of browsers'.... + } catch (err2) { + debug("applet not loaded within old explorer") + debug("seems java is not installed") + } + } + + if (active) + { + debug("applet detected to be active"); + init(); + } + else { + debug("applet results not active right now"); + setTimeout("waitforapplet();",1000) + } +} + + +function init() { + debug("inizio toplevel findapi"); + messaging("Checking system configuration"); + var findapplets =0 ; + var numtest = 0; + //frames['menu'].document.write("this is me"); + while ( findapplets != 1 && findapplets !=2 ) { //we use this weird setting not to have to set for typeof or undefined checking + findapplets=this.document.applets.length; + debug(findapplets); + numtest++; + if (numtest>70) { + debug("i cannot see the applet loading... is java enabled and installed ?"); + messaging("Java JRE not found (error 206). Please check requirements."); + return(0); + } + } + var findAPITries = 0; + while (APIFinder == null) { + debug("whithin APIFinder while loop"); + findAPITries++; + APIFinder = this.document.applets[0]; // this returns object for opera and seems to be working + // APIFinder = this.document.applets[1]; // this returns object for opera + // APIFinder = this.document.applets['APIAdapter']; // this returns function for opera + if (findAPITries > 70) { + debug("FRAMESET Couldn't find the APIAdapter "); + messaging("Java JRE not found (error 223). Please check requirements."); + this.releasemenu=-1; + break; + } + } + if (findAPITries <=70) { + debug("Frameset FOUND API within applet (menu) - using APIfinder - loading learning object"); + this.releasemenu=1; + messaging("System check passed"); + //temporarly added for testing ADL conformance tests - which rely on typeof - miserably failing + //alert(typeof(APIFinder.LMSInitialize)); + API=new APIHolder(); + //exporting API to parent + parent.API=this.API; + //alert(typeof(API)); + debug("the type of API.LMSInitialize is "+typeof(API.LMSInitialize)); + } else { + debug("API not found, don't know what to do"); + } + //here we had a menu off switch + if (refreshFrame()==0) { + debug ("i would do reload now-- if for anything"); + messaging("Double checking system configuration."); + //alert("reload1"); + self.location.reload(); + } + //here the menu off switch would end +} + +//function closecontents() { +//alert("content going") +//parent.frames['content'].window.location.href = "blank.html"; +//if (parent.frames['content'].window.location.href != "blank.htm") { +// setTimeout("closecontents();",1000) +// } +//return(0); +//} + +function refreshFrame() { +//chiamata quando trovato adapter +//SUPERFLUO ?? +if (menu_off < 1 ) { + parent.frames['content'].window.location.href = "blank.html"; + parent.frames['content'].window.location.href = content_url; +} +//not ready yet to show menu +parent.frames['menu'].window.location.href = "blank.html"; +var gotit=null; +var findgetAppletInfo = 0; + while(gotit == null) { + debug("tipo di API (via APIfinder):"+typeof(APIFinder)); + findgetAppletInfo++; + try { + gotit=APIFinder.getAppletInfo(); + debug("we have established communication from javascript to java:"); + debug(gotit); + } + catch (err) { + debug("Your browser told me the applet was ready but now denies access to its functions, claiming \n"+err+"\n I must force reload, this way you won't see this message again, luckily.\n"); + return(0); + } + debug("activating keepalive"); + //NONO KeepAlive(); + if (menu_off < 1 ) { + parent.frames['content'].document.location.href = "blank.html"; + parent.frames['content'].document.location.href = content_url; + //let's show menu now + parent.frames['menu'].window.location.href = menu_url; + //obviously no menu if menu is off... + } else { + messaging("Please wait. Loading contents.
Attendere prego. Caricamento contenuti.
"); + parent.frames['content'].location.href = record_view_url; + } + if (findgetAppletInfo> 7) { + debug("I cannot talk to APIAdapter: try reloading me. Please notify support of your sw configuration ;) "); + return(0); + } + } + return(1); +} + + + +function APIHolder() { + //this is just a placeholder +} + +function LMSInitialize(placeholder) { + debug("sco called LMSInitialize ("+placeholder+")"); + initialized=APIFinder.LMSInitialize(placeholder); + debug("returning from LMSInitialize =("+initialized+")"); + initialized=initialized+''; + if(initialized=='true') { + if (menu_off < 1 ) { + menu_frame=parent.frames['menu']; + menu_frameset=parent.document.getElementById("menuvscontent"); + + menu_x=parent.document.getElementById("left"); + menu_x.onmouseover = FocusListener; + menu_x.onmouseout = BlurListener; + + menu_frame.toggleBox('menudiv',0); + menu_frame.toggleBox('abort',0); + menu_frame.toggleBox('btn_finish',0); + + menu_frameset.cols="5%,*"; + menu_frame.writit('EXIT
','usermessage'); + menu_frame.writit('Abort Course
(clicking this will not record tracking information)','abort'); + menu_frame.writit('Close Unit
(force LMSFinish)','btn_finish'); + } + APIFinder.LastServerError=""; + } else { + if (menu_off < 1 ) { + message="LMSInitialize: Error in communication to server:
"+APIFinder.LastServerError+""; + parent.frames['menu'].writit(message,'usermessage'); + } else { + debug("server error in LMSInitialize"); + } + } + return initialized+''; +} + +function LMSFinish(placeholder) { + if (menu_off < 1 ) { + menu_frame=parent.frames['menu']; + + menu_x=parent.document.getElementById("left"); + menu_x.onmouseover = ''; + menu_x.onmouseout = ''; + + menu_frameset=parent.document.getElementById("menuvscontent"); + menu_frameset.cols="40%,*"; + //stupid reload trick + //this reloads menu, showing us the beauty of realtime lesson_status changes + //but screws up applet init ? + tempvar=parent.frames['menu'].location.href; + dummyDate = new Date() ; + dummyParameter = "&" + dummyDate.getTime() + parent.frames['menu'].location.href = tempvar + dummyParameter + } + if(!(initialized=='true')) { + debug("SCO called LMSFinish ("+placeholder+") but course not initialized"); + return false; + } + finishing=true; + if (menu_off < 1 ) { + parent.frames['menu'].writit('Sending tracking to server....','usermessage'); + } + debug("APPLET.JS sco called LMSFinish("+placeholder+")"); + debug("calling LMSfinish =(\'\')"); + // Make sure param is empty string "" - as per the API spec + finished=APIFinder.LMSFinish(''); + finished=finished+''; + debug("returning from LMSfinish =("+finished+")"); + //now we schedule a page unload AFTER the course has received the LMSFINISH ok + if(finished=='true') { + //we set initialized to false ONLY when finished has been processed + //it could be some courses try finish more than once following an error + initialized=false; + debug('Within finish, before backtobody timeout'); + myTimer=setTimeout("BackToBody()",1000) + debug('Within finish, past backtobody timeout setting'); + APIFinder.LastServerError=""; + if (menu_off < 1 ) { + try { + + parent.frames['menu'].writit('','abort'); + parent.frames['menu'].writit('','btn_finish'); + parent.frames['menu'].toggleBox('menudiv',1); + parent.frames['menu'].writit('Tracking is OK','usermessage'); + } catch (err) { + debug ("cannot restore menu... what's up ?") + } + } + } else { + //Some error occourred. not clear at this stage if SERVER SIDE or what + finishing=false; + if (menu_off < 1 ) { + //better be conservative. don't give'em menu back + //parent.frames['menu'].writit('','abort'); + //parent.frames['menu'].toggleBox('menudiv',1); + message="LMSFinish: Error in communication to server:
"+APIFinder.LastServerError+""; + parent.frames['menu'].writit(message,'usermessage'); + } else { + debug("ERROR during LMSFinish CALL !!!"); + } + } + return finished; +} + +function LMSGetValue(name) { + if(!(initialized=='true')) { + debug("LMSGetValue: damn SCO called LMSGetValue("+name+") but course not initialized"); + debug("LMSGetValue: we try calling initialization ourselves"); + var temp=API.LMSInitialize(''); + debug("LMSGetValue: initialization was="+temp); + } + debug("sco called LMSGetValue("+name+")"); + getvalue=APIFinder.LMSGetValue(name); + getvalue=getvalue+''; + debug("LMSGetValue("+name+") returns ("+getvalue+")"); + return(getvalue); +} + +function LMSCommit(placeholder) { + if(!(initialized=='true')) { + debug("LMSCommit: damn SCO called LMSGetValue("+name+") but course not initialized"); + debug("LMSCommit: we try calling initialization ourselves"); + var temp=API.LMSInitialize(''); + debug("LMSCommit: initialization was="+temp); + } + debug("sco called LMSCommit("+placeholder+")"); + committed=APIFinder.LMSCommit(placeholder); + committed=committed+''; + if(!(committed=='true')) { + if (menu_off < 1 ) { + message="Commit: Error in communication to server:
"+APIFinder.LastServerError+""; + parent.frames['menu'].writit(message,'usermessage'); + } else { + debug("ERROR during LMSCommit CALL !!!"); + } + } else { + if (menu_off < 1 ) { + parent.frames['menu'].writit('Committed OK','usermessage'); + } + APIFinder.LastServerError=""; + } + return committed; +} + +function LMSSetValue(name,value) { + if(!(initialized=='true')) { + debug("LMSSetValue: damn SCO called LMSGetValue("+name+") but course not initialized"); + debug("LMSSetValue: we try calling initialization ourselves"); + var temp=API.LMSInitialize(''); + debug("LMSSetValue: initialization was="+temp); + } + debug("sco called LMSSetValue("+name+","+value+")"); + setvalue=APIFinder.LMSSetValue(name,value); + setvalue=setvalue+''; + debug("LMSsetvalue returning "+setvalue+" "); + return (setvalue); +} + +function LMSGetLastError() {debug ("sco called LMSGetLastError ("+")"); return APIFinder.LMSGetLastError()+''} +function LMSGetErrorString(number) {debug ("sco called LMSGetErrorString ("+number+")"); return APIFinder.LMSGetErrorString(number)+''} +function LMSGetDiagnostic(placeholder) {debug ("sco called LMSGetDiagnostic ("+placeholder+")"); return APIFinder.LMSGetDiagnostic(placeholder)+''} + +APIHolder.prototype.LMSInitialize=LMSInitialize; +APIHolder.prototype.LMSFinish=LMSFinish; +APIHolder.prototype.LMSGetValue=LMSGetValue; +APIHolder.prototype.LMSCommit=LMSCommit; +APIHolder.prototype.LMSSetValue=LMSSetValue; +APIHolder.prototype.LMSGetLastError=LMSGetLastError; +APIHolder.prototype.LMSGetErrorString=LMSGetErrorString; +APIHolder.prototype.LMSGetDiagnostic=LMSGetDiagnostic; + + Index: openacs-4/packages/lorsm/www/delivery/applet.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/delivery/applet.tcl,v diff -u -N -r1.2 -r1.3 --- openacs-4/packages/lorsm/www/delivery/applet.tcl 7 Jun 2006 14:05:44 -0000 1.2 +++ openacs-4/packages/lorsm/www/delivery/applet.tcl 13 Aug 2007 09:20:16 -0000 1.3 @@ -13,6 +13,7 @@ } -errors { } +set menu_type [ad_get_client_property lorsm menu_type] set debuglevel [ad_get_client_property lorsm debuglevel] if {$debuglevel > 0} { set app_width 150 Index: openacs-4/packages/lorsm/www/delivery/blank-no-javascript.html =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/www/delivery/blank-no-javascript.html,v diff -u -N --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/lorsm/www/delivery/blank-no-javascript.html 13 Aug 2007 09:20:16 -0000 1.2 @@ -0,0 +1,14 @@ + + +