From: Martín Marrese Date: Tue, 25 Mar 2003 15:48:07 +0000 (+0000) Subject: MUCHAS COSAS. X-Git-Tag: svn_import~132 X-Git-Url: https://git.llucax.com/mecon/samurai.git/commitdiff_plain/d7bfcaefea9dad24808570a7369bfbb93e581eb0 MUCHAS COSAS. Agregue los hooks --- diff --git a/doc/SAMURAI_v1.rtf b/doc/SAMURAI_v1.rtf index ac9af33..df2faeb 100644 --- a/doc/SAMURAI_v1.rtf +++ b/doc/SAMURAI_v1.rtf @@ -1,12 +1,12 @@ {\rtf1\ansi\ansicpg1252\uc1 \deff28\deflang3082\deflangfe3082{\fonttbl{\f0\froman\fcharset0\fprq2{\*\panose 02020603050405020304}Times New Roman;}{\f2\fmodern\fcharset0\fprq1{\*\panose 02070309020205020404}Courier New;} {\f3\froman\fcharset2\fprq2{\*\panose 05050102010706020507}Symbol;}{\f14\fnil\fcharset2\fprq2{\*\panose 05000000000000000000}Wingdings;}{\f28\fswiss\fcharset0\fprq2{\*\panose 020b0604030504040204}Verdana;} -{\f29\fswiss\fcharset0\fprq2{\*\panose 020b0807020203060204}BankGothic Md BT;}{\f34\froman\fcharset238\fprq2 Times New Roman CE;}{\f35\froman\fcharset204\fprq2 Times New Roman Cyr;}{\f37\froman\fcharset161\fprq2 Times New Roman Greek;} -{\f38\froman\fcharset162\fprq2 Times New Roman Tur;}{\f39\froman\fcharset177\fprq2 Times New Roman (Hebrew);}{\f40\froman\fcharset178\fprq2 Times New Roman (Arabic);}{\f41\froman\fcharset186\fprq2 Times New Roman Baltic;} -{\f50\fmodern\fcharset238\fprq1 Courier New CE;}{\f51\fmodern\fcharset204\fprq1 Courier New Cyr;}{\f53\fmodern\fcharset161\fprq1 Courier New Greek;}{\f54\fmodern\fcharset162\fprq1 Courier New Tur;}{\f55\fmodern\fcharset177\fprq1 Courier New (Hebrew);} -{\f56\fmodern\fcharset178\fprq1 Courier New (Arabic);}{\f57\fmodern\fcharset186\fprq1 Courier New Baltic;}{\f258\fswiss\fcharset238\fprq2 Verdana CE;}{\f259\fswiss\fcharset204\fprq2 Verdana Cyr;}{\f261\fswiss\fcharset161\fprq2 Verdana Greek;} -{\f262\fswiss\fcharset162\fprq2 Verdana Tur;}{\f265\fswiss\fcharset186\fprq2 Verdana Baltic;}{\f270\fswiss\fcharset162\fprq2 BankGothic Md BT Tur;}}{\colortbl;\red0\green0\blue0;\red0\green0\blue255;\red0\green255\blue255;\red0\green255\blue0; -\red255\green0\blue255;\red255\green0\blue0;\red255\green255\blue0;\red255\green255\blue255;\red0\green0\blue128;\red0\green128\blue128;\red0\green128\blue0;\red128\green0\blue128;\red128\green0\blue0;\red128\green128\blue0;\red128\green128\blue128; -\red192\green192\blue192;\red230\green230\blue230;\red255\green255\blue255;}{\stylesheet{\qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 \snext0 Normal;}{ +{\f124\froman\fcharset238\fprq2 Times New Roman CE;}{\f125\froman\fcharset204\fprq2 Times New Roman Cyr;}{\f127\froman\fcharset161\fprq2 Times New Roman Greek;}{\f128\froman\fcharset162\fprq2 Times New Roman Tur;} +{\f129\froman\fcharset177\fprq2 Times New Roman (Hebrew);}{\f130\froman\fcharset178\fprq2 Times New Roman (Arabic);}{\f131\froman\fcharset186\fprq2 Times New Roman Baltic;}{\f140\fmodern\fcharset238\fprq1 Courier New CE;} +{\f141\fmodern\fcharset204\fprq1 Courier New Cyr;}{\f143\fmodern\fcharset161\fprq1 Courier New Greek;}{\f144\fmodern\fcharset162\fprq1 Courier New Tur;}{\f145\fmodern\fcharset177\fprq1 Courier New (Hebrew);} +{\f146\fmodern\fcharset178\fprq1 Courier New (Arabic);}{\f147\fmodern\fcharset186\fprq1 Courier New Baltic;}{\f348\fswiss\fcharset238\fprq2 Verdana CE;}{\f349\fswiss\fcharset204\fprq2 Verdana Cyr;}{\f351\fswiss\fcharset161\fprq2 Verdana Greek;} +{\f352\fswiss\fcharset162\fprq2 Verdana Tur;}{\f355\fswiss\fcharset186\fprq2 Verdana Baltic;}}{\colortbl;\red0\green0\blue0;\red0\green0\blue255;\red0\green255\blue255;\red0\green255\blue0;\red255\green0\blue255;\red255\green0\blue0; +\red255\green255\blue0;\red255\green255\blue255;\red0\green0\blue128;\red0\green128\blue128;\red0\green128\blue0;\red128\green0\blue128;\red128\green0\blue0;\red128\green128\blue0;\red128\green128\blue128;\red192\green192\blue192;\red230\green230\blue230; +\red255\green255\blue255;}{\stylesheet{\qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 \snext0 Normal;}{ \s1\qj \li0\ri0\keepn\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \b\f28\fs20\ul\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 \sbasedon0 \snext0 heading 1;}{ \s2\qj \li0\ri0\keepn\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \b\f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 \sbasedon0 \snext0 heading 2;}{ \s3\qj \li0\ri0\keepn\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\ul\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 \sbasedon0 \snext0 heading 3;}{ @@ -24,7 +24,7 @@ \fi-360\li5040\jclisttab\tx5040 }{\listlevel\levelnfc23\levelnfcn23\leveljc0\leveljcn0\levelfollow0\levelstartat1\levelspace0\levelindent0{\leveltext\leveltemplateid201981955\'01o;}{\levelnumbers;}\f2\chbrdr\brdrnone\brdrcf1 \chshdng0\chcfpat1\chcbpat1\fbias0 \fi-360\li5760\jclisttab\tx5760 }{\listlevel\levelnfc23\levelnfcn23\leveljc0\leveljcn0\levelfollow0\levelstartat1\levelspace0\levelindent0{\leveltext\leveltemplateid201981957\'01\u-3929 ?;}{\levelnumbers;}\f14\chbrdr \brdrnone\brdrcf1 \chshdng0\chcfpat1\chcbpat1\fbias0 \fi-360\li6480\jclisttab\tx6480 }{\listname ;}\listid1648389061}}{\*\listoverridetable{\listoverride\listid1648389061\listoverridecount0\ls1}}{\info{\title ADMINISTRACI\'d3N DE USUARIOS} -{\author Dir. Gral. de Inform\'e1tica}{\operator Dir. Gral. de Inform\'e1tica}{\creatim\yr2003\mo3\dy6\hr19\min20}{\revtim\yr2003\mo3\dy6\hr19\min20}{\printim\yr2003\mo2\dy6\hr11\min4}{\version2}{\edmins2}{\nofpages6}{\nofwords513}{\nofchars2927} +{\author Dir. Gral. de Inform\'e1tica}{\operator Dir. Gral. de Inform\'e1tica}{\creatim\yr2003\mo3\dy6\hr19\min20}{\revtim\yr2003\mo3\dy24\hr12\min37}{\printim\yr2003\mo2\dy6\hr11\min4}{\version15}{\edmins21}{\nofpages7}{\nofwords513}{\nofchars2927} {\*\company Ministerio de Econom\'eda}{\nofcharsws0}{\vern8249}}\paperw11907\paperh16840\margl1134\margr1134\margt1134\margb1134 \deftab708\widowctrl\ftnbj\aenddoc\hyphhotz425\noxlattoyen\expshrtn\noultrlspc\dntblnsbdb\nospaceforul\hyphcaps0\formshade\horzdoc\dgmargin\dghspace180\dgvspace180\dghorigin1134\dgvorigin1134\dghshow1\dgvshow1 \jexpand\viewkind1\viewscale75\pgbrdrhead\pgbrdrfoot\splytwnine\ftnlytwnine\htmautsp\nolnhtadjtbl\useltbaln\alntblind\lytcalctblwd\lyttblrtgr\lnbrkrule \fet0\sectd \psz9\linex0\headery680\footery680\colsx708\endnhere\sectlinegrid360\sectdefaultcl @@ -38,8 +38,8 @@ \par }}{\footer \trowd \trgaph70\trleft-70\trbrdrt\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trftsWidth1\trautofit1\trpaddl70\trpaddr70\trpaddfl3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrnone \clbrdrb\brdrnone \clbrdrr\brdrnone \cltxlrtb\clftsWidth3\clwWidth4889 \cellx4819\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrnone \clbrdrb\brdrnone \clbrdrr\brdrnone \cltxlrtb\clftsWidth3\clwWidth4890 \cellx9709\pard\plain \s16\qj \li0\ri0\widctlpar\intbl \tqc\tx4419\tqr\tx8838\aspalpha\aspnum\faauto\adjustright\rin0\lin0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {\fs18 06-03-2003\cell }\pard \s16\qr \li0\ri0\widctlpar\intbl -\tqc\tx4419\tqr\tx8838\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fs18 P\'e1gina }{\field{\*\fldinst {\fs18 PAGE }}{\fldrslt {\fs18\lang1024\langfe1024\noproof 1}}}{\fs18 de }{\field{\*\fldinst {\fs18 NUMPAGES }}{\fldrslt { -\fs18\lang1024\langfe1024\noproof 6}}}{\fs18 \cell }\pard\plain \qj \li0\ri0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {\trowd \trgaph70\trleft-70\trbrdrt\brdrs\brdrw10 +\tqc\tx4419\tqr\tx8838\aspalpha\aspnum\faauto\adjustright\rin0\lin0 {\fs18 P\'e1gina }{\field{\*\fldinst {\fs18 PAGE }}{\fldrslt {\fs18\lang1024\langfe1024\noproof 6}}}{\fs18 de }{\field{\*\fldinst {\fs18 NUMPAGES }}{\fldrslt { +\fs18\lang1024\langfe1024\noproof 7}}}{\fs18 \cell }\pard\plain \qj \li0\ri0\widctlpar\intbl\aspalpha\aspnum\faauto\adjustright\rin0\lin0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {\trowd \trgaph70\trleft-70\trbrdrt\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trftsWidth1\trautofit1\trpaddl70\trpaddr70\trpaddfl3\trpaddfr3 \clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrnone \clbrdrb\brdrnone \clbrdrr\brdrnone \cltxlrtb\clftsWidth3\clwWidth4889 \cellx4819\clvertalt\clbrdrt\brdrs\brdrw10 \clbrdrl\brdrnone \clbrdrb\brdrnone \clbrdrr\brdrnone \cltxlrtb\clftsWidth3\clwWidth4890 \cellx9709\row }\pard\plain \s16\qj \li0\ri0\widctlpar\tqc\tx4419\tqr\tx8838\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 { @@ -66,8 +66,8 @@ fffffffffffffffffdffffff04000000fefffffffefffffffeffffff060000000700000008000000 ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff -ffffffffffffffffffffffffffffffff52006f006f007400200045006e00740072007900000000000000000000000000000000000000000000000000000000000000000000000000000000000000000016000500ffffffffffffffff02000000111a020000000000c000000000000046000000000000000000000000e044 -ff862ee4c20103000000000200000000000001004f006c00650000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000a000201ffffffffffffffffffffffff00000000000000000000000000000000000000000000000000000000 +ffffffffffffffffffffffffffffffff52006f006f007400200045006e00740072007900000000000000000000000000000000000000000000000000000000000000000000000000000000000000000016000500ffffffffffffffff02000000111a020000000000c0000000000000460000000000000000000000002030 +45521bf2c20103000000000200000000000001004f006c00650000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000a000201ffffffffffffffffffffffff00000000000000000000000000000000000000000000000000000000 0000000000000000000000001400000000000000010043006f006d0070004f0062006a00000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000120002010100000004000000ffffffff0000000000000000000000000000000000000000000000000000 0000000000000000000001000000690000000000000003004f0062006a0049006e0066006f0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000012000201ffffffffffffffffffffffff000000000000000000000000000000000000000000000000 000000000000000000000000030000000400000000000000feffffff02000000fefffffffefffffffeffffff0600000007000000feffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff @@ -220,7 +220,7 @@ e305b301040000002d01020004000000f0010700040000002d01030009000000fa02000001000000 2d0104000300000000000000}{\result {{\pict{\*\picprop\shplid1025{\sp{\sn shapeType}{\sv 75}}{\sp{\sn fFlipH}{\sv 0}}{\sp{\sn fFlipV}{\sv 0}}{\sp{\sn pictureGray}{\sv 0}}{\sp{\sn pictureBiLevel}{\sv 0}} {\sp{\sn pictureActive}{\sv 0}}{\sp{\sn fFilled}{\sv 0}}{\sp{\sn fHitTestFill}{\sv 1}}{\sp{\sn fillShape}{\sv 1}}{\sp{\sn fillUseRect}{\sv 0}}{\sp{\sn fNoFillHitTest}{\sv 0}} {\sp{\sn fLine}{\sv 0}}{\sp{\sn fLayoutInCell}{\sv 1}}{\sp{\sn fReallyHidden}{\sv 0}}{\sp{\sn fScriptAnchor}{\sv 0}}{\sp{\sn fFakeMaster}{\sv 0}}{\sp{\sn fLayoutInCell}{\sv 1}}}\picscalex85\picscaley85\piccropl0\piccropr0\piccropt0\piccropb0 -\picw19798\pich9320\picwgoal11224\pichgoal5284\wmetafile8\bliptag-632718687\blipupi-109{\*\blipuid da497aa17dc6fe368f14c14a611cf037} +\picw19798\pich9320\picwgoal11224\pichgoal5284\wmetafile8\bliptag-375662658\blipupi-109{\*\blipuid e99bd7bee9998690563308cdb4574b6b} 010009000003d90a00000800560000000000050000000b0200000000050000000c024d042209050000000902ffffff0005000000010200000000040000000201 02000500000001020000000007000000fc020000ffffff000000040000002d01000009000000fa02000001000000000000002200040000002d0101000e000000 240305000700c2003301c20033010700070007000700c20009000000fa02000000000000000000002200040000002d01020007000000fc020100000000000000 @@ -307,7 +307,7 @@ a80108000000250302004003b3014003c90108000000250302004003b3013503c901080000002503 020048012602330126020800000025030200480126023301310208000000250302004801260233011c02080000002503020089021c0289023102080000002503 020094021c0294023102040000002d01020004000000f0010700040000002d010500040000002d010400040000002d010000040000002d0106000c0000002403 0400d6010f02d6013d0206023d0206020f02040000002d010200040000002d0103000400000008010000050000000a0200000000040000000201010004000000 -2e01180005000000090200000000040000002d010500070000002105020052323002d901040000002d0104000300000000000000000000000000000000000000}}}}}{ +2e01180005000000090200000000040000002d010500070000002105020052323002d901040000002d010400030000000000000000000000000000000000000000000000}}}}}{ \par \par \par }{\ul @@ -317,7 +317,9 @@ a80108000000250302004003b3014003c90108000000250302004003b3013503c901080000002503 \par }\pard\plain \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {Cada uno de los perfiles administrados. \par }{\ul id_perfil \par }{desc_perfil -\par tipo_perfil* +\par tipo_perfil * +\par fecha +\par responsable \par \par }\pard\plain \s15\qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 { \par }\pard\plain \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {\b PERFIL / SISTEMA}{ (ENT)}{\b @@ -325,36 +327,46 @@ a80108000000250302004003b3014003c90108000000250302004003b3013503c901080000002503 \par }{Asociaci\'f3n entre los perfiles y el sistema al cual corresponden. \par }{\ul R3 \par R4 -\par }\pard\plain \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 { +\par }\pard\plain \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {fecha +\par responsable \par }\pard\plain \s15\qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 { +\par \par }\pard\plain \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {\b PERFIL / SISTEMA / USUARIO }{(ENT) }{\b \par }\pard\plain \s15\qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {\i De Dependencia Asociativa \par }{Asociaci\'f3n entre los usuarios y los perfiles a los que est\'e1n asignados en cada uno de los sistemas. \par }\pard\plain \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {\ul R1 \par }\pard\plain \s3\qj \li0\ri0\keepn\widctlpar\aspalpha\aspnum\faauto\outlinelevel2\adjustright\rin0\lin0\itap0 \f28\fs20\ul\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {R2 -\par }\pard\plain \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 { +\par }\pard\plain \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {fecha +\par responsable \par }{\ul -\par }{\b \page PERMISO }{(ENT)}{\b +\par }{\b +\par PERMISO }{(ENT)}{\b \par }\pard\plain \s15\qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {\i Fundamental \par }{Cada uno de los permisos administrados. \par }\pard\plain \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {\ul id_permiso \par }\pard\plain \s15\qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {desc_permiso -\par }\pard\plain \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 { +\par }\pard\plain \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {fecha +\par responsable \par }\pard\plain \s15\qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 { +\par \par }\pard\plain \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {\b PERMISO / PERFIL / SISTEMA }{(ENT)}{\b \par }\pard\plain \s15\qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {\i De Dependencia Asociativa \par }{Asociaci\'f3n entre los permisos y el perfil del sistema al cual corresponden. \par }{\ul R5 \par R7 -\par }\pard\plain \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 { +\par }\pard\plain \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {fecha +\par responsable \par }\pard\plain \s15\qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 { +\par \par }\pard\plain \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {\b PERMISO / SISTEMA }{(ENT)}{\b \par }\pard\plain \s15\qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {\i De Dependencia Asociativa \par }{Asociaci\'f3n entre los permisos y el sistema al que corresponden. \par }\pard\plain \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {\ul R6 \par }\pard\plain \s3\qj \li0\ri0\keepn\widctlpar\aspalpha\aspnum\faauto\outlinelevel2\adjustright\rin0\lin0\itap0 \f28\fs20\ul\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {R8 -\par }\pard\plain \s15\qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {observaciones * -\par }\pard\plain \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {\ul +\par }\pard\plain \s15\qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {\ul observaciones}{ * +\par fecha +\par }\pard\plain \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {responsable +\par }{\ul \par \par }\pard\plain \s2\qj \li0\ri0\keepn\widctlpar\aspalpha\aspnum\faauto\outlinelevel1\adjustright\rin0\lin0\itap0 \b\f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {R1 }{\b0 (REL)}{ \par }\trowd \trgaph70\trleft-70\trbrdrt\brdrs\brdrw10 \trbrdrl\brdrs\brdrw10 \trbrdrb\brdrs\brdrw10 \trbrdrr\brdrs\brdrw10 \trbrdrh\brdrs\brdrw10 \trbrdrv\brdrs\brdrw10 \trftsWidth1\trautofit1\trpaddl70\trpaddr70\trpaddfl3\trpaddfr3 \clvertalc\clbrdrt @@ -567,7 +579,9 @@ a80108000000250302004003b3014003c90108000000250302004003b3013503c901080000002503 \par fecha_inicio \par fecha_fin \par fecha_implementacion -\par contacto* +\par contacto * +\par fecha +\par responsable \par }{\ul \par \par }\pard\plain \s2\qj \li0\ri0\keepn\widctlpar\aspalpha\aspnum\faauto\outlinelevel1\adjustright\rin0\lin0\itap0 \b\f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {USUARIO }{\b0 (ENT)}{ @@ -579,7 +593,6 @@ a80108000000250302004003b3014003c90108000000250302004003b3013503c901080000002503 \par fecha \par }{\ul \par -\par \page \par }{* }{\ul Observaciones: \par \par {\listtext\pard\plain\fs20 \hich\af0\dbch\af0\loch\f0 -\tab}}\pard \qj \fi-360\li720\ri0\widctlpar\jclisttab\tx720\aspalpha\aspnum\faauto\ls1\adjustright\rin0\lin720\itap0 {La entidad }{\i USUARIO}{ obtiene los datos autom\'e1 @@ -590,8 +603,8 @@ ticamente a partir de los usuarios que se loguean en Intranet. \par El atributo }{\i fecha}{ contiene el momento del \'faltimo logueo del usuario a Intranet. (cada login reemplaza al anterior) \par De esta forma, la descentralizaci\'f3n de la asignaci\'f3n de permisos, permite que el usuario administrador de un determinado sistema asigne permisos a nuevos usuarios sin necesidad de conocer otra dato m\'e1 s que el login del usuario. (el resto de los datos son obtenidos de la entidad }{\i USUARIO}{, previamente cargada) -\par }\pard\plain \s17\qj \li708\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin708\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 { -Obviamente esto implica que los usuarios a los que se le asignen permisos deben haberse logueado previamente en Intranet. +\par }\pard\plain \s17\qj \li708\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin708\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 {Obviamente esto im +plica que los usuarios a los que se le asignen permisos deben haberse logueado previamente en Intranet. \par }\pard\plain \qj \li708\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin708\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 { \par El atributo }{\i fecha }{de la entidad }{\i USUARIO}{ es necesario porque, peri\'f3dicamente, la entidad es depurada, eliminando todos aquellos usuarios que no tengan ning\'fa n permiso asignado y que no se hayan logueado a Intranet desde un determinado tiempo (por ejemplo, un mes). @@ -604,8 +617,8 @@ digo de dependencia deseado, permitiendo que un mismo usuario pueda ver las band \par {\listtext\pard\plain\fs20 \hich\af0\dbch\af0\loch\f0 -\tab}}\pard \qj \fi-360\li720\ri0\widctlpar\jclisttab\tx720\aspalpha\aspnum\faauto\ls1\adjustright\rin0\lin720\itap0 {Los datos del personal de la Ex \endash Coordinaci\'f3n \'c1 rea Desarrollo y Mantenimiento involucrado en el desarrollo de cada uno de los sistemas, forman parte de la entidad }{\i USUARIO,}{ relacionada al sistema correspondiente mediante la asignaci\'f3n de un perfil, identificando el rol que desempe\'f1\'f3 la persona (ejs.: programador, dise\'f1ador gr\'e1fico, analista de sistemas, etc.). -\par }\pard \qj \li708\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin708\itap0 {El atributo }{\i tipo_perfil}{ de la entidad }{\i PERFIL}{ - diferencia perfiles internos y externos, es decir, si se trata de perfiles definidos para usuarios de los sistemas, o bien de roles desempe\'f1ados durante el desarrollo del proyecto (perfiles privados). +\par }\pard \qj \li708\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin708\itap0 {El atributo }{\i tipo_perfil}{ de la entidad }{\i PERFIL}{ diferencia perfiles internos y externos, es decir, si se trata de perfiles d +efinidos para usuarios de los sistemas, o bien de roles desempe\'f1ados durante el desarrollo del proyecto (perfiles privados). \par }\pard \qj \li360\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin360\itap0 { \par {\listtext\pard\plain\fs20 \hich\af0\dbch\af0\loch\f0 -\tab}}\pard \qj \fi-360\li720\ri0\widctlpar\jclisttab\tx720\aspalpha\aspnum\faauto\ls1\adjustright\rin0\lin720\itap0 {El atributo }{\i contacto}{ de la entidad }{\i SISTEMA}{ contiene todos los datos necesarios a fin de poder identificar a las personas que solicitaron el sistema. @@ -615,119 +628,131 @@ rea Desarrollo y Mantenimiento involucrado en el desarrollo de cada uno de los s \par E-mail: ----- \par \'c1rea: ----- \par }\pard \qj \li360\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin360\itap0 { -\par }\pard \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 { +\par {\listtext\pard\plain\fs20 \hich\af0\dbch\af0\loch\f0 -\tab}}\pard \qj \fi-360\li720\ri0\widctlpar\jclisttab\tx720\aspalpha\aspnum\faauto\ls1\adjustright\rin0\lin720\itap0 {Cada una de las entidades contiene los atributos }{\i fecha}{ y }{\i responsable}{ + que representan el momento en que se realiz\'f3 el \'faltimo cambio en el registro y el usuario que lo llev\'f3 a cabo. +\par }\pard \qj \li708\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin708\itap0 {Estos dos campos sirven para llevar un control de qui\'e9n y en qu\'e9 momento se asignan nuevos permisos, se crean nuevos perfiles, etc. \par }\pard\plain \s2\qj \li0\ri0\keepn\widctlpar\aspalpha\aspnum\faauto\outlinelevel1\adjustright\rin0\lin0\itap0 \b\f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 { \par \page \par Dise\'f1o F\'edsico \par }\pard\plain \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \f28\fs20\lang3082\langfe3082\cgrid\langnp3082\langfenp3082 { \par \par -\par }\pard \ql \li0\ri0\widctlpar\faauto\rin0\lin0\itap0 {\f29\fs22\lang2058\langfe3082\langnp2058 # MySQL +\par }\pard \ql \li0\ri0\widctlpar\faauto\rin0\lin0\itap0 {\f2\fs22\lang2058\langfe3082\langnp2058 # MySQL \par # -\par # Base de Datos: PERMISOS +\par # Base de Datos: samurai \par #-------------------------------------------------------- \par # \par \par \par # \par # Estructura de la tabla 'perfil' -\par }{\f29\fs22\lang1033\langfe3082\langnp1033 # +\par }{\f2\fs22\lang1033\langfe3082\langnp1033 # \par \par CREATE TABLE perfil ( \par id_perfil bigint(20) NOT NULL auto_increment, -\par }{\f29\fs22\lang2058\langfe3082\langnp2058 desc_perfil varchar(50) , +\par }{\f2\fs22\lang2058\langfe3082\langnp2058 desc_perfil varchar(50), \par tipo_perfil char(1), -\par }{\f29\fs22\lang1033\langfe3082\langnp1033 PRIMARY KEY (id_perfil) -\par }{\f29\fs22\lang2058\langfe3082\langnp2058 ) +\par }{\f2\fs22\lang1033\langfe3082\langnp1033 fch_ult_modif timestamp, +\par responsable varchar(20), +\par PRIMARY KEY (id_perfil) +\par }{\f2\fs22\lang2058\langfe3082\langnp2058 ); \par \par \par # \par # Estructura de la tabla 'perfil_sist' -\par }{\f29\fs22\lang1033\langfe3082\langnp1033 # +\par }{\f2\fs22\lang1033\langfe3082\langnp1033 # \par \par CREATE TABLE perfil_sist ( -\par id_perfil bigint(20) NOT NULL , -\par id_sistema bigint(20) NOT NULL , -\par PRIMARY KEY (id_perfil,id_sistema) -\par }{\f29\fs22\lang2058\langfe3082\langnp2058 ) +\par id_perfil bigint(20) NOT NULL, +\par id_sistema bigint(20) NOT NULL, +\par fch_ult_modif timestamp, +\par responsable varchar(20), +\par PRIMARY KEY (id_perfil, id_sistema) +\par }{\f2\fs22\lang2058\langfe3082\langnp2058 ); \par \par \par # \par # Estructura de la tabla 'perfil_sist_usuario' -\par }{\f29\fs22\lang1033\langfe3082\langnp1033 # +\par }{\f2\fs22\lang1033\langfe3082\langnp1033 # \par \par CREATE TABLE perfil_sist_usuario ( -\par login varchar(20) NOT NULL , -\par id_perfil bigint(20) NOT NULL , -\par id_sistema bigint(20) NOT NULL , -\par PRIMARY KEY (login,id_perfil,id_sistema) -\par }{\f29\fs22\lang2058\langfe3082\langnp2058 ) +\par login varchar(20) NOT NULL, +\par id_perfil bigint(20) NOT NULL, +\par id_sistema bigint(20) NOT NULL, +\par fch_ult_modif timestamp, +\par responsable varchar(20), +\par PRIMARY KEY (login, id_perfil, id_sistema) +\par }{\f2\fs22\lang2058\langfe3082\langnp2058 ); \par \par \par # \par # Estructura de la tabla 'perm_perfil_sist' -\par }{\f29\fs22\lang1033\langfe3082\langnp1033 # +\par }{\f2\fs22\lang1033\langfe3082\langnp1033 # \par \par CREATE TABLE perm_perfil_sist ( -\par id_permiso bigint(20) NOT NULL , -\par id_perfil bigint(20) NOT NULL , -\par id_sistema bigint(20) NOT NULL , -\par PRIMARY KEY (id_permiso,id_perfil,id_sistema) -\par }{\f29\fs22\lang2058\langfe3082\langnp2058 ) -\par \page +\par id_permiso bigint(20) NOT NULL, +\par id_perfil bigint(20) NOT NULL, +\par id_sistema bigint(20) NOT NULL, +\par fch_ult_modif timestamp, +\par responsable varchar(20), +\par PRIMARY KEY (id_permiso, id_perfil, id_sistema) +\par }{\f2\fs22\lang2058\langfe3082\langnp2058 ); +\par \par \par # \par # Estructura de la tabla 'perm_sist' -\par }{\f29\fs22\lang1033\langfe3082\langnp1033 # +\par }{\f2\fs22\lang1033\langfe3082\langnp1033 # \par \par CREATE TABLE perm_sist ( -\par id_permiso bigint(20) NOT NULL , -\par id_sistema bigint(20) NOT NULL , -\par }{\f29\fs22\lang2058\langfe3082\langnp2058 observaciones varchar(255) , -\par PRIMARY KEY (id_permiso,id_sistema) -\par ) +\par id_permiso bigint(20) NOT NULL, +\par id_sistema bigint(20) NOT NULL, +\par }{\f2\fs22\lang2058\langfe3082\langnp2058 observaciones varchar(255), +\par fch_ult_modif timestamp, +\par responsable varchar(20), +\par PRIMARY KEY (id_permiso, id_sistema, observaciones) +\par ); \par \par \par # \par # Estructura de la tabla 'permiso' -\par }{\f29\fs22\lang1033\langfe3082\langnp1033 # +\par }{\f2\fs22\lang1033\langfe3082\langnp1033 # \par \par CREATE TABLE permiso ( \par id_permiso bigint(20) NOT NULL auto_increment, -\par }{\f29\fs22\lang2058\langfe3082\langnp2058 desc_permiso varchar(50) , -\par }{\f29\fs22\lang1033\langfe3082\langnp1033 PRIMARY KEY (id_permiso) -\par }{\f29\fs22\lang2058\langfe3082\langnp2058 ) +\par }{\f2\fs22\lang2058\langfe3082\langnp2058 desc_permiso varchar(50), +\par }{\f2\fs22\lang1033\langfe3082\langnp1033 fch_ult_modif timestamp, +\par responsable varchar(20), +\par PRIMARY KEY (id_permiso) +\par }{\f2\fs22\lang2058\langfe3082\langnp2058 ); \par \par \par # \par Estructura de la tabla 'sistema' -\par }{\f29\fs22\lang1033\langfe3082\langnp1033 # +\par }{\f2\fs22\lang1033\langfe3082\langnp1033 # \par \par CREATE TABLE sistema ( \par id_sistema bigint(20) NOT NULL auto_increment, -\par }{\f29\fs22\lang2058\langfe3082\langnp2058 nombre_sistema varchar(50) , +\par }{\f2\fs22\lang2058\langfe3082\langnp2058 nombre_sistema varchar(50), \par desc_sistema text, \par fecha_inicio date, \par fecha_fin date, \par fecha_implementacion date, -\par }{\f29\fs22\lang1033\langfe3082\langnp1033 contacto text, +\par }{\f2\fs22\lang1033\langfe3082\langnp1033 contacto text, +\par fch_ult_modif timestamp, +\par responsable varchar(20), \par PRIMARY KEY (id_sistema) -\par }{\f29\fs22\lang2058\langfe3082\langnp2058 ) +\par }{\f2\fs22\lang2058\langfe3082\langnp2058 ); \par -\par }\pard \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 {\ul -\par }\pard \ql \li0\ri0\widctlpar\faauto\rin0\lin0\itap0 {\f29\fs22\lang2058\langfe3082\langnp2058 # +\par }\pard \qj \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 {\f2\ul +\par }\pard \ql \li0\ri0\widctlpar\faauto\rin0\lin0\itap0 {\f2\fs22\lang2058\langfe3082\langnp2058 # \par # Estructura de la tabla 'usuario' -\par }{\f29\fs22\lang1033\langfe3082\langnp1033 # +\par }{\f2\fs22\lang1033\langfe3082\langnp1033 # \par \par CREATE TABLE usuario ( -\par login varchar(20) NOT NULL , -\par }{\f29\fs22\lang2058\langfe3082\langnp2058 nrodoc int(11) , -\par nombre varchar(50) , -\par }{\f29\fs22\lang1033\langfe3082\langnp1033 fecha datetime , +\par login varchar(20) NOT NULL, +\par }{\f2\fs22\lang2058\langfe3082\langnp2058 nrodoc int(11), +\par nombre varchar(50), +\par }{\f2\fs22\lang1033\langfe3082\langnp1033 fch_ult_modif timestamp, \par PRIMARY KEY (login) -\par ) -\par -\par }\pard \qj \li708\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin708\itap0 { -\par -\par +\par );}{ \par }} \ No newline at end of file diff --git a/script/SAMURAI_SQL_Datos_Prueba.txt b/script/SAMURAI_SQL_Datos_Prueba.txt new file mode 100644 index 0000000..f8f9e9e --- /dev/null +++ b/script/SAMURAI_SQL_Datos_Prueba.txt @@ -0,0 +1,40 @@ +INSERT INTO perfil VALUES (1,'ABM Usuarios','E',NOW()); +INSERT INTO perfil VALUES (2,'ABM Permisos','E',NOW()); +INSERT INTO perfil VALUES (3,'ABM Perfiles','E',NOW()); +INSERT INTO perfil_sist VALUES (1,1,NOW()); +INSERT INTO perfil_sist VALUES (2,1,NOW()); +INSERT INTO perfil_sist VALUES (3,1,NOW()); +INSERT INTO perfil_sist_usuario VALUES ('mdegan@mecon',1,1,NOW()); +INSERT INTO perfil_sist_usuario VALUES ('mmarre@mecon',1,1,NOW()); +INSERT INTO perfil_sist_usuario VALUES ('mmarre@mecon',2,1,NOW()); +INSERT INTO perfil_sist_usuario VALUES ('mmarre@mecon',3,1,NOW()); +INSERT INTO perm_perfil_sist VALUES (1,1,1,NOW()); +INSERT INTO perm_perfil_sist VALUES (1,3,1,NOW()); +INSERT INTO perm_perfil_sist VALUES (2,1,1,NOW()); +INSERT INTO perm_perfil_sist VALUES (3,1,1,NOW()); +INSERT INTO perm_perfil_sist VALUES (4,2,1,NOW()); +INSERT INTO perm_perfil_sist VALUES (5,2,1,NOW()); +INSERT INTO perm_perfil_sist VALUES (6,2,1,NOW()); +INSERT INTO perm_perfil_sist VALUES (7,3,1,NOW()); +INSERT INTO perm_perfil_sist VALUES (8,3,1,NOW()); +INSERT INTO perm_perfil_sist VALUES (9,3,1,NOW()); +INSERT INTO perm_sist VALUES (1,1,'',NOW()); +INSERT INTO perm_sist VALUES (2,1,'',NOW()); +INSERT INTO perm_sist VALUES (3,1,'',NOW()); +INSERT INTO perm_sist VALUES (4,1,'',NOW()); +INSERT INTO perm_sist VALUES (5,1,'',NOW()); +INSERT INTO perm_sist VALUES (6,1,'',NOW()); +INSERT INTO perm_sist VALUES (7,1,'',NOW()); +INSERT INTO perm_sist VALUES (8,1,'',NOW()); +INSERT INTO perm_sist VALUES (9,1,'',NOW()); +INSERT INTO permiso VALUES (1,'Agregar Usuario',NOW()); +INSERT INTO permiso VALUES (2,'Modificar Usuario',NOW()); +INSERT INTO permiso VALUES (3,'Eliminar Usuario',NOW()); +INSERT INTO permiso VALUES (4,'Agregar Permiso',NOW()); +INSERT INTO permiso VALUES (5,'Modificar Permiso',NOW()); +INSERT INTO permiso VALUES (6,'Eliminar Permiso',NOW()); +INSERT INTO permiso VALUES (7,'Agregar Perfil',NOW()); +INSERT INTO permiso VALUES (8,'Modificar Perfil',NOW()); +INSERT INTO permiso VALUES (9,'Eliminar Perfil',NOW()); +INSERT INTO sistema VALUES (1,'SAMURAI','Sistema de Administracion y Mantenimiento de Usuarios Relativo A Intranet','2003-03-06',NULL,NULL,'Silvina Ottonello ',NOW()); +INSERT INTO usuario VALUES ('mmarre',28924563,'Martin Marrese','2003-03-10 15:52:40',NOW()); diff --git a/script/SAMURAI_SQL_Dump.txt b/script/SAMURAI_SQL_Dump.txt index 1cb5124..11eb457 100644 --- a/script/SAMURAI_SQL_Dump.txt +++ b/script/SAMURAI_SQL_Dump.txt @@ -8,7 +8,7 @@ --Creo la base de datos 'samurai' -- -CREATE DATABASE samurai; +--CREATE DATABASE samurai; use samurai; -- @@ -19,6 +19,7 @@ CREATE TABLE perfil ( id_perfil bigint(20) NOT NULL auto_increment, desc_perfil varchar(50) , tipo_perfil char(1), + fch_ult_modif timestamp, PRIMARY KEY (id_perfil) ); @@ -30,6 +31,7 @@ CREATE TABLE perfil ( CREATE TABLE perfil_sist ( id_perfil bigint(20) NOT NULL , id_sistema bigint(20) NOT NULL , + fch_ult_modif timestamp, PRIMARY KEY (id_perfil,id_sistema) ); @@ -42,6 +44,7 @@ CREATE TABLE perfil_sist_usuario ( login varchar(20) NOT NULL , id_perfil bigint(20) NOT NULL , id_sistema bigint(20) NOT NULL , + fch_ult_modif timestamp, PRIMARY KEY (login,id_perfil,id_sistema) ); @@ -54,6 +57,7 @@ CREATE TABLE perm_perfil_sist ( id_permiso bigint(20) NOT NULL , id_perfil bigint(20) NOT NULL , id_sistema bigint(20) NOT NULL , + fch_ult_modif timestamp, PRIMARY KEY (id_permiso,id_perfil,id_sistema) ); @@ -66,6 +70,7 @@ CREATE TABLE perm_sist ( id_permiso bigint(20) NOT NULL , id_sistema bigint(20) NOT NULL , observaciones varchar(255) , + fch_ult_modif timestamp, PRIMARY KEY (id_permiso,id_sistema) ); @@ -77,6 +82,7 @@ CREATE TABLE perm_sist ( CREATE TABLE permiso ( id_permiso bigint(20) NOT NULL auto_increment, desc_permiso varchar(50) , + fch_ult_modif timestamp, PRIMARY KEY (id_permiso) ); @@ -93,6 +99,7 @@ CREATE TABLE sistema ( fecha_fin date, fecha_implementacion date, contacto text, + fch_ult_modif timestamp, PRIMARY KEY (id_sistema) ); @@ -106,6 +113,7 @@ CREATE TABLE usuario ( nrodoc int(11) , nombre varchar(50) , fecha datetime , + fch_ult_modif timestamp, PRIMARY KEY (login) ); diff --git a/src/conf/db_Conf.php b/src/conf/db_Conf.php new file mode 100644 index 0000000..42a900d --- /dev/null +++ b/src/conf/db_Conf.php @@ -0,0 +1,18 @@ + 'mysql' , + 'db_user' => 'intranet' , + 'db_pass' => 'intranet' , + 'db_host' => 'localhost', + 'db_name' => 'samurai' + ) +?> + diff --git a/src/conf/secciones_Conf.php b/src/conf/secciones_Conf.php new file mode 100644 index 0000000..8828f8d --- /dev/null +++ b/src/conf/secciones_Conf.php @@ -0,0 +1,74 @@ + + * + */ + return array ( + // Secciones visibles por los usuarios {{{ + array ( + 'nombre' => 'Usuarios', //NOMBRE DE LA SECCION + 'img_comun' => 'images/usuarios.gif', //IMAGEN COMUN + 'img_mouseon' => 'images/usuarios_f2.gif', //IMAGEN MOUSE POR ARRIBA + 'img_select' => 'images/usuarios_f3.gif', //IMAGEN SELECCIONADO + 'link' => 'usuarios.php', //LINK DEL ICONO + 'hijos' => array ( + array ( 'nombre'=> 'Filtrar Usuario' , + 'link' => 'usuarios-filtrar.php', + ), + array ( 'nombre'=> 'ABM Usuario' , + 'link' => 'usuarios-abm.php', + ), + ), + ), + array ( + 'nombre' => 'Perfiles', //NOMBRE DE LA SECCION + 'img_comun' => 'images/perfiles.gif', //IMAGEN COMUN + 'img_mouseon' => 'images/perfiles_f2.gif', //IMAGEN MOUSE POR ARRIBA + 'img_select' => 'images/perfiles_f3.gif', //IMAGEN SELECCIONADO + 'link' => 'perfiles.php', //LINK DEL ICONO + 'hijos' => array ( + array ( 'nombre'=> 'ABM Perfil' , + 'link' => 'perfiles-abm.php', + ), + ), + ), + // }}} + // Secciones visibles por desarrolladores {{{ + array ( + 'nombre' => 'Sistemas', //NOMBRE DE LA SECCION + 'img_comun' => 'images/sistemas.gif', //IMAGEN COMUN + 'img_mouseon' => 'images/sistemas_f2.gif', //IMAGEN MOUSE POR ARRIBA + 'img_select' => 'images/sistemas_f3.gif', //IMAGEN SELECCIONADO + 'link' => 'sistemas.php', //LINK DEL ICONO + 'hijos' => array ( + array ( 'nombre'=> 'ABM Sistema' , + 'link' => 'sistemas-abm.php', + ), + ), + ), + array ( + 'nombre' => 'Permisos', //NOMBRE DE LA SECCION + 'img_comun' => 'images/permisos.gif', //IMAGEN COMUN + 'img_mouseon' => 'images/permisos_f2.gif', //IMAGEN MOUSE POR ARRIBA + 'img_select' => 'images/permisos_f3.gif', //IMAGEN SELECCIONADO + 'link' => 'permisos.php', //LINK DEL ICONO + 'hijos' => array ( + array ( 'nombre'=> 'ABM Permiso', + 'link' => 'permisos-abm.php', + ), + ), + ), + // }} + ); diff --git a/src/www/.htaccess b/src/www/.htaccess new file mode 100644 index 0000000..8dc25ab --- /dev/null +++ b/src/www/.htaccess @@ -0,0 +1,4 @@ +php_value include_path ".:/home/mmarrese/public_html/samurai/tronco/src/www/include:/home/mmarrese/public_html/samurai/tronco/src/www/include/lib:/home/mmarrese/public_html/samurai/tronco/src/www:/usr/share/pear:/home/mmarrese/public_html/samurai/tronco/src/www/include/hooks:/home/mmarrese/public_html/samurai/tronco/src" +php_value auto_prepend_file "/home/mmarrese/public_html/samurai/tronco/src/www/include/prepend.php" +php_value auto_append_file "/home/mmarrese/public_html/samurai/tronco/src/www/include/append.php" +#php_value allow_call_time_pass_reference On diff --git a/src/www/images/copete.jpg b/src/www/images/copete.jpg new file mode 100644 index 0000000..2bc4d0b Binary files /dev/null and b/src/www/images/copete.jpg differ diff --git a/src/www/images/inicio.jpg b/src/www/images/inicio.jpg new file mode 100644 index 0000000..1934764 Binary files /dev/null and b/src/www/images/inicio.jpg differ diff --git a/src/www/images/perfiles.gif b/src/www/images/perfiles.gif new file mode 100644 index 0000000..f54dd87 Binary files /dev/null and b/src/www/images/perfiles.gif differ diff --git a/src/www/images/perfiles_f2.gif b/src/www/images/perfiles_f2.gif new file mode 100644 index 0000000..8ed9706 Binary files /dev/null and b/src/www/images/perfiles_f2.gif differ diff --git a/src/www/images/perfiles_f3.gif b/src/www/images/perfiles_f3.gif new file mode 100644 index 0000000..d2546dd Binary files /dev/null and b/src/www/images/perfiles_f3.gif differ diff --git a/src/www/images/perfiles_f4.gif b/src/www/images/perfiles_f4.gif new file mode 100644 index 0000000..d2546dd Binary files /dev/null and b/src/www/images/perfiles_f4.gif differ diff --git a/src/www/images/permisos.gif b/src/www/images/permisos.gif new file mode 100644 index 0000000..b242e71 Binary files /dev/null and b/src/www/images/permisos.gif differ diff --git a/src/www/images/permisos_f2.gif b/src/www/images/permisos_f2.gif new file mode 100644 index 0000000..8d3780f Binary files /dev/null and b/src/www/images/permisos_f2.gif differ diff --git a/src/www/images/permisos_f3.gif b/src/www/images/permisos_f3.gif new file mode 100644 index 0000000..eb08d2e Binary files /dev/null and b/src/www/images/permisos_f3.gif differ diff --git a/src/www/images/permisos_f4.gif b/src/www/images/permisos_f4.gif new file mode 100644 index 0000000..04c1e77 Binary files /dev/null and b/src/www/images/permisos_f4.gif differ diff --git a/src/www/images/sistemas.gif b/src/www/images/sistemas.gif new file mode 100644 index 0000000..15e37eb Binary files /dev/null and b/src/www/images/sistemas.gif differ diff --git a/src/www/images/sistemas_f2.gif b/src/www/images/sistemas_f2.gif new file mode 100644 index 0000000..59ea44d Binary files /dev/null and b/src/www/images/sistemas_f2.gif differ diff --git a/src/www/images/sistemas_f3.gif b/src/www/images/sistemas_f3.gif new file mode 100644 index 0000000..79ecfd5 Binary files /dev/null and b/src/www/images/sistemas_f3.gif differ diff --git a/src/www/images/sistemas_f4.gif b/src/www/images/sistemas_f4.gif new file mode 100644 index 0000000..79ecfd5 Binary files /dev/null and b/src/www/images/sistemas_f4.gif differ diff --git a/src/www/images/usuarios.gif b/src/www/images/usuarios.gif new file mode 100644 index 0000000..694d649 Binary files /dev/null and b/src/www/images/usuarios.gif differ diff --git a/src/www/images/usuarios_f2.gif b/src/www/images/usuarios_f2.gif new file mode 100644 index 0000000..d7ebde3 Binary files /dev/null and b/src/www/images/usuarios_f2.gif differ diff --git a/src/www/images/usuarios_f3.gif b/src/www/images/usuarios_f3.gif new file mode 100644 index 0000000..2ad68fb Binary files /dev/null and b/src/www/images/usuarios_f3.gif differ diff --git a/src/www/images/usuarios_f4.gif b/src/www/images/usuarios_f4.gif new file mode 100644 index 0000000..2ad68fb Binary files /dev/null and b/src/www/images/usuarios_f4.gif differ diff --git a/src/www/include/append.php b/src/www/include/append.php deleted file mode 100644 index ce7de92..0000000 --- a/src/www/include/append.php +++ /dev/null @@ -1,24 +0,0 @@ - | -// +--------------------------------------------------------------------+ -// -// $URL$ -// $Rev$ -// $Date$ -// $Author$ -// - -// Hooks -require_once 'lib/HE/lib/hooks.php'; -hook( 'pie' ); -hook( 'append' ); - -// $URL$ $Rev$ $Date$ $Author$ -?> diff --git a/src/www/include/hooks/default-barra-item.php b/src/www/include/hooks/default-barra-item.php deleted file mode 100644 index d837356..0000000 --- a/src/www/include/hooks/default-barra-item.php +++ /dev/null @@ -1,5 +0,0 @@ - - - - - diff --git a/src/www/include/hooks/default-barra.php b/src/www/include/hooks/default-barra.php deleted file mode 100644 index a4b489e..0000000 --- a/src/www/include/hooks/default-barra.php +++ /dev/null @@ -1,9 +0,0 @@ - - -
- - - - -
- diff --git a/src/www/include/hooks/default-cabecera.php b/src/www/include/hooks/default-cabecera.php index 22de6cd..ce62c65 100644 --- a/src/www/include/hooks/default-cabecera.php +++ b/src/www/include/hooks/default-cabecera.php @@ -1,6 +1,6 @@ - + @@ -188,4 +188,4 @@ <? hook( 'subsecciones' ) ?> <br> <!-- CUERPO --> -<!-- FIN $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-cabecera.php $ $Rev: 128 $ $Date: 2002-11-07 19:28:18 -0300 (jue, 07 nov 2002) $ $Author: llucar $ --> +<!-- FIN $URL$ $Rev$ $Date$ $Author$ --> diff --git a/src/www/include/hooks/default-config.php b/src/www/include/hooks/default-config.php deleted file mode 100644 index 078e439..0000000 --- a/src/www/include/hooks/default-config.php +++ /dev/null @@ -1,3 +0,0 @@ -<? return array( - 'webroot' => '/he', -) // $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-config.php $ $Rev: 135 $ $Date: 2002-11-13 18:38:42 -0300 (mié, 13 nov 2002) $ $Author: llucar $ ?> diff --git a/src/www/include/hooks/default-copete.php b/src/www/include/hooks/default-copete.php new file mode 100644 index 0000000..7ac82d8 --- /dev/null +++ b/src/www/include/hooks/default-copete.php @@ -0,0 +1,21 @@ +<?php + require_once 'lib/HE/hooks.php'; +// +--------------------------------------------------------------------+ +// | SAMURAI | +// +--------------------------------------------------------------------+ +// | Sistema de Administracion y Matenimiento de Usuarios Relativo A | +// | Intranet | +// | Ministerio de Economía | +// +--------------------------------------------------------------------+ +// | Creado: fri mar 21 ART 2003 | +// | Autor: Martin Marrese <mmarre@mecon.gov.ar> | +// +--------------------------------------------------------------------+ +// +// $Id$ +// +// $URL$ +// $Rev$ +// $Date$ +// $Author$ +?> + <IMG border="0" src="./images/copete.jpg"> diff --git a/src/www/include/hooks/default-db-form--checkbox.php b/src/www/include/hooks/default-db-form--checkbox.php deleted file mode 100644 index 20a291a..0000000 --- a/src/www/include/hooks/default-db-form--checkbox.php +++ /dev/null @@ -1,69 +0,0 @@ -<?php -// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4: -// +--------------------------------------------------------------------+ -// | HORAS EXTRA | -// +--------------------------------------------------------------------+ -// | Sistema de Horas Extra - Ministerio de Economía - Argentina | -// +--------------------------------------------------------------------+ -// | Creado: lun oct 21 17:31:41 ART 2002 | -// | Autor: Leandro Lucarella <llucar@mecon.gov.ar> | -// +--------------------------------------------------------------------+ -// -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-form--checkbox.php $ -// $Rev: 117 $ -// $Date: 2002-10-23 19:17:04 -0300 (mié, 23 oct 2002) $ -// $Author: llucar $ -// - -/** - * Dibuja un elemento tipo checkbox de un formulario. - * - * @param object HE_DB $db Base de datos que se lista. - * @param array $campo Campo a mostrar. - * @param string $tipo Como mostrarlo (si es para buscar, ver, etc). - * @param string $class Class para CSS. - */ - -// Extrae los parámetros del hook. -list( $campo, $tipo, $class ) = array_slice( $args, 2 ); -$db =& $objeto; - -// Obtiene variable. -if ( $db->formulario_enviado() ) { - if ( isset( $_POST[$db->_form_var . "_campo_$campo"] ) ) - $var = $_POST[$db->_form_var . "_campo_$campo"] ? 1 : 0; -} elseif ( isset( $_GET[$db->_form_var . "_campo_$campo"] ) ) { - $var = $_GET[$db->_form_var . "_campo_$campo"] ? 1 : 0; -} elseif ( isset( $db->_campos[$campo]['def'] ) ) { - $var = $db->_campos[$campo]['def'] ? 1 : 0; -} else { - $var = 0; -} -$desc = htmlentities( isset( $db->_campos[$campo]['desc'] ) ? $db->_campos[$campo]['desc'] : $campo ); - -switch ( strtolower( $tipo ) ) { - - case 'agregar': - case 'modificar': - case 'buscar': - printf( '<input type="checkbox" name="%s_campo_%s" value="1"%s%s/> %s', - $db->_form_var, - $campo, - $var ? ' checked' : '', - $class, - $desc ); - break; - - default: - printf( '<input type="hidden" name="%s_campo_%s" value="%s"/>%s', - $db->_form_var, - $campo, - $var, - htmlentities( ( $var ? 'X ' : 'O ' ) . $desc ) ); - break; - -} - - -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-form--checkbox.php $ $Rev: 117 $ $Date: 2002-10-23 19:17:04 -0300 (mié, 23 oct 2002) $ $Author: llucar $ -?> diff --git a/src/www/include/hooks/default-db-form--select.php b/src/www/include/hooks/default-db-form--select.php deleted file mode 100644 index 7052128..0000000 --- a/src/www/include/hooks/default-db-form--select.php +++ /dev/null @@ -1,66 +0,0 @@ -<?php -// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4: -// +--------------------------------------------------------------------+ -// | HORAS EXTRA | -// +--------------------------------------------------------------------+ -// | Sistema de Horas Extra - Ministerio de Economía - Argentina | -// +--------------------------------------------------------------------+ -// | Creado: lun oct 21 17:31:41 ART 2002 | -// | Autor: Leandro Lucarella <llucar@mecon.gov.ar> | -// +--------------------------------------------------------------------+ -// -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-form--select.php $ -// $Rev: 117 $ -// $Date: 2002-10-23 19:17:04 -0300 (mié, 23 oct 2002) $ -// $Author: llucar $ -// - -/** - * Dibuja un elemento de selección de un formulario. - * - * @param object HE_DB $db Base de datos que se lista. - * @param array $campo Campo a mostrar. - * @param string $tipo Como mostrarlo (si es para buscar, ver, etc). - * @param string $class Class para CSS. - */ - -// Extrae los parámetros del hook. -list( $campo, $tipo, $class ) = array_slice( $args, 2 ); -$db =& $objeto; - -// Obtiene variable. -$var = $db->_form_var( $campo ); -$var = strtolower( $var ); -$vals = $db->_campos[$campo]['vals']; - -// Da error si no existen valores posibles del select. -if ( ! isset( $vals ) or ! is_array( $vals ) or ! count( $vals ) ) - $db->raiseError( "No hay valores posibles para el campo $campo", HE_ERROR ); - -switch ( strtolower( $tipo ) ) { - - case 'agregar': - case 'modificar': - case 'buscar': - printf( '<select name="%s_campo_%s"%s>', - $db->_form_var, $campo, $class ); - foreach ( $vals as $value => $desc ) - printf( '<option value="%s"%s>%s</option>', - $value, - $class . ( ( $var == $value ) ? ' selected' : '' ), - $desc ); - echo '</select>'; - break; - - default: - printf( '<input type="hidden" name="%s_campo_%s" value="%s"/>%s', - $db->_form_var, - $campo, - $var, - htmlentities( $var ) ); - break; - -} - -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-form--select.php $ $Rev: 117 $ $Date: 2002-10-23 19:17:04 -0300 (mié, 23 oct 2002) $ $Author: llucar $ -?> diff --git a/src/www/include/hooks/default-db-form--text.php b/src/www/include/hooks/default-db-form--text.php deleted file mode 100644 index 63c9a8e..0000000 --- a/src/www/include/hooks/default-db-form--text.php +++ /dev/null @@ -1,64 +0,0 @@ -<?php -// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4: -// +--------------------------------------------------------------------+ -// | HORAS EXTRA | -// +--------------------------------------------------------------------+ -// | Sistema de Horas Extra - Ministerio de Economía - Argentina | -// +--------------------------------------------------------------------+ -// | Creado: lun oct 21 17:31:41 ART 2002 | -// | Autor: Leandro Lucarella <llucar@mecon.gov.ar> | -// +--------------------------------------------------------------------+ -// -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-form--text.php $ -// $Rev: 117 $ -// $Date: 2002-10-23 19:17:04 -0300 (mié, 23 oct 2002) $ -// $Author: llucar $ -// - -/** - * Dibuja un elemento de texto de un formulario. - * - * @param object HE_DB $db Base de datos que se lista. - * @param array $campo Campo a mostrar. - * @param string $tipo Como mostrarlo (si es para buscar, ver, etc). - * @param string $class Class para CSS. - */ - -// Extrae los parámetros del hook. -list( $campo, $tipo, $class ) = array_slice( $args, 2 ); -$db =& $objeto; - -// Obtiene variable. -$var = $db->_form_var( $campo ); - -switch ( strtolower( $tipo ) ) { - - case 'agregar': - case 'modificar': - printf( '<input type="text" name="%s_campo_%s" value="%s"%s/>', - $db->_form_var, - $campo, - $var, - $class ); - break; - - case 'buscar': - printf( '<input type="text" name="%s_campo_%s" value="%s"%s/>', - $db->_form_var, - $campo, - $var, - $class ); - break; - - default: - printf( '<input type="hidden" name="%s_campo_%s" value="%s"/>%s', - $db->_form_var, - $campo, - $var, - htmlentities( $var ) ); - break; - -} - -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-form--text.php $ $Rev: 117 $ $Date: 2002-10-23 19:17:04 -0300 (mié, 23 oct 2002) $ $Author: llucar $ -?> diff --git a/src/www/include/hooks/default-db-form-estado.php b/src/www/include/hooks/default-db-form-estado.php deleted file mode 100644 index aff3168..0000000 --- a/src/www/include/hooks/default-db-form-estado.php +++ /dev/null @@ -1,59 +0,0 @@ -<?php -// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4: -// +--------------------------------------------------------------------+ -// | HORAS EXTRA | -// +--------------------------------------------------------------------+ -// | Sistema de Horas Extra - Ministerio de Economía - Argentina | -// +--------------------------------------------------------------------+ -// | Creado: mié nov 6 14:41:41 ART 2002 | -// | Autor: Leandro Lucarella <llucar@mecon.gov.ar> | -// +--------------------------------------------------------------------+ -// -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-form-estado.php $ -// $Rev: 125 $ -// $Date: 2002-11-06 19:05:58 -0300 (mié, 06 nov 2002) $ -// $Author: llucar $ -// - -/** - * Dibuja un elemento de selección de un formulario para elegir una - * función. - * - * @param object HE_DB $db Base de datos a la que pertenece el - * formulario. - * @param string $tipo Como mostrarlo (si es para buscar, ver, etc). - * @param string $class Class para CSS. - */ - -// Extrae los parámetros del hook. -list( $tipo, $class ) = array_slice( $args, 2 ); -$db =& $objeto; - -// Obtiene variable. -$estado = $db->_form_var( 'estado' ); - -switch ( strtolower( $tipo ) ) { - - case 'buscar': - case 'agregar': - case 'modificar': - printf( '<select name="%s_campo_estado"%s>', $db->_form_var, $class ); - // Genera opciones del SELECT - foreach ( $db->estado as $est => $desc ) { - printf( '<option value="%s"%s%s>%s</option>', - $est, - $class, - ( $estado == $est ) ? ' selected' : '', - htmlentities( $desc ) ); - } - // Cierra el SELECT - echo '</select>'; - break; - - default: - echo htmlentities( $db->estado[$estado] ); - break; -} - -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-form-estado.php $ $Rev: 125 $ $Date: 2002-11-06 19:05:58 -0300 (mié, 06 nov 2002) $ $Author: llucar $ -?> diff --git a/src/www/include/hooks/default-db-form-funcion.php b/src/www/include/hooks/default-db-form-funcion.php deleted file mode 100644 index 0a818ae..0000000 --- a/src/www/include/hooks/default-db-form-funcion.php +++ /dev/null @@ -1,59 +0,0 @@ -<?php -// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4: -// +--------------------------------------------------------------------+ -// | HORAS EXTRA | -// +--------------------------------------------------------------------+ -// | Sistema de Horas Extra - Ministerio de Economía - Argentina | -// +--------------------------------------------------------------------+ -// | Creado: mié nov 6 14:41:52 ART 2002 | -// | Autor: Leandro Lucarella <llucar@mecon.gov.ar> | -// +--------------------------------------------------------------------+ -// -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-form-funcion.php $ -// $Rev: 125 $ -// $Date: 2002-11-06 19:05:58 -0300 (mié, 06 nov 2002) $ -// $Author: llucar $ -// - -/** - * Dibuja un elemento de selección de un formulario para elegir una - * función. - * - * @param object HE_DB $db Base de datos a la que pertenece el - * formulario. - * @param string $tipo Como mostrarlo (si es para buscar, ver, etc). - * @param string $class Class para CSS. - */ - -// Extrae los parámetros del hook. -list( $tipo, $class ) = array_slice( $args, 2 ); -$db =& $objeto; - -// Obtiene variable. -$funcion = $db->_form_var( 'funcion' ); - -switch ( strtolower( $tipo ) ) { - - case 'buscar': - case 'agregar': - case 'modificar': - printf( '<select name="%s_campo_funcion"%s>', $db->_form_var, $class ); - // Genera opciones del SELECT - foreach ( $db->funcion as $func => $desc ) { - printf( '<option value="%s"%s%s>%s</option>', - $func, - $class, - ( $funcion == $func ) ? ' selected' : '', - htmlentities( $desc ) ); - } - // Cierra el SELECT - echo '</select>'; - break; - - default: - echo htmlentities( $db->funcion[$funcion] ); - break; -} - -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-form-funcion.php $ $Rev: 125 $ $Date: 2002-11-06 19:05:58 -0300 (mié, 06 nov 2002) $ $Author: llucar $ -?> diff --git a/src/www/include/hooks/default-db-form-nivel.php b/src/www/include/hooks/default-db-form-nivel.php deleted file mode 100644 index 17f3446..0000000 --- a/src/www/include/hooks/default-db-form-nivel.php +++ /dev/null @@ -1,54 +0,0 @@ -<?php -// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4: -// +--------------------------------------------------------------------+ -// | HORAS EXTRA | -// +--------------------------------------------------------------------+ -// | Sistema de Horas Extra - Ministerio de Economía - Argentina | -// +--------------------------------------------------------------------+ -// | Creado: lun oct 21 17:31:41 ART 2002 | -// | Autor: Leandro Lucarella <llucar@mecon.gov.ar> | -// +--------------------------------------------------------------------+ -// -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-form-nivel.php $ -// $Rev: 117 $ -// $Date: 2002-10-23 19:17:04 -0300 (mié, 23 oct 2002) $ -// $Author: llucar $ -// - -require_once 'HE/DB/ABM/Nivel.php'; - -/** - * Dibuja un elemento de selección de un formulario para elegir un nivel. - * - * @param object HE_DB $db Base de datos que se lista. - * @param string $tipo Como mostrarlo (si es para buscar, ver, etc). - * @param string $class Class para CSS. - */ - -// Extrae los parámetros del hook. -list( $tipo, $class ) = array_slice( $args, 2 ); -$db =& $objeto; - -// Crea un objeto niveles para obtener los niveles. -$n =& new HE_DB_ABM_Nivel; - -// Obtiene variable. -$nivel = $db->_form_var( 'nivel' ); - -switch ( strtolower( $tipo ) ) { - - case 'buscar': - case 'agregar': - case 'modificar': - echo $n->select( $db->_form_var . '_campo_nivel', - $nivel, - $class ); - break; - - default: - echo htmlentities( $n->descripcion( $nivel ) ); - break; -} - -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-form-nivel.php $ $Rev: 117 $ $Date: 2002-10-23 19:17:04 -0300 (mié, 23 oct 2002) $ $Author: llucar $ -?> diff --git a/src/www/include/hooks/default-db-formulario.php b/src/www/include/hooks/default-db-formulario.php deleted file mode 100644 index 648005d..0000000 --- a/src/www/include/hooks/default-db-formulario.php +++ /dev/null @@ -1,125 +0,0 @@ -<?php -// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4: -// +--------------------------------------------------------------------+ -// | HORAS EXTRA | -// +--------------------------------------------------------------------+ -// | Sistema de Horas Extra - Ministerio de Economía - Argentina | -// +--------------------------------------------------------------------+ -// | Creado: jue oct 10 16:57:53 ART 2002 | -// | Autor: Leandro Lucarella <llucar@mecon.gov.ar> | -// +--------------------------------------------------------------------+ -// -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-formulario.php $ -// $Rev: 129 $ -// $Date: 2002-11-08 17:37:57 -0300 (vie, 08 nov 2002) $ -// $Author: llucar $ -// - -require_once 'HE/DB.php'; -require_once 'HE/lib/hooks.php'; - -/** - * Dibujar un elemento de un listado de una base de datos. - * - * @param object HE_DB $db Base de datos que se lista. - * @param array $fila Fila a mostrar. - * @param array $campos Campos a mostrar. - * @param string $class Class para CSS. - */ - -// Extrae los parámetros del hook. -list( $tipo, $action, $class ) = array_slice( $args, 2 ); -$db =& $objeto; - -// Setea las diferentes "classes" de estilos -$class = is_null( $class ) ? 'he_db_form' : $class; -$class = is_string( $class ) ? $class : get_class( $db ); -$class_t = ( $class === false ) ? '' : ' class="' . $class . '_titulo"'; -$class_f = ( $class === false ) ? '' : ' class="' . $class . '_pie"'; -$classtd[0] = ( $class === false ) ? '' : ' class="' . $class . '_par"'; -$classtd[1] = ( $class === false ) ? '' : ' class="' . $class . '_impar"'; -$class = ( $class === false ) ? '' : ' class="' . $class . '"'; - -// Nombre de lo que se busca (en plural y singular) -$nombre = ucfirst( $db->_nombre ); -$nombres = ucfirst( $db->_nombres ); - -// Setea valores -$tipo = strtolower( $tipo ); -$action = is_null( $action ) ? "$tipo.php" : $action; -$accion = ucfirst( $tipo ); - -// contador para ver si la fila es par o impar. -$i = 0; - -?> -<!-- INICIO $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-formulario.php $ --> -<form action="<?= $action ?>" method="post"> - <input type="hidden" name="<?= $db->_form_var ?>_formulario_enviado" value="1"> - <? if ( isset( $_SERVER['HTTP_REFERER'] ) or isset( $_POST['HTTP_REFERER'] ) ) { ?> - <input type="hidden" name="HTTP_REFERER" - value="<?= isset( $_POST['HTTP_REFERER'] ) ? $_POST['HTTP_REFERER'] : $_SERVER['HTTP_REFERER'] ?>"> - <? } ?> - <!-- Esto debería ser así, pero para lidiar con el Netscape se agregan atributos extra. --> - <!-- table summary="<?= "$accion $nombre" ?>"<?= $class ?> --> - <table summary="<?= "$accion $nombre" ?>" bordercolor="#006699" border="1" cellpadding="0" cellspacing="0" width="80%"<?= $class ?>> - <thead<?= $class_t ?>> - <tr<?= $class_t ?>> - <th colspan="2"<?= $class_t ?>><?= "$accion $nombre" ?></th> - </tr> - </thead> - <tbody<?= $class ?>> - <? foreach ( $db->_campos as $campo => $cinfo ) { ?> - <? if ( isset( $cinfo['form'] ) and $cinfo['form'] ) { ?> - <tr<?= $classtd[$i%2] ?>> - <? if ( $cinfo['form'] != 'hidden' ) { // Si no es un campo oculto ?> - <th<?= $classtd[$i%2] ?>> - <?= htmlentities( ucwords( isset ( $cinfo['desc'] ) ? $cinfo['desc'] : $campo ) ) ?> - </th> - <td<?= $classtd[$i%2] ?>> - <? } ?> - <? if ( ! $db->formulario_enviado() ) { // Si no se envio el formulario todavía, se guarda el original. ?> - <input type="hidden" name="<?= "{$db->_form_var}_original_$campo" ?>" - value="<?= $db->_form_var( $campo ) ?>"> - <? } else { // Si se envio el formulario, lo propaga. ?> - <input type="hidden" name="<?= "{$db->_form_var}_original_$campo" ?>" - value="<?= $_POST["{$db->_form_var}_original_$campo"] ?>"> - <? } - // Llama al hook encargado de dibujar el elemento del formulario para este campo - if ( hooko_exists( "form-$campo", $db ) ) - hooko( "form-$campo", $db, $tipo, $classtd[$i%2] ); - // Si no existe, usa uno por defecto - elseif ( ! empty( $cinfo['form'] ) and hooko_exists( "form--{$cinfo['form']}", $db ) ) - hooko( "form--{$cinfo['form']}", $db, $campo, $tipo, $classtd[$i%2] ); - // Si no cae en un error - else - $db->raiseError( "No hay un manejador definido para el campo $campo", HE_ERROR ); - $i++; - ?> - <? if ( $cinfo['form'] != 'hidden' ) { // Si no es un campo oculto ?> - </td> - <? } ?> - </tr> - <? } ?> - <? } ?> - </tbody> - <tfoot<?= $class_f ?>> - <tr<?= $class_f ?>> - <td colspan="2"<?= $class_f ?>> - <? if ( $tipo != 'ver' ) { ?> - <input type="submit" title="<?= "$accion este $nombre" ?>" - name="<?= $db->_form_var ?>_boton_<?= $accion ?>" - value="<?= $accion ?>"<?= $class_f ?>/> - <? if ( $tipo != 'borrar' ) { // XXX - Esto no debería estar porque en está clase no se pueden borrar elementos, pero se deja igual para no tener que sobreescribir el método en ABM cambiandole sólo esto. ?> - <input type="reset" title="Borra todos los campos del formulario, volviendo al estado inicial" value="Reestablecer"<?= $class_f ?>/> - <? } ?> - <input type="submit" title="Cancelar la operación (vuelve a la página anterior)" name="<?= $db->_form_var ?>_boton_cancelar" value="Cancelar"<?= $class_f ?>/> - <? } else { // Tipo = ver ?> - <a title="<?= "$accion este $nombre" ?>" href="<?= $action ?>"<?= $class_f ?>><?= $accion ?></a>', - <? } ?> - </td> - </tr> - </tfoot> - </table> -</form> -<!-- FIN $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-formulario.php $ --> diff --git a/src/www/include/hooks/default-db-listar-cabecera.php b/src/www/include/hooks/default-db-listar-cabecera.php deleted file mode 100644 index d877431..0000000 --- a/src/www/include/hooks/default-db-listar-cabecera.php +++ /dev/null @@ -1,47 +0,0 @@ -<?php -// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4: -// +--------------------------------------------------------------------+ -// | HORAS EXTRA | -// +--------------------------------------------------------------------+ -// | Sistema de Horas Extra - Ministerio de Economía - Argentina | -// +--------------------------------------------------------------------+ -// | Creado: jue oct 10 15:56:30 ART 2002 | -// | Autor: Leandro Lucarella <llucar@mecon.gov.ar> | -// +--------------------------------------------------------------------+ -// -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-listar-cabecera.php $ -// $Rev: 135 $ -// $Date: 2002-11-13 18:38:42 -0300 (mié, 13 nov 2002) $ -// $Author: llucar $ -// - -require_once 'HE/DB.php'; -require_once 'HE/lib/hooks.php'; - -/** - * Dibuja la cabecera de un listado de una base de datos. - * - * @param object HE_DB $db Base de datos que se lista. - * @param array $campos Campos a mostrar. - * @param string $class_t Class para CSS de los títulos. - */ - -// Extrae los parámetros del hook. -list( $campos, $columnas, $operar, $class ) = array_slice( $args, 2 ); -$db =& $objeto; - -?> -<!-- INICIO $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-listar-cabecera.php $ --> -<thead<?= $class ?>> - <tr<?= $class ?>> - <? foreach ( $campos as $campo ) if ( in_array( $campo, $columnas ) ) { ?> - <th<?= $class ?>> - <?= htmlentities( ucwords( isset ( $db->_campos[$campo]['desc'] ) ? $db->_campos[$campo]['desc'] : $campo ) ) ?> - </th> - <? } ?> - <? if ( $operar ) { ?> - <th<?= $class ?>> </th> - <? } ?> - </tr> -</thead> -<!-- FIN $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-listar-cabecera.php $ --> diff --git a/src/www/include/hooks/default-db-listar-elemento.php b/src/www/include/hooks/default-db-listar-elemento.php deleted file mode 100644 index 96cc544..0000000 --- a/src/www/include/hooks/default-db-listar-elemento.php +++ /dev/null @@ -1,67 +0,0 @@ -<?php -// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4: -// +--------------------------------------------------------------------+ -// | HORAS EXTRA | -// +--------------------------------------------------------------------+ -// | Sistema de Horas Extra - Ministerio de Economía - Argentina | -// +--------------------------------------------------------------------+ -// | Creado: jue oct 10 16:57:53 ART 2002 | -// | Autor: Leandro Lucarella <llucar@mecon.gov.ar> | -// +--------------------------------------------------------------------+ -// -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-listar-elemento.php $ -// $Rev: 120 $ -// $Date: 2002-10-28 12:42:20 -0300 (lun, 28 oct 2002) $ -// $Author: llucar $ -// - -require_once 'HE/DB.php'; -require_once 'HE/lib/hooks.php'; - -/** - * Dibujar un elemento de un listado de una base de datos. - * - * @param object HE_DB $db Base de datos que se lista. - * @param array $fila Fila a mostrar. - * @param array $campos Campos a mostrar. - * @param string $class Class para CSS. - */ - -// Extrae los parámetros del hook. -list( $fila, $campos, $modificar, $borrar, $class ) = array_slice( $args, 2 ); -$db =& $objeto; - -// Si se modifica o hace baja, se general el query por GET -if ( $modificar or $borrar ) { - $get = array(); - foreach ( $fila as $key => $val ) - $get[] = $db->_form_var . "_campo_$key=" . urlencode( $val ); - $get = join( '&', $get ); -} - -// Procesa la fila para mostrarla correctamente -$fila = $db->procesar( $fila ); - -?> -<!-- INICIO $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-listar-elemento.php $ --> -<tr<?= $class ?>> -<? foreach ( $campos as $campo ) if ( in_array( $campo, array_keys( $fila ) ) ) { ?> - <td<?= $class ?>><?= $fila[$campo] ?></td> -<? } -if ( $modificar or $borrar ) { - - printf( '<td%s>', $class ); - - if ( $modificar ) - hooko( 'listar-elemento-abm', $db, 'modificar', - $modificar, $get, $class ); - - if ( $borrar ) - hooko( 'listar-elemento-abm', $db, 'borrar', - $borrar, $get, $class ); - - echo '</td>'; - -} ?> -</tr> -<!-- FIN $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-listar-elemento.php $ --> diff --git a/src/www/include/hooks/default-db-listar-vacia.php b/src/www/include/hooks/default-db-listar-vacia.php deleted file mode 100644 index a21efa3..0000000 --- a/src/www/include/hooks/default-db-listar-vacia.php +++ /dev/null @@ -1,40 +0,0 @@ -<?php -// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4: -// +--------------------------------------------------------------------+ -// | HORAS EXTRA | -// +--------------------------------------------------------------------+ -// | Sistema de Horas Extra - Ministerio de Economía - Argentina | -// +--------------------------------------------------------------------+ -// | Creado: jue oct 10 14:55:31 ART 2002 | -// | Autor: Leandro Lucarella <llucar@mecon.gov.ar> | -// +--------------------------------------------------------------------+ -// -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-listar-vacia.php $ -// $Rev: 117 $ -// $Date: 2002-10-23 19:17:04 -0300 (mié, 23 oct 2002) $ -// $Author: llucar $ -// - -require_once 'HE/DB.php'; - -/** - * Dibuja un mensaje que indica que la lista está vacía. - * - * @param object HE_DB $db Base de datos que se lista. - * @param string $class Class para CSS. - */ - -// Extrae los parámetros del hook. -$class = $args[2]; -$db =& $objeto; - -?> -<!-- INICIO $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-listar-vacia.php $ --> -<tbody<?= $class ?>> - <tr<?= $class ?>> - <td<?= $class ?>> - <div<?= $class ?>>No se encontraron <?= $db->_nombres ?></div> - </td> - </tr> -</tbody> -<!-- FIN $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-listar-vacia.php $ --> diff --git a/src/www/include/hooks/default-db-listar.php b/src/www/include/hooks/default-db-listar.php deleted file mode 100644 index df54eaf..0000000 --- a/src/www/include/hooks/default-db-listar.php +++ /dev/null @@ -1,84 +0,0 @@ -<?php -// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4: -// +--------------------------------------------------------------------+ -// | HORAS EXTRA | -// +--------------------------------------------------------------------+ -// | Sistema de Horas Extra - Ministerio de Economía - Argentina | -// +--------------------------------------------------------------------+ -// | Creado: jue oct 10 14:55:31 ART 2002 | -// | Autor: Leandro Lucarella <llucar@mecon.gov.ar> | -// +--------------------------------------------------------------------+ -// -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-listar.php $ -// $Rev: 128 $ -// $Date: 2002-11-07 19:28:18 -0300 (jue, 07 nov 2002) $ -// $Author: llucar $ -// - -require_once 'HE/DB.php'; -require_once 'HE/lib/hooks.php'; - -/** - * Dibuja un listado de una base de datos. - * - * @param object HE_DB $db Base de datos que se lista. - * @param array $campos Campos a mostrar. - * @param string $class Class para CSS. - */ - -// Extrae los parámetros del hook. -list( $campos, $class ) = array_slice( $args, 2 ); -$db =& $objeto; - -// Setea las diferentes "classes" de estilos -$class = is_null( $class ) ? 'he_db' : $class; -$class = is_string( $class ) ? $class : get_class( $db ); -$class_t = ( $class === false ) ? '' : ' class="' . $class . '_titulo"'; -$class_f = ( $class === false ) ? '' : ' class="' . $class . '_pie"'; -$classtd[0] = ( $class === false ) ? '' : ' class="' . $class . '_par"'; -$classtd[1] = ( $class === false ) ? '' : ' class="' . $class . '_impar"'; -$class = ( $class === false ) ? '' : ' class="' . $class . '"'; - -// Tabla -printf( '<table summary="Lista de %s" bordercolor="#006699" border="1" cellspacing="0" cellpadding="0" width="100%%"%s>', - $db->_nombres, - $class ); - -// Título (eliminar??? TODO) -#printf( '<caption%s>Lista de %s</caption>', $class, $db->_nombres ); - -// Si hay resultados -if ( $primero = $db->siguiente() ) { - // Si no se especificaron campos (o no hay ninguno de los - // solicitados disponibles), muestra todos. - if ( !count( $campos ) or ! count( array_intersect( $campos, array_keys( $primero ) ) ) ) - $campos = array_keys( $primero ); - - // Cabecera - hooko( 'listar-cabecera', $db, $campos, array_keys( $primero ), false, $class_t ); - - // Cuerpo - printf( '<tbody%s>', $class ); - - // Primer elemento - hooko( 'listar-elemento', $db, $primero, $campos, - false, false, $classtd[1] ); - - // Resto de los elementos - for ( $i = 0; $r = $db->siguiente(); $i++ ) - hooko( 'listar-elemento', $db, $r, $campos, - false, false, $classtd[$i%2] ); - - printf( '</tbody>' ); - -} else { // Si no hay resultados - - // Muestra mensaje - hooko( 'listar-vacia', $db, $class ); - -} - -echo '</table>'; - -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db-listar.php $ $Rev: 128 $ $Date: 2002-11-07 19:28:18 -0300 (jue, 07 nov 2002) $ $Author: llucar $ -?> diff --git a/src/www/include/hooks/default-db_abm-listar-agregar.php b/src/www/include/hooks/default-db_abm-listar-agregar.php deleted file mode 100644 index b4c4272..0000000 --- a/src/www/include/hooks/default-db_abm-listar-agregar.php +++ /dev/null @@ -1,50 +0,0 @@ -<?php -// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4: -// +--------------------------------------------------------------------+ -// | HORAS EXTRA | -// +--------------------------------------------------------------------+ -// | Sistema de Horas Extra - Ministerio de Economía - Argentina | -// +--------------------------------------------------------------------+ -// | Creado: jue oct 10 16:57:53 ART 2002 | -// | Autor: Leandro Lucarella <llucar@mecon.gov.ar> | -// +--------------------------------------------------------------------+ -// -// $URL: http://portal.mecon.ar/svn/he/tronco/src/includes/hooks/default-db-listar-elemento.php $ -// $Rev: 117 $ -// $Date: 2002-10-23 19:17:04 -0300 (mié, 23 oct 2002) $ -// $Author: llucar $ -// - -require_once 'HE/DB.php'; -require_once 'HE/lib/hooks.php'; - -/** - * Dibujar el botón de agragar en un listado de una base de datos. - * - * @param object HE_DB $db Base de datos que se lista. - * @param int $colspan Cantidad de filas a utilizar. - * @param bool $agregar Página a donde dirigir para agregar. - * @param string $class Class para CSS. - */ - -// Extrae los parámetros del hook. -list( $colspan, $agregar, $class ) = array_slice( $args, 2 ); -$db =& $objeto; - -?> -<!-- INICIO $URL: http://portal.mecon.ar/svn/he/tronco/src/includes/hooks/default-db-listar-elemento.php $ --> -<tfoot<?= $class ?>> - <tr<?= $class ?>> - <td colspan="<?= $colspan ?>"<?= $class ?>> - <a title="Agrega un nuevo <?= $db->_nombre ?>" - href="<?= $agregar ?>"<?= $class ?>><? - if ( isset( $db->_img['agregar'] ) ) { - ?><img src="<?= $db->_img['dir'] . '/' . $db->_img['agregar'] ?>" - border="0" alt="Agregar un nuevo <?= $db->_nombre ?>" - /><? } else { - ?>Agregar<? - } ?></a> - </td> - </tr> -</tfoot> -<!-- FIN $URL: http://portal.mecon.ar/svn/he/tronco/src/includes/hooks/default-db-listar-elemento.php $ --> diff --git a/src/www/include/hooks/default-db_abm-listar-elemento-abm.php b/src/www/include/hooks/default-db_abm-listar-elemento-abm.php deleted file mode 100644 index f48b18a..0000000 --- a/src/www/include/hooks/default-db_abm-listar-elemento-abm.php +++ /dev/null @@ -1,53 +0,0 @@ -<?php -// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4: -// +--------------------------------------------------------------------+ -// | HORAS EXTRA | -// +--------------------------------------------------------------------+ -// | Sistema de Horas Extra - Ministerio de Economía - Argentina | -// +--------------------------------------------------------------------+ -// | Creado: jue oct 10 16:57:53 ART 2002 | -// | Autor: Leandro Lucarella <llucar@mecon.gov.ar> | -// +--------------------------------------------------------------------+ -// -// $URL: http://portal.mecon.ar/svn/he/tronco/src/includes/hooks/default-db-listar-elemento.php $ -// $Rev: 117 $ -// $Date: 2002-10-23 19:17:04 -0300 (mié, 23 oct 2002) $ -// $Author: llucar $ -// - -require_once 'HE/DB.php'; -require_once 'HE/lib/hooks.php'; - -/** - * Dibujar una acción para un elemento de un listado. - * - * @param object HE_DB $db Base de datos que se lista. - * @param string $tipo Tipo de acción. - * @param string $pagina Página a donde dirigir con la acción. - * @param string $class Class para CSS. - */ - -// Extrae los parámetros del hook. -list( $tipo, $pagina, $get, $class ) = array_slice( $args, 2 ); -$db =& $objeto; - -printf( '<a title="%s este %s" href="%s?%s"%s>', - ucfirst( $tipo ), - $db->_nombre, - $pagina, - $get, - $class ); - -if ( isset( $db->_img[$tipo] ) ) - printf( '<img src="%s/%s" border="0" alt="%s este %s"/>', - $db->_img['dir'], - $db->_img[$tipo], - ucfirst( $tipo ), - $db->_nombre ); -else - echo ucfirst( $tipo ); - -echo '</a>'; - -// $URL: http://portal.mecon.ar/svn/he/tronco/src/includes/hooks/default-db-listar-elemento.php $ -?> diff --git a/src/www/include/hooks/default-db_abm-listar.php b/src/www/include/hooks/default-db_abm-listar.php deleted file mode 100644 index c79ee27..0000000 --- a/src/www/include/hooks/default-db_abm-listar.php +++ /dev/null @@ -1,101 +0,0 @@ -<?php -// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4: -// +--------------------------------------------------------------------+ -// | HORAS EXTRA | -// +--------------------------------------------------------------------+ -// | Sistema de Horas Extra - Ministerio de Economía - Argentina | -// +--------------------------------------------------------------------+ -// | Creado: lun oct 21 18:16:36 ART 2002 | -// | Autor: Leandro Lucarella <llucar@mecon.gov.ar> | -// +--------------------------------------------------------------------+ -// -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db_abm-listar.php $ -// $Rev: 128 $ -// $Date: 2002-11-07 19:28:18 -0300 (jue, 07 nov 2002) $ -// $Author: llucar $ -// - -require_once 'HE/DB/ABM.php'; -require_once 'HE/lib/hooks.php'; - -/** - * Dibuja un listado de una base de datos. - * - * @param object HE_DB $db Base de datos que se lista. - * @param array $campos Campos a mostrar. - * @param string $class Class para CSS. - */ - -// Extrae los parámetros del hook. -list( $campos, $agregar, $modificar, $borrar, $class ) = array_slice( $args, 2 ); -$db =& $objeto; - -// Setea las diferentes "classes" de estilos -$class = is_null( $class ) ? 'he_db' : $class; -$class = is_string( $class ) ? $class : get_class( $db ); -$class_t = ( $class === false ) ? '' : ' class="' . $class . '_titulo"'; -$class_f = ( $class === false ) ? '' : ' class="' . $class . '_pie"'; -$classtd[0] = ( $class === false ) ? '' : ' class="' . $class . '_par"'; -$classtd[1] = ( $class === false ) ? '' : ' class="' . $class . '_impar"'; -$class = ( $class === false ) ? '' : ' class="' . $class . '"'; - -// Setea valores por defecto de los links de ABM. -foreach ( array( 'agregar', 'borrar', 'modificar' ) as $a ) { - if ( is_null( $$a ) ) - $$a = "$a.php"; -} - -// Tabla -printf( '<table summary="Lista de %s" bordercolor="#006699" border="1" cellspacing="0" cellpadding="0" width="100%%"%s>', - $db->_nombres, - $class ); - -// Título (eliminar??? TODO) -#printf( '<caption%s>Lista de %s</caption>', $class, $db->_nombres ); - -// Si hay resultados -if ( $primero = $db->siguiente() ) { - // Si no se especificaron campos (o no hay ninguno de los - // solicitados disponibles), muestra todos. - if ( !count( $campos ) or ! count( array_intersect( $campos, array_keys( $primero ) ) ) ) - $campos = array_keys( $primero ); - - // Cabecera - hooko( 'listar-cabecera', $db, $campos, array_keys( $primero ), - $modificar or $borrar, $class_t ); - - // Cuerpo - printf( '<tbody%s>', $class ); - - // Primer elemento - hooko( 'listar-elemento', $db, $primero, $campos, - $modificar, $borrar, $classtd[1] ); - - // Resto de los elementos - for ( $i = 0; $r = $db->siguiente(); $i++ ) - hooko( 'listar-elemento', $db, $r, $campos, - $modificar, $borrar, $classtd[$i%2] ); - - // Link a Agregar - if ( $agregar ) - hooko( 'listar-agregar', - $db, count( array_intersect( array_keys( $primero ), $campos ) ) - + intval( $modificar or $borrar ), $agregar, $class_f ); - -} else { // Si no hay resultados - - // Muestra mensaje - hooko( 'listar-vacia', $db, $class ); - - // Link a Agregar - if ( $agregar ) - hooko( 'listar-agregar', - $db, count( array_intersect( array_keys( $primero ), $campos ) ) - + intval( $modificar or $borrar ), $agregar, $class_f ); - -} - -echo '</table>'; - -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db_abm-listar.php $ $Rev: 128 $ $Date: 2002-11-07 19:28:18 -0300 (jue, 07 nov 2002) $ $Author: llucar $ -?> diff --git a/src/www/include/hooks/default-db_abm_nivel-form-nivel.php b/src/www/include/hooks/default-db_abm_nivel-form-nivel.php deleted file mode 100644 index 3e17af2..0000000 --- a/src/www/include/hooks/default-db_abm_nivel-form-nivel.php +++ /dev/null @@ -1,63 +0,0 @@ -<?php -// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4: -// +--------------------------------------------------------------------+ -// | HORAS EXTRA | -// +--------------------------------------------------------------------+ -// | Sistema de Horas Extra - Ministerio de Economía - Argentina | -// +--------------------------------------------------------------------+ -// | Creado: mié oct 23 18:48:30 ART 2002 | -// | Autor: Leandro Lucarella <llucar@mecon.gov.ar> | -// +--------------------------------------------------------------------+ -// -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db_abm_nivel-form-nivel.php $ -// $Rev: 118 $ -// $Date: 2002-10-24 13:11:49 -0300 (jue, 24 oct 2002) $ -// $Author: llucar $ -// - -require_once 'HE/DB/ABM/Nivel.php'; -require_once 'HE/Perm.php'; - -/** - * Dibuja un elemento de selección múltiple de un formulario para - * crear/modificar un nivel en base a los permisos posibles. - * - * @param object HE_DB $db Base de datos que se lista. - * @param string $tipo Como mostrarlo (si es para buscar, ver, etc). - * @param string $class Class para CSS. - */ - -// Extrae los parámetros del hook. -list( $tipo, $class ) = array_slice( $args, 2 ); -$db =& $objeto; - -$perm =& $GLOBALS['PRM']; - -// Obtiene variable. -if ( $db->formulario_enviado() ) { - $nivel = $perm->sumar( $_POST[$db->_form_var.'_campo_nivel'] ); -} elseif ( isset( $_GET[$db->_form_var.'_campo_nivel'] ) ) { - $nivel = $_GET[$db->_form_var.'_campo_nivel']; -} elseif ( isset( $_GET[$db->_form_var.'_original_login'] ) ) { - $nivel = $db->nivel( $_GET[$db->_form_var.'_original_login'] ); -} else { - $nivel = 0; -} - -switch ( strtolower( $tipo ) ) { - case 'buscar': - hooko( 'form--text', $db, 'nivel', $tipo, $class ); - break; - case 'agregar': - case 'modificar': - echo $perm->select( $db->_form_var . '_campo_nivel', - $nivel, - $class ); - break; - default: - echo $db->_procesar_nivel( $nivel ); - break; -} - -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-db_abm_nivel-form-nivel.php $ $Rev: 118 $ $Date: 2002-10-24 13:11:49 -0300 (jue, 24 oct 2002) $ $Author: llucar $ -?> diff --git a/src/www/include/hooks/default-foot.php b/src/www/include/hooks/default-foot.php new file mode 100644 index 0000000..a56de87 --- /dev/null +++ b/src/www/include/hooks/default-foot.php @@ -0,0 +1,39 @@ +<?php + require_once 'lib/HE/hooks.php'; +// +--------------------------------------------------------------------+ +// | SAMURAI | +// +--------------------------------------------------------------------+ +// | Sistema de Administracion y Matenimiento de Usuarios Relativo A | +// | Intranet | +// | Ministerio de Economía | +// +--------------------------------------------------------------------+ +// | Creado: fri mar 21 ART 2003 | +// | Autor: Martin Marrese <mmarre@mecon.gov.ar> | +// +--------------------------------------------------------------------+ +// +// $Id$ +// +// $URL$ +// $Rev$ +// $Date$ +// $Author$ +?> + </td> + </tr> + <tr> + <td> + <br> + </td> + </tr> + <tr width="[+ $menu?"600":"800" +]" align="center" vAlign="center"> + <td bgColor="#cccccc" colSpan="2"> + <font face="Arial, Helvetica, sans-serif" size=1> + <?php + hook('titulo-copyright'); + ?> + </font> + </td> + </tr> + </table> + </body> +</html> diff --git a/src/www/include/hooks/default-head.php b/src/www/include/hooks/default-head.php index 1418186..928b041 100644 --- a/src/www/include/hooks/default-head.php +++ b/src/www/include/hooks/default-head.php @@ -1,3 +1,49 @@ -<!-- INICIO $URL: http://portal.mecon.ar/svn/he/tronco/src/includes/db/default-head.php $ $Rev: 83 $ $Date: 2002-09-03 15:59:58 -0300 (mar, 03 sep 2002) $ $Author: luca $ --> -<link rel="stylesheet" href="<?= $GLOBALS['CNF']['webroot'] ?>/css/he_db.css" type="text/css"/> -<!-- FIN $URL: http://portal.mecon.ar/svn/he/tronco/src/includes/db/default-head.php $ $Rev: 83 $ $Date: 2002-09-03 15:59:58 -0300 (mar, 03 sep 2002) $ $Author: luca $ --> +<?php + require_once 'lib/HE/hooks.php'; +// +--------------------------------------------------------------------+ +// | SAMURAI | +// +--------------------------------------------------------------------+ +// | Sistema de Administracion y Matenimiento de Usuarios Relativo A | +// | Intranet | +// | Ministerio de Economía | +// +--------------------------------------------------------------------+ +// | Creado: fri mar 21 ART 2003 | +// | Autor: Martin Marrese <mmarre@mecon.gov.ar> | +// +--------------------------------------------------------------------+ +// +// $Id$ +// +// $URL$ +// $Rev$ +// $Date$ +// $Author$ +?> + +<html> + <head> + <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> + <title> + <?php + hook('titulo-sistema'); + ?> + + + ?> + + ?> + + + + + // ?> + + + + + + + + + - - - - - - - -
diff --git a/src/www/include/hooks/default-pie.php b/src/www/include/hooks/default-pie.php deleted file mode 100644 index 9bfbc6d..0000000 --- a/src/www/include/hooks/default-pie.php +++ /dev/null @@ -1,31 +0,0 @@ - - -


