$jumlah = DB_query($sql);
$Row = DB_fetch_array($jumlah);
$totalbaru = $Row['total'] + 1;
$ponumb = "PO/TU-IM/" . substr($tgl[2], 2) . "/" . ConverToRoman($tgl[1]) . "/" . $totalbaru;
${$_SESSION}['PO' . $identifier]->PoNum = $_POST['PoNumb'];
// getting the PO Number
//PENGECEKAN APAKAH MODIFYORDER
} else {
if ($_POST['Supptype'] == 2 && !isset($_GET['ModifyOrderNumber'])) {
//AMBIL TOTAL PURCHORDER LOKAL
$sql = 'SELECT COUNT(*) as total FROM `suppliers` sup,purchorders purch WHERE sup.supplierid=purch.supplierno AND MID(purch.orddate,1,4)=' . "'" . $tgl[2] . "'" . ' AND sup.supptype=2';
$sql1 = 'SELECT COUNT(*) as total FROM `suppliers` sup,purchorders purch WHERE sup.supplierid=purch.supplierno AND sup.supptype=2';
$jumlah = DB_query($sql);
$Row = DB_fetch_array($jumlah);
$totalbaru = $Row['total'] + 1;
$ponumb = "PO/TU-L/" . substr($tgl[2], 2) . "/" . ConverToRoman($tgl[1]) . "/" . $totalbaru;
$_SESSION['PO' . $identifier]->PoNum = $_POST['PoNumb'];
// getting the PO Number
}
}
//PO NUMBER DAPET DR ISSET MODIFY ORDER ATAU ISSET MODIFYNUMBER (DIDEFINISIIN DI ATAS SEBELUMNYA)
echo '<input type="hidden" name="Ponumb" value="' . $ponumb . '" />' . $ponumb . '</td>';
echo '</tr>';
/*Insert to purchase order header record */
$sql = "INSERT INTO purchorders ( orderno,\n\t\t\t\t\t\t\t\t\t\t\tponumb,\n\t\t\t\t\t\t\t\t\t\t\tsupplierno,\n\t\t\t\t\t\t\t\t\t\t\tcomments,\n\t\t\t\t\t\t\t\t\t\t\torddate,\n\t\t\t\t\t\t\t\t\t\t\trate,\n\t\t\t\t\t\t\t\t\t\t\tinitiator,\n\t\t\t\t\t\t\t\t\t\t\trequisitionno,\n\t\t\t\t\t\t\t\t\t\t\tintostocklocation,\n\t\t\t\t\t\t\t\t\t\t\tdeladd1,\n\t\t\t\t\t\t\t\t\t\t\tdeladd2,\n\t\t\t\t\t\t\t\t\t\t\tdeladd3,\n\t\t\t\t\t\t\t\t\t\t\tdeladd4,\n\t\t\t\t\t\t\t\t\t\t\tdeladd5,\n\t\t\t\t\t\t\t\t\t\t\tdeladd6,\n\t\t\t\t\t\t\t\t\t\t\ttel,\n\t\t\t\t\t\t\t\t\t\t\tsuppdeladdress1,\n\t\t\t\t\t\t\t\t\t\t\tsuppdeladdress2,\n\t\t\t\t\t\t\t\t\t\t\tsuppdeladdress3,\n\t\t\t\t\t\t\t\t\t\t\tsuppdeladdress4,\n\t\t\t\t\t\t\t\t\t\t\tsuppdeladdress5,\n\t\t\t\t\t\t\t\t\t\t\tsuppdeladdress6,\n\t\t\t\t\t\t\t\t\t\t\tsuppliercontact,\n\t\t\t\t\t\t\t\t\t\t\tsupptel,\n\t\t\t\t\t\t\t\t\t\t\tcontact,\n\t\t\t\t\t\t\t\t\t\t\tversion,\n\t\t\t\t\t\t\t\t\t\t\trevised,\n\t\t\t\t\t\t\t\t\t\t\tdeliveryby,\n\t\t\t\t\t\t\t\t\t\t\tstatus,\n\t\t\t\t\t\t\t\t\t\t\tstat_comment,\n\t\t\t\t\t\t\t\t\t\t\tdeliverydate,\n\t\t\t\t\t\t\t\t\t\t\tpaymentterms,\n\t\t\t\t\t\t\t\t\t\t\tshipmenttermsname,\n\t\t\t\t\t\t\t\t\t\t\tinsurance,\n\t\t\t\t\t\t\t\t\t\t\tcountryorigin,\n\t\t\t\t\t\t\t\t\t\t\tallowprint)\n\t\t\t\t\t\t\tVALUES(\t'" . $_SESSION['PO' . $identifier]->OrderNo . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->PoNumb . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->SupplierID . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->Comments . "',\n\t\t\t\t\t\t\t\t\t'" . Date('Y-m-d') . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->ExRate . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->Initiator . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->RequisitionNo . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->Location . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->DelAdd1 . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->DelAdd2 . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->DelAdd3 . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->DelAdd4 . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->DelAdd5 . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->DelAdd6 . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->Tel . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->SuppDelAdd1 . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->SuppDelAdd2 . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->SuppDelAdd3 . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->SuppDelAdd4 . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->SuppDelAdd5 . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->SuppDelAdd6 . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->SupplierContact . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->SuppTel . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->Contact . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->Version . "',\n\t\t\t\t\t\t\t\t\t'" . Date('Y-m-d') . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->DeliveryBy . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->Status . "',\n\t\t\t\t\t\t\t\t\t'" . htmlspecialchars($StatusComment, ENT_QUOTES, 'UTF-8') . "',\n\t\t\t\t\t\t\t\t\t'" . FormatDateForSQL($_SESSION['PO' . $identifier]->DeliveryDate) . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->PaymentTerms . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->ShipmentTermsName . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->Insurance . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->CountryOrigin . "',\n\t\t\t\t\t\t\t\t\t'" . $_SESSION['PO' . $identifier]->AllowPrintPO . "' )";
$ErrMsg = _('The purchase order header record could not be inserted into the database because');
$DbgMsg = _('The SQL statement used to insert the purchase order header record and failed was');
$result = DB_query($sql, $ErrMsg, $DbgMsg, true);
/*Insert the purchase order detail records */
foreach ($_SESSION['PO' . $identifier]->LineItems as $POLine) {
if ($POLine->Deleted == False) {
<?php
function ConverToRoman($num)
{
$n = intval($num);
$res = '';
$romanNumber_Array = array('M' => 1000, 'CM' => 900, 'D' => 500, 'CD' => 400, 'C' => 100, 'XC' => 90, 'L' => 50, 'XL' => 40, 'X' => 10, 'IX' => 9, 'V' => 5, 'IV' => 4, 'I' => 1);
foreach ($romanNumber_Array as $roman => $number) {
$matches = intval($n / $number);
$res .= str_repeat($roman, $matches);
$n = $n % $number;
}
return $res;
}
echo ConverToRoman(99);
