------------------------SDT2XZCCAF--------------------------------------------------------------------------------------------------------------------------------------------------------ObjectName----------------------------------------ObjectType----------------------------------------!%()HeaderText------------------------------------!%()HeadingText----------------------------------- CCAF-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------5--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------()[8(! ;FPAR SigConId SigConIdType;)]}------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------4()[8(! Process CCAF)]}----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------$()[(! l! 22!(d)[h(! l)[k(! 6)[n(! 6d! )]][ q(! 6)][2w(! 6! d)[8(! )][}!%()HeadingText-----------------------------------!%()PageOrder-------------------------------------1-------------------------------------------------2-------------------------------------------------   !%()HeaderText------------------------------------1-------------------------------------------------4---------------------------------------------------------------------------------------------------- ----&----R----(!^!"^)[(! 6! d!)[8(!# ToMD_start_ _telephone (SigConId))][(!&!"&)[ (!4!5!7)[!(! 1!!3)[!(! 2!!3)[!(! 3!!3)[!(! 4!!3)[!(! 5!!3)[!U(! 6&!Z)][3z(! 6&! d)[8(! OffLine)][(!!")[(! 6! d!)[8(! O nLine (ThisNumber))][(! R!"R )[(! 6R!Z)][3(! 6R! d)[8(! Idle)]]]]]]]]]][9t(! 6^! )[ 8(!a DCL BCSMId, CBCSMId BCSMIdType, IhId PId, DialledNumber, ThisNumber DirectoryNumberType, Code Natural, Digit Natural, Counter Natural, CPArg CallProgressType, RArg ReleaseType, SArg SetupType, SAArg SubsequentAddressTy()[(! l! 22!(d)[(! l)[(! 6)[(! 6d! )]][ (! 6)][3(! 6d! d)[8(! Idle)][(!"&&!"&)[(! 6! d!)[8(! OffHook)][(!&^&!"&&^)[(! 6! d!)[8(!' ToMD_start_ _tone(dialtone, SigConId))][(!&&&!"&&&)[6((! 6&! d)[8(! Counter:=4, DialledNumber :=0)][+(!&&!"&&)[(! 6&!Z)][3(! 6! d)[8(! WaitForFirst_ Digit)][ (!"& &99R!"R& )[ (! 6R! d!)[8(! OnHook)][(!!")[(! 6! d!)[8(!$ ToMD_stop_tone (dialtone,SigConId))][(!L~!"~L)[(! 6~!Z)][3(! 6~! d)[8(! Idle)]]]]]]][(!& &R!"&R& )[(! 6R! d!)[8(! Digit (Digit))][%(!&&!"&&)["(! 6!  d!)[8(!$ ToMD_stop_tone (dialtone,SigConId))][1(!&L&~!"&~&L)[6.(! 6~! d)[8(!< Counter:=Counter-1, DialledNumber:= Dia()[(! l! 22!(d)[(! l)[(! 6)[(! 6d! )]][ (! 6)][3:(! 6! d)[8(! WaitForD2-------------------------------------------------3-------------------------------------------------4-------------------------------------------------5------------------------------------------------- &:igits)][@(!",!",)[=(! 6^,! d!)[8(! OnHook)][F(!!")[(! 6!Z)][3C(! 6^! d)[8(! Idle)]]]]][(!,!",)[(! 6,! d!)[8(! Digit (Digit))][(!!")[6I(! 6! d)[8(!< Counter:=Counter-1, DialledNumber:= DialledNumber*10+Digit)][v(!&X!"X&)[ L(! 6X! d)[8(! Counter=0)][y(! !" )[8(! 6! FALSE)][(! 6 !"lledNumber*10+Digit)][7(!&&!"&&)[(! 6&!Z)][34(! 6! d)[8(! WaitForDigits)]]]]]]]]]]]]]]]]][(!"!")[(! 6F! d!)[8(! SetupReq (SArg))][(!^!"^)[6(! 6F! d)[8(!7 BCSMId :=SArg!BCSMId, BCSMId!AddressType := ToAddress)][(!&!"&)[(! 6F&! d!)[8(! ToMD_start_ _ring(SigConId))][(!!")[6(! 6F! d)[8(!C CPArg!BCSMId := BCSMId, CPArg!CS1ProgressIndicator := BptyAlerted)][(! R!" pe, Tone Natural, Fromm,Too Natural, AEArg AddressEndType, SFtArg ServiceFeatureType, FArg FailureType;)]]]]}-----------------------------------------------------------------------------------------------------------------------------------------wR )[(! 6FR! d!)[8(! CallProgressInd (CPArg))][(!!")[(! 6!Z)][3!(! 6F! d)[8(! WaitForOffHook)]]]]]]]]]]]]]]]]}]}-------------------------------------------------------------------------------------------------------------------------------------------------------------------------UZ)][3X(! 6 ! d)[8(! WaitForDigits)]]][|(!RLL !"L R)[8(! 6e! TRUE)][6(! 6 ! d)[8#(! )][1(!RR!"RR)[7(! 6 !)[8(!r SArg!BCSMId!SigConId := SigConId, SArg!CalledPartyNumber := DialledNumber, SArg!CallingPartyNumber := ThisN$umber)]]][(!LL!"LL)[R(! 6! d!)[8(! SetupInd (SArg))][(!LLL!"LLL)[%(! 6LL!Z)][3(! 6L! d)[8(! WaitForEnd_ Response)]]]]]]]]]]]]]]]]}}(! 6@! d)[8(! WaitForOffHook)][(!^!"()[(! l! 22!(d)[(! l)[(! 6)[(! 6d! )]][ (! 6)][3(! 6X! d)[8(! WaitForE'nd_ Response)][(!"^^,!"^,)[(! 6,! d!)[8(! OnHook)][(!^^!"^^()[6(! 6! d)[8(! RArg!BCSMId!AddressType := FromAddress, RArg!BCSMId!SigConId := SigConId, RArg!CS1Cause := AptyAbandon, RArg!CS1Reason := R_NotPresent)][(!^&^X!"^)X^&)[(! 6X! d!)[8(! ReleaseInd (RArg))][(!^^!"^^)[(! 6^!Z)][3(! 6*! d)[8(! Idle)]]]]]]]]][(!,!",)[(! 6X,! d!)[8(! CallProgress_ Req (CPArg))][ (!+!")[6w(! 6X! d)[8(! IHId := CPArg! BCSMId!IhId)][z(!&X!"X&)[ (! 6XX! d!,)[8(!% ToMD_start_tone (Ringtone,SigConId))][(!!")[(! 6!Z)][3(! 6X! d)[8(! WaitForAnswer)]]]-]]]]]][(!",!",)[(! 6,! d!)[8(! ReleaseReq (RArg))][!(!!".)[6}(! 6! d)[8(! IHId := RArg! BCSMId!IhId)][(!&X!"X&)[(! 6X! d!)[8(!% ToMD_start_/tone (BusyTone,SigConId))]['(!!")[6(! 6! d)[8(! Tone := BusyTone)][(!R!"R)0[(! 6!Z)][3$(! 6! d)[8(! WaitForOnHook)]]]]]]]]]]]][3(! 6! d)[8(! WaitForOffHook)][(!@@,!"1@,@)[(! 6,! d!)[8(! OffHook)][(!@@!"@@)[6(! 6! d)[8(! SArg!BCSMId 2:= BCSMId)][(!@&@X!"@X@&)[(! 6X! d!)[8(! SetupConf (SArg))][(!@@!"@@)[3(! 6! d!)[8(! ToMD_stop_ring (SigConId))][(!@R@!"@@R)[(! 6@!Z)][3(! 6! d)[84(! B_Connected)]]]]]]]]]]]][3(! 6XL! d)[8(! WaitForAnswer)][?(!",,!",)[*(! 6! d!5)[8(! OnHook)][6(!,F,x!",x,F)[6-(! 6x! d)[8(! RArg!BCSMId!AddressType := FromAddress, RArg!BCSMId!SigConId := SigConId, RArg!BCSMId6!IhId := IhId, RArg!CS1Cause := AptyAbandon, RArg!CS1Reason := R_NotPresent)][9(!,,!",,)[0(! 6! d!)[8(! ReleaseInd (RArg))][<(7!,r,!",,r)[(! 6,!Z)][33(! 6! d)[8(! Idle)]]]]]]]]][K(!!")[8H(! 6X! d!)[8(! SetupResp (SArg))][Q(!Fx!"xF)[N(! 6Xx! d!)[8(!$ ToMD_stop_tone (Rin9gTone,SigConId))][W(!!")[(! 6!Z)][3T(! 6X! d)[8(! A_Connected)]]]]]]][,(!"A()[(! l! 22!(d)[o(! l)[r(! 6)[u(! 6d! )]][ x(! 6)][3{(! 6! d)[8(! A_Connec;ted)][(!",!",)[~(! 6^,! d!)[8(! OnHook)][(!!")[6<(! 6^! d)[8(! RArg!BCSMId!AddressType := FromAddress, RArg!BCSMId!SigConId := SigConId, RArg!BCSMId!IhId := IhId, RArg!CS1Cause := AptyDisc, RArg!CS1Reason := R_NotPresent)][(!&X!"=X&)[(! 6^X! d!)[8(! ReleaseInd (RArg))][(!!")[(! 6!Z)][3(!> 6^! d)[8(! Idle)]]]]]]]]][(!,!",)[(! 6,! d!)[8(! Feature)][(!!?")[6(! 6! d)[8(!j SftArg!BCSMId!AddressType := FromAddress, SFtArg!BCSMId!SigConId := SigConId, SftArg!BCSMId!IhId := IhId)][(!&X!"@X&)[(! 6X! d!)[8(! ServiceFeatureInd (SFtArg))][(!!")[(! 6!Z)][3(! B!")[(! 6R! d!)[8(! Feature)][#(!Fx!"xF)[6(! 6Rx! d)[8N6! d)[8(! A_Connected)]]]]]]]]][(!",!",)[(! 6x,! d!)[8(! ReleaseReq (RArg))][C(!!")[(! 6x! d!)[8(!$ ToMD_start_tone (Silence,SigConId))][(!&X!"X&)[D6(! 6xX! d)[8(! Tone := Silence)][(!!")[(! 6!Z)][3(! 6x! d)[8(! WEaitForOnHook)]]]]]]]]]][3(! 6! d)[8(! B_Connected)][(!"~!"~)[(! 6^! d!)[8(!F OnHook)][(!F!"F)[6(! 6^F! d)[8(!T RArg!BCSMId := BCSMId, RArg!CS1Cause := C_BptyDisc, RArg!CS1Reason := R_NotPresent)][(!G!")[(! 6^! d!)[8(! ReleaseInd (RArg))][(!@r!"r@)[(! 6r!ZH)][3(! 6^r! d)[8(! Idle)]]]]]]]]][(!~!"~)[(! 6! d!)[8(! Feature)][(!IF!"F)[6(! 6F! d)[8(! SFtArg!BCSMId := BCSMId)][(!!")[(! 6! Jd!)[8(! ServiceFeatureInd (SFtArg))][(!@r!"r@)[(! 6r!Z)][3(! 6r! d)[8(! B_Connected)]]]K]]]]]][(!"~!"~)[(! 6x! d!)[8(! ReleaseReq (RArg))][(!F!"FL)[(! 6xF! d!)[8(!$ ToMD_start_tone (Silence,SigConId))][ (!!")[6(! 6x! d)[8(! ToMne := Silence)][(!@r!"r@)[(! 6r!Z)][3(! 6xr! d)[8(! WaitForOnHook)]]]]]]]]]]]]}-------------------------------------(!j SftArg!BCSMId!AddressType := FromAddress, SFtArg!BCSMId!SigConId := SigConId, SFtArg!BCSMId!IhId := IhId)][&(!!")[(! 6R! d!)[8O(! ServiceFeatureInd (SFtArg))][)(!r!"r)[(! 6!Z)][3 (! 6R! d)[8(! WaitForAnswer)]]]]]]]]]][3Z(! 6PL! d)[8(! WaitForOnHook)][`(!@@!"@@)[](! 6! d!)[8(! OnHook)][f(!@F@x!"Y()[(! l! 22!(d)[5(! l)[8(! 6)[;(! 6d! )]][ >(! 6)][3V(! 6 ! d)[8(! * (Idle)S5-------------------------------------------------6------------------------------------------------------------------------------------------------------------------------------------------------------- --------:Q----------------)][(!,^!"^,)[(! 6 ^! d!)[8(! SetupReq (SArg))][(!!")[6(! T6 ! d)[8(!9 CBCSMId :=SArg!BCSMId, CBCSMId!AddressType := ToAddress)][(!X!"X)[6(! 6 ! d)[8(!8 RArg!BCSMId :=V(! 6!!3)]]]]]]}--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------, CBCSMId, RArg!CS1Cause := BptyBusy_UDUB)][(! !" )[(! 6  ! d!)[8(! ReleaseInd (RArg))][(!!"W)[(! 6!Z)][3(! 6 ! d)[8(! -)]]]]]]]]]]]]]]}]]]]]]]]]]]}ok)]]]]]]]]]]]]]]}[8(!% TerminatingLineState (CBCSMId,Busy))][k(!!")[(! 6!Z)][3e(! 6 ! d)[8(! -)]]]]]]]]]]}-----------------------------------------------------------------------------------------@x@F)[c(! 6x! d!)[8(! ToMD_stop_tone (Tone,SigConId))][l(!@@!"@@)[(! 6@!Z)][3Zi(! 6! d)[8(! Idle)]]]]]]]]]]}------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------L