<%@LANGUAGE="VBSCRIPT"%> <% Dim MM_editAction MM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME")) If (Request.QueryString <> "") Then MM_editAction = MM_editAction & "?" & Server.HTMLEncode(Request.QueryString) End If ' boolean to abort record edit Dim MM_abortEdit MM_abortEdit = false %> <% If (CStr(Request("MM_insert")) = "funcionaris") Then If (Not MM_abortEdit) Then ' execute the insert Dim MM_editCmd Set MM_editCmd = Server.CreateObject ("ADODB.Command") MM_editCmd.ActiveConnection = MM_funcionaris_afi_STRING MM_editCmd.CommandText = "INSERT INTO funcionaris (NIF, mail_personal, Centre, Codi_centre, Mail, Localitat, Afiliat, lec1, lec2, lec3, lec4, lec5, lec6, lec7, mobilitzacio1, mobilitzacio2, mobilitzacio3, mobilitzacio4, mobilitzacio5, mobilitzacio6, fun1a, fun1b, fun1c, fun2a, fun2b, fun3a, fun3b, fun3c, fun4a, fun4b) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)" MM_editCmd.Prepared = true MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param1", 202, 1, 50, Request.Form("textfield")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param2", 202, 1, 50, Request.Form("textfield2")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param3", 202, 1, 50, Request.Form("textfield3")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param4", 202, 1, 50, Request.Form("textfield4")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param5", 202, 1, 50, Request.Form("textfield5")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param6", 202, 1, 50, Request.Form("textfield6")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param7", 202, 1, 50, Request.Form("afiliat")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param8", 202, 1, 50, Request.Form("textfield7")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param9", 202, 1, 50, Request.Form("textfield8")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param10", 202, 1, 50, Request.Form("textfield9")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param11", 202, 1, 50, Request.Form("textfield10")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param12", 202, 1, 50, Request.Form("textfield11")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param13", 202, 1, 50, Request.Form("textfield12")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param14", 202, 1, 50, Request.Form("textfield13")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param15", 202, 1, 50, Request.Form("mobi1")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param16", 202, 1, 50, Request.Form("mobi2")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param17", 202, 1, 50, Request.Form("mobi3")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param18", 202, 1, 50, Request.Form("mobi4")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param19", 202, 1, 50, Request.Form("mobi5")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param20", 203, 1, 1073741823, Request.Form("textarea")) ' adLongVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param21", 202, 1, 50, Request.Form("fun1a")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param22", 202, 1, 50, Request.Form("fun1b")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param23", 202, 1, 50, Request.Form("fun1c")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param24", 202, 1, 50, Request.Form("fun2a")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param25", 202, 1, 50, Request.Form("fun2b")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param26", 202, 1, 50, Request.Form("fun3a")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param27", 202, 1, 50, Request.Form("fun3b")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param28", 202, 1, 50, Request.Form("fun3c")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param29", 202, 1, 50, Request.Form("fun4a")) ' adVarWChar MM_editCmd.Parameters.Append MM_editCmd.CreateParameter("param30", 202, 1, 50, Request.Form("fun4b")) ' adVarWChar MM_editCmd.Execute MM_editCmd.ActiveConnection.Close ' append the query string to the redirect URL Dim MM_editRedirectUrl MM_editRedirectUrl = "../cursos04/sec04_ok.asp" If (Request.QueryString <> "") Then If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0) Then MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString Else MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString End If End If Response.Redirect(MM_editRedirectUrl) End If End If %>
CONSULTA LEC
NIF:
E-mail personal:
Centre de treball:
Codi del centre:
E-mail:
Localitat:
Aspectes de la LEC que afecten tots els professionals de l'educació
Valora les següents qüestions: el nombre 0 significa en total desacord i el 4 en total acord. Escriu el número que creguis adient És obligatori omplir tots els camps de l'enquesta
1.La LEC estableix mecanismes efectius que permeten evitar la dualització del sistema educatiu que avui patim
       
2.El projecte de llei millora substancialment l'oferta i qualitat dels ensenyaments no obligatoris
3.El projecte de llei permet augmentar un 10% les ràtios vigents. Això possibilita millorar la qualitat de l'educació a les nostres aules
4. El projecte de la LEC garanteix en el seu conjunt la cohesió social i l'equitat educativa per al conjunt de la ciutadania
5. El projecte de llei conté instruments efectius per aconseguir la igualtat de drets i deures i la gratuïtat a tots els centres educatius
6. La llei ha d'impulsar un Estatut de les Professions Educatives que reguli els drets i deures de tots els que treballin en el mon educatiu.
7. La LEC hauria d'evitar l'externalització dels serveis educatius per part de les administracions públiques
Propostes de mobilització    
En quines d'aquestes accions i mobilitzacions estàs disposat/ada a participar:    
1.Recollida de signatures per lliurar al Parlament SÍ NO
2.Dur a terme actes conjunts amb tota la comunitat educativa SÍ NO
3.Actes i mobilitzacions al teu àmbit territorial SÍ NO
4. Participar en una vaga general del sector el 13 de novembre SÍ NO
5.Si aquestes accions no tenen resultats positius, participar en més jornades de vaga SÍ NO
6.Proposa altres formes de mobilització
       
Aspectes de la LEC que afecten el personal funcionari, interí i substitut del Departament d'Educació
Valora les següents qüestions: el nombre 0 significa en total desacord i el 4 en total acord. Escriu el número que creguis adient
1. Autonomia de centres (TÍTOL VII)
El projecte de llei organitza i regula el concepte d'autonomia. Estàs d'acord amb la manera que ho fa?
a. Pedagògica
b. Organitzativa
c. Gestió de recursos humans i materials

2. Ordenació de Cossos Docents(TÍTOL VIII.CAPÍTOL 3)
Grau d'acord amb que la LEC creï cossos docents propis de la Generalitat
Els cossos docents propis aportaran alguna millora als nostres drets actuals?
3. Catalogació (ART. 101) i provisió (TÍTOL VIII. CAPÍTOL 5) de llocs de treball
La LEC cataloga els llocs de treball en tres tipus. Assenyala el grau d'acord amb aquesta catalogació i provisió de llocs de treball que estableix
a. Ordinaris
        
b. Específics
c. D'especial responsabilitat
4. Promoció professional (TÍTOL VIII. CAPÍTOL 6)
El projecte de llei de la LEC estableix un model de carrera professional que introdueix novetats. Quin grau d'acord tens en cada una d'elles:
a. Adquisició de graus docents, que incorpora avaluació
b. Accés a la categoria Sènior