Index: openacs-4/packages/lorsm/catalog/lorsm.en_US.ISO-8859-1.xml =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/catalog/lorsm.en_US.ISO-8859-1.xml,v diff -u -r1.7 -r1.8 --- openacs-4/packages/lorsm/catalog/lorsm.en_US.ISO-8859-1.xml 18 May 2005 07:45:23 -0000 1.7 +++ openacs-4/packages/lorsm/catalog/lorsm.en_US.ISO-8859-1.xml 26 May 2005 18:15:52 -0000 1.8 @@ -847,4 +847,7 @@ Yes You can Your Stats: + Default delivery? + SCORM session + Sesion_Runtime_Data Index: openacs-4/packages/lorsm/lib/user-lorsm.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/lib/user-lorsm.tcl,v diff -u -r1.8 -r1.9 --- openacs-4/packages/lorsm/lib/user-lorsm.tcl 17 May 2005 17:03:39 -0000 1.8 +++ openacs-4/packages/lorsm/lib/user-lorsm.tcl 26 May 2005 18:17:04 -0000 1.9 @@ -26,6 +26,8 @@ label "[_ lorsm.Course_Name_1]" display_template {@d_courses.course_url;noquote@} html { width 70% } + link_url_col course_url + link_html {title "[_ lorsm.Access_Course]"} } subject { label "[_ lorsm.Subject]" @@ -56,19 +58,50 @@ db_multirow -extend { ims_md_id last_viewed total_item_count viewed_item_count viewed_percent course_url } -append d_courses select_d_courses { } { set ims_md_id $man_id if { [string eq $format_name "default"] } { - set course_url "$course_name" + + # micheles + set context [site_node::get_url_from_object_id -object_id $lorsm_instance_id] + if ([db_0or1row query " + select + cpr.man_id, + cpr.res_id, + case + when upper(scorm_type) = 'SCO' then 'delivery-scorm' + else 'delivery' + end as needscorte + from + ims_cp_resources cpr + where + cpr.man_id = :man_id + order by cpr.scorm_type desc limit 1" + ]) { + + set delivery_method $needscorte + ns_log Debug "lorsm - $needscorte" + + set course_url "$course_name" + ns_log Debug "lorsm - course_url: $course_url" + } else { + set course_url "NO RESOURCES ERROR" + } } else { - set course_url "$course_name" + set course_url "$course_name" } + # 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] set viewed_items [db_list get_viewed_items { }] set viewed_item_count [llength $viewed_items] + + ns_log Debug "lorsm - viewed_item_count: $viewed_item_count" + set viewed_percent [expr [expr $viewed_item_count * 1.00] / $total_item_count * 100] - } + ns_log Debug "lorsm - viewed_percent: $viewed_percent" + } } + 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 --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/lorsm/sql/postgresql/lorsm-cmi-create.sql 26 May 2005 18:14:59 -0000 1.1 @@ -0,0 +1,392 @@ +-- packages/lorsm/sql/postgresql/lorsm-cmi-create.sql +-- +-- @author Giancarlo Luxardo +-- @creation-date 2004-10-01 +-- @arch-tag +-- @cvs-id $Id: +-- + +-- SCORM 1.2 Run-Time Environment + +-- cmi.core category + +create table lorsm_cmi_core ( + track_id int + constraint lorsm_cmi_core_id_pk + primary key + constraint lorsm_cmi_core_track_id_fk + references lorsm_student_track (track_id) + on delete cascade, + authority_id int, + man_id int, + item_id int, + student_id varchar(100), -- mandatory, gettable, not settable + student_name varchar(256), -- mandatory, gettable, not settable + lesson_location varchar(256), -- mandatory, gettable, settable + credit varchar(10) + default 'no-credit', -- mandatory, gettable, not settable + lesson_status varchar(20) + default 'not attempted', -- mandatory, gettable, settable + entry varchar(10) + default '', -- mandatory, gettable, not settable + score_raw varchar(10), -- mandatory, gettable, settable + score_max varchar(10), -- not mandatory, gettable, settable + score_min varchar(10), -- not mandatory, gettable, settable + total_time int DEFAULT 0::int, + total_time_ms int DEFAULT 0::int, + lesson_mode varchar(10) -- not mandatory, gettable, not settable + default 'normal', + exit varchar(10), -- mandatory, not gettable, settable + session_time int DEFAULT 0::int, -- mandatory, not gettable, settable + session_time_ms int DEFAULT 0::int, -- mandatory, not gettable, settable + suspend_data varchar(4096), -- mandatory, gettable, settable + launch_data varchar(4096), -- mandatory, gettable, not settable + comments varchar(4096), -- not mandatory, gettable, settable + comments_from_lms varchar(4096), -- not mandatory, gettable, not settable + count_objectives int, -- current number of elements in the cmi.objectives list + count_student_data int, -- is there a cmi.student_data category? (0-1) + count_student_pref int, -- is there a cmi.student_data category? (0-1) + count_interactions int, -- current number of elements in the cmi.objectives list + time_stamp timestamptz, -- time this row was written + constraint lorsm_cmi_core_crd_ck check + (credit in ('credit','no-credit')), + constraint lorsm_cmi_core_stat_ck check + (lesson_status in ('passed', 'completed','failed', 'incomplete', 'browsed', 'not attempted')), + constraint lorsm_cmi_core_ent_ck check + (entry in ('ab-initio', 'resume', '')), + constraint lorsm_cmi_core_username_fk foreign key + (authority_id, student_id) references users (authority_id, username), + 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) +); + +create index lorsm_cmi_core__stud_id_idx on lorsm_cmi_core (student_id); + +comment on table lorsm_cmi_core is ' +Information required to be furnished by all LMS systems. What all SCOs may depend upon at start up. +'; + +comment on column lorsm_cmi_core.student_id is ' +Data Type: CMIIdentifier (255 alpha). Format: Up to 255 alpha-numeric characters with no spaces. Dashes (or hyphen) and the underscore are legal. Periods are illegal. Case insensitive. +'; + +comment on column lorsm_cmi_core.student_name is ' +eg: "Student, Mike A. Jr." +'; + +comment on column lorsm_cmi_core.lesson_location is ' +Bookmark, references course_id, cf: lorsm_st_track_course_id_fk. +'; + +comment on column lorsm_cmi_core.credit is ' +Data Type: CMIVocabulary (Credit) - "credit" "no-credit". Currently always: "no-credit". +'; + +comment on column lorsm_cmi_core.lesson_status is ' +Data Type: CMIVocabulary (Status) - passed completed failed incomplete browsed not attempted. +'; + +comment on column lorsm_cmi_core.entry is ' +Data Type: CMIVocabulary (Entry) "ab-initio" "resume" "" - empty string +'; + +comment on column lorsm_cmi_core.score_raw is ' +Data Type: CMIDecimal or CMIBlank. +Should be initialized with an empty string. +'; + +comment on column lorsm_cmi_core.score_max is ' +Data Type: CMIDecimal or CMIBlank. +Should be initialized with an empty string. +Since this is an optional data model element, it should be returned to a _children request. +'; + +comment on column lorsm_cmi_core.score_min is ' +Data Type: CMIDecimal or CMIBlank. +Should be initialized with an empty string. +Since this is an optional data model element, it should be returned to a _children request. +'; + +comment on column lorsm_cmi_core.total_time is ' +Time in 1/100 sec. +Data Type: CMITimespan. Format: Hours, minutes and seconds separated by a colon. HHHH:MM:SS.SS Hours has a minimum of 2 digits and a maximum of 4 digits. Minutes shall consist of exactly 2 digits. Seconds shall contain 2 digits, with an optional decimal point and 1 or 2 additional digits. (i.e. 34.45). +'; + +comment on column lorsm_cmi_core.lesson_mode is ' +Data Type: CMIVocabulary (Mode) "browse" "normal" "review". Currently always: "normal". +'; + +comment on column lorsm_cmi_core.exit is ' +Data Type: CMIVocabulary (Exit) "time-out" "suspend" "logout" "". +'; + +comment on column lorsm_cmi_core.session_time is ' +The LMS accumulates this time in cmi.core.total_time. +'; + +comment on column lorsm_cmi_core.suspend_data is ' +Unique information generated by the SCO during previous uses that is needed for the current use. +'; + +comment on column lorsm_cmi_core.launch_data is ' +This value should be initialized by the LMS using the manifest. The LMS should use the manifest (adlcp:datafromlms) element. If no launch data is found in the manifest, then the launch data should be set to an empty string (""). +'; + +comment on column lorsm_cmi_core.comments is ' +Freeform feedback from the SCO. For example, the student may have the option of leaving comments at any point in the SCO, or they may be asked for comments at the end of the SCO. +'; + +comment on column lorsm_cmi_core.comments_from_lms is ' +This element represents comments that would come from the LMS. +'; + +-- SCORM definition. +-- The _children keyword is used to determine all of the elements in the category that are supported by the LMS. +-- If an element has no children, but is supported, an empty string is returned. If an element is not supported, +-- an empty string is returned. A subsequent request for last error can verify that the element is not supported. + +-- In our implementation all elements are supported, and empty strings are returned as long as they are not +-- initialized (without setting an error). + +-- All the following tables represent optional categories. +-- Therefore the data model elements related by the columns should be returned to a _children request. + +-- cmi.objectives category + +create table lorsm_cmi_objectives ( + track_id int + constraint lorsm_cmi_objectives_track_id_fk + references lorsm_student_track (track_id) + on delete cascade, + _count int, -- start with 0 + student_id varchar(100), + id varchar(256), -- not mandatory, gettable, settable + score_raw varchar(10), -- not mandatory, gettable, settable + score_max varchar(10), -- not mandatory, gettable, settable + score_min varchar(10), -- not mandatory, gettable, settable + status varchar(100) -- not mandatory, gettable, settable + default 'not attempted', + constraint lorsm_cmi_objectives_status_ck check + (status in ('passed', 'completed', 'failed', 'incomplete', 'browsed', 'not attempted')), + constraint lorsm_cmi_objectives_id_pk primary key (track_id, _count) +); + + +create index lorsm_cmi_objectives__stud_id_idx on lorsm_cmi_objectives (student_id); + +comment on table lorsm_cmi_objectives is ' +Identifies how the student has performed on individual objectives covered in the SCO. +'; + +comment on column lorsm_cmi_objectives.id is ' +An internally, developer defined, SCO specific identifier for an objective. +'; + +comment on column lorsm_cmi_objectives.score_raw is ' +Data Type: CMIDecimal or CMIBlank. Currently always: "". +'; + +comment on column lorsm_cmi_objectives.score_max is ' +Data Type: CMIDecimal or CMIBlank. Currently unsupported. +'; + +comment on column lorsm_cmi_objectives.score_min is ' +Data Type: CMIDecimal or CMIBlank. Currently unsupported. +'; + +comment on column lorsm_cmi_objectives.status is ' +The status of the SCO s objective obtained by the student after each attempt to master the SCO s objective. +Data Type: CMIVocabulary (Status) "passed" "completed" "failed" "incomplete" "browsed" "not attempted". +'; + +-- cmi.student_data category + +create table lorsm_cmi_student_data ( + track_id int + constraint lorsm_cmi_student_data_id_pk + primary key + constraint lorsm_cmi_student_data_track_id_fk + references lorsm_student_track (track_id) + 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 + time_limit_action varchar(100) -- not mandatory, gettable, not settable +); + +create index lorsm_cmi_student_data__stud_id_idx on lorsm_cmi_student_data (student_id); + +comment on table lorsm_cmi_student_data is ' +Information to support customization of a SCO based on a student s performance. +### Everything here is read-only: should be set before the SCO is launched? Is it specific to the student? +'; + +comment on column lorsm_cmi_student_data.mastery_score is ' +The passing score, as determined outside the SCO. +'; + +comment on column lorsm_cmi_student_data.max_time_allowed is ' +amount of time the student is allowed to have in the current attempt on the SCO. +'; + +comment on column lorsm_cmi_student_data.time_limit_action is ' +Tells the SCO what to do when the max_time_allowed is exceeded. +Data Type: CMIVocabulary (Time Limit Action) exit,message exit,no message continue,message continue,no message. +'; + +-- cmi.student_preference category + +create table lorsm_cmi_student_preference ( + track_id int + constraint lorsm_cmi_student_preference_id_pk + primary key + constraint lorsm_cmi_student_preference_track_id_fk + references lorsm_student_track (track_id) + on delete cascade, + student_id varchar(100), + audio int, -- not mandatory, gettable, not settable + language varchar(256), -- not mandatory, gettable, settable + speed int, -- not mandatory, gettable, settable + text int -- not mandatory, gettable, settable +); + +create index lorsm_cmi_student_preference__stud_id_idx on lorsm_cmi_student_preference (student_id); + +comment on table lorsm_cmi_student_preference is ' +Selected options that are appropriate for subsequent SCOs +'; + +comment on column lorsm_cmi_student_preference.audio is ' +Digit from -1 to 100 -1: is off (any negative number is an off command) 0: is a no-change status (the SCO uses its defaults or the status of the audio remains the same as the last SCO taken) 1 - 100: is volume level (1 is soft, 100 is loudest as possible) +'; + +comment on column lorsm_cmi_student_preference.language is ' +For SCOs with multi-lingual capability, this element should be used to identify in what language the information should be delivered. +'; + +comment on column lorsm_cmi_student_preference.speed is ' +Digit from -100 to 100 -100 is the slowest pace available in the system 0 is no-change status (The SCO uses its defaults. SCO moves at its normal speed) 100 is maximum pace available in the system. +'; + +comment on column lorsm_cmi_student_preference.text is ' +One of three digits: -1 : text is off, not shown 0 : no change in status. Use default 1 : text is on screen, shown to student. +'; + +-- cmi.interactions category + +create table lorsm_cmi_interactions ( + track_id int + constraint lorsm_cmi_interactions_track_id_fk + references lorsm_student_track (track_id) + on delete cascade, + _count int, -- start with 0 + student_id varchar(100), + id varchar(256), -- not mandatory, not gettable, settable + time timestamptz, -- not mandatory, not gettable, settable + type varchar(100), -- not mandatory, not gettable, settable + weighting varchar(10), -- not mandatory, not gettable, settable + student_response varchar(100), -- not mandatory, not gettable, settable + result varchar(10), -- not mandatory, not gettable, settable + latency int, -- not mandatory, not gettable, settable + count_objectives int, -- current number of elements in the cmi.objectives list + correct_responses int, -- current number of elements in the cmi.correct_responses list + constraint lorsm_cmi_interactions_type_ck check + (type in ('true-false', 'choice', 'fill-in', 'matching', 'performance', 'sequencing', 'likert', 'numeric')), + constraint lorsm_cmi_interactions_id_pk primary key (track_id, _count) +); + +create index lorsm_cmi_interactions__stud_id_idx on lorsm_cmi_interactions (student_id); + +comment on table lorsm_cmi_interactions is ' +All of the items in this group are related to a recognized and recordable input from the student. +'; + +comment on column lorsm_cmi_interactions.id is ' +Unique identifier for an interaction. +The SCO is responsible for determining this value. +'; + +comment on column lorsm_cmi_interactions.time is ' +Identification of when the student interaction was completed. +Data Type: CMITime. +'; + +comment on column lorsm_cmi_interactions.type is ' +Indication of which category of interaction is recorded. +Data Type: CMIVocabulary (Interaction) "true-false" "choice" "fill-in" "matching" "performance" "sequencing" "likert" "numeric". +'; + +comment on column lorsm_cmi_interactions.weighting is ' +The weighting is a factor which is used to identify the relative importance of one interaction compared to another. +Data Type: CMIDecimal. +'; + +comment on column lorsm_cmi_interactions.student_response is ' +Description of possible responses to the interaction. +Data Type: CMIFeedback. +'; + +comment on column lorsm_cmi_interactions.result is ' +How the system judges the described response. +CMIVocabulary (Result) "correct" "wrong" "unanticipated" "neutral" "x.x" (CMIDecimal). +'; + +comment on column lorsm_cmi_interactions.latency is ' +The time (in 1/100 sec) from the presentation of the stimulus to the completion of the measurable response. +Data Type: CMITimespan. +'; + +-- cmi.interactions.objectives list + +create table lorsm_cmi_interactions_objectives ( + track_id int + constraint lorsm_cmi_interactions_obj_track_id_fk + references lorsm_student_track (track_id), + interaction_num int, -- number in the interactions list + _count int, -- start with 0 + student_id varchar(100), + id varchar(256), -- not mandatory, not gettable, settable + constraint lorsm_cmi_interactions_obj_id_pk primary key (track_id, interaction_num, _count) +); + +create index lorsm_cmi_interactions_obj__stud_id_idx on lorsm_cmi_interactions_objectives (student_id); + +comment on table lorsm_cmi_interactions_objectives is ' +Identify a list of objectives that the interaction is for. +'; + +comment on column lorsm_cmi_interactions_objectives.id is ' +Developer created identifier for an objective. +The SCO is responsible for determining this value. +'; + +-- cmi.correct.responses.correct_responses list + +create table lorsm_cmi_interactions_correct_responses ( + track_id int + constraint lorsm_cmi_interactions_corr_track_id_fk + references lorsm_student_track (track_id) + on delete cascade, + interaction_num int, -- number in the interactions list + _count int, -- start with 0 + student_id varchar(100), + pattern varchar(256), -- not mandatory, not gettable, settable + constraint lorsm_cmi_interactions_corr_id_pk primary key (track_id, interaction_num, _count) +); + +create index lorsm_cmi_interactions_corr__stud_id_idx on lorsm_cmi_interactions_correct_responses (student_id); + +comment on table lorsm_cmi_interactions_correct_responses is ' +Description of possible responses to the interaction. +'; + +comment on column lorsm_cmi_interactions_correct_responses.pattern is ' +Description of possible student responses to the interaction provided by the SCO. +There may be more than one correct response, and some responses may be more correct than others. +The format is dependent on cmi.interactions.n.type. +Data Type: CMIFeedback. +'; + + Index: openacs-4/packages/lorsm/sql/postgresql/lorsm-cmi-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/sql/postgresql/lorsm-cmi-drop.sql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/lorsm/sql/postgresql/lorsm-cmi-drop.sql 26 May 2005 18:14:59 -0000 1.1 @@ -0,0 +1,19 @@ +-- packages/lorsm/sql/postgresql/lorsm-cmi-create.sql +-- +-- @author Giancarlo Luxardo +-- @creation-date 2004-10-01 +-- @arch-tag +-- @cvs-id $Id: +-- + +-- SCORM 1.2 Run-Time Environment + +-- cmi.core + +drop table lorsm_cmi_core; +drop table lorsm_cmi_objectives; +drop table lorsm_cmi_student_data; +drop table lorsm_cmi_student_preference; +drop table lorsm_cmi_interactions; +drop table lorsm_cmi_interactions_objectives; +drop table lorsm_cmi_interactions_correct_responses; Index: openacs-4/packages/lorsm/sql/postgresql/lorsm-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/sql/postgresql/lorsm-create.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/lorsm/sql/postgresql/lorsm-create.sql 17 May 2005 17:03:39 -0000 1.3 +++ openacs-4/packages/lorsm/sql/postgresql/lorsm-create.sql 26 May 2005 18:14:59 -0000 1.4 @@ -109,3 +109,4 @@ \i lorsm-packages.sql +\i lorsm-cmi-create.sql Index: openacs-4/packages/lorsm/sql/postgresql/lorsm-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/sql/postgresql/lorsm-drop.sql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/lorsm/sql/postgresql/lorsm-drop.sql 26 May 2005 18:14:59 -0000 1.1 @@ -0,0 +1,37 @@ +-- +-- packages/lorsm/sql/postgresql/lorsm-drop.sql +-- +-- @author Ernie Ghiglione (ErnieG@mm.st) +-- @creation-date 2004-05-24 +-- @arch-tag 168b43b5-5693-4d4a-a5e7-d629f8fb206b +-- @cvs-id $Id: lorsm-drop.sql,v 1.1 2005/05/26 18:14:59 giancarlol Exp $ +-- + +-- +-- Copyright (C) 2004 Ernie Ghiglione +-- +-- This package is free software; you can redistribute it and/or modify it under the +-- terms of the GNU General Public License as published by the Free Software +-- Foundation; either version 2 of the License, or (at your option) any later +-- version. +-- +-- It is distributed in the hope that it will be useful, but WITHOUT ANY +-- WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS +-- FOR A PARTICULAR PURPOSE. See the GNU General Public License for more +-- details. +-- + +-- Drop tables and sequences + +drop table lorsm_student_track; +drop table lorsm_student_bookmark; + +drop sequence lorsm_st_track_track_id_seq; + +-- Unregister the content template +select content_type__unregister_template ( + 'file-storage-object', + content_type__get_template('file-storage-object','lorsm'), + 'public' +); + Index: openacs-4/packages/lorsm/sql/postgresql/upgrade/upgrade-0.6d2-0.7d.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/sql/postgresql/upgrade/upgrade-0.6d2-0.7d.sql,v diff -u --- /dev/null 1 Jan 1970 00:00:00 -0000 +++ openacs-4/packages/lorsm/sql/postgresql/upgrade/upgrade-0.6d2-0.7d.sql 26 May 2005 18:14:59 -0000 1.1 @@ -0,0 +1 @@ +\i lorsm-cmi-create.sql