set status [infotag get evt_status];

    if {$status == "ao_000"} {

if {[infotag get aaa_avpair_exists h323-credit-amount]} {

set amt [infotag get aaa_avpair h323-credit-amount]

} else {

media play leg_incoming _no_aaa.au;

fsm setstate CALLDISCONNECT;

return;

}

fsm setstate DESTSELECTION;

if {$amt <= 999999.99} {

media play leg_incoming _you_have.au %a$amt _enter_dest.au;

} else {

media play leg_incoming _enter_dest.au;

}

leg collectdigits leg_incoming ParamForDest;

return;

}

    if {[infotag get aaa_avpair_exists h323-return-code]} {

set return_code [infotag get aaa_avpair h323-return-code];

} else {

media play leg_incoming _no_aaa.au;

fsm setstate CALLDISCONNECT;

return;

}

    incr NumCardPrompt;

    if {$NumCardPrompt < $retryCnt} {

leg collectdigits leg_incoming ParamForCard;

act_PlayCardReturnCode $return_code;

} else {

ct_GetCard;

}

    return;

    }

Процедура act_CardAuthorize так же анализирует статус события ev_authorize_done, и при успешной авторизации («ao_000») получает с помощью команды infotag get aaa_avpair h323-credit-amount сумму на счете клиента, сохраняет ее в переменной amt и проигрывает ее клиенту с помощью команды media play %a$amt. Тут необходимо сделать небольшое отступление.