10405 - WebService interno.com.senior.g5.co.ger.relatorio.Executar

Problema: Descrição do Problema: Ao executar o WebService interno.com.senior.g5.co.ger.relatorio.Executar ocorre a seguinte mensagem abaixo:

Não foi possível recuperar o valor do parâmetro prRetorno. Verifique se o parâmetro possui informação.

Regra utilizada:

Definir interno.com.senior.g5.co.ger.relatorio.Executar wsRelatorio;

Definir alfa wCodEmp;
Definir alfa wCodFil;
Definir alfa wNumGae;
Definir alfa wStrAux;

wCodEmp = 1;
wCodFil = 2;
wNumGae = ;

wsRelatorio.prFileName = PedidosLiberados;
wsRelatorio.prRelatorio = SECE001.GER;
wsRelatorio.prDir       = C:\\temp;
wsRelatorio.prEntrada = <ECodEmp=+wCodEmp+><ECodFil=+wCodFil+>;
wsRelatorio.prTypeBmp = N;
wsRelatorio.prSaveFormat = tsfPDF;
wsRelatorio.prEntranceIsXML = F;
wsRelatorio.prExecFmt = tefFile;

wsRelatorio.ModoExecucao = 1;
wsRelatorio.Executar();

wStrAux = wsRelatorio.prRetorno;

Definir alfa xArquivo;
Definir numero xManipuladorArquivo;
xArquivo = c:\\relatorio.pdf;
xManipuladorArquivo = Abrir(xArquivo, Gravar);
TamanhoAlfa(wStrAux, xTamanho);
Gravar(xManipuladorArquivo, wStrAux, xTamanho);
Fechar(xManipuladorArquivo);

Rotina / Tela: Aplicado em Ferramentas.Solução: Solução 10405: Essa mensagem ocorre quando não são informados todos os campos obrigatórios da tela de entrada do relatório na regra (parâmetro wsRelatorio.prEntrada).

Segue exemplo de regra corrigida.

Definir interno.com.senior.g5.co.ger.relatorio.Executar wsRelatorio;

Definir alfa wCodEmp;
Definir alfa wCodFil;
Definir alfa wNumGae;
Definir alfa wStrAux;
Definir alfa wEstMov;
Definir alfa wESinAna;
Definir alfa wEMosUsu;

wCodEmp = 1;
wEstMov = 5;
wESinAna = A;
wEMosUsu = S;

wsRelatorio.prFileName = PedidosLiberados;
wsRelatorio.prRelatorio = SECE001.GER;
wsRelatorio.prDir       = C://temp;
wsRelatorio.prEntrada = <ECodEmp=+wCodEmp+><EEstMov=+wEstMov+><ESinAna=+wESinAna+><EMosUsu=+wEMosUsu+>;
wsRelatorio.prTypeBmp = N;
wsRelatorio.prSaveFormat = tsfPDF;
wsRelatorio.prEntranceIsXML = F;
wsRelatorio.prExecFmt = tefFile;

wsRelatorio.ModoExecucao = 1;
wsRelatorio.Executar();

wStrAux = wsRelatorio.prRetorno;

Definir alfa xArquivo;
Definir numero xManipuladorArquivo;
xArquivo = c://relatorio.pdf;
xManipuladorArquivo = Abrir(xArquivo, Gravar);
TamanhoAlfa(wStrAux, xTamanho);
Gravar(xManipuladorArquivo, wStrAux, xTamanho);
Fechar(xManipuladorArquivo);