| |
| |
Validierung der Ust-ID Nr. (Lösung)- #18191 in section [743703] |
| Sec: |
(51) MS-Visual FoxPro 9.0 |
| Von: |
S.Schabbach |
| An: |
All |
| Am/Um: |
25.08.2023 11:31:38 gelesen |
Es hat mich ziemlich viel Zeit und nerven gekostet, dies Validierung der Ust-ID Nr. zu finden.
Hier die einfachste Lösung (ohne Soap):
https://ec.europa.eu/taxation_customs/vies/rest-api/ms/{CountryCode}/vat/{UstIdNumber}
Wichtig:
z.B. bei ATU-Nummern kommt in CountryCode nur AT rein und die Nummer beginnt mit dem "U"
Also immer 2 Stellen Land, ab der 3. Stelle Rest ist die UstIdNumber
Einfach als synchronen GET-http-Request senden.
Es kommen XML-Daten zurück
_Url = "https://ec.europa.eu/taxation_customs/vies/rest-api/ms/{CountryCode}/vat/{UstIdNumber}"
_UstID = CHRTRAN( UPPER( _UstID ) , " " , "" )
_CountryCode = LEFT( _UstID , 2 )
_UstIdNumber = SUBSTR( _UstID , 3 )
_Url = STRTRAN( _Url , "{CountryCode}" , _CountryCode )
_Url = STRTRAN( _Url , "{UstIdNumber}" , _UstIdNumber )
DECLARE INTEGER DeleteUrlCacheEntry IN wininet STRING lpszUrlName
loXmlHttp = CREATEOBJECT("MSXML2.XMLHTTP")
loXmlHttp.Open( "GET" , _Url , .F. )
loXmlHttp.Send
lcResponse = loXmlHttp.responsetext
lnStatus = loXmlHttp.Status
DeleteUrlCacheEntry( _Url )
loXmlHttp = .null.
Grüße aus Trier
|
|
|
|
