Erro com senha de vendedor no farmácia popular
Bom dia.
Sempre recebo um erro do webservice informando que existe um caractere inválido na senha em minha rotina para venda no farmácia popular. Alguém poderia me dizer se há algum erro? Abaixo segue o código.
Desde já agradeço.
Sempre recebo um erro do webservice informando que existe um caractere inválido na senha em minha rotina para venda no farmácia popular. Alguém poderia me dizer se há algum erro? Abaixo segue o código.
Desde já agradeço.
oSolicitacaoDTO := SolicitacaoDTO.Create; produtos.First; while not produtos.Eof do begin SetLength(oMedicamentoDTO, Length(oMedicamentoDTO) + 1); iItem := Length(oMedicamentoDTO) - 1; oMedicamentoDTO[iItem] := MedicamentoDTO.Create; oMedicamentoDTO[iItem].coCodigoBarra := produtosCodigoBarra.AsString; oMedicamentoDTO[iItem].qtSolicitada := produtosQuantidade.AsFloat; oMedicamentoDTO[iItem].vlPrecoVenda := produtosValorVenda.AsFloat; oMedicamentoDTO[iItem].qtPrescrita := 1; //-- produtos.Next; end; //-- oDataReceita := TXSDateTime.Create; oDataReceita.AsDateTime := Date; oSolicitacaoDTO.coSolicitacaoFarmacia := FormatDateTime('hhnnss', Time); oSolicitacaoDTO.nuCnpj := 'xxxx'; oSolicitacaoDTO.nuCpf := 'xxxx'; oSolicitacaoDTO.nuCrm := 'xxxx'; oSolicitacaoDTO.sgUfCrm := 'SP'; oSolicitacaoDTO.dtEmissaoReceita := oDataReceita; oSolicitacaoDTO.arrMedicamentoDTO := oMedicamentoDTO; oSolicitacaoDTO.dnaEstacao := GetDnaEstacao(oSolicitacaoDTO.nuCpf, oSolicitacaoDTO.nuCnpj, oSolicitacaoDTO.nuCrm, oSolicitacaoDTO.sgUfCrm, oDataReceita.AsDateTime); // Usuário -- oUsuarioFarmaciaDTO := UsuarioFarmaciaDTO.Create; usuario1 := '12345678'; senha1 := 'xxxx'; usuario2 := '11111111111'; senha2 := '99999999'; oUsuarioFarmaciaDTO.usuarioFarmacia := usuario1; oUsuarioFarmaciaDTO.senhaFarmacia := senha1; oUsuarioFarmaciaDTO.usuarioVendedor := usuario2; oUsuarioFarmaciaDTO.senhaVendedor := senha2; // Autorização -- oAutorizacaoDTO := AutorizacaoDTO.Create; oAutorizacaoDTO := GetServicoSolicitacaoWS.executarSolicitacao(oSolicitacaoDTO, oUsuarioFarmaciaDTO);
Alex Maia
Curtidas 0
Respostas
Denilson Hauch
10/04/2013
estou com o mesmo problema conseguiu resolver?
como resolveu?
tem como me ajudar
como resolveu?
tem como me ajudar
GOSTEI 0
Douglas
10/04/2013
Olá Alex, poste o erro para analisarmos.
GOSTEI 0
Douglas
10/04/2013
Olá Alex, poste o erro para analisarmos.
GOSTEI 0
Alex Maia
10/04/2013
Olá, já resolvi. Descobri que as senhas devem conter somente números.
GOSTEI 0
Douglas
10/04/2013
Olá, já resolvi. Descobri que as senhas devem conter somente números.
OK Alex, precisando estaremos aqui.
GOSTEI 0
Deivison Melo
10/04/2013
Finalizando tópico!!
GOSTEI 0