Ir para conteúdo
Fórum Script Brasil

edsrp

Membros
 Perfil  Explorar Conteúdo

  • Total de itens

    5

  • Registro em

  • Última visita

 Tipo de Conteúdo 

Posts postados por edsrp

  1. (Resolvido) Bloquear ComboBox simples

    em Delphi, Kylix

    Postado

    se não quer que mude não tem outra forma a não ser enabled mas você pode como no exemplo do change
    você alimenta ele colocando o valor que quer e quando não quiser que seja alterado no change você seta o combo1.ItemIndex := o valor do item quer você quer que fique pocicionado
    Exemplo :

    combo tem como itens   'VALOR 1', 'VALOR 2', 'VALOR 3' aí você quer que determinado usuário ou parametro não permita que mude

    no onchange você coloca

    if Usuario = 'JOAO' then

      combo1.ItemIndex := 0; // PARA FICAR FIXADO NO VALOR 1

      combo1.ItemIndex := 1; // PARA FICAR FIXADO NO VALOR 2

      combo1.ItemIndex := 2; // PARA FICAR FIXADO NO VALOR 3

    LEMBRE-SE DE ATIVAR A PROPRIEDADE 
    Style = csDropDownList;

    Assim não importa o valor que ele escolher ( visto que não tem como bloquear de mexer) vai voltar pro valor que você determinou no chance

     

     

  5. (Resolvido) Consultar NFSe por SOAP

    em Delphi, Kylix

    Postado

    bom dia estou testando consultar uma nota fiscal de serviço no GINFES por SOAP.
    Gero o seguinte arquivo da seguinte forma 

    <?xml version="1.0" encoding="UTF-8"?>
<ConsultarNfseRpsEnvio xmlns="http://www.ginfes.com.br/servico_consultar_nfse_rps_envio_v03.xsd" xmlns:tipos="http://www.ginfes.com.br/tipos_v03.xsd" xmlns:dsig="http://www.w3.org/2000/09/xmldsig#">
<IdentificacaoRps>
<tipos:Numero>1</tipos:Numero>
<tipos:Serie>1</tipos:Serie>
<tipos:Tipo>1</tipos:Tipo>
</IdentificacaoRps>
<Prestador>
<tipos:Cnpj>56123490000178</tipos:Cnpj>
<tipos:InscricaoMunicipal>3766801</tipos:InscricaoMunicipal>
</Prestador>
</ConsultarNfseRpsEnvio>


    isso validei e esta correto o xml
    após jogar no componete HTTPRIO1 ele gera o seguinte xml de envio 

    
<SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encoding/">
<SOAP-ENV:Body>
<ConsultarLoteRps xmlns="http://homologacao.ginfes.com.br"> <arg0 xmlns="">
<?xml version="1.0"?> <ConsultarNfseRpsEnvio xmlns="http://www.ginfes.com.br/servico_consultar_nfse_rps_envio_v03.xsd" xmlns:tipos="http://www.ginfes.com.br/tipos_v03.xsd" xmlns:dsig="http://www.w3.org/2000/09/xmldsig#"> 
<IdentificacaoRps> 
<tipos:Numero>1</tipos:Numero> 
<tipos:Serie>1</tipos:Serie> 
<tipos:Tipo>1</tipos:Tipo> 
</IdentificacaoRps> 
<Prestador> 
<tipos:Cnpj>56123490000178</tipos:Cnpj> 
<tipos:InscricaoMunicipal>3766801</tipos:InscricaoMunicipal> 
</Prestador> 
</ConsultarNfseRpsEnvio></arg0>
</ConsultarLoteRps>
</SOAP-ENV:Body>
</SOAP-ENV:Envelope>


    e retorna esse erro dizendo que o xml não está no padrão mas está 
    alguém pode me ajudar ? 

    <env:Envelope xmlns:env="http://schemas.xmlsoap.org/soap/envelope/">
<env:Header/>
<env:Body>
<ns1:ConsultarLoteRpsResponse xmlns:ns1="http://homologacao.ginfes.com.br">
<return>
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<ns2:ConsultarLoteRpsResposta xmlns:ns2="http://www.w3.org/2000/09/xmldsig#" xmlns:ns4="http://www.ginfes.com.br/servico_consultar_nfse_rps_envio" xmlns:ns3="http://www.ginfes.com.br/tipos" xmlns:ns5="http://www.ginfes.com.br/servico_consultar_lote_rps_envio" xmlns:ns6="http://www.ginfes.com.br/servico_enviar_lote_rps_envio" xmlns:ns7="http://www.ginfes.com.br/servico_consultar_situacao_lote_rps_envio"><ns2:ListaMensagemRetorno><ns2:MensagemRetorno><ns3:Codigo>E160</ns3:Codigo><ns3:Mensagem>Arquivo enviado fora da estrutura do arquivo XML de entrada.</ns3:Mensagem></ns2:MensagemRetorno></ns2:ListaMensagemRetorno></ns2:ConsultarLoteRpsResposta>
</return>
</ns1:ConsultarLoteRpsResponse>
</env:Body>
</env:Envelope>

    seria alguma configuração o HTTPRIO1 que falta fazer ???

×
×
  • Criar Novo...