Index: PROC.mac.rou =================================================================== diff -u -r56959 -r58380 --- PROC.mac.rou (.../PROC.mac.rou) (revision 56959) +++ PROC.mac.rou (.../PROC.mac.rou) (revision 58380) @@ -99,7 +99,7 @@ FL4 GOTO FL6:'$LENGTH(FL(2)),FL5:'$LENGTH($PIECE(FieldParameters,U,7)) ;print IF $PIECE(FieldParameters,U,7)?.N SET FLb=$PIECE(FL(3),"\",$PIECE(FieldParameters,U,7)) - ELSE XECUTE "S FLb="_$PIECE(FieldParameters,U,7) + ELSE XECUTE "S FLb="_$PIECE(FieldParameters,U,7) // N.B. Variabelen zoals FLs zijn hernoemd naar leesbaardere vormen, zie revisie 56936. IF '$GET(FL(4)),FLb WRITE @FMTB,$$FLATASCI(R),@FMTb,$PIECE(FieldParameters,U,6) GOTO FL6 FL5 Set Positie = 1