Xbase++

MyInvois Malaysia Validate Taxpayer TIN

See more Malaysia MyInvois Examples

Validate specific Tax Identification Number (TIN) before adding this number to an invoice and issuing the invoice. Xbase++

LOCAL nSuccess
LOCAL oHttp
LOCAL oQueryParams
LOCAL oResp

nSuccess := 0

//  This example assumes the Chilkat API to have been previously unlocked.
//  See Global Unlock Sample for sample code.

oHttp := CreateObject("Chilkat.Http")

//  Implements the following CURL command:

//  curl -X GET https://preprod-api.myinvois.hasil.gov.my/api/v1.0/taxpayer/validate/C1234567890 \
//    -d "idType=BRN" \
//    -d "idValue=200001009999" \
//    -H "Authorization: Bearer <access_token>"

//  Use the following online tool to generate HTTP code from a CURL command
//  Convert a cURL Command to HTTP Source Code

oQueryParams := CreateObject("Chilkat.JsonObject")
oQueryParams:UpdateString("idType", "BRN")
oQueryParams:UpdateString("idValue", "200001009999")

//  Adds the "Authorization: Bearer <access_token>" header.
oHttp:AuthToken := "<access_token>"

//  Note: The access token is valid for a short amount of time.  Perhaps 1 hour.
//  The access token is used in the "Authorization: Bearer <access_token>" header in subsequent requests until it expires.
//  Your application would then need to get a new access token, and so on..
//  To get an access token, see How to Get a MyInvois Access Token

oResp := CreateObject("Chilkat.HttpResponse")
nSuccess := oHttp:HttpParams("GET", "https://preprod-api.myinvois.hasil.gov.my/api/v1.0/taxpayer/validate/C1234567890", oQueryParams, oResp)
IF (nSuccess == 0)
    ? oHttp:LastErrorText
    oHttp:destroy()
    oQueryParams:destroy()
    oResp:destroy()
    RETURN
ENDIF

? Str(oResp:StatusCode)
? oResp:BodyStr

oHttp:destroy()
oQueryParams:destroy()
oResp:destroy()