Saudações à todos.
Fiz a criação da rotina (anexa) para processamento de cálculo de produtos com FCI.
Quando informo nos parâmetros de/até o mesmo produto e a query retorna apenas 1 produto, a rotina funciona normalmente.
Porém, quando colocamos de vazio à zzzzzz e a query retorna varios produtos, o processamento da execauto não funciona dentro do While.
Foi feito o desenvolvimento considerando as informações no link abaixo:
https://tdn.engpro.totvs.com.br/pages/releaseview.action?pageId=618870419
Anexo fonte desenvolvido.
Atenção: Esta publicação foi transferida automaticamente do fórum antigo, mas os anexos não foram incluídos.
Olá Josuel,
Acredito que o problema esteja na variável "aWizAuto", a cada passo do While você está adicionando conteúdo na variável novamente.
Quando você utiliza a função AADD() é adicionada uma nova posição no array.
Zere a variável no inicio do while:
aWizAuto := {}
Ou substitua o conteúdo dela:
aWizAuto := {{ DTOS(MV_PAR01),; // Data de
DTOS(MV_PAR02),; // Data ate
(cAlias)->B1_COD,; // Produto de
(cAlias)->B1_COD,; // Produto ate
"2",; // Seleciona filiais ? 1-Sim|2-Não
"1.0",; // Versao
"2",; // Considera produtos bloqueados ? 1-Sim|2-Não
"1"}}
Olá @Daniel
Obrigado pelo retorno e informações.
Realmente este tipo de codigo não iria funcionar.
Erro grave meu. Obrigado.
Isso que dar copiar e colar rsrsrs.