FOR ALL ROW OF TABLE_itens_vendidos
xProximo_orcamento_iten++
HReset(pedido_iten)
pedido_iten.id_pedido_item_geral=xProximo_orcamento_iten
pedido_iten.id_pedido=EDT_Id_orcamento
pedido_iten.sequencia_digitacao=TABLE_itens_vendidos.COL_Sequencia
pedido_iten.referencia_material=TABLE_itens_vendidos.COL_REFERENCIA
pedido_iten.id_material=TABLE_itens_vendidos.COL_CODIGO_MATERIAL
pedido_iten.observacao=TABLE_itens_vendidos.COL_OBSERVACAO
pedido_iten.quantidade=TABLE_itens_vendidos.COL_QUANTIDADE
pedido_iten.valor_venda=TABLE_itens_vendidos.COL_VALOR_UNITARIO
pedido_iten.valor_produtos=TABLE_itens_vendidos.COL_VALOR_PRODUTOS
pedido_iten.valor_ipi_percentual=TABLE_itens_vendidos.COL_PERCENTUAL_IPI
pedido_iten.valor_ipi=TABLE_itens_vendidos.COL_VALOR_IPI
pedido_iten.valor_total=TABLE_itens_vendidos.COL_VALOR_TOTAL
IF HAdd(pedido_iten) = False THEN
Error("Nao Adicionou Pedido iten")
END
END
Info("gravou Pedido Numero => " + pedido.id_pedido)
Nenhum comentário:
Postar um comentário