Message

Invoice type code MUST be set according to the profile.

Context
cbc:InvoiceTypeCode
Test
$profile != '01' or (some $code in tokenize('71 80 82 84 102 218 219 326 331 380 382 383 384 386 388 393 395 553 575 623 780 817 870 875 876 877', '\s') satisfies normalize-space(text()) = $code)
Usage
/ ubl:Invoice / cbc:InvoiceTypeCode