Example #1
0
switch ($lsOperacion) {
    case "buscar":
        $loPadrinos->fpSetEventoPadrino("M");
        $lbEnc = $loMatrimo->fbBuscarMatrimonio($varMoF);
        if ($lbEnc and $varMoF != 4) {
            $liHay = 1;
            $lsNombnovio = $loMatrimo->fsGetNombnovio();
            $lsIDmatrimonio = $loMatrimo->fpGetIDTmatrimonio();
            $lsFechaInscri = $loMatrimo->fpGetFechaInscri();
            $lsFechaMatrimonio = $loMatrimo->fsGetFechaMatrimonio();
            $lsCIFsacerdote = $loMatrimo->fsGetIDsacerdote();
            $lsCIFnovia = $loMatrimo->fsGetCInovia();
            $lsNombnovia = $loMatrimo->fsGetNombnovia();
            $lsCIFnovio = $loMatrimo->fsGetCInovio();
            $lsEstadoMatrimonio = $loMatrimo->fsGetEstadoMatrimonio();
            $lsEstatus = $loMatrimo->fsGetEstatus();
            $loPadrinos->fpSetIDcumatba($lsIDmatrimonio);
            $laMatriz = $loPadrinos->faListarPadrinos();
            $liHay = $lbEnc;
        } else {
            $liHay = 0;
            $lsCIFnovia = $_POST["f_cedunovia"];
            $lsCIFnovio = $_POST["f_cedunovio"];
            $lsNombnovia = "";
            $lsNombnovio = "";
        }
        break;
    case "incluir":
        if ($lsHacer == "buscar") {
            $loPadrinos->fpSetEventoPadrino("M");
            $lbEnc = $loMatrimo->fbBuscarMatrimonio($varMoF);