-
- - - Información | - Servicios | - Consultas | - Gestión Horizontal | - Gestión Local - -
- Copyright © 2001- Ministerio de Economía -
- - - diff --git a/src/www/include/hooks/default-script.php b/src/www/include/hooks/default-script.php new file mode 100644 index 0000000..33efed7 --- /dev/null +++ b/src/www/include/hooks/default-script.php @@ -0,0 +1,60 @@ + | +// +--------------------------------------------------------------------+ +// +// $Id$ +// +// $URL$ +// $Rev$ +// $Date$ +// $Author$ +?> + + + + diff --git a/src/www/include/hooks/default-secciones.php b/src/www/include/hooks/default-secciones.php deleted file mode 100644 index cbc45b4..0000000 --- a/src/www/include/hooks/default-secciones.php +++ /dev/null @@ -1,98 +0,0 @@ - | -// +--------------------------------------------------------------------+ -// -// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/includes/hooks/default-secciones.php $ -// $Rev: 118 $ -// $Date: 2002-10-24 13:11:49 -0300 (jue, 24 oct 2002) $ -// $Author: llucar $ -// - -// 'Importa' la configuración de los hooks. -global $CNF, $PRM; - -// Obtiene la seccion actual. -if ( preg_match( '|' . $GLOBALS['CNF']['webroot'] . '/([^/]+)/|', $_SERVER['PHP_SELF'], $m ) ) - $seccion = $m[1]; -else - $seccion = ''; - -// Secciones. -$secciones = array( - '1' => 'administracion', - '2' => 'carga', - '3' => 'procesos', - '4' => 'consultas', - '5' => 'informes', -); - -// Permisos para cada sección. -$permisos = array( - '1' => array( - HE_PERM_NIVEL_ABM, - HE_PERM_PORCENTAJE_ABM, - HE_PERM_USUARIO_ABM, - ), - '2' => array( - HE_PERM_CARGA, - HE_PERM_AGENTE_ABM, - ), - '3' => array( - HE_PERM_CARGA, - ), - '4' => array( - HE_PERM_NIVEL_CL, - HE_PERM_PORCENTAJE_CL, - HE_PERM_USUARIO_CL, - HE_PERM_AGENTE_CL, - ), - '5' => array( - HE_PERM_CARGA, - ), -); - -// Texto para poner una imagen seleccionada. -$selected = '%s'; -$unselected = '%s'; - -?> - - -
$dir ) - if ( call_user_func_array( array( $GLOBALS['PRM'], 'tieneO' ), $permisos[$n] ) ) { - if ( $seccion == $dir ) - printf( $selected, $GLOBALS['CNF']['webroot'], $dir, $n, $GLOBALS['CNF']['webroot'], $n, $n, $GLOBALS['CNF']['webroot'], $n, ucfirst( $dir ) ); - else - printf( $unselected, $GLOBALS['CNF']['webroot'], $dir, $n, $GLOBALS['CNF']['webroot'], $n, $n, $GLOBALS['CNF']['webroot'], $n, $n, $GLOBALS['CNF']['webroot'], $n, ucfirst( $dir ) ); - } - -?>
- diff --git a/src/www/include/hooks/default-subsecciones.php b/src/www/include/hooks/default-subsecciones.php deleted file mode 100644 index 2f4bc9e..0000000 --- a/src/www/include/hooks/default-subsecciones.php +++ /dev/null @@ -1,6 +0,0 @@ - - - diff --git a/src/www/include/hooks/default-titulo-copyright.php b/src/www/include/hooks/default-titulo-copyright.php new file mode 100644 index 0000000..844ee1a --- /dev/null +++ b/src/www/include/hooks/default-titulo-copyright.php @@ -0,0 +1 @@ +Copyright © 2003 Ministerio de Economía diff --git a/src/www/include/hooks/default-titulo-sistema.php b/src/www/include/hooks/default-titulo-sistema.php new file mode 100644 index 0000000..5f17025 --- /dev/null +++ b/src/www/include/hooks/default-titulo-sistema.php @@ -0,0 +1 @@ +SAMURAI - Sistema de Administracion y Mantenimiento de Usuarios Relativo A Intranet diff --git a/src/www/include/hooks/default-titulo.php b/src/www/include/hooks/default-titulo.php deleted file mode 100644 index d4548a3..0000000 --- a/src/www/include/hooks/default-titulo.php +++ /dev/null @@ -1 +0,0 @@ -Horas Extra diff --git a/src/www/include/lib/HE/hooks.php b/src/www/include/lib/HE/hooks.php new file mode 100644 index 0000000..ca082ff --- /dev/null +++ b/src/www/include/lib/HE/hooks.php @@ -0,0 +1,308 @@ + | +// +--------------------------------------------------------------------+ +// +// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/lib/HE/lib/hooks.php $ +// $Rev: 116 $ +// $Date: 2002-10-23 19:09:12 -0300 (mié, 23 oct 2002) $ +// $Author: llucar $ +// + +/** + * "Engancha" una página dentro de otra. + * + * Esta función busca por un archivo llamado igual que el script php que + * se está ejecutando más un postfijo para incluirlo en la ejecución. De + * no encontrarlo, busca uno llamado default-.php en el + * directorio actual y/o en el include_path del php. + * Por otro lado soporta argumentos variables, que son 'pasados' al hook + * en el array $args. De esta manera se pueden parametrizar los hooks. + * + * @param string $nombre Nombre del "gancho". Es el nombre del posfijo + * que se le agrega al nombre de archivo antes de + * buscar. + * + * @return mixed Devuelve lo mismo que el archivo incluído. + */ +function hook( $nombre ) { + + // Se pasan todos los argumentos del hook (nótese que de forma similar + // al argv[] del sistema, el primer elemento es el nombre del hook + // siempre). + $args = func_get_args(); + + list( $dir, $pagina, $extension ) = splitfilename( $_SERVER['SCRIPT_FILENAME'] ); + if ( is_readable_include( "$pagina-$nombre.php" ) ) { + return include "$pagina-$nombre.php"; + } elseif ( is_readable_include( "default-$nombre.php" ) ) { + return include "default-$nombre.php"; + } elseif ( is_readable_include( "includes/hooks/default-$nombre.php" ) ) { + return include "includes/hooks/default-$nombre.php"; + } + +} + +/** + * "Engancha" una página dentro de otra desde un método de un objeto. + * + * Esta función busca por un archivo llamado igual que el script php que + * se está ejecutando más un postfijo para incluirlo en la ejecución. De + * no encontrarlo, busca uno llamado default--.php en el + * directorio actual y/o en el include_path del php. es la clase + * del objeto o de un objeto padre (obtenido del nombre de la clase según + * las recomendaciones de PEAR ). Se busca primero + * un hook que coincida con la clase más específica y luego el de las + * clases padre. + * Por otro lado soporta argumentos variables, que son 'pasados' al hook + * en el array $args. De esta manera se pueden parametrizar los hooks. + * + * @param string $nombre Nombre del "gancho". Es el nombre del posfijo + * que se le agrega al nombre de archivo antes de + * buscar. + * @param object &$objeto Objeto a usar en el hooko. + * + * @return mixed Devuelve lo mismo que el archivo incluído. + */ +function hooko( $nombre, &$objeto ) { + + // Se pasan todos los argumentos del hook (nótese que de forma similar + // al argv[] del sistema, el primer elemento es el nombre del hook + // siempre). + $args = func_get_args(); + + // Obtiene el nombre de la clase y sus padres. + $c = preg_split( '/_/', get_class( $objeto ) ); + array_shift( $c ); // Le saca el HE + + list( $dir, $pagina, $extension ) = splitfilename( $_SERVER['SCRIPT_FILENAME'] ); + + // Busca el hook con "herencia" de clases. + foreach( $c as $n => $class ) { + + // Genera el nombre de la clase padre del nivel $n. + $class = join( '_', array_slice( $c, 0, $n ? -$n : count( $c ) ) ); + + if ( is_readable_include( "$pagina-$class-$nombre.php" ) ) { + return include "$pagina-$class-$nombre.php"; + } elseif ( is_readable_include( "default-$class-$nombre.php" ) ) { + return include "default-$class-$nombre.php"; + } elseif ( is_readable_include( "includes/hooks/default-$class-$nombre.php" ) ) { + return include "includes/hooks/default-$class-$nombre.php"; + } + + } + +} + +/** + * "Engancha" una segmento de configuración dentro de una página. + * + * Esta función busca un archivo llamado default- en el include + * path de PHP, luego en el directoro actual, y luego un archivo llamado + * pagina- en el directorio actual. Incluye para su ejecución + * todos los archivos que encuentre. + * De esta manera, las instancias más específicas del hook sobreescriben + * las definiciones hechas en las instancias más genéricas. + * Por otro lado soporta argumentos variables, que son 'pasados' al hook + * en el array $args. De esta manera se pueden parametrizar los hooks. + * + * @param string $nombre Nombre del "gancho". Es el nombre del posfijo + * que se le agrega al nombre de archivo antes de + * buscar. + * + * @return array Devuelve un array_merge() de todos los valores + * devuletos por los hookc encontrados. Para entender bien + * qué pasa en cada caso particular (por ejemplo si un + * hookc devuelve un string y otro un array), hay que + * tener claro como funciona array_merge(). + */ +function hookc( $nombre ) { + + // Se pasan todos los argumentos del hook (nótese que de forma similar + // al argv[] del sistema, el primer elemento es el nombre del hook + // siempre). + $args = func_get_args(); + + list( $dir, $pagina, $extension ) = splitfilename( $_SERVER['SCRIPT_FILENAME'] ); + + $ret = array(); + if ( is_readable_include( "includes/hooks/default-$nombre.php" ) ) + $ret[] = include "includes/hooks/default-$nombre.php"; + if ( is_readable_include( "default-$nombre.php" ) ) + $ret[] = include "default-$nombre.php"; + if ( is_readable_include( "$pagina-$nombre.php" ) ) + $ret[] = include "$pagina-$nombre.php"; + + // Juntamos todos los valores devueltos. Suponemos que todos + // devuelven un hash. De devolver un valor común, seguramente se + // agregue al hash como un valor mas (solo que la clave será numérica + // y autoincremental). + // NOTA: Si las claves son numéricas, los elementos no reemplazan a + // los anteriores!!! Son agregados y se les cambia la clave por un + // número más alto (todavía no usado en el array). + $r = array(); + foreach ( $ret as $array ) + array_merge( $r, $array ); + + return $r; + +} + +/** + * Hook al estilo dotfile. + * + * Este tipo de hook es muy similar a un hook común, sólo cambia donde se + * lo busca. El directorio de búsqueda se especifica expresamente al + * llamar al hook y no hace un fallback a otros hooks por defecto. + * + * @param string $nombre Nombre del "gancho". En este caso simplemente se + * busca el archivo .$nombre.php ya que los este + * tipo de hook es 'directory-wide'. + * @param string $ruta Ruta en donde se encuentra el hookd. + * + * @return mixed Devuelve lo mismo que el archivo incluído. + */ +function hookd( $nombre, $ruta = '.' ) { + + // Se pasan todos los argumentos del hook (nótese que de forma similar + // al argv[] del sistema, el primer elemento es el nombre del hook + // siempre). + $args = func_get_args(); + + if ( is_readable( "$ruta/.$nombre.php" ) ) + return include "$ruta/.$nombre.php"; + +} + +/** + * Verifica que un hook exista. + * + * @param string $nombre Nombre del hook a ver si existe. + * + * @return mixed Devuelve true si existe el hook. + * + * @see hook() + */ +function hook_exists( $nombre ) { + + $include_path = array_unique( array_merge( preg_split( '/:/', ini_get( 'include_path' ) ), '.' ) ); + list( $dir, $pagina, $extension ) = splitfilename( $_SERVER['SCRIPT_FILENAME'] ); + foreach ( $include_path as $path ) + if ( is_readable_include( "$path/$pagina-$nombre.php" ) + or is_readable_include( "$path/default-$nombre.php" ) + or is_readable_include( "$path/includes/hooks/default-$nombre.php" ) ) + return true; + return false; + +} + +/** + * Verifica que un hooko exista. + * + * @param string $nombre Nombre del hooko a ver si existe. + * @param object &$objeto Objeto del que se quiere saber si el hooko + * existe. + * + * @return mixed Devuelve true si existe el hooko. + * + * @see hooko() + */ +function hooko_exists( $nombre, &$objeto ) { + + $include_path = array_unique( array_merge( preg_split( '/:/', ini_get( 'include_path' ) ), '.' ) ); + list( $dir, $pagina, $extension ) = splitfilename( $_SERVER['SCRIPT_FILENAME'] ); + $c = preg_split( '/_/', get_class( $objeto ) ); + array_shift( $c ); // Le saca el HE + + // Busca el hooko con "herencia" de clases. + foreach( $c as $n => $class ) { + $class = join( '_', array_slice( $c, 0, $n ? -$n : count( $c ) ) ); + foreach ( $include_path as $path ) + if ( is_readable_include( "$path/$pagina-$class-$nombre.php" ) + or is_readable_include( "$path/default-$class-$nombre.php" ) + or is_readable_include( "$path/includes/hooks/default-$class-$nombre.php" ) ) + return true; + } + + return false; + +} + +/** + * Verifica que un hookd exista. + * + * @param string $nombre Nombre del hookd a ver si existe. + * @param string $ruta Ruta donde se encuentra el hookd. + * + * @return mixed Devuelve true si existe el hookd. + * + * @see hookd() + */ +function hookd_exists( $nombre, $ruta = '.' ) { + + return is_readable( "$ruta/.$nombre.php" ); + +} + +/** + * Divide un archivo devolviendo el nombre y la extensión. + * + * @param string $nombre Nombre del archivo a dividir. + * + * @return array Un array cuyo primer elemento es el nombre y el segundo + * la extensión. + * + * @see hook() + */ +function splitfilename( $nombre ) { + + $path = preg_split( '|/|', $nombre ); + $file = array_pop( $path ); + $ext = ''; + + if ( strstr( $file, '.' ) ) { + preg_match( '|([^/]+?)(\.([^\.]*))?$|', $file, $m ); + $file = $m[1] . ( ( $m[2] == '.' ) ? '.' : '' ); + $ext = $m[3]; + } + + $dir = count( $path ) ? join( '/', $path ) : ''; + + return array( $dir, $file, $ext ); + +} + +/** + * Indica si un archivo existe en el include_path y si puede ser leido. + * + * @param string $nombre Nombre del archivo a buscar. + * + * @return array Devuelve true si esta en el include path y puede ser + * leido. + * + * @see hook() + * @see hook_exists() + */ +function is_readable_include( $nombre ) { + + list( $dir, $pagina, $extension ) = splitfilename( $nombre ); + if ( is_readable( $nombre ) ) + return true; + + $include_path = preg_split( '/:/', ini_get( 'include_path' ) ); + foreach ( $include_path as $path ) + if ( is_readable( "$path/$nombre" ) ) + return true; + return false; + +} + +// $URL: http://portal.mecon.ar/svn/he/ramas/carga_inicial/src/lib/HE/lib/hooks.php $ $Rev: 116 $ $Date: 2002-10-23 19:09:12 -0300 (mié, 23 oct 2002) $ $Author: llucar $ +?> diff --git a/src/www/include/lib/SA/Secciones.php b/src/www/include/lib/SA/Secciones.php new file mode 100644 index 0000000..f0f27cc --- /dev/null +++ b/src/www/include/lib/SA/Secciones.php @@ -0,0 +1,83 @@ + | +// +--------------------------------------------------------------------+ +// +// $Id$ +// +// $URL$ +// $Rev$ +// $Date$ +// $Author$ + +require_once 'PEAR.php'; + +/** +* Manejo de secciones. +* +* Libreria para le manejo de las secciones del sistema. +* +* @package Samurai +* @version $Rev$ +* @author $Author$ +*/ + +class SA_Secciones extends PEAR { + + /** + * Datos de las secciones + * + * @var array + */ + var $_secciones; + + /** + * Constructor. + * + * No necesita parametros de entrada, pues los levanta de un + * archivo predefinido 'conf/secciones_Conf.php'. + * + * @access public + */ + function SA_Secciones() + { + $this->PEAR(); + $this->_secciones = include '../conf/secciones_Conf.php'; + } + + /** + * Devulve el HTML de las secciones. + * + * Devuelve en codigo HTML el tag para cada seccion. + * + * @return $seccion + * + * @access public + */ + function display () + { + $pagina_actual = basename($_SERVER['PHP_SELF']); + $seccion =''; + foreach ($this->_secciones as $sec) { + if ($sec['link'] == $pagina_actual) { + $imagen = $sec['img_select']; + } + else { + $imagen = $sec['img_comun']; + } + $seccion.= ''.$sec['nombre'].' '; + } + return $seccion; + } + +} + +?> diff --git a/src/www/include/prepend.php b/src/www/include/prepend.php deleted file mode 100644 index f0e9e9e..0000000 --- a/src/www/include/prepend.php +++ /dev/null @@ -1,83 +0,0 @@ - | -// +--------------------------------------------------------------------+ -// -// $URL$ -// $Rev$ -// $Date$ -// $Author$ -// - -// Comienza el manejo de sesiones. -session_start(); - -// Hace que de forma general, si hay un error, se interrumpa la ejecución -// (excepto aquellos que sean advertencias). -require_once 'PEAR.php'; -PEAR::setErrorHandling( PEAR_ERROR_DIE ); - -// Obtiene la sesión de Embperl. -require_once 'HE/Session/Perl.php'; -$udat = HE_Session_Perl::udat(); - -// Se fija si está logueado en la intranet. -if ( $udat === false or !isset( $udat['user'] ) or !isset( $udat['nro_doc'] ) ) { - // Limpia los datos de la sesión. - session_destroy(); - setcookie( session_name(), '', 0, '/', '.mecon.ar' ); - $_SESSION = array(); - // Redirecciona al login. - header( 'Location: /' ); - exit; -} elseif ( is_string( $udat ) ) { - die( "

