Index: APPS/TRANSP/Offerte/impl/DHL/TariefRepository.cls.xml
===================================================================
diff -u -r34245 -r34298
--- APPS/TRANSP/Offerte/impl/DHL/TariefRepository.cls.xml	(.../TariefRepository.cls.xml)	(revision 34245)
+++ APPS/TRANSP/Offerte/impl/DHL/TariefRepository.cls.xml	(.../TariefRepository.cls.xml)	(revision 34298)
@@ -23,7 +23,7 @@
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	Set PostCode = $$$Right("00000" _PostCode,5)
+	Set PostCode = ##class(TECH.StringUtils).AlignRight(PostCode,0,5) 
 	Quit $EXTRACT(PostCode,1,2)
 ]]></Implementation>
 </Method>