Cancela Item Vendido

Cancela Item Vendido

Cancela item impresso no ECF. Deve ser passado o número do item a ser cancelado.

Exemplo

Procedure TForm1.CancelarItemVendido1Click(Sender: TObject);
Var Item : Integer ;
begin
    Item := 1 ;
    if InputQuery('Cancelar Item Vendido',
                           'Informe o número da Sequencia de Venda', Item ) then
            ACBrECF1.CancelaItemVendido( Item );
end;