]> git.llucax.com Git - mecon/meconlib.git/blobdiff - samurai_lib/src/prueba.php
Nombre de la Libreria: samurai_lib
[mecon/meconlib.git] / samurai_lib / src / prueba.php
index 55aa828db3b3ece20df53bec7a36ac461a31a243..249f6ccce9d66d103ea5b3b47a1452b83ec0ab59 100644 (file)
@@ -2,22 +2,31 @@
 
 include 'samurai_lib.php';
 
 
 include 'samurai_lib.php';
 
-$p = new SA_Perm();
-
-var_dump ($p);
-
-print "<br>";
-print "<BR>";
-
-$pp = new SA_Perm(28924563);
-
-var_dump($pp);
-
-print "<BR>";
-print "<BR>";
-
-printf("%s",$pp->nrodoc);
-
-var_dump($pp->SQL);
-
+print "Prueba Objeto SA_Perm de samurai_lib<BR>";
+
+$permiso = new SA_Perm(1,'mdegan@mecon');
+
+print "<BR>Probando la funcion tiene -> ";
+if ($permiso->tiene(1,2,3,4,5,6,7,3)) {
+    print "Tiene todos los permisos<BR>";
+}
+else {
+    print "No tiene todos los permisos<BR>";
+}
+
+print "<BR>Probando la funcion tieneO -> ";
+if ($permiso->tieneO(1,2,3,4,5,7,3)) {
+    print "Tiene alguno de los permisos<BR>";
+}
+else {
+    print "No tiene permiso alguno<BR>";
+}
+
+print "<BR>Probando la funcion tieneUn -> ";
+if ($permiso->tieneO(2)) {
+    print "Tiene EL permiso<BR>";
+}
+else {
+    print "No tiene EL permiso<BR>";
+}
 ?>
 ?>