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);
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);