当前位置: 首页>>代码示例>>PHP>>正文


PHP find_apprdate函数代码示例

本文整理汇总了PHP中find_apprdate函数的典型用法代码示例。如果您正苦于以下问题:PHP find_apprdate函数的具体用法?PHP find_apprdate怎么用?PHP find_apprdate使用的例子?那么恭喜您, 这里精选的函数代码示例或许可以为您提供帮助。


在下文中一共展示了find_apprdate函数的4个代码示例,这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞,您的评价将有助于系统推荐出更棒的PHP代码示例。

示例1: array

<?php

$results = "";
//блок биохимических исследований
$biochemtests = array('792', '791', '821', '806');
$biochemlst = implode(",", $biochemtests);
$biochemistry = get_form_6($ordersid, $biochemtests, $dbh);
//а теперь просто собираем отчет.
$biomat = find_biomat_tests($ordersid, $biochemlst, $dbh);
$head = "\\SetWatermarkText{" . $watermark . "}\n";
$head .= "\\vspace{-10px} \\flushleft \\normalsize Биоматериал: " . $biomat . "\n\n\\vspace{-3px}";
$head .= "\\begin{center} \\large \\textbf{«Онкологический поиск у женщин»} \\end{center}\n\n\\vspace{-0.3cm}";
$head .= $biochemistry . "\n\n";
//исследования проводили...
$end = "\\vspace{0.5cm}\\normalsize Исследования проводили: " . getApprUserTests($ordersid, $biochemlst, $dbh) . "\n\n";
$apprdate = find_apprdate($ordersid, $dbh);
$end .= "\\flushright Дата выдачи: " . $apprdate;
$response = $head . $end;
开发者ID:KhasanOrsaev,项目名称:work_nacpp,代码行数:18,代码来源:form54.php

示例2: form33

