Index: BL/PR/GA/TB/tmpDev2.mac.rou =================================================================== diff -u -r2432 -r2797 --- BL/PR/GA/TB/tmpDev2.mac.rou (.../tmpDev2.mac.rou) (revision 2432) +++ BL/PR/GA/TB/tmpDev2.mac.rou (.../tmpDev2.mac.rou) (revision 2797) @@ -126,6 +126,12 @@ bfwBTItemsFromWSLijn New lbDSCodes,DSCode,KFront,KRug,KBxs,Klas,SPZKpiece1 ;d WLIP^vhDBG(97,"*"_$L(WSLn.ItemRK)_"*"_" - "_WSLn.ItemRK) + + // Tijdelijke patch voor intivo inox RelingKleur - waarde in WSLijn moet aangepast worden van CR naar IN (added by WimV on 10/11/2011) + If (WSLn.ItemDS="II")&&(WSLn.ItemRK="CR") { + Set WSLn.ItemRK="IN" + } + Set DSCode=$S($L(WSLn.ItemDS):$LG(..BTDep("TBDesign","TBDesignCode",WSLn.ItemDS),1), 1:"") Set KFront=$S($L(WSLn.ItemRK):$LG(..BTDep("TBRelingKleur","TBFrontKleur",WSLn.ItemRK),1), 1:"") Set KRug =$S($L(WSLn.ItemDS):$LG(..BTDep("TBDesign","TBRugKleur",dsID),1), 1:"")