Jump to content
Fivewin Brasil

twl

Membros
  • Posts

    6
  • Joined

  • Last visited

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

twl's Achievements

Newbie

Newbie (1/14)

0

Reputation

  1. Resolveu ?? você está utilizando campo date ou timestampp ???
  2. eu uso assim sem problemas com sqllib ou sqlrdd cCmdsql := 'INSERT high_priority INTO ficha_proced (dataatend) values('+dtoce(DATE(),'AAAA-MM-DD')+')' function DToCE( dData, cMascara ) LOCAL cData DEFAULT cMascara:='DD/MM/AAAA' SET cent ON cData:=dtoc( dData ) cData:=iif( cMascara='DD/MM/AAAA', cData, SoNumeros( cData ) ) if cMascara='AAAAMMDD' cData:=substr( cData, 5, 4 )+substr( cData, 3, 2 )+substr( cData, 1, 2 ) elseif cMascara='AAAA/MM/DD' cData:=substr( cData, 5, 4 )+'/'+substr( cData, 3, 2 )+'/'+substr( cData, 1, 2 ) elseif cMascara=='DDMMAA' cData:=substr( cData, 1, 4 )+substr( cData, 7, 2 ) elseif cMascara=='DDMMAAAA' cData:=substr( cData, 1, 8 ) elseif cMascara='AAAA-MM-DD' cData:=SoNumeros( cData ) cData:=substr( cData, 5, 4 )+'-'+substr( cData, 3, 2 )+'-'+substr( cData, 1, 2 ) endif if substr(cData,1,1)='0' .AND. substr(cMascara,1,4)='AAAA' cData:=substr(cData,2,3)+substr(cData,1,1)+substr(cData,5,4) endif cData:=padl( cData, len(cMascara) ) return cData
  3. Uso o Flutter, aprendi na tora.kkkk 7 dias meu aplicativo já estava rodando.
  4. os arquivos .ch estão vazio, todos os arquivos estão vazios !!!, atualiza aqui por favor, obrigado
  5. Desculpem voltar o post antigo mas Só para lembrar dessa "DR" de kapiaba kkkkkk
  6. Bom dia e Feliz ano novo para todos !!!Mais um desafio.rsrsrEstou precisando desenvolver uma rotina para consultar o cartão sus do paciente, mas só encontrei exemplos em java/php, alguém aqui jádesenvolveu algo parecido e esteja disposto a colaborar mas como tenho pouco tempo para resolver estou disposto a pagar, pois vai me levar muito tempo.Postei esse código php só para demonstrar como funciona<?phptry {$wsdlUrl = 'https://servicoshm.saude.gov.br/cadsus/CadsusService/v5r0?wsdl';$wsUser = 'CADSUS.CNS.PDQ.PUBLICO';$passWs = 'kUXNmiiii#RDdlOELdoe00966';$soapClientOptions = array('trace' => 1,'cache_wsdl' => WSDL_CACHE_NONE);$client = new SoapClient($wsdlUrl, $soapClientOptions);$xmlheader = '<wsse:Security SOAP-ENV:mustUnderstand="1" xmlns:wsse="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd" xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.xsd"><wsse:UsernameToken wsu:Id="UsernameToken-F6C95C679D248B6E3F143032021465917"><wsse:Username>' . $wsUser . '</wsse:Username><wsse:Password Type="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-username-token-profile-1.0#PasswordText">' . $passWs . '</wsse:Password></wsse:UsernameToken></wsse:Security>';$header = new SoapHeader('http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.xsd', 'Security', new \SoapVar($xmlheader, XSD_ANYXML), false);$client->__setSoapHeaders($header);$requestPesquisar = new stdClass();$requestPesquisar->CNESUsuario = new stdClass();$requestPesquisar->CNESUsuario->CNES = '6963447';$requestPesquisar->CNESUsuario->Usuario = 'LEONARDO';$requestPesquisar->CNESUsuario->Senha = '?';$requestPesquisar->FiltroPesquisa = new stdClass();$requestPesquisar->FiltroPesquisa->nomeCompleto = new stdClass();$requestPesquisar->FiltroPesquisa->nomeCompleto->Nome = 'SERGIO ARAUJO CORREIA LIMA';$requestPesquisar->FiltroPesquisa->tipoPesquisa = 'IDENTICA';$requestPesquisar->higienizar = '0';$result = $client->pesquisar($requestPesquisar);if ($result) {echo '<pre>', print_r($result), '</pre>';} else {echo '<h2>Request:</h2>';echo '<pre>', print_r($client->__getLastRequest()), '</pre>';echo '<h2>Header:</h2>';echo '<pre>', print_r($client->__getLastRequestHeaders()), '</pre>';echo '<h2>Response:</h2>';echo '<pre>', print_r($client->__getLastResponse()), '</pre>';}} catch (Exception $e) {echo '<pre>', print_r($e), '<pre>';}?>
×
×
  • Create New...