function form33($orders, $dbh, $crd)
{
    $curdate = date("m.d.Y");
    $ordersid = "";
    $n = count($orders);
    for ($i = 1; $i < $n; $i++) {
        $ordersid .= $orders[$i];
        if ($i != $n - 1) {
            $ordersid .= ",";
        }
    }
    $results = "";
    $stmt = "select p.panel, o.id from orders o inner join panels p on p.id = o.panelid where o.status in ('O','E') and o.id in (" . $ordersid . ") ";
    $result = ibase_query($dbh, $stmt);
    while ($row = ibase_fetch_row($result)) {
        $restm = "select count(*) from ordtask where ordersid = " . $row[1] . "  and apprsts = 'T'  ";
        $res = ibase_query($dbh, $restm);
        $n = ibase_fetch_row($res);
        $n = $n[0];
        ibase_free_result($res);
        if ($n == 1) {
            $restm = "select a.analyte, case a.analtype when 3 then replace(r.finalresult,'.',',') else r.finalresult end, u.short, r.charlimits, r.status from results r inner join units u on u.id = r.unit inner join analytes a on a.id = r.analyteid inner join ordtask ord on ord.id = r.ordtaskid where ord.ordersid = " . $row[1] . " and finalresult is not null ";
            $res = ibase_query($dbh, $restm);
            $row = ibase_fetch_row($res);
            $ress = $row[1];
            if ($row[4] == "O") {
                $ress = "\\textbf{" . $row[1] . "}";
            }
            $results .= "\\textbf{" . $row[0] . "} & " . $ress . " & " . $row[2] . " \\\\ \n";
            $results .= "\\hline" . "\n";
            ibase_free_result($res);
        } else {
            $results .= "\\textbf{" . $row[0] . "} & &  \\\\ \n\\hline \n";
            $restm = "select a.analyte, case a.analtype when 3 then replace(r.finalresult,'.',',') else r.finalresult end, coalesce(u.short, ' '), coalesce(r.charlimits, ' '), r.status from results r inner join units u on u.id = r.unit inner join analytes a on a.id = r.analyteid inner join ordtask ord on ord.id = r.ordtaskid where ord.ordersid = " . $row[1] . " and finalresult is not null order by a.analyte";
            $res = ibase_query($dbh, $restm);
            while ($row = ibase_fetch_row($res)) {
                $unit = $row[2];
                //$unit = str_replace('%','\\%',$row[2]);
                //$unit = str_replace('^','\\^{}',$unit);
                $charlimits = str_replace('%', '\\%', $row[3]);
                $charlimits = str_replace('^', '\\^{}', $charlimits);
                $ress = $row[1];
                if ($row[4] == "O") {
                    $ress = "\\textbf{" . $row[1] . "}";
                }
                $results .= "~ " . $row[0] . " &  " . $ress . " &  " . $unit . " \\\\ \n";
                $results .= "\\hline" . "\n";
            }
            ibase_free_result($res);
        }
    }
    $user = "";
    $restm = "select distinct coalesce(u.fullname, '') from users u inner join results r on r.usernam = u.usernam inner join ordtask o on o.id = r.ordtaskid inner join orders ord on ord.id = o.ordersid where ord.id in (" . $ordersid . ") ";
    $res = ibase_query($dbh, $restm);
    while ($row = ibase_fetch_row($res)) {
        $user .= $row[0];
    }
    ibase_free_result($res);
    $appruser = "";
    $restm = "select distinct u.fullname from ordtask o inner join users u on u.usernam = o.appruser where o.ordersid in(" . $ordersid . ")";
    $res = ibase_query($dbh, $restm);
    while ($row = ibase_fetch_row($res)) {
        $appruser .= $row[0];
    }
    ibase_free_result($res);
    $comments = "";
    $restm = "select distinct f.comments  from foldercomments f inner join orders o on o.folderno = f.folderno where o.id in(" . $ordersid . ") and f.flag = 'Y' order by f.id";
    $res = ibase_query($dbh, $restm);
    while ($row = ibase_fetch_row($res)) {
        $comments .= "\\small \\quad " . $row[0] . "\n\n";
    }
    ibase_free_result($res);
    $biomat = find_biomat($ordersid, $dbh);
    $head = "\\vspace{-10px} \\flushleft \\normalsize Биоматериал: " . $biomat . "\n\n\\vspace{3px}";
    $head .= "\n\\begin{longtable}[h]{|m{290px}|>{\\centering\\arraybackslash}p{100px}|m{60px}|}\n\\hline\nНазвание испытания & Результат & Единицы измерения  \\\\\n\\hline";
    $end = "\\end{longtable}\n\\vspace{-15px}\n\\flushleft Интерпретация классов: 0 - антитела не обнаружены; 1 - низкий уровень антител; 2 - средний уровень антител; 3 - высокий уровень антител; 4 и выше - очень высокий уровень антител";
    $apprdate = find_apprdate($ordersid, $dbh);
    //$end .= $apprdate;
    $end .= "\n\\vspace{-4px}\n\\flushleft Комментарии:" . $comments . "\n\\flushleft Исследования проводил: " . $user . " \n\\vspace{-4px}\n\\flushleft Выпускающий врач: " . $appruser . " \n\\newline\n\\flushright Дата выдачи: " . $apprdate;
    return $head . $results . $end;
}
开发者ID:KhasanOrsaev,项目名称:work_nacpp,代码行数:81,代码来源:form33.php

示例3: form30