ERROR DE SESION

$udat

Este es un error no esperado, por favor anote el mensaje de error e informelo a ".$basehost."@mecon.gov.ar" ); -} - -// Setea las variables de usuario. -$_SESSION['usuario']['login'] = $udat['user']; -$_SESSION['usuario']['nrodoc'] = intval( $udat['nro_doc'] ); - -// Obtiene el nivel del usuario. -require_once 'HE/DB/ABM/Usuario.php'; -$USR =& new HE_DB_ABM_Usuario; -$_SESSION['usuario']['nivel'] = $USR->nivel(); - -// Obtiene la dependencia del usuario. -require_once 'HE/DB/Persona.php'; -$PRS =& new HE_DB_Persona; -switch ( $_SESSION['usuario']['login'] ) { - case 'llucar@mecon': $_SESSION['usuario']['dependencia'] = '3002030702'; break; - case 'mmespi@mecon': $_SESSION['usuario']['dependencia'] = '3002030702'; break; - case 'rcarta@mecon': $_SESSION['usuario']['dependencia'] = '1000020000'; break; - case 'aausil@mecon': $_SESSION['usuario']['dependencia'] = '1301010000'; break; - case 'pabaez@mecon': $_SESSION['usuario']['dependencia'] = '3002030300'; break; - case 'vfranc@mecon': $_SESSION['usuario']['dependencia'] = '3002030203'; break; - case 'malvar1@mecon': $_SESSION['usuario']['dependencia'] = '1200000003'; break; - case 'dcolle@mecon': $_SESSION['usuario']['dependencia'] = '8102020000'; break; - default: $_SESSION['usuario']['dependencia'] = $PRS->dependencia(); -} - -// Crea el objeto de chequeo de permisos. -require_once 'HE/Perm.php'; -$PRM =& new HE_Perm; - -// Hooks. -require_once 'lib/HE/lib/hooks.php'; -// Toma la configuración desde un hook. -$CNF = hook( 'config' ); -// Chequeo de permisos. -hook( 'permisos' ); -// Cosas a ejecutar antes de enviar nada de HTML. -hook( 'prepend' ); -// Cabecera HTML. -hook( 'cabecera' ); - -// $URL$ $Rev$ $Date$ $Author$ -?> diff --git a/src/www/index.php b/src/www/index.php new file mode 100644 index 0000000..3035e10 --- /dev/null +++ b/src/www/index.php @@ -0,0 +1 @@ +