function setDeposito($monto, $cheque = "NA", $tipo_de_pago = TESORERIA_COBRO_CHEQUE, $recibo_fiscal = DEFAULT_RECIBO_FISCAL, $observaciones = "", $grupo = DEFAULT_GRUPO, $fecha = false, $recibo = false)
 {
     if ($monto > 0) {
         if (setNoMenorQueCero($this->mPeriodoCuenta) == 0) {
             $this->mPeriodoCuenta = 1;
         }
         if (setNoMenorQueCero($this->mSocioTitular) <= DEFAULT_SOCIO) {
             $this->init();
         }
         if ($grupo == DEFAULT_GRUPO) {
             $grupo = $this->mGrupoAsociado;
         }
         if ($fecha == false) {
             if (isset($this->mFechaOperacion) and $this->mFechaOperacion != false) {
                 $fecha = $this->mFechaOperacion;
             } else {
                 $fecha = fechasys();
             }
         }
         $fecha = setFechaValida($fecha);
         $this->mFechaOperacion = $fecha;
         $socio = $this->mSocioTitular;
         $CRecibo = new cReciboDeOperacion(4, true);
         //Set a Mvto Contable
         if (setNoMenorQueCero($recibo) > 0) {
             $CRecibo->setNumeroDeRecibo($recibo);
             if ($CRecibo->init() == true) {
                 $CRecibo->setGrupoAsociado($grupo);
                 $CRecibo->setDocumento($this->mNumeroCuenta);
                 $CRecibo->setSocio($this->mSocioTitular);
             } else {
                 $recibo = 0;
             }
         }
         //Agregar recibo si no hay
         if (setNoMenorQueCero($recibo) == 0) {
             $recibo = $CRecibo->setNuevoRecibo($socio, $this->mNumeroCuenta, $this->mFechaOperacion, $this->mPeriodoCuenta, 3, $observaciones, $cheque, $tipo_de_pago, $recibo_fiscal, $grupo);
             //Checar si se agrego el recibo
             if ($recibo != false) {
                 $this->mMessages .= "OK\tSe Agrego Exitosamente el Recibo {$recibo} de la Cuenta " . $this->mNumeroCuenta . " \r\n";
                 $this->mReciboDeOperacion = $recibo;
                 $this->mSucess = true;
             } else {
                 $this->mMessages .= "ERROR\tSe Fallo al Agregar el Recibo {$recibo} de la Cuenta " . $this->mNumeroCuenta . " \r\n";
                 $this->mSucess = false;
             }
         }
         $this->mReciboDeOperacion = $recibo;
         if (setNoMenorQueCero($recibo) > 0) {
             //Agregar el Movimiento
             $CRecibo->setNuevoMvto($fecha, $monto, $this->mOperacionDeposito, $this->mPeriodoCuenta, $observaciones, 1, TM_ABONO, $socio, $this->mNumeroCuenta);
             $CRecibo->setFinalizarRecibo(true);
             $CRecibo->setFinalizarTesoreria();
             $this->mNuevoSaldo = $this->mSaldoAnterior + $monto;
             $this->mMessages .= $CRecibo->getMessages();
             $this->mSucess = true;
             $this->mMessages .= "OK\tSaldo Nuevo por " . $this->mNuevoSaldo . "(" . $this->mSaldoAnterior . "|{$monto}) \r\n";
             //Actualizar la Cuenta
             $this->setUpdateSaldo();
         } else {
             $this->mMessages .= "ERROR\tNo Existe Recibo con el cual trabajar({$recibo}) \r\n";
         }
         $this->mMessages .= $CRecibo->getMessages();
         $this->addSDPM();
     }
     return $recibo;
 }
$credito_de_pruebas = 29000201;
$xAML = new cAMLPersonas($persona_de_pruebas);
$x2AML = new cAMLPersonas_PerfilTransaccional($persona_de_pruebas);
if ($runTest == true) {
    $xCred = new cCredito($credito_de_pruebas);
    $init = true;
    $xCred->init();
    //Ministrar
    if ($xCred->getEsAfectable() == false) {
        $xCred->setForceMinistracion();
        $xCred->setMinistrar("", DEFAULT_CHEQUE, 0, DEFAULT_CUENTA_BANCARIA, 0, 0, "", '2014-01-01');
        $init = $xCred->init();
    }
    if ($init == true) {
        $xRec = new cReciboDeOperacion(RECIBOS_TIPO_PAGO_CREDITO, true);
        $xRec->setDocumento($xCred->getNumeroDeCredito());
        $xRec->setSocio($xCred->getClaveDePersona());
        $idrec = $xRec->setNuevoRecibo($xCred->getClaveDePersona(), $xCred->getNumeroDeCredito(), fechasys(), 1);
        $xCred->setReciboDeOperacion($idrec);
        //agregar pagos
        $xCred->setAbonoCapital(2200, 1, DEFAULT_CHEQUE, TESORERIA_COBRO_EFECTIVO, DEFAULT_RECIBO_FISCAL, "", DEFAULT_GRUPO, "2014-01-15");
        //if($xCred->getORecibo() != null){ $xCred->getORecibo()->setFinalizarRecibo(true); }
        $xCred->setAbonoCapital(5200, 1, DEFAULT_CHEQUE, TESORERIA_COBRO_EFECTIVO, DEFAULT_RECIBO_FISCAL, "", DEFAULT_GRUPO, "2014-01-20");
        //if($xCred->getORecibo() != null){ $xCred->getORecibo()->setFinalizarRecibo(true); }
        $xCred->setAbonoCapital(6200, 1, DEFAULT_CHEQUE, TESORERIA_COBRO_EFECTIVO, DEFAULT_RECIBO_FISCAL, "", DEFAULT_GRUPO, "2014-01-30");
        //if($xCred->getORecibo() != null){ $xCred->getORecibo()->setFinalizarRecibo(true); }
        $xCred->setAbonoCapital(8200, 1, DEFAULT_CHEQUE, TESORERIA_COBRO_EFECTIVO, DEFAULT_RECIBO_FISCAL, "", DEFAULT_GRUPO, "2014-02-05");
        //if($xCred->getORecibo() != null){ $xCred->getORecibo()->setFinalizarRecibo(true); }
        $xCred->setAbonoCapital(9200, 1, DEFAULT_CHEQUE, TESORERIA_COBRO_EFECTIVO, DEFAULT_RECIBO_FISCAL, "", DEFAULT_GRUPO, "2014-02-06");
        $xCred->setAbonoCapital(9200, 1, DEFAULT_CHEQUE, TESORERIA_COBRO_EFECTIVO, DEFAULT_RECIBO_FISCAL, "", DEFAULT_GRUPO, "2014-02-10");
        //if($xCred->getORecibo() != null){ $xCred->getORecibo()->setFinalizarRecibo(true); }