Index: DOM/VKP/impl/DataM/DataMTekstOrderlijn.cls.xml =================================================================== diff -u -r47087 -r47111 --- DOM/VKP/impl/DataM/DataMTekstOrderlijn.cls.xml (.../DataMTekstOrderlijn.cls.xml) (revision 47087) +++ DOM/VKP/impl/DataM/DataMTekstOrderlijn.cls.xml (.../DataMTekstOrderlijn.cls.xml) (revision 47111) @@ -66,9 +66,9 @@ #dim AanduidingTekstBlok As %String = ..GeefPiece(18) Set $Piece(AanduidingTekstBlok,";",3) = ProductLijnID If $Length(ProductLijnID) { - Set $Piece(AanduidingTekstBlok,";",2) = "T" - } else { Set $Piece(AanduidingTekstBlok,";",2) = "P" + } else { + Set $Piece(AanduidingTekstBlok,";",2) = "T" } Do ..ZetPiece(18, AanduidingTekstBlok) ]]>