"; print_r($row); echo"";
$sqlFB = "EXECUTE procedure TDL_FILL_LABRESULT ( $CIDBILLING, $CIDBILLINGDT, $CIDPRODUCT, $RSLT_NCOMPARISON, $NSEX, $UOM_ID,
$RSLT_VALUEN, $RSLT_VALUET, $RSLT_VALUEB, $RSLT_NORMAL, $RSLT_COMMENT, $INTER_UOM_ID, $RSLT_INTERVALUEN,
$RSLT_INTERVALUET, $RSLT_INTERVALUEB, $RSLT_INTERNORMAL, $RSLT_INTERCOMMENT,$RSLT_NORMALTEXT, $MACH_ID, $RSLT_CREATEDBY,
$RSLT_NCONVERSION)";
//echo $sqlFB."
";
//$resultsc = odbc_exec($connFB, $sqlFB) or die("$sqlFB
".odbc_errormsg());
}
}
// update tdl_order status
$resdt = date('Y-m-d H:i');
$sql = "select status = case
when exists (
select 1 from glendb.dbo.TESTS t
left join glendb.dbo.REQUESTS r on r.REQUESTID=t.REQUESTID
where r.ACCESSNUMBER='$ACCESSNUMBER' and
( t.RESTYPE=0 OR t.RESSTATUS=0 OR Left(t.RESVALUE,7)='Pending' )
and t.NOTPRINTABLE is null
) then 'PENDING'
else 'FINAL'
end";
$stmt = sqlsrv_query( $conn, $sql );
if( $stmt == false) { die( print_r( sqlsrv_errors(), true) ); }
$row = sqlsrv_fetch_array( $stmt, SQLSRV_FETCH_NUMERIC);
if($row[0]!='PENDING') {
$status=1;
$sqlFB = "UPDATE TDL_ORDER SET ODR_NRESULT='$status', ODR_DTRESULT='$resdt' WHERE ODR_CNOLAB='$ODR_CNOLAB'";
//echo $sqlFB."
";
$resultsc = odbc_exec($connFB, $sqlFB) or die(odbc_errormsg());
}
odbc_close($connFB);
?>