cT990(QQ,BPC,T)    ;Job controle boekhouding ;%T99 ; [ 05/28/01  10:47 AM ]
 ;
 ; QQ = meerdere Q-waardes, gescheiden door spaties
 ; BPC= te beschouwen periode
 ; T  = wachtlus in minuten tussen 2 opeenvolgende Q-waardes
 ;
T0 ;Job controle boekhouding ;
 ;
T0F ;Job contrôle comptabilité ;
 ;
T0E ;Job controle boekhouding ;
 ;
1 L ^HULP(QQ):2 E  G YZ
 ;
2 F  S Q=$P(QQ," "),QQ=$P(QQ," ",2,999) Q:Q=""  D
 . J ^cT99(Q,BPC)
 . I $L(QQ) F I=1:1:T H 60
 ;
YZ Q
 ;
ZZ ; 06.08.01 - 17 u 28 * V7.87