|
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
(Visual FoxPro) Aruba Fatturazione Elettronica Find Invoice by UsernameFinds a list of invoices. Returns invoices without content in base64 (lazy loading) For more information, see https://fatturazioneelettronica.aruba.it/apidoc/docs_EN.html#_findbyusername_2
LOCAL loHttp LOCAL lnSuccess LOCAL loSbResponseBody LOCAL loJResp LOCAL lnRespStatusCode LOCAL lcId LOCAL lcSenderDescription LOCAL lcSenderCountryCode LOCAL lcSenderVatCode LOCAL lcSenderFiscalCode LOCAL lcReceiverDescription LOCAL lcReceiverCountryCode LOCAL lcReceiverVatCode LOCAL lcReceiverFiscalCode LOCAL lcInvoiceType LOCAL lcDocType LOCAL lcFile LOCAL lcFilename LOCAL lcUsername LOCAL lcLastUpdate LOCAL lcCreationDate LOCAL lcIdSdi LOCAL lnPddAvailable LOCAL j LOCAL lnCount_j LOCAL lcInvoiceDate LOCAL lcNumber_str LOCAL lcStatus LOCAL lcStatusDescription LOCAL lcErrorCode LOCAL lcErrorDescription LOCAL lnLast LOCAL lnTotalElements LOCAL lnTotalPages LOCAL lnSize LOCAL lnNumber LOCAL lnFirst LOCAL lnNumberOfElements LOCAL i LOCAL lnCount_i * This example assumes the Chilkat API to have been previously unlocked. * See Global Unlock Sample for sample code. * For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.Http') loHttp = CreateObject('Chilkat.Http') * Implements the following CURL command: * curl -X GET https://ws.fatturazioneelettronica.aruba.it/services/invoice/in/findByUsername?username=Username \ * -H "Accept: application/json" \ * -H "Authorization: Bearer NLOGDVXLVaF3tzmnVPkTwpkuh7dG0i09uSCcog3u+rE=" * Use the following online tool to generate HTTP code from a CURL command * Convert a cURL Command to HTTP Source Code * Adds the "Authorization: Bearer NLOGDVXLVaF3tzmnVPkTwpkuh7dG0i09uSCcog3u+rE=" header. loHttp.AuthToken = "NLOGDVXLVaF3tzmnVPkTwpkuh7dG0i09uSCcog3u+rE=" loHttp.SetRequestHeader("Accept","application/json") * For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.StringBuilder') loSbResponseBody = CreateObject('Chilkat.StringBuilder') lnSuccess = loHttp.QuickGetSb("https://ws.fatturazioneelettronica.aruba.it/services/invoice/in/findByUsername?username=Username",loSbResponseBody) IF (lnSuccess = 0) THEN ? loHttp.LastErrorText RELEASE loHttp RELEASE loSbResponseBody CANCEL ENDIF * For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.JsonObject') loJResp = CreateObject('Chilkat.JsonObject') loJResp.LoadSb(loSbResponseBody) loJResp.EmitCompact = 0 ? "Response Body:" ? loJResp.Emit() lnRespStatusCode = loHttp.LastStatus ? "Response Status Code = " + STR(lnRespStatusCode) IF (lnRespStatusCode >= 400) THEN ? "Response Header:" ? loHttp.LastHeader ? "Failed." RELEASE loHttp RELEASE loSbResponseBody RELEASE loJResp CANCEL ENDIF * Sample JSON response: * (Sample code for parsing the JSON response is shown below) * { * "errorCode": "0000", * "errorDescription": null, * "content": [ * { * "errorCode": null, * "errorDescription": null, * "id": "1", * "sender": { * "description": "Aruba SPA", * "countryCode": "IT", * "vatCode": "22222222", * "fiscalCode": "11111111111" * }, * "receiver": { * "description": "Aruba SPA", * "countryCode": "IT", * "vatCode": "4444444", * "fiscalCode": "333333333" * }, * "invoiceType": "FPR12", * "docType": "in", * "file": null, * "filename": "IT01879020517_jtlk0.xml.p7m", * "invoices": [ * { * "invoiceDate": "2020-07-10T09:19:56.948+02:00", * "number": "2020/0001", * "status": "Inviata", * "statusDescription": "" * } * ], * "username": "Utente", * "lastUpdate": "2020-07-10T07:19:56.948+0000", * "creationDate": "2020-07-10T07:19:56.948+0000", * "idSdi": "11110", * "pddAvailable": true * }, * { * "errorCode": null, * "errorDescription": null, * "id": "2", * "sender": { * "description": "Aruba SPA", * "countryCode": "IT", * "vatCode": "22222222", * "fiscalCode": "11111111111" * }, * "receiver": { * "description": "Aruba SPA", * "countryCode": "IT", * "vatCode": "4444444", * "fiscalCode": "333333333" * }, * "invoiceType": "FPR12", * "docType": "in", * "file": null, * "filename": "IT01879020517_jtlk1.xml.p7m", * "invoices": [ * { * "invoiceDate": "2020-07-10T09:19:56.948+02:00", * "number": "2020/0002", * "status": "Inviata", * "statusDescription": "" * } * ], * "username": "Utente", * "lastUpdate": "2020-07-10T07:19:56.948+0000", * "creationDate": "2020-07-10T07:19:56.948+0000", * "idSdi": "11111", * "pddAvailable": true * }, * { * "errorCode": null, * "errorDescription": null, * "id": "3", * "sender": { * "description": "Aruba SPA", * "countryCode": "IT", * "vatCode": "22222222", * "fiscalCode": "11111111111" * }, * "receiver": { * "description": "Aruba SPA", * "countryCode": "IT", * "vatCode": "4444444", * "fiscalCode": "333333333" * }, * "invoiceType": "FPR12", * "docType": "in", * "file": null, * "filename": "IT01879020517_jtlk2.xml.p7m", * "invoices": [ * { * "invoiceDate": "2020-07-10T09:19:56.948+02:00", * "number": "2020/0003", * "status": "Inviata", * "statusDescription": "" * } * ], * "username": "Utente", * "lastUpdate": "2020-07-10T07:19:56.948+0000", * "creationDate": "2020-07-10T07:19:56.948+0000", * "idSdi": "11112", * "pddAvailable": true * }, * { * "errorCode": null, * "errorDescription": null, * "id": "4", * "sender": { * "description": "Aruba SPA", * "countryCode": "IT", * "vatCode": "22222222", * "fiscalCode": "11111111111" * }, * "receiver": { * "description": "Aruba SPA", * "countryCode": "IT", * "vatCode": "4444444", * "fiscalCode": "333333333" * }, * "invoiceType": "FPR12", * "docType": "in", * "file": null, * "filename": "IT01879020517_jtlk3.xml.p7m", * "invoices": [ * { * "invoiceDate": "2020-07-10T09:19:56.948+02:00", * "number": "2020/0004", * "status": "Inviata", * "statusDescription": "" * } * ], * "username": "Utente", * "lastUpdate": "2020-07-10T07:19:56.948+0000", * "creationDate": "2020-07-10T07:19:56.948+0000", * "idSdi": "11113", * "pddAvailable": true * } * ], * "last": true, * "totalElements": 4, * "totalPages": 1, * "size": 10, * "number": 1, * "first": true, * "numberOfElements": 4 * } * Sample code for parsing the JSON response... * Use the following online tool to generate parsing code from sample JSON: * Generate Parsing Code from JSON lcErrorCode = loJResp.StringOf("errorCode") lcErrorDescription = loJResp.StringOf("errorDescription") lnLast = loJResp.BoolOf("last") lnTotalElements = loJResp.IntOf("totalElements") lnTotalPages = loJResp.IntOf("totalPages") lnSize = loJResp.IntOf("size") lnNumber = loJResp.IntOf("number") lnFirst = loJResp.BoolOf("first") lnNumberOfElements = loJResp.IntOf("numberOfElements") i = 0 lnCount_i = loJResp.SizeOfArray("content") DO WHILE i < lnCount_i loJResp.I = i lcErrorCode = loJResp.StringOf("content[i].errorCode") lcErrorDescription = loJResp.StringOf("content[i].errorDescription") lcId = loJResp.StringOf("content[i].id") lcSenderDescription = loJResp.StringOf("content[i].sender.description") lcSenderCountryCode = loJResp.StringOf("content[i].sender.countryCode") lcSenderVatCode = loJResp.StringOf("content[i].sender.vatCode") lcSenderFiscalCode = loJResp.StringOf("content[i].sender.fiscalCode") lcReceiverDescription = loJResp.StringOf("content[i].receiver.description") lcReceiverCountryCode = loJResp.StringOf("content[i].receiver.countryCode") lcReceiverVatCode = loJResp.StringOf("content[i].receiver.vatCode") lcReceiverFiscalCode = loJResp.StringOf("content[i].receiver.fiscalCode") lcInvoiceType = loJResp.StringOf("content[i].invoiceType") lcDocType = loJResp.StringOf("content[i].docType") lcFile = loJResp.StringOf("content[i].file") lcFilename = loJResp.StringOf("content[i].filename") lcUsername = loJResp.StringOf("content[i].username") lcLastUpdate = loJResp.StringOf("content[i].lastUpdate") lcCreationDate = loJResp.StringOf("content[i].creationDate") lcIdSdi = loJResp.StringOf("content[i].idSdi") lnPddAvailable = loJResp.BoolOf("content[i].pddAvailable") j = 0 lnCount_j = loJResp.SizeOfArray("content[i].invoices") DO WHILE j < lnCount_j loJResp.J = j lcInvoiceDate = loJResp.StringOf("content[i].invoices[j].invoiceDate") lcNumber_str = loJResp.StringOf("content[i].invoices[j].number") lcStatus = loJResp.StringOf("content[i].invoices[j].status") lcStatusDescription = loJResp.StringOf("content[i].invoices[j].statusDescription") j = j + 1 ENDDO i = i + 1 ENDDO RELEASE loHttp RELEASE loSbResponseBody RELEASE loJResp |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.