Index: openacs-4/packages/imsld/www/index.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/index.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/imsld/www/index.tcl 28 Sep 2005 09:54:48 -0000 1.4 +++ openacs-4/packages/imsld/www/index.tcl 4 Oct 2005 13:45:40 -0000 1.5 @@ -3,14 +3,30 @@ set page_title index set context {} +set community_id 2148 -db_foreach imsld_in_class { - select all imslds in the class +db_multirow imslds_in_class get_manifests { + select cr3.item_id as imsld_id, + coalesce(imsld.title, imsld.identifier) as imsld_title + from acs_rels ar, cr_items cr1, cr_items cr2, cr_items cr3, imsld_cp_manifests icm, imsld_cp_organizations ico, imsld_imsldsi imsld + where ar.object_id_one = :community_id + and ar.rel_type = 'imsld_community_manifest_rel' + and ar.object_id_two = cr1.item_id + and cr1.live_revision = icm.manifest_id + and ico.manifest_id = cr1.item_id + and imsld.organization_id = cr2.item_id + and cr2.live_revision = ico.organization_id + and cr3.live_revision = imsld.imsld_id } { -# set next_activity [imsld::get_next_activity] + ns_log notice "vamos!!!!! \n" +} + +# set next_activity get_next_activity # display ismld_name # display copmleted activities -# display next activity with "finished" link and with link to the activity: if it is an activity structure? -} +# display next activity with finished link and with link to the activity: if it is an activity structure? +# the link finished will just add an entry to the status table +# environments? +# si es la primera vez, redirigir a un javascript q marque la entrada para contar el tiempo en time_to_complete +# manejar completadas, faltante y nombre con listas y mejorar despliegue! -