// Rotinas utilizadas na Intranet require_once "lib/intranet.php"; // Carrega instruções básicas requeridas require_once "lib/start.php"; // Recupera as variáveis $sFuncao = $_GET[ 'func' ]; $sFORNECEDOR = $_GET[ 'forn' ]; $sMASTERS = $_GET[ 'mast' ]; $sPRODUTO = $_GET[ 'prod' ]; $sPRODUTOEX = $_GET[ 'prodex' ]; $sQTD = $_GET[ 'qtde' ]; $sPRECOUNIT = $_POST[ 'hidPRECOUNIT' ]; $sNPEDIDO = $_POST[ 'hidPEDIDO' ]; $sTOTAL = $_POST[ 'hidTOTAL' ]; $sForn = $_POST[ 'hidFABRICANTE']; $sMast = $_POST[ 'hidMASTER' ]; $sFilh = $_POST[ 'hidFILHO' ]; $oBOT = $_POST[ 'calcular' ]; if( empty( $sQTD )) { $sQTD = $_POST[ 'txtQTDE' ]; } // Atribui valor as SESSIONS() $_SESSION[ 'Fornecedor' ] = $sForn ; $_SESSION[ 'Masters' ] = $sMast ; $_SESSION[ 'Produtos' ] = $sFilh ; $_SESSION[ 'Quantidade' ] = $sQTD ; $_SESSION[ 'PrecoUnit' ] = $sPRECOUNIT ; $_SESSION[ 'Total' ] = $sTOTAL ; $_SESSION[ 'NumPedido' ] = $sNPEDIDO ; $sDATA = date ( "Y/m/j" ); // Verifica a funcão escolhida if ( $sFuncao == 'e' ) { esvaziaCarrinho(); } else if ( $sFuncao == 'ei' ) { excluirItem(); } else { $sFuncao = ""; } if ( $oBOT == "Recalcular Pedido" ) { atualizaProduto(); } // Verifica se o código veio como POST // Se não veio, é inclusão de PRODUTO, se não é atualização de quantidade /***** DEIXAR ESTA FUNÇÃO BLOQUEADA PARA FAZER TESTES DE CALCULO if ( $sNPEDIDO > 0 ) { atualizaProduto(); } ******/ // Mescla os arquivos HTML $sHtml = leArquivo( "carrinho.htm" ); $sQuantidade = $sQTD; $sTOTAL = $sQuantidade * $sPRECOUNIT; $sTOTAL = number_format ( $sTOTAL , 2, '.', ' ' ); // Itens da Tabela $aOcorrencias = array(); array_push ( $aOcorrencias, "%QTD%" ); array_push ( $aOcorrencias, "%TOTAL%" ); $aRegistros = array(); $aRegistro = array(); array_push ( $aRegistro , $sQuantidade ); array_push ( $aRegistro , $sTOTAL ); array_push ( $aRegistros, $aRegistro ); substituiBlocoModelo( $aOcorrencias, $aRegistros, $sHtml, "LinhaResultado" ); //$sVtcompra = number_format ( $sVtcompra , 2, ',', ' ' ); // Transforma o número em String // Valor total do Pedido envolvendo desconto $sVtcompra = $sQTD * $sPRECOUNIT; $sDesconto = 5; $sVtcompraDesc = (( $sQTD*$sPRECOUNIT ) / 100 * $sDesconto ); $sVtcompraDesconto = (( $sVtcompra ) - ( $sVtcompraDesc ) ); $sVtcompraDesconto = number_format ( $sVtcompraDesconto , 2, ',', ' ' ); $_SESSION[ 'Desconto' ] = $sVtcompraDesc ; $_SESSION[ 'TotcDesconto' ] = $sVtcompraDesconto; $aOcorrencias = array(); array_push ( $aOcorrencias, "%VTCOMPRA%" ); array_push ( $aOcorrencias, "%DESCONTOS%" ); array_push ( $aOcorrencias, "%VLDESCONTOS%" ); array_push ( $aOcorrencias, "%VTCOMPRADESCONTO%" ); $aRegistros = array(); $aRegistro = array(); array_push ( $aRegistro , $sVtcompra ); array_push ( $aRegistro , $sDesconto ); array_push ( $aRegistro , $sVtcompraDesc ); array_push ( $aRegistro , $sVtcompraDesconto ); array_push ( $aRegistros, $aRegistro ); substituiBlocoModelo( $aOcorrencias, $aRegistros, $sHtml, "ValorPedido" ); insereProduto(); echo $sHtml; ?> <?php // Insere PRODUTO na tabela function insereProduto() { // Recupera variáveis específicas global $sFuncao , $sFORNECEDOR , $sMASTERS , $sPRODUTO , $sPRECOUNIT , $sQTD , $sNPEDIDO , $sTOTAL , $sPRODUTOEX , $sDATA ; global $sHtml ; // Insere PRODUTO na tabela if( empty( $sPRODUTO )) { } else { // Monta o comando SQL $sSql = "INSERT "; $sSql .= "INTO "; $sSql .= "WEBILIB "; $sSql .= "( "; $sSql .= "ILIBCODI , "; $sSql .= "ILIBEMPE , "; $sSql .= "ILIBQUAN , "; $sSql .= "ILIBDATA , "; $sSql .= "ILIBCORS "; $sSql .= ") "; $sSql .= "VALUES "; $sSql .= "( "; $sSql .= "'" . $sPRODUTO . "' , "; $sSql .= "'" . $sFORNECEDOR . "' , "; $sSql .= "'" . $sQTD . "' , "; $sSql .= "'" . $sDATA . "' , "; $sSql .= "'" . $sMASTERS . "' "; $sSql .= ") "; //echo $sSql; // Executa o comando SQL $oResultado = db_query( $sSql ); } exibeResultado(); } // Exibe o resultado da pesquisa function exibeResultado() { global $sFuncao , $sFORNECEDOR , $sMASTERS , $sPRODUTO , $sPRECOUNIT , $sQTD , $sNPEDIDO , $sTOTAL , $sPRODUTOEX , $sDATA ; global $sHtml ; // Seleciona os Itens if( empty( $sPRODUTO )) { // Monta o comando SQL $sSql = "SELECT "; $sSql .= "W.ILIBCODI AS FILHO , "; $sSql .= "W.ILIBDOCU AS IDPEDIDO , "; $sSql .= "W.ILIBEMPE AS FABRICANTE , "; $sSql .= "W.ILIBQUAN AS QTD , "; $sSql .= "W.ILIBCORS AS MASTER , "; $sSql .= "T.TABPPREC AS PRECOUNIT "; $sSql .= "FROM "; $sSql .= "WEBILIB AS W , "; $sSql .= "ARQTABP AS T "; $sSql .= "WHERE "; $sSql .= "W.ILIBCODI = T.TABPPROD "; $sSql .= "ORDER BY FILHO "; // Executa o comando SQL $oResultado = db_query( $sSql ); $aOcorrencias = pegaMatrizOcorrencias( $oResultado ); $aRegistros = pegaMatrizRegistros( $oResultado ); // Exibe as linhas do resultado substituiBlocoModelo( $aOcorrencias, $aRegistros, $sHtml, "LinhaResultado" ); } else { // Monta o comando SQL $sSql = "SELECT "; $sSql .= "W.ILIBCODI AS FILHO , "; $sSql .= "W.ILIBDOCU AS IDPEDIDO , "; $sSql .= "W.ILIBEMPE AS FABRICANTE , "; $sSql .= "W.ILIBQUAN AS QTD , "; $sSql .= "W.ILIBCORS AS MASTER , "; $sSql .= "T.TABPPREC AS PRECOUNIT "; $sSql .= "FROM "; $sSql .= "WEBILIB AS W , "; $sSql .= "ARQTABP AS T "; $sSql .= "WHERE "; $sSql .= "W.ILIBCODI = T.TABPPROD "; $sSql .= "ORDER BY FILHO "; // Executa o comando SQL $oResultado = db_query( $sSql ); $aOcorrencias = pegaMatrizOcorrencias( $oResultado ); $aRegistros = pegaMatrizRegistros( $oResultado ); // Exibe as linhas do resultado substituiBlocoModelo( $aOcorrencias, $aRegistros, $sHtml, "LinhaResultado" ); } } // Apaga todos os itens da compra function esvaziaCarrinho() { global $sFuncao , $sFORNECEDOR , $sMASTERS , $sPRODUTO , $sPRECOUNIT , $sQTD , $sNPEDIDO , $sTOTAL , $sPRODUTOEX , $sDATA ; global $sHtml ; $sSql = "DELETE "; $sSql .= "FROM "; $sSql .= "WEBILIB "; // Executa o comando SQL $oResultado = db_query( $sSql ); } function atualizaProduto() { global $sFuncao , $sFORNECEDOR , $sMASTERS , $sPRODUTO , $sPRECOUNIT , $sQTD , $sNPEDIDO , $sTOTAL , $sPRODUTOEX , $sDATA ; global $sHtml ; $sSql = "UPDATE "; $sSql .= "WEBILIB "; $sSql .= "SET "; $sSql .= "ILIBQUAN = "; $sSql .= "'" . $sQTD . "', "; $sSql .= "ILIBPREC = "; $sSql .= "'" . $sTOTAL . "' "; $sSql .= "WHERE "; $sSql .= "ILIBCODI "; $sSql .= "= "; $sSql .= "'" . $_SESSION[ 'Produtos' ] . "' "; echo $sSql; // Executa o comando SQL $oResultado = db_query( $sSql ); } function excluirItem() { global $sFuncao , $sFORNECEDOR , $sMASTERS , $sPRODUTO , $sPRECOUNIT , $sQTD , $sNPEDIDO , $sTOTAL , $sPRODUTOEX , $sDATA ; global $sHtml ; $sSql = "DELETE "; $sSql .= "FROM "; $sSql .= "WEBILIB "; $sSql .= "WHERE "; $sSql .= "ILIBCODI "; $sSql .= "= "; $sSql .= "'" .$sPRODUTOEX. "' "; // Executa o comando SQL $oResultado = db_query( $sSql ); } /* ANTIGO SELECT $sSql = "SELECT "; $sSql .= "ILIBCODI AS FILHO , "; $sSql .= "ILIBDOCU AS IDPEDIDO , "; $sSql .= "ILIBEMPE AS FABRICANTE , "; $sSql .= "ILIBQUAN AS QTD , "; $sSql .= "ILIBCORS AS MASTER , "; $sSql .= "ILIBCORS AS PRECOUNIT "; // Apagar, este é um teste de valor $sSql .= "FROM WEBILIB "; $sSql .= "ORDER BY FILHO "; */ ?>