Azione A1

Creazione del gruppo di lavoro

In fase di avvio del progetto, sarà costituito il gruppo di lavoro (GdL): verranno nominati il Project Leader (PL) e i referenti tecnico ed amministrativo di ogni partner.

La scelta di ciascuna delle suddette figure avverrà su proposta dei singoli partner sulla base delle rispettive competenze e sull'esperienza acquisita in analoghi progetti.

I risultati dell'azione sono costituiti dagli atti amministrativi che testimoniano l'avvenuto insediamento del gruppo di lavoro (verbale dell’incontro).

Avanzamento Stato: Terminato - Avvio: 01-07-2014 Conclusione: 31-07-2014
2014 2015 2016 2017 2018
I II III IV I II III IV I II III IV I II III IV I II III IV
A1 CronoprogrammaOOAOOOOOOOOOOOOOOOOO
AvanzamentoOOAOOOOOOOOOOOOOOOOO

L’azione è conclusa. In data 22 luglio 2014 è stata organizzato un incontro presso la sede del beneficiario coordinatore Università di Parma ed è stato costituito il gruppo di lavoro. PL è stato nominato il prof. Francesco Nonnis Marzano, professore associato del Dip. di Bioscienze. Mentre referenti di ogni partner sono:

Partner beneficiarioRef. tecnicoRef. Amministrativo
UNPRPierluigi ViaroliSimona Fontana
GENTECHArmando PiccininiNicola Rinaldi
EGPBSonia AnelliMarcella Ghiretti
AdbPoChristian FarioliMaria Collosi
FMNSTommaso PaglianiDaniela Sciarra
PNATEFrancesca MorettiWilly Reggioni

***The project partnership was originally made of four public bodies: the University of Parma (UNIPR), as coordinator, the Management Body for Sustainability of Western Emilia region (EPGB), The Po basin Water Authority (Autorità di Bacino del fiume Po, AdbPO) and the Tuscan-Emilian Apennine National Park (PNATE) and two private bodies: the academic spinoff GEN-TECH Srl (GEN-TECH) and the Mario Negri Sud Foundation (FMNS). At the kick off of the project a working group has been formed and every partner has appointed a technical and administrative contact. The beneficiary coordinator UNIPR has also appointed a Project Leader, Prof. Francesco Nonnis Marzano. Names and email and telephone data of the whole working group are available from the project website under the section “contacts/partners”: http://www.lifebarbie.eu/it/p/7.

Documenti
Documentazione fotografica della riunione - Allegato 5 - Documentazione fotografica.pdf - 
Galleria
Parte del gruppo di lavoro BARBIE (22luglio2014)
Parte del gruppo di lavoro BARBIE (22luglio2014)
Download
class "Downloads" already exists
    while executing
"::itcl::class Downloads {
        inherit Barbie

        private variable downloads_menu ""
        public  common   downloads_dir

        public me..."
    (in namespace eval "::rwdatas" script line 3)
    invoked from within
"namespace eval ::rwdatas {

    ::itcl::class Downloads {
        inherit Barbie

        private variable downloads_menu ""
        public  common   ..."


OUTPUT BUFFER:

source [file join $rweb_root tcl before.tcl]
#
# -- downloads.tcl
#
# yet another datasource for controlling document downloads
#
#::rivet::apache_log_error notice "sourcing file [info script]"
#

package require Barbie
package require rwbinary

namespace eval ::rwdatas {

    ::itcl::class Downloads {
        inherit Barbie

        private variable downloads_menu ""
        public  common   downloads_dir

        public method willHandle {arglist keyvar} 
        public method init {args}
        public method menu_list {page} 
        public method is_stale {key timereference}
        #public proc to_url {lm} { return [Barbie::to_url $lm] }

        public proc list_downloads {dbhandle {public "%"}}
        protected method create_page_obj {key ooclass reassigned_key} { return ""}
    }

    ::itcl::body Downloads::is_stale {key timereference} {
        if {$key == "download_doc"} { return true }
        
        return [chain $key $timereference]
    }

    ::itcl::body Downloads::list_downloads {dbhandle {public "%"}} {

        set q { select d.*,s.descrizione,s.sectionid from documenti d   \
                       join sezioni s on d.sezione=s.sectionid          \
                       where d.pubblico like '$public'                  \
                       order by s.sectionid,s.ordine,d.ordine,d.docid; }

        set docsdb [dict create]
        #puts "
[subst $q]
"

        $::barbie::dbhandle forall [subst $q] document {

            set sectionid $document(sectionid)
            unset document(sectionid)
            set sezione_descrizione $document(descrizione)
            unset document(descrizione)
            set docid $document(docid)
            unset document(docid)

            dict set docsdb $sectionid descrizione $sezione_descrizione
            dict set docsdb $sectionid documenti $docid [dict create {*}[array get document]]

        }
        return $docsdb

    }

    ::itcl::body Downloads::willHandle {arglist keyvar} { 
        upvar $keyvar key 

        set args_d [dict create {*}$arglist]
        if {[dict exists $args_d downloads]} {

            set key listdownloads
            return -code break -errorcode rw_ok 
        }
        if {[dict exists $args_d dwnl]} {

            set key download_doc
            return -code break -errorcode rw_ok 

        }

        return -code continue -errorcode rw_continue 
    }

    ::itcl::body Downloads::init {args} {

        set downloads_dir [file join $::rivetweb::site_base docs]
        $this key_class_map download_doc ::rwpage::BinaryFile
        $this key_class_map listdownloads ::rwpage::DownloadMgr

        set mm $::rivetweb::menumodel
        set lm $::rivetweb::linkmodel

        set downloads_menu [$mm create_menu downloadsmanager root normal]
        $downloads_menu assign title "Documenti" $::rivetweb::default_lang
        $downloads_menu assign title "Documents" en

        set downloads_link [$lm create FileUpload ""                                    \
                                    { it "Download Documenti" en "Documents Download" } \
                                    [dict create downloads 1]                           \
                                    [dict create it "Download documenti"                \
                                                 en "Documents Download"]]
        
        $downloads_menu add_link $downloads_link
    }

    ::itcl::body Downloads::menu_list {page} {
        return [list documenti $downloads_menu]
    }

    ::itcl::body Downloads::create_page_obj {key ooclass reassigned_key} {
        upvar $reassigned_key rkey

        set rkey $key
        
        set p ""
        switch $key {
            download_doc {

                set docid [::rivet::var_qs get dwnl]
                set d     [::barbie::Documenti #auto]
                set nr    [$d fetch $::barbie::dbhandle [list docid $docid] dd]

                if {[::barbie::is_logged] || [::barbie::is_supervisor]} {
                    set filter 1
                } else {
                    set filter [expr $dd(pubblico) == "y"]
                }

                if {($nr > 0) && $filter} {
                    set binary_file [file join $downloads_dir $dd(filename)]
                    set p [$ooclass ::#auto $key $binary_file]
                } else {
                    return -code error "Documento inaccessibile"
                }

                $d destroy

            }
            listdownloads {
                set p [$ooclass ::#auto $key]
                #$p configure -downloads_dir docs
            }
        }

        return $p
    }

}

package provide Downloads 1.0

source [file join $rweb_root tcl after.tcl]