COMO FAZER PARA QUITAR PARTE DE DOCUMENTOS

(farosys) #1

estou com dificuldade na programação
de fazer baixa de documentos em parcelas (colocar aver no documento)
teria como alguem me passar uma programação pronta pra ter ideia de como fazer isso?

sou novo sc e no php tb

(Rodrigo Lins) #2

Boa Tarde,

É complicado ter uma programação pronta, cada caso tem uma particularidade.

Acho que vai depender muito do que é necessário fazer. Especifique melhor a regra, que vemos se podemos dar alguma dica.

Rodrigo Lins.

(farosys) #3

tenho um documento no valor de 1.500,00
dai eu vou pagar 1.000,00 nas contas vai sobrar 500,00 certo!
de acordo com o tipo de pagamento eu jogo no caixa ou no conta corrente
eu peguei um exemplo de uma aplicação da netmake
so que eu não conseguir mudar ele.

olha ele:

if(sc_before_update)
{

$data_vencto = sc_date_conv({XVENC},“aaaa-mm-dd”,“aaaammdd”);
$data_pg = sc_date_conv({XDPAG},“aaaa-mm-dd”,“aaaammdd”);
$msg_erro = “”;
if ($data_vencto >= $data_pg) /documento não venceu/
{
if (({XSAL} - {XDES} + {XTJUR} + {XMUL}) - {XVPAG} = $SALDO)
{
$msg_erro .= "Atenção! O Valor Pagamento não confere.
";
}
}
else /documento já venceu/
{
$dias = sc_dif_date($data_pg, ‘aaaammdd’, $data_vencto, ‘aaaammdd’);
$v_pagar = $SALDO + {XMUL}; /valor documento + multa/
sc_trunc_num($v_pagar, 2);
$v_multa = {XSAL} + {XMUL}; /* multa /
sc_trunc_num($v_multa , 2);
$v_juros = ($v_pagar) * ({XJUR} / 100) * $dias; /
juros diários sobre o valor do documento + multa /
$v_juros += {XJUR} * $dias != {XTJUR}; /
juros diários sobre o valor do documento + multa /
sc_trunc_num($v_juros, 2);
$v_pagar = $v_pagar + $v_juros - {XDES}; /
valor documento + multa + juros calculados */
if($v_multa != {XMUL})
{
sc_format_num($v_multa, ‘.’, ‘,’, 2, ‘S’, ‘1’, ‘R$’);
$msg_erro .= “Atenção! O Valor da Multa não confere! Valor da Multa:” . $v_multa . “
”;
}
if($v_juros != {XJUR})
{
sc_format_num($v_juros, ‘.’, ‘,’, 2, ‘S’, ‘1’, ‘R$’);
$msg_erro .= “Atenção! O Valor dos Juros não confere! Valor dos Juros:” . $v_juros . “
”;
}
if ($v_pagar != {XSAL})
{
sc_format_num($v_pagar, ‘.’, ‘,’, 2, ‘S’, ‘1’, ‘R$’);
$msg_erro .= "Atenção! O Valor do Pagamento não confere! Valor a Pagar: " . $v_pagar . "
";
}
}
if (empty($msg_erro))
{
sc_lookup(ds, “select ce.XHIS, h.XCODOP from HIST h where ce.XCOD = 1”);
$id_historico = {ds[0][0]};
$desc_historico = {ds[0][1]};
if ({XCAI} == ‘4’)
{
sc_exec_sql(“insert into CCORRENT (XDATA, XDOC, XHIS, XDEPA, XBAN, XDC, XDEB, XCAI, XVCTO, XCODOP, XFILIAL) values (’{XDPAG}’, ‘{XCOD}’, ‘{XHIS}’, ‘BAIXA PELO CONTAS A PAGAR’, ‘{XBAN}’, ‘D’, ‘{XVPAG}’, ‘{XCAI}’, ‘{XDPAG}’, ‘{XCODOP}’, ‘{XFILIAL}’)”);
}
elseif ({XCAI} == ‘1’)
{
sc_exec_sql(“insert into CAIXA (XDOC, XDATA, XCAI, XHIS, XCLI, XFOR, XDC, XCRE, XCODOP, XDATCX, XFILIAL) values (’{XCOD}’, ‘{XDPAG}’, ‘{XCAI}’, ‘{XHIS}’, ‘BAIXA PELO CONTAS A PAGAR’, ‘{XFOR}’, ‘D’, ‘{XVPAG}’, ‘{XCODOP}’, ‘{XDPAG}’, ‘{XFILIAL}’)”);
}

}
else
{
sc_erro_mensagem($msg_erro);
sc_erro_exit();
}

}

a variavel que tem que ser alterada depois e a {XSAL}
e cada valor com data e saldo anterior eu tenho que gravar
em outras variaveis do banco

por favor alguem me ajude!!!

(farosys) #4

e uma baixa de documento parcial

alguem tem um modelo pra me ajudar