Ir para conteúdo
Fórum Script Brasil

dckarpov

Membros
  • Total de itens

    2
  • Registro em

  • Última visita

Tudo que dckarpov postou

  1. OLá pessoal, Gostaria da ajuda de vocês para solucionar um código meu que quero mudar de Php para asp. Estou tentando ganhar uma grana e estou desenvolvendo um sistema em asp e tenho alguns codigos em php e gostaria de mudá-los para asp. Segue abaixo o codigo em php. Quem puder me ajudar a mudá-lo para asp eu agradeceria muito. function parcelanfCR($nf,$parc,$venc){ //echo "0;na function";exit; $quitada = 'N'; if($parc < 0){ $parc = 1; $quitada = 'S'; } if($nf){ /* $dupl = exeBD("SELECT DUP_COD FROM DUPLICATAS AS D INNER JOIN CONTAS_A_RECEBER AS CR ON CR.CR_COD = D.CR_COD WHERE CR.NF_NUM = $nf"); while($linha = ibase_fetch_assoc($dupl)){ exeBD("DELETE FROM DUPLICATAS WHERE DUP_COD = ".$linha["DUP_COD"]); } */ exeBD("DELETE FROM CONTAS_A_RECEBER WHERE NF_NUM = $nf AND CR_QUITADA = 'N'"); $valor = exeBD("select NF_VALOR FROM NOTAS_FISCAIS WHERE NF_NUM = $nf"); $valor = ibase_fetch_assoc($valor); $pago = exeBD("SELECT SUM(CR_VALOR) FROM CONTAS_A_RECEBER WHERE NF_NUM = $nf AND CR_QUITADA = 'S'"); $pago= ibase_fetch_assoc($pago); $ordem = exeBD("SELECT MAX(CR_ORDEM) FROM CONTAS_A_RECEBER WHERE NF_NUM = $nf"); $ordem = ibase_fetch_assoc($ordem); $restante = $valor["NF_VALOR"]-$pago["SUM"]; //$vencimento = exeBD("SELECT NF_VENCIMENTO FROM NOTAS_FISCAIS WHERE NF_NUM = $nf"); //$vencimento = ibase_fetch_assoc($vencimento); $vencimento = $venc; //$vencimento = date("m/d/Y", $vencimento); $vcto = explode("/",$vencimento); $mes = $vcto[1]; $dia = $vcto[0]; $ano = $vcto[2]; $parcela = $restante/$parc; $parcela = reais($parcela); $parcela = str_replace(".","",$parcela); $parcela = str_replace(",",".",$parcela); $hoje = date("m/d/Y"); if($restante > 0){ for($i=$ordem["MAX"]+1;$i<=$parc+$ordem["MAX"];$i++){ if($dia >28 && $mes == 2) $dia = 28; $vcto = $mes."/".$dia."/".$ano; $sql = ("INSERT INTO CONTAS_A_RECEBER( CR_COD, NF_NUM, CR_VALOR, CR_DATA, CR_VENCIMENTO, CR_QUITADA, CR_ORDEM) VALUES( gen_id(SEQ_CONTAS_R,1), $nf, '$parcela', '$hoje', '$vcto', '$quitada', '$i')"); //echo $sql; $gravou = exeBD($sql); if($quitada == 'S') movCaixa("PAGAMENTO A VISTA NF $nf","$parcela",$nf,'null'); //echo $gravou; //exit; $mes++; if($mes > 12){ $mes = 1; $ano++; } } return "1"; } else return "Esta NF não possui contas a receber pendentes."; } }
  2. OLá pessoal, Gostaria da ajuda de vocês para solucionar um código meu que quero mudar de Php para asp. Estou tentando ganhar uma grana e estou desenvolvendo um sistema em asp e tenho alguns codigos em php e gostaria de mudá-los para asp. Segue abaixo o codigo em php. Quem puder me ajudar a mudá-lo para asp eu agradeceria muito. function movCaixa($desc, $valor, $nf, $os){ //$valor = number_format($valor,2,".",""); $last = exeBD("SELECT MAX(FC_DATA) FROM FLUXO_DE_CAIXA"); $last = ibase_fetch_assoc($last); $last = $last["MAX"]; if($last){ if(strtotime(date("m/d/Y")) > strtotime($last)){ $last = dataBR($last); $saldoin = exeBD("SELECT SUM(TOTAL) FROM ( SELECT SUM(MOV_VALOR) TOTAL FROM MOV_CAIXA MC WHERE MC.FC_DATA = '".dataFB($last)."' UNION SELECT FC_SALDOINICIAL TOTAL FROM FLUXO_DE_CAIXA WHERE FC_DATA = '".dataFB($last)."' )"); //echo "0;$saldoin";exit; $saldoin = ibase_fetch_assoc($saldoin); $saldoin = number_format($saldoin["SUM"],2,".",""); exeBD("INSERT INTO FLUXO_DE_CAIXA (FC_DATA, FC_SALDOINICIAL, FC_HORA_ABERTURA) VALUES ('".date("m-d-Y")."', '$saldoin', '".date("m-d-Y H:i:s")."')"); } @session_start(); $gravou = exeBD("INSERT INTO MOV_CAIXA( FC_DATA, MOV_COD, MOV_DESCRICAO, MOV_VALOR, MOV_HORA, NF_NUM, OS_COD, USU_LOGIN) VALUES ( '".date("m-d-Y")."', gen_id(SEQ_MOVCAIXA,1), '$desc', '$valor', '".date("m-d-Y H:i:s")."', $nf, $os, '".$_SESSION["login"]."') "); return $gravou; } else return "0"; }
×
×
  • Criar Novo...