function form30($orders, $dbh, $crd)
{
    $curdate = date("m.d.Y");
    $ordersid = "";
    $n = count($orders);
    for ($i = 1; $i < $n; $i++) {
        $ordersid .= $orders[$i];
        if ($i != $n - 1) {
            $ordersid .= ",";
        }
    }
    $results = "";
    $stmt = "select t.testname, t.id, o.id from ordtask o inner join tests t on t.id = o.testcode inner join orders ord on ord.id = o.ordersid inner join panels p on p.id = ord.panelid where ord.id in (" . $ordersid . ") order by p.priority ";
    $result = ibase_query($dbh, $stmt);
    while ($row = ibase_fetch_row($result)) {
        $restm = "select count(*) from results where ordtaskid = " . $row[2] . " and finalresult is not null and status in ('O','E') and show = 'Y'";
        $res = ibase_query($dbh, $restm);
        $n = ibase_fetch_row($res);
        $n = $n[0];
        ibase_free_result($res);
        if ($n == 1) {
            $restm = "select a.analyte, case a.analtype when 3 then replace(r.finalresult,'.',',') else coalesce(pos.inreport, r.finalresult) end, u.short, r.charlimits, r.status from results r left join units u on u.id = r.unit inner join analytes a on a.id = r.analyteid left join possibleresults pos on pos.analyte = r.analyteid  and r.rawresult = pos.result where r.ordtaskid = " . $row[2] . " and finalresult is not null order by a.sorter ";
            $res = ibase_query($dbh, $restm);
            $row = ibase_fetch_row($res);
            $ress = $row[1];
            if ($row[4] == "O") {
                $ress = "\\textbf{" . $row[1] . "}";
            }
            $row[0] = str_replace('%', '\\%', $row[0]);
            $row[0] = str_replace('β', '$\\beta$', $row[0]);
            $results .= "\\textbf{" . $row[0] . "} & " . $ress . " & " . $row[2] . " & " . $row[3] . " \\\\ \n";
            $results .= "\\hline" . "\n";
            ibase_free_result($res);
        } else {
            $row[0] = str_replace('%', '\\%', $row[0]);
            $row[0] = str_replace('β', '$\\beta$', $row[0]);
            $results .= "\\textbf{" . $row[0] . "} & & & \\\\ \n\\hline \n";
            $restm = "select a.analyte, case a.analtype when 3 then replace(r.finalresult,'.',',') else coalesce(pos.inreport, r.finalresult) end, coalesce(u.short, ' '), coalesce(r.charlimits, ' '), r.status from results r left join units u on u.id = r.unit inner join analytes a on a.id = r.analyteid left join possibleresults pos on pos.analyte = r.analyteid and pos.result = r.rawresult  where r.ordtaskid = " . $row[2] . " and finalresult is not null order by a.sorter";
            $res = ibase_query($dbh, $restm);
            while ($row = ibase_fetch_row($res)) {
                $unit = $row[2];
                //$unit = str_replace('%','\\%',$row[2]);
                //$unit = str_replace('^','\\^{}',$unit);
                $charlimits = str_replace('%', '\\%', $row[3]);
                $charlimits = str_replace('^', '\\^{}', $charlimits);
                $ress = $row[1];
                if ($row[4] == "O") {
                    $ress = "\\textbf{" . $row[1] . "}";
                }
                $results .= "~ \\footnotesize " . $row[0] . " & \\footnotesize " . $ress . " & \\footnotesize " . $unit . " & \\footnotesize " . $charlimits . " \\\\ \n";
                $results .= "\\hline" . "\n";
            }
            ibase_free_result($res);
        }
    }
    $user = "";
    $restm = "select distinct coalesce(u.fullname, '') from users u inner join results r on r.usernam = u.usernam inner join ordtask o on o.id = r.ordtaskid inner join orders ord on ord.id = o.ordersid where ord.id in (" . $ordersid . ") ";
    $res = ibase_query($dbh, $restm);
    while ($row = ibase_fetch_row($res)) {
        $user .= $row[0];
    }
    ibase_free_result($res);
    $appruser = "";
    $restm = "select distinct u.fullname from ordtask o inner join users u on u.usernam = o.appruser where o.ordersid in(" . $ordersid . ")";
    $res = ibase_query($dbh, $restm);
    while ($row = ibase_fetch_row($res)) {
        $appruser .= $row[0] . " ";
    }
    ibase_free_result($res);
    $comments = "";
    $restm = "select distinct f.comments  from foldercomments f inner join orders o on o.folderno = f.folderno where o.id in(" . $ordersid . ") and f.flag = 'Y' order by f.id";
    $res = ibase_query($dbh, $restm);
    while ($row = ibase_fetch_row($res)) {
        $comments .= "\\small \\quad " . $row[0] . "\n\n";
    }
    ibase_free_result($res);
    $biomat = find_biomat($ordersid, $dbh);
    $panelname = find_panel($ordersid, $dbh);
    $head = "\\vspace{-10px} \\flushleft \\normalsize Биоматериал: " . $biomat . "\n\n\\vspace{3px}";
    $head .= "\n\n\\vspace{1px}";
    $head .= "\\begin{center} ";
    $head .= "\\textbf{" . $panelname . "}\\end{center} \n\n\\vspace{-5px}";
    $head .= "\n\\begin{longtable}[h]{|m{160px}|>{\\centering\\arraybackslash}p{100px}|m{60px}|m{112px}|}\n\\hline\nИсследование & Результат & Единицы \\newline  измерения & Референты \\\\\n\\hline";
    $apprdate = find_apprdate($ordersid, $dbh);
    $comments = str_replace('%', '\\%', $comments);
    $end = "\\end{longtable}\n\\vspace{-15px}\n\\flushleft Комментарии:" . $comments . "\n\\vspace{-4px}\n\\flushleft Исследования проводил: " . $user . " \n\\vspace{-4px}\n\\flushleft Выпускающий врач: " . $appruser . " \n\\newline\n\\flushright Дата выдачи: " . $apprdate;
    return $head . $results . $end;
}
开发者ID:KhasanOrsaev,项目名称:work_nacpp,代码行数:88,代码来源:form32.php

