Ir para conteúdo
Fórum Script Brasil

dckarpov

Membros
  • Total de itens

    2
  • Registro em

  • Última visita

Sobre dckarpov

dckarpov's Achievements

0

Reputação

  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...