Index: cA604.mac.rou =================================================================== diff -u -r734 -r2415 --- cA604.mac.rou (.../cA604.mac.rou) (revision 734) +++ cA604.mac.rou (.../cA604.mac.rou) (revision 2415) @@ -6,7 +6,7 @@ ; T0E ;Interne initialisatie ; ; - + 1 D ^cA600 ; 2 S QP=1,QD=$D(@("^"_QS_Q_"BA(34)")),%Q1="^"_Q_"BA(""%1"",$I)" S:QD QD=^(34)