示例4: micro_triple

        $results .= micro_triple($ordersid, $dbh);
        break;
    case 4:
        $results .= micro_four($ordersid, $dbh);
        break;
    default:
        $results .= micro_single($ordersid, $dbh);
        break;
}
$user = "";
$restm = "select distinct  u.fullname from resultsmicro r inner join ordtask o on o.id = r.ordtaskid inner join users u on u.usernam = r.by_user where o.ordersid in (" . $ordersid . ") ";
$res = ibase_query($dbh, $restm);
while ($row = ibase_fetch_row($res)) {
    $user .= $row[0];
}
ibase_free_result($res);
$appruser = getApprUser($ordersid, $dbh);
$biomat = find_biomat($ordersid, $dbh);
$panelname = find_panel($ordersid, $dbh);
$head = "\\SetWatermarkText{" . $watermark . "}\n";
$head .= "\\vspace{-10px} \\flushleft \\normalsize Биоматериал: " . $biomat . "\n\n\\vspace{3px}";
$head .= "\\vspace{3px} \\begin{center}\\textbf{" . $panelname . "}\n\n\\vspace{-3px}\\end{center}";
$comments = "";
$restm = "select distinct comments  from orders where id in(" . $ordersid . ")";
$res = ibase_query($dbh, $restm);
while ($row = ibase_fetch_row($res)) {
    $comments .= "\\small \\quad " . $row[0] . "\n\n";
}
ibase_free_result($res);
$end = "\\end{longtable}\n\\vspace{-15px}\n\\flushleft Комментарии:" . $comments . "\n\\vspace{-4px}\n\\flushleft Исследования проводил: " . $user . " \n\\vspace{-4px}\n\\flushleft Выпускающий врач: " . $appruser . " \n\\newline\n\\flushright Дата выдачи: " . find_apprdate($ordersid, $dbh);
$response = $head . $results . $end;
开发者ID:KhasanOrsaev,项目名称:work_nacpp,代码行数:31,代码来源:form8.php


注:本文中的find_apprdate函数示例由纯净天空整理自Github/MSDocs等开源代码及文档管理平台,相关代码片段筛选自各路编程大神贡献的开源项目,源码版权归原作者所有,传播和使用请参考对应项目的License;未经允许,请勿转载。