Ejemplo n.º 1
0
<?php

require_once 'request.data.php';
$dt = PdoDataAccess::runquery("select RequestID LON_requests where StatusID=70 ");
flush();
ob_flush();
$i = 0;
foreach ($dt as $row) {
    echo $i++ . " - " . $row["RequestID"] . " : ";
    $result = ComputeInstallments($row["RequestID"], true);
    echo ($result ? "true" : "false") . "<br>";
    flush();
    ob_flush();
}
die;
Ejemplo n.º 2
0
function DeletePart()
{
    $obj = new LON_ReqParts($_POST["PartID"]);
    $dt = PdoDataAccess::runquery("select * from ACC_DocItems join ACC_docs using(DocID)\r\n\t\twhere SourceType=" . DOCTYPE_LOAN_DIFFERENCE . "\r\n\t\tAND SourceID=? AND SourceID2=?", array($obj->RequestID, $obj->PartID));
    if (count($dt) > 0 && $dt[0]["DocStatus"] != "RAW") {
        echo Response::createObjectiveResponse(false, "سند اختلاف تایید شده و قادر به حذف نمی باشید");
        die;
    }
    $pdo = PdoDataAccess::getPdoObject();
    $pdo->beginTransaction();
    if (count($dt) > 0) {
        if (!ACC_docs::Remove($dt[0]["DocID"], $pdo)) {
            echo Response::createObjectiveResponse(false, "خطا در حذف سند");
            die;
        }
    }
    if (!LON_ReqParts::DeletePart($_POST["PartID"], $pdo)) {
        echo Response::createObjectiveResponse(false, "خطا در حذف شرایط");
        die;
    }
    $dt = PdoDataAccess::runquery("select PartID from LON_ReqParts where RequestID=? order by PartID desc", array($obj->RequestID), $pdo);
    if (count($dt) > 0) {
        $obj2 = new LON_ReqParts($dt[0]["PartID"]);
        $obj2->IsHistory = "NO";
        $obj2->EditPart($pdo);
    }
    ComputeInstallments($obj->RequestID, true, $pdo);
    $pdo->commit();
    echo Response::createObjectiveResponse(true, "");
    die;
}