Fórum Solicitação não autorizada. Data de emissão inválida. #435277
22/02/2013
0
Usuario := UsuarioFarmaciaDTO.Create;
Usuario.usuarioFarmacia :='xxxxx';
Usuario.senhaFarmacia :=trim('xxxx');
Usuario.usuarioVendedor :='xxxxx';
Usuario.senhaVendedor :=trim('xxx');
Item := 0;
SetLength(Medicamentos, 1);
Medicamentos[Item] := MedicamentoDTO.Create;
Medicamentos[Item].coCodigoBarra := '7896523206646';
Medicamentos[Item].qtPrescrita := 1 ;
Medicamentos[Item].qtSolicitada := 1 ;
Medicamentos[Item].vlPrecoVenda := 1 ;
Medicamentos[Item].dsUnidApresentacao := '30';
Solicitacao := SolicitacaoDTO.Create;
Solicitacao.nuCnpj := '011111111111';
Solicitacao.nuCpf := '00106379151';
Solicitacao.nuCrm := '85743';
Solicitacao.sgUfCrm := 'SP';
Solicitacao.dnaEstacao := Trim(GetDosOutput('R:\Projetos\Sistemas\Farmacia Popular\'+'gbasmsb.exe --solicitacao [9466663687] [01286997000151] [85743] [sp] [22/02/2013] '+'DNA.TXT','R:\Projetos\Sistemas\Farmacia Popular'));
Solicitacao.arrMedicamentoDTO := MedicamentoS;
Solicitacao.coSolicitacaoFarmacia := '000256';
Solicitacao.dtEmissaoReceita := TXSDateTime.Create;
Solicitacao.dtEmissaoReceita.AsDateTime :=now+time;
ja passei varios formatos de date e hora e nao resolve fica retornando data de emissao ivalida.
obrigado
Gr2 Sistemas
Curtir tópico
+ 0Posts
22/02/2013
Wilton Júnior
Amigo, o que vc tah tentando fazer? now é data e hora praticamente esta duplicando a hora.
Exemplo:
2013-02-22 11:50:50.000 11:50:50.000
As vezes é isso tenta deixa só now
Gostei + 0
22/02/2013
Gr2 Sistemas
Gostei + 0
22/02/2013
Douglas
Gostei + 0
24/02/2013
Alisson Santos
Gostei + 0
30/06/2013
José
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)