<%flags> inherit => '/firma/put_firmato.comp' <%perl> $m->clear_buffer; $m->call_next; %# Nome del campo contenente il file scaricato <%method Field_filename>file_firmato %# Firme da cercare nel file firmato <%method Query_firme> select distinct cognome, nome, codice_fiscale from documenti inner join firmatari_documenti on firmatari_documenti.id_documento = documenti.id inner join anagrafiche on firmatari_documenti.id_firmatario = anagrafiche.id where documenti.hash_file = ? %# Per verificare se nel DB e' presente la hash calcolata <%method Query_archivio> select codice, marca_temporale from documenti where hash_file = ?; %# Per aggiornare l'archivio caricando il file firmato <%method Query_update_archivio> update documenti set tsd = ?, file_firmato = ?, file_originale = null, marca_temporale = ?, stato_rapporto = 'firmato' where hash_file = ?;