/trunk/html/FR_admin/FM_student/.sql.columnCondition |
---|
1,0 → 0,0 |
% return('[[TB_t_strade_SqlAs_id]]'); |
% return('[[TB_usr_SqlAs_id]]'); |
/trunk/html/FR_admin/FM_student/.thead.columnSettings |
---|
1,165 → 1,89 |
<%perl> |
if($curfield eq '[[TB_t_strade_SqlAs_id]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_id_IT]]'; |
if($curfield eq '[[TB_usr_SqlAs_id]]') { |
$rettraduction = '[[TB_usr_SqlAs_id_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_cod_servizio]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_cod_servizio_IT]]'; |
if($curfield eq '[[TB_usr_SqlAs_name]]') { |
$rettraduction = '[[TB_usr_SqlAs_name_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
$retmaxlen = '35'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_denominazione]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_denominazione_IT]]'; |
if($curfield eq '[[TB_usr_SqlAs_cognome]]') { |
$rettraduction = '[[TB_usr_SqlAs_cognome_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
$retmaxlen = '35'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_tipo]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_tipo_IT]]'; |
if($curfield eq '[[TB_usr_SqlAs_tel]]') { |
$rettraduction = '[[TB_usr_SqlAs_tel_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
$retmaxlen = '20'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_lunghezza]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_lunghezza_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
if($curfield eq '[[TB_usr_SqlAs_tel2]]') { |
$rettraduction = '[[TB_usr_SqlAs_tel2_IT]]'; |
$retmaxlen = '20'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_nstrada]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_nstrada_IT]]'; |
if($curfield eq '[[TB_usr_SqlAs_creation]]') { |
$rettraduction = '[[TB_usr_SqlAs_creation_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_progressiva_i]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_progressiva_i_IT]]'; |
if($curfield eq '[[TB_usr_SqlAs_profile]]') { |
$rettraduction = '[[TB_usr_SqlAs_profile_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
$retmaxlen = '20'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_localita_i]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_localita_i_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
if($curfield eq '[[TB_usr_SqlAs_password]]') { |
$rettraduction = '[[TB_usr_SqlAs_password_IT]]'; |
$retmaxlen = '8'; |
} |
if($curfield eq '[[TB_usr_SqlAs_zip]]') { |
$rettraduction = '[[TB_usr_SqlAs_zip_IT]]'; |
$retmaxlen = '5'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_progressiva_f]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_progressiva_f_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
if($curfield eq '[[TB_usr_SqlAs_status]]') { |
$rettraduction = '[[TB_usr_SqlAs_status_IT]]'; |
$retmaxlen = '10'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_localita_f]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_localita_f_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
if($curfield eq '[[TB_usr_SqlAs_street]]') { |
$rettraduction = '[[TB_usr_SqlAs_street_IT]]'; |
$retmaxlen = '35'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_pendenza_max]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_pendenza_max_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
if($curfield eq '[[TB_usr_SqlAs_streetnumber]]') { |
$rettraduction = '[[TB_usr_SqlAs_streetnumber_IT]]'; |
$retmaxlen = '15'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_larghezza_min]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_larghezza_min_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
if($curfield eq '[[TB_usr_SqlAs_locality]]') { |
$rettraduction = '[[TB_usr_SqlAs_locality_IT]]'; |
$retmaxlen = '15'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_raggio_curv_min]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_raggio_curv_min_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
if($curfield eq '[[TB_usr_SqlAs_province]]') { |
$rettraduction = '[[TB_usr_SqlAs_province_IT]]'; |
$retmaxlen = '15'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_pendenza_media]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_pendenza_media_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
if($curfield eq '[[TB_usr_SqlAs_obs]]') { |
$rettraduction = '[[TB_usr_SqlAs_obs_IT]]'; |
$retmaxlen = '50'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_larghezza_media]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_larghezza_media_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
if($curfield eq '[[FM_student_USRCLASS]]') { |
$rettraduction = '[[FM_student_USRCLASS_IT]]'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_raggio_curv_medio]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_raggio_curv_medio_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
if($curfield eq '[[FM_student_TEACHERCLASS]]') { |
$rettraduction = '[[FM_student_TEACHERCLASS_IT]]'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_coordinata_x]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_coordinata_x_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_coordinata_y]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_coordinata_y_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_data_1_acquisizione]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_data_1_acquisizione_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_agg_strada]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_agg_strada_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
} |
if($curfield eq '[[TB_stradexsettore_SqlAs_id_settore]]') { |
$rettraduction = '[[TB_stradexsettore_SqlAs_id_settore_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
} |
if($curfield eq '[[TB_stradexsettore_SqlAs_km_da]]') { |
$rettraduction = '[[TB_stradexsettore_SqlAs_km_da_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
} |
if($curfield eq '[[TB_stradexsettore_SqlAs_km_a]]') { |
$rettraduction = '[[TB_stradexsettore_SqlAs_km_a_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
} |
if($curfield eq '[[TB_usr_SqlAs_permision]]') { |
$rettraduction = '[[TB_usr_SqlAs_permision_IT]]'; |
$retmaxlen = '10'; |
185,11 → 109,11 |
if($curfield eq '[[usr_profile_student]]') { |
$rettraduction = '[[usr_profile_student_IT]]'; |
} |
if($curfield eq '[[FM_strada_TIT2_info]]') { |
$rettraduction = '[[FM_strada_TIT2_info_IT]]'; |
if($curfield eq '[[FM_student_TIT2_info]]') { |
$rettraduction = '[[FM_student_TIT2_info_IT]]'; |
} |
if($curfield eq '[[FM_strada_TIT2_settore]]') { |
$rettraduction = '[[FM_strada_TIT2_settore_IT]]'; |
if($curfield eq '[[FM_student_TIT2_address]]') { |
$rettraduction = '[[FM_student_TIT2_address_IT]]'; |
} |
if($cursetting eq 'traduction') { |
return($rettraduction); |
/trunk/html/FR_admin/FM_student/.sql.condition |
---|
1,0 → 0,0 |
%return('[[TB_t_strade_id]]=?'); |
%return('[[TB_usr_id]]=?'); |
/trunk/html/FR_admin/FM_student/.table.name |
---|
1,0 → 0,0 |
% return('[[TB_NAME_strade]]'); |
% return('[[TB_NAME_usr]]'); |
/trunk/html/FR_admin/FM_student/autohandler |
---|
7,7 → 7,7 |
%#<& .footer &> |
%# |
<%method title> |
Form Strade |
Form Student |
</%method> |
%# |
<%init> |
/trunk/html/FR_admin/FM_student/.sql.columnAs |
---|
1,0 → 0,0 |
%return('id_strade,cod_servizio,nstrada,denominazione,tipo,progressiva_i,localita_i,progressiva_f,localita_f,lunghezza,pendenza_max,larghezza_min,raggio_curv_min,pendenza_media,larghezza_media,raggio_curv_medio,coordinata_x,coordinata_y,data_1_acquisizione,agg_strada'); |
%return('id,profile,name,cognome,password,status,creation,tel,tel2,street,streetnumber,zip,locality,province,obs,permision'); |
/trunk/html/FR_admin/F2_class/.sql.columnCondition |
---|
1,0 → 0,0 |
% return('[[TB_strada_SqlAs_id]]'); |
% return('[[TB_class_SqlAs_id]]'); |
/trunk/html/FR_admin/F2_class/.thead.columnSettings |
---|
1,63 → 1,53 |
<%perl> |
if($curfield eq '[[TB_t_strade_SqlAs_id]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_id_IT]]'; |
if($curfield eq '[[TB_class_SqlAs_id]]') { |
$rettraduction = '[[TB_class_SqlAs_id_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
$retmaxlen = '9'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_id_settore]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_id_settore_IT]]'; |
if($curfield eq '[[TB_class_SqlAs_descshort]]') { |
$rettraduction = '[[TB_class_SqlAs_descshort_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
$retmaxlen = '30'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_km_da]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_km_da_IT]]'; |
if($curfield eq '[[TB_class_SqlAs_permision]]') { |
$rettraduction = '[[TB_class_SqlAs_permision_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
} |
if($curfield eq '[[TB_t_strade_SqlAs_km_a]]') { |
$rettraduction = '[[TB_t_strade_SqlAs_km_a_IT]]'; |
if($curfield eq '[[TB_class_SqlAs_desclong]]') { |
$rettraduction = '[[TB_class_SqlAs_desclong_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
$retmaxlen = '12'; |
} |
if($curfield eq '[[TB_usr_SqlAs_permision]]') { |
$rettraduction = '[[TB_usr_SqlAs_permision_IT]]'; |
$retmaxlen = '10'; |
if($curfield eq '[[TB_class_SqlAs_siteok]]') { |
$rettraduction = '[[TB_class_SqlAs_siteok_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
} |
if($curfield eq '[[BT_ok]]') { |
$rettraduction = '[[BT_ok_IT]]'; |
if($curfield eq '[[TB_class_SqlAs_sitebad]]') { |
$rettraduction = '[[TB_class_SqlAs_sitebad_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
} |
if($curfield eq '[[BT_cancel]]') { |
$rettraduction = '[[BT_cancel_IT]]'; |
if($curfield eq '[[TB_class_SqlAs_sitefm]]') { |
$rettraduction = '[[TB_class_SqlAs_sitefm_IT]]'; |
$retalign = 'center'; |
$retwidth = '20%'; |
} |
if($curfield eq '[[BT_delete_usr]]') { |
$rettraduction = '[[BT_delete_usr_IT]]'; |
if($curfield eq '[[BT_delete_class]]') { |
$rettraduction = '[[BT_delete_class_IT]]'; |
} |
if($curfield eq '[[usr_profile_gestion]]') { |
$rettraduction = '[[usr_profile_gestion_IT]]'; |
if($curfield eq '[[F2_class_TIT2_teachers]]') { |
$rettraduction = '[[F2_class_TIT2_teachers_IT]]'; |
} |
if($curfield eq '[[usr_profile_teacher]]') { |
$rettraduction = '[[usr_profile_teacher_IT]]'; |
if($curfield eq '[[F2_class_TIT2_students]]') { |
$rettraduction = '[[F2_class_TIT2_students_IT]]'; |
} |
if($curfield eq '[[usr_profile_admin]]') { |
$rettraduction = '[[usr_profile_admin_IT]]'; |
if($curfield eq '[[F2_class_TIT2_info]]') { |
$rettraduction = '[[F2_class_TIT2_info_IT]]'; |
} |
if($curfield eq '[[usr_profile_student]]') { |
$rettraduction = '[[usr_profile_student_IT]]'; |
} |
if($curfield eq '[[FM_strada_TIT2_info]]') { |
$rettraduction = '[[FM_strada_TIT2_info_IT]]'; |
} |
if($curfield eq '[[FM_strada_TIT2_address]]') { |
$rettraduction = '[[FM_strada_TIT2_address_IT]]'; |
} |
if($cursetting eq 'traduction') { |
return($rettraduction); |
} |
/trunk/html/FR_admin/F2_class/.sql.condition |
---|
1,0 → 0,0 |
%return('[[TB_strada_id]]=?'); |
%return('[[TB_class_id]]=?'); |
/trunk/html/FR_admin/F2_class/.table.name |
---|
1,0 → 0,0 |
% return('[[TB_NAME_stradexsettore]]'); |
% return('[[TB_NAME_class]]'); |
/trunk/html/FR_admin/F2_class/.sql.columnAs |
---|
1,0 → 0,0 |
%return('id_strade,id_settore,km_da,km_a'); |
%return('id,descshort,desclong,siteok,sitebad,sitefm,permision'); |
/trunk/html/FR_admin/F2_class/.access.profile |
---|
1,0 → 0,0 |
% return('[[usr_profile_admin]]'); |
% return('[[usr_profile_gestion]]'); |
/trunk/html/include/styles.css |
---|
212,7 → 212,7 |
} |
INPUT.DATE |
{ |
BEHAVIOR: url(/htdocs/include/DATE.htc); |
BEHAVIOR: url(/cms/include/DATE.htc); |
BORDER-RIGHT: #000000 0px solid; |
BORDER-TOP: #000000 0px solid; |
FONT-FAMILY: Verdana; |
224,7 → 224,7 |
} |
INPUT.LOGIN |
{ |
BEHAVIOR: url(/htdocs/include/LOGIN.htc); |
BEHAVIOR: url(/cms/include/LOGIN.htc); |
BORDER-RIGHT: #000000 0px solid; |
BORDER-TOP: #000000 0px solid; |
FONT-FAMILY: Verdana; |
236,7 → 236,7 |
} |
INPUT.PASS |
{ |
BEHAVIOR: url(/htdocs/include/PASS.htc); |
BEHAVIOR: url(/cms/include/PASS.htc); |
BORDER-RIGHT: #000000 0px solid; |
BORDER-TOP: #000000 0px solid; |
FONT-FAMILY: Verdana; |
248,7 → 248,7 |
} |
INPUT.CLASS |
{ |
BEHAVIOR: url(/htdocs/include/CLASS.htc); |
BEHAVIOR: url(/cms/include/CLASS.htc); |
BORDER-RIGHT: #000000 0px solid; |
BORDER-TOP: #000000 0px solid; |
FONT-FAMILY: Verdana; |
/trunk/html/dbconnect |
---|
1,7 → 1,7 |
<%perl> |
my $dbh_cms = DBI->connect([[DB_StrConnect]]) or die "Cant connect dbh_cms;" . $DBI::strerr; |
# DBI->trace(2, '[[log_trace_dbconnect]]'); |
DBI->trace(1); |
DBI->trace(1, '[[log_trace_dbconnect]]'); |
# DBI->trace(1); |
$dbh_cms->{RaiseError} = $raiseError; |
$dbh_cms->{AutoCommit} = $autoCommit; |
$dbh_cms->do('set DateStyle to SQL, EUROPEAN'); |
/trunk/html/FR_teacher/FM_control/class.html |
---|
238,6 → 238,11 |
} |
$cmd_action = 'enableclass'; |
my $curaula = _getField($dbh, 'classlayout', 'id', 'where pcip=?', $remoteIp); ###030128 |
my $classpersis = _getField($dbh, 'class', 'classroompersistent', 'where id=?', $classid); ###030128 |
$rooms = "-room $curaula"; |
$rooms .= ($classpersis) ? ' -room ' . $classpersis : ''; |
if($classpermision =~ m/[[class_permision_YI]]/ ){ |
my $listusr4web = ''; |
if($classpermision =~ m/[[usr_permision_WW]]/){ |
244,10 → 249,6 |
$listusr4web = _getStudentOfClass($dbh, $classid, '4web'); |
} |
my $teacherid = _getUsrConnectInfo($dbh, 'usrid'); |
my $curaula = _getField($dbh, 'classlayout', 'id', 'where pcip=?', $remoteIp); ###030128 |
my $classpersis = _getField($dbh, 'class', 'classroompersistent', 'where id=?', $classid); ###030128 |
$rooms = "-room $curaula"; |
$rooms .= ($classpersis) ? ' -room ' . $classpersis : ''; |
my $sitefm = _getField($dbh, 'class', 'sitefm', 'where id=?', $classid); |
my $siteok = _getField($dbh, 'class', 'siteok', 'where id=?', $classid); |
my $sitebad = _getField($dbh, 'class', 'sitebad', 'where id=?', $classid); |
/trunk/html/autohandler |
---|
351,8 → 351,8 |
$raiseError = 1; |
} |
my $dbh_cms = DBI->connect([[DB_StrConnect]]) or die "Cant connect dbh_cms;" . $DBI::strerr; |
# DBI->trace(2, '[[log_trace_dbconnect]]'); |
DBI->trace(1); |
DBI->trace(1, '[[log_trace_dbconnect]]'); |
# DBI->trace(1); |
$dbh_cms->{RaiseError} = $raiseError; |
$dbh_cms->{AutoCommit} = $autoCommit; |
$dbh_cms->do('set DateStyle to SQL, EUROPEAN'); |