VIDEO AULA 1353 WINDEV DESENVOLVIMENTO VIVO DUPLICATA/PEDIDO/NOTA
TEM CLIENTES QUE QUEREM GRAVAR NO PEDIDO O TITULO A RECEBER, NO ENTANTO QUANDO FOR EMITIR A NOTA, ESSA DUPLICATA TEM DE BAIXADA
CASO SEJA FEITA A DUPLICATA NA NOTA FISCAL
// AULA 14012018
b_elimina_duplicata_pedido is boolean=False
IF TableSelect(TABLE_condicoes_parcela) = -1 THEN
// se nao existir pagamentos na nota
ELSE
IF empresa_parametro.duplicatas_receber_gerar_pelo_Pedido=True THEN
IF empresa_parametro.duplicata_eliminar_do_pedido_gerar_nota=True THEN
b_elimina_duplicata_pedido=True
END
END
END
// AULA 14012018
IF b_elimina_duplicata_pedido=True THEN
FOR ALL ROW OF TABLE_pedidos_selecionados
elimina_duplicatas_pedido_geraNF()
END
END
PROCEDURE elimina_duplicatas_pedido_geraNF()
FOR EACH duplicata_receber WHERE "Id_pedido="+pedido.id_pedido
duplicata_receber.observacao_pagamento=[
Foi Zerado os dados da Duplicata pois foi feito nota fiscal.
O Numero da Nota Fiscal é #numero_nota#
]
duplicata_receber.observacao_pagamento=Replace(duplicata_receber.observacao_pagamento, ...
"#numero_nota#",nota_fiscal.id_empresa_nota_fiscal)
duplicata_receber.valor_titulo=0
duplicata_receber.valor_total=0
duplicata_receber.data_pagamento=nota_fiscal.data_emissao
HModify(duplicata_receber)
END
AO VIVO DESENVOLVENDO PEDIDO - WINDEV AULA 1353
