|
Chilkat • HOME • .NET Core C# • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi ActiveX • Delphi DLL • Go • Java • Lianja • Mono C# • Node.js • Objective-C • PHP ActiveX • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift 2 • Swift 3,4,5... • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
(PureBasic) Cerved API Entity SearchPerform searches on a Subject, known indifferently, the Fiscal Code, VAT number or Name, and to obtain basic information of the Subject. For more information, see https://apps-developer.cerved.com/
IncludeFile "CkHttp.pb" IncludeFile "CkStringBuilder.pb" IncludeFile "CkJsonObject.pb" Procedure ChilkatExample() ; This example assumes the Chilkat API to have been previously unlocked. ; See Global Unlock Sample for sample code. http.i = CkHttp::ckCreate() If http.i = 0 Debug "Failed to create object." ProcedureReturn EndIf success.i ; Implements the following CURL command: ; curl -X GET \ ; https://api.cerved.com/cervedApi/v1/entitySearch/live?testoricerca=test \ ; -H 'accept: application/json' \ ; -H 'apikey: ********************************' ; Use the following online tool to generate HTTP code from a CURL command ; Convert a cURL Command to HTTP Source Code CkHttp::ckSetRequestHeader(http,"accept","application/json") ; Note: Your apikey is your Consumer Key CkHttp::ckSetRequestHeader(http,"apikey","********************************") sbResponseBody.i = CkStringBuilder::ckCreate() If sbResponseBody.i = 0 Debug "Failed to create object." ProcedureReturn EndIf success = CkHttp::ckQuickGetSb(http,"https://api.cerved.com/cervedApi/v1/entitySearch/live?testoricerca=test",sbResponseBody) If success = 0 Debug CkHttp::ckLastErrorText(http) CkHttp::ckDispose(http) CkStringBuilder::ckDispose(sbResponseBody) ProcedureReturn EndIf jResp.i = CkJsonObject::ckCreate() If jResp.i = 0 Debug "Failed to create object." ProcedureReturn EndIf CkJsonObject::ckLoadSb(jResp,sbResponseBody) CkJsonObject::setCkEmitCompact(jResp, 0) Debug "Response Body:" Debug CkJsonObject::ckEmit(jResp) respStatusCode.i = CkHttp::ckLastStatus(http) Debug "Response Status Code = " + Str(respStatusCode) If respStatusCode >= 400 Debug "Response Header:" Debug CkHttp::ckLastHeader(http) Debug "Failed." CkHttp::ckDispose(http) CkStringBuilder::ckDispose(sbResponseBody) CkJsonObject::ckDispose(jResp) ProcedureReturn EndIf ; Sample JSON response: ; (Sample code for parsing the JSON response is shown below) ; { ; "peopleTotalNumber": 1, ; "companiesTotalNumber": 49, ; "companies": [ ; { ; "dati_anagrafici": { ; "id_soggetto": 12207335, ; "denominazione": "ANGELANTONI TEST TECHNOLOGIES S.R.L. IN FORMA ABBREVIATA ATT S.R.L.", ; "codice_fiscale": "01234567890", ; "partita_iva": "01234567890", ; "indirizzo": { ; "descrizione": "LOCALITA' CIMACOLLE, 464", ; "cap": "06056", ; "codice_comune": "PG028", ; "descrizione_comune": "MASSA MARTANA", ; "codice_comune_istat": "054028", ; "provincia": "PG", ; "descrizione_provincia": "PERUGIA" ; } ; }, ; "dati_attivita": { ; "codice_ateco": "265129", ; "ateco": "Fabbricazione di altri apparecchi di misura e regolazione, strumenti da disegno, di contatori di elettricita', gas, acqua ed altri liquidi, di bilance analitiche di precisione (incluse parti staccate ed accessori)", ; "codice_stato_attivita": "A", ; "flag_operativa": true, ; "codice_rea": "PG 272575", ; "company_form": { ; "code": "SR", ; "description": "SOCIETA' A RESPONSABILITA' LIMITATA", ; "company_form_class": "SC" ; } ; }, ; "dati_pa": { ; "ente": false, ; "fornitore": true, ; "partecipata": false ; } ; }, ; { ; "dati_anagrafici": { ; "id_soggetto": 1046896, ; "denominazione": "TEST INDUSTRY S.R.L.", ; "codice_fiscale": "01234567890", ; "partita_iva": "01234567890", ; "indirizzo": { ; "descrizione": "CORSO VENEZIA, 36", ; "cap": "20121", ; "codice_comune": "MI146", ; "descrizione_comune": "MILANO", ; "codice_comune_istat": "015146", ; "provincia": "MI", ; "descrizione_provincia": "MILANO" ; } ; }, ; "dati_attivita": { ; "codice_ateco": "265129", ; "ateco": "Fabbricazione di altri apparecchi di misura e regolazione, strumenti da disegno, di contatori di elettricita', gas, acqua ed altri liquidi, di bilance analitiche di precisione (incluse parti staccate ed accessori)", ; "codice_stato_attivita": "A", ; "flag_operativa": true, ; "codice_rea": "MI 2579272", ; "company_form": { ; "code": "SR", ; "description": "SOCIETA' A RESPONSABILITA' LIMITATA", ; "company_form_class": "SC" ; } ; }, ; "dati_pa": { ; "ente": false, ; "fornitore": true, ; "partecipata": false ; } ; }, ; { ; "dati_anagrafici": { ; "id_soggetto": 300632, ; "denominazione": "ITW TEST AND MEASUREMENT ITALIA S.R.L.", ; "codice_fiscale": "01234567890", ; "partita_iva": "01234567890", ; "indirizzo": { ; "descrizione": "VIA AIRAUDA, 12", ; "cap": "10044", ; "codice_comune": "TO189", ; "descrizione_comune": "PIANEZZA", ; "codice_comune_istat": "001189", ; "provincia": "TO", ; "descrizione_provincia": "TORINO" ; } ; }, ; "dati_attivita": { ; "codice_ateco": "265129", ; "ateco": "Fabbricazione di altri apparecchi di misura e regolazione, strumenti da disegno, di contatori di elettricita', gas, acqua ed altri liquidi, di bilance analitiche di precisione (incluse parti staccate ed accessori)", ; "codice_stato_attivita": "A", ; "flag_operativa": true, ; "codice_rea": "TO 379571", ; "company_form": { ; "code": "SU", ; "description": "SOCIETA' A RESPONSABILITA' LIMITATA CON UNICO SOCIO", ; "company_form_class": "SC" ; } ; }, ; "dati_pa": { ; "ente": false, ; "fornitore": true, ; "partecipata": false ; } ; } ; ], ; "people": [ ; { ; "dati_anagrafici": { ; "id_soggetto": 333333333, ; "denominazione": "ROBUSTELLI TEST ALESSANDRO", ; "dt_nascita": "08-22-1978", ; "codice_fiscale": "RBSSMMMMMMMMMMMM", ; "indirizzo": { ; "descrizione": "VIA ALESSANDRINI, 22", ; "cap": "26027", ; "codice_comune": "CR084", ; "descrizione_comune": "RIVOLTA D'ADDA", ; "codice_comune_istat": "019084", ; "provincia": "CR", ; "descrizione_provincia": "CREMONA" ; } ; } ; } ; ] ; } ; Sample code for parsing the JSON response... ; Use the following online tool to generate parsing code from sample JSON: ; Generate Parsing Code from JSON dati_anagraficiId_soggetto.i dati_anagraficiDenominazione.s dati_anagraficiCodice_fiscale.s dati_anagraficiPartita_iva.s dati_anagraficiIndirizzoDescrizione.s dati_anagraficiIndirizzoCap.s dati_anagraficiIndirizzoCodice_comune.s dati_anagraficiIndirizzoDescrizione_comune.s dati_anagraficiIndirizzoCodice_comune_istat.s dati_anagraficiIndirizzoProvincia.s dati_anagraficiIndirizzoDescrizione_provincia.s dati_attivitaCodice_ateco.s dati_attivitaAteco.s dati_attivitaCodice_stato_attivita.s dati_attivitaFlag_operativa.i dati_attivitaCodice_rea.s dati_attivitaCompany_formCode.s dati_attivitaCompany_formDescription.s dati_attivitaCompany_formCompany_form_class.s dati_paEnte.i dati_paFornitore.i dati_paPartecipata.i dati_anagraficiDt_nascita.s peopleTotalNumber.i = CkJsonObject::ckIntOf(jResp,"peopleTotalNumber") companiesTotalNumber.i = CkJsonObject::ckIntOf(jResp,"companiesTotalNumber") i.i = 0 count_i.i = CkJsonObject::ckSizeOfArray(jResp,"companies") While i < count_i CkJsonObject::setCkI(jResp, i) dati_anagraficiId_soggetto = CkJsonObject::ckIntOf(jResp,"companies[i].dati_anagrafici.id_soggetto") dati_anagraficiDenominazione = CkJsonObject::ckStringOf(jResp,"companies[i].dati_anagrafici.denominazione") dati_anagraficiCodice_fiscale = CkJsonObject::ckStringOf(jResp,"companies[i].dati_anagrafici.codice_fiscale") dati_anagraficiPartita_iva = CkJsonObject::ckStringOf(jResp,"companies[i].dati_anagrafici.partita_iva") dati_anagraficiIndirizzoDescrizione = CkJsonObject::ckStringOf(jResp,"companies[i].dati_anagrafici.indirizzo.descrizione") dati_anagraficiIndirizzoCap = CkJsonObject::ckStringOf(jResp,"companies[i].dati_anagrafici.indirizzo.cap") dati_anagraficiIndirizzoCodice_comune = CkJsonObject::ckStringOf(jResp,"companies[i].dati_anagrafici.indirizzo.codice_comune") dati_anagraficiIndirizzoDescrizione_comune = CkJsonObject::ckStringOf(jResp,"companies[i].dati_anagrafici.indirizzo.descrizione_comune") dati_anagraficiIndirizzoCodice_comune_istat = CkJsonObject::ckStringOf(jResp,"companies[i].dati_anagrafici.indirizzo.codice_comune_istat") dati_anagraficiIndirizzoProvincia = CkJsonObject::ckStringOf(jResp,"companies[i].dati_anagrafici.indirizzo.provincia") dati_anagraficiIndirizzoDescrizione_provincia = CkJsonObject::ckStringOf(jResp,"companies[i].dati_anagrafici.indirizzo.descrizione_provincia") dati_attivitaCodice_ateco = CkJsonObject::ckStringOf(jResp,"companies[i].dati_attivita.codice_ateco") dati_attivitaAteco = CkJsonObject::ckStringOf(jResp,"companies[i].dati_attivita.ateco") dati_attivitaCodice_stato_attivita = CkJsonObject::ckStringOf(jResp,"companies[i].dati_attivita.codice_stato_attivita") dati_attivitaFlag_operativa = CkJsonObject::ckBoolOf(jResp,"companies[i].dati_attivita.flag_operativa") dati_attivitaCodice_rea = CkJsonObject::ckStringOf(jResp,"companies[i].dati_attivita.codice_rea") dati_attivitaCompany_formCode = CkJsonObject::ckStringOf(jResp,"companies[i].dati_attivita.company_form.code") dati_attivitaCompany_formDescription = CkJsonObject::ckStringOf(jResp,"companies[i].dati_attivita.company_form.description") dati_attivitaCompany_formCompany_form_class = CkJsonObject::ckStringOf(jResp,"companies[i].dati_attivita.company_form.company_form_class") dati_paEnte = CkJsonObject::ckBoolOf(jResp,"companies[i].dati_pa.ente") dati_paFornitore = CkJsonObject::ckBoolOf(jResp,"companies[i].dati_pa.fornitore") dati_paPartecipata = CkJsonObject::ckBoolOf(jResp,"companies[i].dati_pa.partecipata") i = i + 1 Wend i = 0 count_i = CkJsonObject::ckSizeOfArray(jResp,"people") While i < count_i CkJsonObject::setCkI(jResp, i) dati_anagraficiId_soggetto = CkJsonObject::ckIntOf(jResp,"people[i].dati_anagrafici.id_soggetto") dati_anagraficiDenominazione = CkJsonObject::ckStringOf(jResp,"people[i].dati_anagrafici.denominazione") dati_anagraficiDt_nascita = CkJsonObject::ckStringOf(jResp,"people[i].dati_anagrafici.dt_nascita") dati_anagraficiCodice_fiscale = CkJsonObject::ckStringOf(jResp,"people[i].dati_anagrafici.codice_fiscale") dati_anagraficiIndirizzoDescrizione = CkJsonObject::ckStringOf(jResp,"people[i].dati_anagrafici.indirizzo.descrizione") dati_anagraficiIndirizzoCap = CkJsonObject::ckStringOf(jResp,"people[i].dati_anagrafici.indirizzo.cap") dati_anagraficiIndirizzoCodice_comune = CkJsonObject::ckStringOf(jResp,"people[i].dati_anagrafici.indirizzo.codice_comune") dati_anagraficiIndirizzoDescrizione_comune = CkJsonObject::ckStringOf(jResp,"people[i].dati_anagrafici.indirizzo.descrizione_comune") dati_anagraficiIndirizzoCodice_comune_istat = CkJsonObject::ckStringOf(jResp,"people[i].dati_anagrafici.indirizzo.codice_comune_istat") dati_anagraficiIndirizzoProvincia = CkJsonObject::ckStringOf(jResp,"people[i].dati_anagrafici.indirizzo.provincia") dati_anagraficiIndirizzoDescrizione_provincia = CkJsonObject::ckStringOf(jResp,"people[i].dati_anagrafici.indirizzo.descrizione_provincia") i = i + 1 Wend CkHttp::ckDispose(http) CkStringBuilder::ckDispose(sbResponseBody) CkJsonObject::ckDispose(jResp) ProcedureReturn EndProcedure |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.