KBA99 G 1 ;OPZETTEN LOKALE VARIABELE @(Q_"BA(99,..)") IN DE TAAL VAN DE KLANT ; Quit naar KFAKT, KFDOR, KFDUL, KPRLK, KPRLPK, KTDTL
 ;
1 K @(Q_"BA(99)") F I=1:1:12 I $D(@("^"_Q_"BA(99,$P(""N\F\D\E"",D,TL),I)")) S @(Q_"BA(99,I)")=^(I)
3 S HDT=TL
 ;
YZ Q
 ;
Z X ^cZ Q
ZZ ; 21.04.88 - 12 u 29