------------------------SDT2 µŹ‘TCAP_Dialog--------------------------------------------------------------------------------------------------------------------------------------------------------ObjectName----------------------------------------ObjectType----------------------------------------!%&()LinkEndpoints--------------------------------!%()HeadingText----------------------------------- ’’’’’’’’’’’’’’’’’’’’’’’’TCAP_Dialog---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ’’’’15-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------’’’’()[8(!" Virtual Process Type TCAP_Dialog)]}--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------8’’’’()[w(!GSDL)]}-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------’’’’()[(! lü! ś–!(d)[h(! 6,! :Š)[k(! 6E)[n(! 6! )]][ q(! 6øE)][@ƒ(!K,K–!)[!%()HeaderText-----------------------------------!%()HeadingText-----------------------------------!%()PageOrder-------------------------------------15-----------------------------------------------  ’’’’’’’’’’’’’’’’’’’’’’’’!%&()LinkEndpoints--------------------------------10)PageOrder-------------------------------------%13-----------------------------------------------4------------------------------------------------- £’’’’3 ’’’’(! 6dČ! ToSCF)][`(! )][.„(! )[8(! 6dd! (TCAPtoSCF))]][(! 6K–!¦’’’)]][@§(!Ā,Ā–!)[(! 6ŪČ! ToSS FA)][`(! )][.Ø(! )[8(! 6Ūd! (CS1_INAP_From_SCF))]][(! 6Ā–!¦’’’)]][@€(!¶,¶–!)[(! 6ĻČ! ToSSFB)][`(! )][.(! )[8(! 6Ļd! (CS1_INAP_From_SCF))]][(! 6¶–!¦’’’)]][Az(!Ü,Ü–!)[(! 6Fį! ConIH)][`(! )][.{(!  )[8(! 6õd! (TC_Dia_To_IH))]][(! 6Ü–!¦’’’)][.|(! )[8(! 6õČ!" (CS1_INAP_To_SCF), (TCAPfromSCF))]][(! 6Ü,!Z)]][9I(!  (!4· !5!7)[!(! 1!!2!3)[!(! 2!!3)[!(! 3!!3)[!(! 4!!3)[!(! 5!!362¼! )[8(!1 /* Data structures for keeping track of TCAP request messages */ /* TCAP messages */ NEWTYPE TCAPmessageType LITERALS NoDialog, TC_BeginReq, TC_ContinueReq, TC_EndReq, TC_InvokeReq, TC_BeginInd, TC_ContinueInd, TC_EndInd; ENDNEWTYPE; /* Traced information */ NEWTYPE TCAPmessageInformationType STRUCT tcMessage TCAPmessageType; tcInvokeID InvokeIDtype; tcOpCode OpCodeType; OPERATORS newTCmessage: TCAPmessageTy()[8(!d ;FPAR mySSFpartner PId, myDialogID DialogIDtype, myCSAid CSAID, myStatus DialogStatusType;)]} SigDummy VIA ToSCF)][Ŗ(!ŠxŠŖ!"ŠŖŠx)[(! 6ŠŖ!z’’’’()[(! lü! ś–!(d)[ū(! lü)[ž(! 6)[(! 6d! )]][ (! 6ź)][2(! 6&! Čd)[8(! )][+14(!–ō–&!"–2–ō)[£(! 62&! 3 Čd!)[8(!, ServiceFilteringResponse(cSAid,arg!sFRArg))][Æ(! –3$’’’’’’’’’’’’’’’’’’’’(!ŠōŠ&!"Š&Šō)[6O(! 6Ā&! Č)[8(!_ nextSCFtoSSFmessage := 1, nextInvokeIDtoSCF := maxInvokeIDtoSSF + 1, lastTCdialog := NoDialog)][R(!ŠīŠR!"ŠRŠī)[ (! 6&R! Čd)[8(! myStatus)][.(!&„„č!"č&„)[8(! 6wR! (csaPending))][(! 6č!Z)][3(! 6,č! Čd)[8(! WaitCSaID)]]][1(!ī„„„„č!"„čī„)[8(! 6RR! else)][(! 6„č!Z)][3(! 6 č! Čd)[8(! Idle)]]]]]]]][3(! 6,Ŗ! Čd)[8(! WaitCSaID)][:(!@!"@)[(! 6,@! Čd!)[8(! CSaIDresp(dialogID,myCSAid))][@(!¤Ö!"Ö¤)[6%(! 6,Ö! Čd)[8(! mystatus := busy)][C(!:l!"l:)[Ŗ(! 6,l! Čd!)[8(!+ ApplicationBegin(myCSAid) TO mySSFpartner)][­(!Š!"Š)[(! 6!Z)][3((! 6,! Čd)[8(! Idle)]]]]]]]]][=(!"'„'„@!"„@)[+"(! 6 @! Čd)[8(!±)[!(! 6!!3)[!(! 7!!3)[!(! 8!!3)[! (! 9!!3)[! (! 10!!3)[! (! 11!!p()[(! lü! ś–!(^)[‚(! lü)[…(! 6)[ˆ(! 6d! )]][ ‹(! 6ź)][3Ž(! 6&d! Čd)[8(! Idle)][pe, InvokeIDtype, OpCodeType -> TCAPmessageInformationType; OPERATOR newTCmessage; FPAR tcapMessage TCAPmessageType, invokeID InvokeIDtype, opCode OpCodeType; RETURNS TCmessageInf TCAPmessageInformationType; REFERENCED; ENDNEWTYPE; /* Trace vš(!ŠȊś!"ŠśŠČ)[‘(! 6&ś! Čd!)[8(!I virtual TC_InvokeReq (invokeID,dialogID, opClass,opCode,timeoutVal,arg))][(!Š^Š!"ŠŠ^)[6”(! 6&! Čd)[8(!R traceSCFtoSSF(nextSCFtoSSFmessage) := newTCmessage(TC_InvokeReq,invokeID,opCode))][ (!ŠōŠ&!"Š&Šō)[6(! 6&&! Čd)[8(!/ nextSCFtoSSFmessage := nextSCFtoSSFmessage +1)][v(!ŠŠŠ¼!"Š¼ŠŠ)[ O(! 6&¼! Čd)[8(! opCode)][=(!,Ā,ō!",ō,Ā)[|(! 6Čō! Čd!)[8(! TC_BeginReq (dialogID,origAd))][¬(!,X,Š!",Š,X)[ ƒ!5(!ŠŠŠ¼!"Š6ŠŠ)[|(! 6&¼! 7 Čd!)[8(! TC_Begi8eq(dialogID,origAd))][¬(!Š Š 1jPQ’’’’’’’’’’’’’’’’’’’’’’’’(! 6Ȋ! Čd)[8(! nextSCFtoSSFmessage)][†(!,ī, !", ,ī)[8(! 6E! else)][6£(! 6Č ! Čd)[8(!O "traceSCFtoSSF(nextSCFtoSSFmessage) := newTCmessage(TC_BeginReq,0,NoOperation))][©(!,„,¶!",¶,„)[6(! 6ȶ! Čd)[8(!/ nextSCFtoSSFmessage := nextSCFtoSSFmessa#ge +1)][(!,,L!",L,)[6ł(! 6ČL! Čd)[8(! lastTCdialog := TC_BeginReq)][’(!,°,ā!",ā,°)[(()[(! lü! ś–!(d)[Į(! lü)[Ä(! 6)[Ē(! 6d! )]][ Ź(! 6)][9Ķ(! 62! )[8(!Z /* State&()[(! lü! ś–!(d)[J(! lü)[M(! 6)[P(! 6d! )]][ S(! 6ł)][3V(! 6,! Čd)[8(! Idle)][4 variables, to be updated during the entire lifetime of this process */ DCL traceSCFtoSSF TCAPmessageTrace; DCL nextSCFtoSSFmessage Integer; DCL lastTCdialog TCAPmessageType; DCL nextInvokeIDtoSCF InvokeIDtype; /* To be used to receive message paramet'ers */ DCL dialogID DialogIDtype; DCL invokeID InvokeIDtype; DCL opClass OpClassType; DCL opCode OpCodeType; DCL timeoutVal TimeoutValType; DCL origAd TCoriginType; DCL termination TCAPterminationType; DCL cSAid CSAID; DCL compEnd Boolean := false; DCL a (! 6,ā!Z)][3¦(! 6Čā! Čd)[8(! Idle)]]]]]]]]][Œ(!¼Š¼Š !"Š ¼)[8(! 6£Õ! (1))][‰(! 6& /–ō)[6ž(! 62&! Čd)[8(! opCode:=ACR, opClass := 2)][µ (!–Š– !"– –Š)[ © (! 62 ! Čd)[8(! compEnd)][Æ œ6L¶! Čd)[8(!/ nextSCFtoSSFmessage := nextSCFtoSSFmessage +1)][r (!°°L!"°L°)[6Z (! 6LL! Čd)[8(! lastTCdialog := TC_Contin+ueReq)][u (!°°°ā!"°ā°°)[(! 6°ā!Z)][3] (! 6Lā! Čd)[8(! Idle)]]]]]]]]][x (!¼¤¼¤ !",¤ ¼)[8(! 6½Õ! (NoDialog))][` (! 6@ ! Čd!)[8(!) TCAPFailureInd(beginRequired) VIA ToSCF)][{ (!¤„¤¶!"¤¶¤„-)[(! 6¤¶!Z)][3c (! 6@¶! Čd)[8(! Idle)]]]]]]]]]]]]}ōī„ī„č!"„čōī)[8(! 6! (NoDialog))][w(! |’’’’6 č! Čd!)[8(!) TCAPFailureInd(beginRequired) VIA ToSCF)][€(!„L„~!"„~„L)[(! 6„~!Z)][3}(! 6 ~! Čd)[0! Čd!)[8(!# TCAPFailureInd (noComp) VIA ToSCF)][’(!Š„Š¶!"Š¶Š„)[(! 6Š¶!Z)][3(! 6&¶! Čd)[8(!78(! Idle)]]]]]]]]]]]]}[8(!) TCAPFailureInd(beginRequired) VIA ToSCF)][€(!„L„~!"„~„L)[(! 6„~!Z)][3}(! 6 ~! Čd)[8$Ź()[(! lü! ś–!(d)[µ(! lü)[ø(! 6)[»(! 6d! )]][ ¾(! 6ź)][Į(! 6&d! Čd)[8(! class2)]R8(!ō&!"9ō)[Y(! 6,&! Čd!)[8(!# TC_EndReq (dialogID, termination))][(! ¼!"Q%¼’’’’’’’’’’’’Š)’’’’()[(! lü! 22!(d)[(! lü)[(! 6)[(! 6d! )]][ !(! 6ł)][3é (! 6Č&! Čd)[8(! Idle)][h(!ō&!"&ō)[Y(! 6,&! Čd!)[8(!# TC_EndReq (dialogID, termination))][(!Š¼!"¼Š)5[ ć(! 6,¼! Čd)[8(! lastTCdialog)][ņ(! č!"č )[8(! 6©9! else)][6ę(! 6,č! Čd)[8(!M tra6ceSCFtoSSF(nextSCFtoSSFmessage) := newTCmessage(TC_EndReq,0,NoOperation))][ų(!L~!"~L)[6ģ(! 6,~! Čd)[8(!/ nextSCFtoSSFmessage := nextSCFtoSSFmessage +1> Idle)]]]]]]]]]][3K (! 6L^! Čd)[8(! Idle)][f (!°Ā°ō!"°ō°Ā)[N (! 6Lō! Čd!)[8(!" TC_ContinueReq (dialog€()[(! lü! 22!(H)[”(! lü)[¤(! 6)[§(! 6d! )]][ Ŗ(! 6ł)][9x(! 6d! )[8(! DCL preEŽÉ! else)][6T (! 6L ! Čd)[8(!R traceSCFtoSSF(nextSCFtoSSFmessage) := newTCmessage(TC_ContinueReq,0,NoOperation))][o (!°„°¶!"°¶°„)[6W (! *()[(! lü! 22!(H)[ģ(! lü)[ļ(! 6)[ņ(! 6d! )]][ õ(! 6ł)][3ų(! 62ś! Čd)[8(! IDLE)][xd))][ (!ŠōŠ&!"Š&Šō)[ ó(! 6&&! Čd)[8(! preEnd)][’(!īX~X~¼!"~¼īX)[8(! 6—qyWaitDialog)][[ (!–ā–!"––ā)[X (! 62! Čd!)[8(!! TC_EndReq(dialogID,termination))][y (!–x–Ŗ!"–Ŗ¼d(!"Š Š9x9x~!"x~Š )[8(! 6‘R! else)][R(! 6~! Čd!)[8(!1 TCAPFailureInd(unknownOP) /* Unknown op code */)][gF)][ž(!ā!"ā)[6\(! 6,! Čd)[8(! lastTCdialog := TC_EndReq)][œ(!xŖ!"Ŗx)[ ‡(! ?6,Ŗ! Čd)[8(! termination)][“(!Ö!"Ö)[8(! 6'! (basic))][Š(! 6,Ö! Čd!)[8(!/ Appli@cationEnd(false,myCSAid) TO mySSFpartner)][(!:l!"l:)[(! 6l!Z)][(! 6,l! Čd)[8(! TerminateDialog)]]]]][™(!"OŠ4Šf!"ŠfŠ4)[(! 6Šf!Z)][3 (! 6&f! Čd)[8(! Idle)]]]]]]]]]][3„ (! 6āx! Čd)[8(! Idle)][± B(!FÜF!"FFÜ)[Ø (! 6ā! Čd!)[8(! ApplicationAbort(cSAid))][“ (!FrF¤!"F¤Fr)[« (! 6Cā¤! Čd!)[8(! TC_AbortInd(myDialogID))][· (!FF:!"F:F)[(! 6F:!Z)][® (! 6ā:! Čd)[8(! DTerminateDialog)]]]]]]]]]]})[ž (! 6,@! Čd!)[8(! ApplicationAbort(cSAid))][Ŗ (!¤Ö!"Ö¤)[” (! 6,Ö! Č’’’’(! 6 ¼! Čd!)[8(!( Errror(invokeID,cSAid) /* , errArg) */)][N(!„ „R!"„R„ )[$(! 6 R! Čd!)[8(!0 TC_“(!xāx!"xxā)[(! 6x!Z)][3U(! 6! Čd)[8(! Idle)]]]]][j(!"Š Š9–9–!"–GŠ )[8(! 6ÆR! (ASF))][(! 6–!Z)][X(! 62! Čd)[8(! class1)]]][m(!"Š Š99!"ŠH )[8(! 6©R!F (AC, CIRQ, CAN, CI, CON, CTR, DFC, ETC, FCI, ICA, RNC, RRB, RT, SCI))][(! 6!Z)][[(! 6,! Čd)[8(! class2)]]][p(!"Š Š9I„9„!"„Š )[8(! 6R! (AT))][(! 6„!Z)][^(! 6 ! Čd)[8(! class3)]]][s(!"Š Š9~9~J!"~Š )[8(! 6—R! (CG, CUE, RC))][(! 6~!Z)][a(! 6! Čd)[8(! class4)]]]]]]]]]]]][‚(! 62Ŗ! ČdK)[8(! class1)][…(!––@!"–@–)[y(! 62@! Čd!)[8(!? ActivateServiceFiltering(invokeID,arg!aSFArg) TO mySSFpartner)][‹(!L–¤–Ö!"–Ö–¤)[(! 6–Ö!Z)][3ˆ(! 62Ö! Čd)[8(! Idle)]]]]]][(! 6 Ö! Čd)[8(! class3)][ (!M„:„l!"„l„:)[Ž(! 6 l! Čd!)[8(!1 ActivityTest(invokeID,dialogID) TO mySSFpartner)][š(!„Š„!"„„ŠN)[(! 6„!Z)][3—(! 6 ! Čd)[8(! Idle)]]]]]]]]}]]]}(! 6l! Čd)[8(! class4)][²(!~Š~!"~~Šu’’’’'„'„l!"„l)[8(! 6¼õ! (prearranged))][(! 6„l!Z)][3–(! 6 l! Čd)[8(! WaitApplicationEnd)][1¢i()[(! lü! ś–!(d)[ (! lü)[ (! 6)[" (! 6d! )]][ % (! 6)][( (! 6&ś! Čd)[8(! class4)]r()[(! lü! 22!(H)[m(! lü)[p(! 6)[s(! 6d! )]][ v(! 6)][3y(! 6Č^! Čd)[8(! Idle)][[ś(!ŠȊś!"ŠśŠČ)[ Ä(! 6&ś! Čd)[8(! opCode)][(!"Š^Šw–w–!"–Š^)[8(! 6SE! (AC))][Ķ(! 62! Čd!)[8(!; ApplyCharging(invokeID,myCSAid,arg!aCArg) TO mySSFpartner)][3(!–ō–&!"–&–ō)[(! 6–&!TZ)][30(! 62&! Čd)[8(! Idle)]]]]][(!"Š^Šw~w~!"~Š^)[8(! 6„E! (CAN))][Ł(! 6! ČdU!)[8(!5 Cancel(invokeID,myCSAid,arg!cANArg) TO mySSFpartner)][B(!~ō~&!"~&~ō)[(! 6~&!Z)][3?(! 6&! Čd)[8(!V Idle)]]]]][(!"Š^Š£–£–¼!"–¼Š^)[8(! 6q! (CI))][ß(! 62¼! Čd!)[8(!@ CollectInformation(invokeID,myCSAid,Warg!cIArg) TO mySSFpartner)][H(!– –R!"–R– )[(! 6–R!Z)][3E(! 62R! Čd)[8(! Idle)]]]]][ (!"Š^Š£~£X~¼!"~¼Š^)[8(! 6„q! (CIRQ))][Ó(! 6¼! Čd!)[8(!F CallInformationRequest(invokeID,myCSAid,arg!cIRQArg) TO mySSFpartner)][9(!~Y ~R!"~R~ )[(! 6~R!Z)][36(! 6R! Čd)[8(! Idle)]]]]][(!"Š^ŠĻ–Ļ–č!"–čŠ^Z)[8(! 6! (CON))][å(! 62č! Čd!)[8(!7 Connnect(invokeID,myCSAid,arg!cONArg) TO mySSFpartner)][T(!–L–~!"–~–L)[[(! 6–~!Z)][3Q(! 62~! Čd)[8(! Idle)]]]]][!(!"Š^ŠĻ~Ļ~č!"~čŠ^)[8(! 6„! (CTR))][ė(! 6\č! Čd!)[8(!@ ConnectToResource(invokeID,myCSAid,arg!cTRArg) TO mySSFpartner)][Z(!~L~~!"~~~L)[(! 6~~!Z)][3W(! 6~]! Čd)[8(! Idle)]]]]]['(!"Š^Šū–ū–!"–Š^)[8(! 6É! (DFC))][ń(! 62! Čd!)[8(!? Discon^nectForwardConnection(invokeID,myCSAid) TO mySSFpartner)][`(!–x–Ŗ!"–Ŗ–x)[(! 6–Ŗ!Z)][3](! 62Ŗ! Čd)[8(! Idle)]]]]][ż(_!"Š^Šū~ū~!"~Š^)[8(! 6„É! (ETC))][Ē(! 6! Čd!)[8(!K EstablishTemporaryConnection(invokeID,myCSAid,arg!eTCArg) TO my`SSFpartner)][f(!~x~Ŗ!"~Ŗ~x)[(! 6~Ŗ!Z)][3c(! 6Ŗ! Čd)[8(! Idle)]]]]][{(!"Š^Š'–'–@!"a–@Š^)[8(! 6õ! (FCI))][i(! 62@! Čd!)[8(!I FurnishChargingInformation(invokeID,myCSAid,arg!fCIArg) TO mySSFpartner)][~(!–¤–Öb!"–Ö–¤)[(! 6–Ö!Z)][3u(! 62Ö! Čd)[8(! Idle)]]]]][„(!"Š^Š'~'~@!"~@Š^)[8(!c 6„õ! (ICA))][r(! 6@! Čd!)[8(!B InitiateCallAttempt(invokeID,myCSAid,arg!iCAArg) TO mySSFpartner)][(!~¤~Ö!"~Ö~¤)[(! d6~Ö!Z)][3x(! 6Ö! Čd)[8(! Idle)]]]]][(!"Š^ŠS–S–l!"–lŠ^)[8(! 6!! (RNC))][‡(! 62le! Čd!)[8(!O RequestNotificationChargingEvent(invokeID,myCSAid,arg!rNCArg) TO mySSFpartner)][™(!–Š–!"––Š)[(! 6–!Z)][3“(! f62! Čd)[8(! Idle)]]]]][(!"Š^ŠS~S~l!"~lŠ^)[8(! 6„!! (RRB))][Š(! 6l! Čd!)[8(!gE RequestReportBCSMEvent(invokeID,myCSAid,arg!rRBArg) TO mySSFpartner)][œ(!~Š~!"~~Š)[(! 6~!Z)][3–(! 6! Čd)[8(! Idleh)]]]]][Ÿ(!Š^Š!"ŠŠ^)[8(! 6£Š! else)][(! 6Š!Z)][÷(! 6&! Čd)[8(! class2Continue)]]]]]]]]}[÷÷’’’’(!čžž!"žčž)[7Ÿ(! 6l!)[8(!o /* In case of a prearranged end, an ApplicationEnd signal is required, and the only one which is accepted! */)]]]]]]]]]]]]][õ”()[(! lü! ś–!(d)[¢(! lü)[„(! 6)[Ø(! 6d! )]][ «(! 6)][į(! 6 ś! Čd)[8(! class2Cokntinue)][(!„^„!"„„^)[ ē(! 6 ! Čd)[8(! opCode)][2(!"„ō„  &!"&„ō)[8(l! 6ŠŪ! (SCI))][(! 6,&! Čd!)[8(!F SendChargingInformation(invokeID,myCSAid,arg!sCIArg) TO mySSFpartner)][G(!Š¼!"¼Š)[m(! 6¼!Z)][3D(! 6,¼! Čd)[8(! Idle)]]]]][,(!"„ō„ x x&!"x&„ō)[8(! 6~Ū! (RT))][(! 6n&! Čd!)[8(!8 ResetTimer(invokeID,myCSAid,arg!rTArg) TO mySSFpartner)][;(!xŠx¼!"x¼xŠ)[(! 6x¼!Z)][38(! 6¼! oČd)[8(! Idle)]]]]]]]]]]}J(! 6 R! Čd)[8(! class4)][b(!„¶„č!"„脶)[ M(! 6 č! Čd)[8(! opCode)],’’’’3)[! (! 12!!3)[! (! 13!!3)[!(! 14!!3)]]]]]]]]]]]]]]} 15!!3)]]]]]]]]]]]]]]]} 16!!3)]]]]]]]]]]]]]]]]}----------œ’’’’L„~!"„~„L)[(! 6„~!Z)][3ļ(! 6 ~! Čd)[8(! Idle)]]]]]]]]]]]]}le)]]]]][k(!"„L xeQ’’’’!"’’’’’’’’’’’’~¬’’’’[@ (!Š^Š!"ŠŠ^)[ + (! 6&! Čd)[8(! opCode)][C (!"ŠōŠ – –&!"–&Šō)[8(! 6sŪ! (CG))][. (! 62&! Čd!)[8(!- CallGap(invokeID,arg!cGArg) TO mySSFpartner)][F (!–Š–¼!"–¼–Š)[(! 6–¼!Z)][3t1 (! 62¼! Čd)[8(! Idle)]]]]][I (!"ŠōŠ ~ ~&!"~&Šō)[8(! 6„Ū! (CUE))][4 (! 6&! Čd!)[u8(!, Continue(invokeID,myCSAid) TO mySSFpartner)][L (!~Š~¼!"~¼~Š)[(! 6~¼!Z)][37 (! 6¼! Čd)[8(! Idle)]]]]][O ²Type */ NEWTYPE TCAPmessageTrace ARRAY (Integer, TCAPmessageInformationType); ENDNEWTYPE; )]][CU(! 6x! –)[(! 6µ_! newTCmessage)]]]]}! –)[(! 6µ_! newTCmessage)]¾’’’’–w&w&!"&–^)[(! 6Ā! Čd!)[8(!. AssistRequestInstructions (cSAid,arg!aRIArg))][(!&ō&&!"&&&ō (!–^–!"––^)[ū(! 62! Čd!)[8(!0 ApplyChargingReport (cSAid,arg!aCRArg,compEnd))][(!–ō–&!"–&)! (true))][(! 6~¼!Z)][3ü(! 6¼! Čd)[8(! WaitTC_End)]]][ł(!ŠŠŠR!"ŠRŠŠ)[8(! 6££! (false))][ö{r)[ „ (! 62¤! Čd)[8(! lastTCdialog)][™ (!––Š!"–Š–)[8(! 6Æ!! else)][‡ (! 62Š! Čd!)[8š(! 6&R! Čd!)[8(!- TC_EndInd(myDialogID,basic,false) VIA ToSCF)][ (!Š¶Šč!"ŠčŠ¶)[6 (! 6&č! Čd)[8(! lastT|Cdialog := TC_EndInd)][ (!ŠLŠ~!"Š~ŠL)[(! 6Š~!Z)][ (! 6&~! Čd)[8(! TerminateDialog)]]]]]]]]]]]][3G (! 6&x! } Čd)[8(! WaitTC_End)][b (!ŠÜŠ!"ŠŠÜ)[J (! 6&! Čd!)[8(!! TC_EndReq(dialogID,termination))][h (!ŠrŠ~¤!"Š¤Šr)[ P (! 6&¤! Čd)[8(! termination)][n (!ŠŠŠ!"ŠŠŠ)[8(! 6©!! (prearranged))][(¢Ÿ (!śÖŠÖŠŠ!"ŠŠśÖ)[8(! 6£ļ! (NoDialog))][ (! 6&Š! Čd!)[8(!) TCAPFailureInd(beginRequired) VIA ToSCF)][¢ (!AID,origAd))][i (!°X°Š!"°Š°X)[ Q (! 6LŠ! Čd)[8(! lastTCdialog)][l (!°ī° !"° °ī)[8(! 69)[6(! 6Ā&! Čd)[8(! opCode:=ARI, opClass := 2)][((!&Š&¼!"&¼&Š)[(! 6&¼!Z)]["(! 6Ā¼! Čd)[8‚(! SendCompPrimitive)]]]]]]][Ž (!"–^–w„w„!"„–^)[.(! 6 ! Čd!)[8(!2 CallInformationReport (cSAid,arg!cIRArg,compEnd))][Cƒ(!„ō„&!"„&„ō)[61(! 6 &! Čd)[8(! opCode:=CIR, opClass := 4)][X(!„Š„ !"„ „Š)[ š (! 6 „ ! Čd)[8(! compEnd)][£ (!„„„č!"„č„„)[8(! 6! true)][(! 6„č!Z)][3B (! 6 č! Čd)[8…(! WaitApplicationEnd_1)]]][ (!čR~R~č!"~ččR)[8(! 6—k! false)][(! 6~č!Z)][R(! 6č! Čd)[8(!† SendCompPrimitive)]]]]]]]]][‘ (!"–^–wāwā!"ā–^)[7(! 6~! Čd!)[8(! InitialDP (cSAid,arg!iDPArg))][L(!āōā‡&!"ā&āō)[6:(! 6~&! Čd)[8(! opCode:=IDP, opClass := 2)][[(!āŠā¼!"ā¼āŠ)[(! 6ā¼!Z)][Uˆ(! 6~¼! Čd)[8(! SendCompPrimitive)]]]]]]][” (!"–^–wÜwܐ!"ܐ–^)[d(! 6x! Čd!)[8(!. EventNotific‰ationCharging (cSAid,arg!eNCArg))][y(!ÜōÜ&!"Ü&Üō)[6g(! 6x&! Čd)[8(! opCode:=ENC, opClass := 4)][Ž(!܊ܼ!"ܼŠÜŠ)[(! 6ܼ!Z)][ˆ(! 6x¼! Čd)[8(! SendCompPrimitive)]]]]]]][— (!"–^–wÖw֐!"֐–^)[m(! 6r‹! Čd!)[8(!$ EventReportBCSM (cSAid,arg!eRBArg))][‚(!ÖōÖ&!"Ö&Öō)[6p(! 6r&! Čd)[8(! opCode:=ERB, opClass := 4)][‘Œ(!ÖŠÖ¼!"Ö¼ÖŠ)[(! 6Ö¼!Z)][‹(! 6r¼! Čd)[8(! SendCompPrimitive)]]]]]]]][3 (! 6Čā! Čd)[8(!Ā(!- nextInvokeIDtoSCF := nextInvokeIDtoSCF + 1 )][ė(!Š¤ŠÖ!"ŠÖŠ¤)[(! 6ŠÖ!Z)][3Š(! 6&Ö! Čd)[8(! Idle)]]]]]]]]]]][īĒnd Boolean;)]][3°(! 6&ś! Čd)[8(! Idle)][¶(!Š^Š!"ŠŠ^)[³(! 6&! Čd!)[8(! ApplicationEnd(preEnd,cSAi; (!,Š,¼!",¼,Š)[ģ (! 6Č¼! Čd!)[8(! ActivityTestResult (invokeID,))][ (!, ,R!",R, )[6ž4Š)[6¦(! 62¼! Čd78(! opCode:=SFR, opClass := 4)][ø7(!– –R!"–R– )[(! 6–R! µPP2 22)’’’’13(! SendCompPrimitive)]]]]]]]][÷(! 6&¼! Čd)[8(! SendCompPrimitive)][ś(!Š ŠR!"ŠRŠ )[ (! 6™R! Ȑ[8(’’’’¬(!–ō–&!"–&–ō)[£(! 62&! Čd!)[8(!, ServiceFilteringResponse(cSAid,arg!sFRArg))][Æ(!–Š–¼!"–¼“–Š)[6¦(! 62¼! Čd)[8(! opCode:=SFR, opClass := 4)][ø(!– –R!"–R– )[(! 6–R!Z)][µ(! 62R! Čd)”[8(! SendCompPrimitive)]]]]]]]][÷(! 6&¼! Čd)[8(! SendCompPrimitive)][ś(!Š ŠR!"ŠRŠ )[ »(! 6&R! Čd)[8(•! lastTCdialog)][Ł(!Š¶Š~!"Š~Š¶)[8(! 6Ūč! (NoDialog))][¾(! 6&~! Čd!)[8(!- TC_BeginInd(myDialogID,oSSF,true) VIA ToS–CF)][Ü(!ŠāŠ!"ŠŠā)[6Į(! 6&! Čd)[8(! lastTCdialog := TC_BeginInd)][ß(!ŠxŠŖ!"ŠŖŠx)[Ź—(! 6&Ŗ! Čd!)[8(!F TC_InvokeInd(nextInvokeIDtoSCF,myDialogID,opCode,true,arg) VIA ToSCF)][č(!ŠŠ@!"Š@Š)[6Ķ(! 6&@! Čd)[8icationEnd)][Ę(!–ō–&!"–&–ō)[Ć(! 62&! Čd!)[8(! ApplicationEnd(preEnd,cSAid))][Ģ(!–Š–¼!"–¼„()[(! lü! ś–!(d)[”(! lü)[—(! 6)[š(! 6d! )]][ (! 6Õ)][3 (! 62! Čd)[8(! IDLE)][’(!+ ApplicationAbort(myCSAid) TO mySSFpartner)][œ (!–4–f!"–f–4)[(! 6–f!Z)][Š (! 62f! Čd)[8(! TerminateDialog)]]]]][RĀRĀč!"ĀčśR)[8(! 6Ūk! false)][(! 6Āč!Z)][¬ (! 6^č! Čd)[8(! SendCompPrimitive)]]]]]]]]][(!"–^w(!–„–č!"–č–„)[8(! 6Ɲ! true)][(! 6–č!Z)][3Ö (! 62č! Čd)[8(! WaitApplicationEnd_1)]]][² (!ś›11(!ŠȊś!"Š12ŠČ)[H(! 6&ś! 2 Čd!)[8(!( Errror(3vokeID,cSAid) /* , errArg) */)][N(! 8:$’’’’’’’’’’’’’’’’’’’’’’’’ļ (! 6ČR! Čd)[8(!# opCode:=AT_R, arg!aT_RArg := Null)][ (!,¶,č!",č,¶)[ų (! 6Čč! Čd!)[8(!1 TC_ContinueIndŸ (myDialogID,oSSF,true) VIA ToSCF)][ (!,L,~!",~,L)[6ū (! 6Č~! Čd)[8(! lastTCdialog := TC_ContinueInd)][ (!,ā,!",¤rg ArgType; /* refers to ASN.1 definition INCS2BundleArg */ DCL errArg ErrorArg;)]]]]}--------------------------------------------------------------------------------------------------------------------------------------------------------------------------V’’’’(!ōī„ī„č!"„čōī)[8(! 6! (NoDialog))][é(! 6 č! Čd!)[8(!) TCAPFailureInd(beginRequired) VIA ToSCF)][ū(!„q! 6ŠŠ!Z)][Y (! 6&Š! Čd)[8(! TerminateDialog)]]][q (!īÖ„Ö„Š!"„ŠīÖ)[8(! 6ļ! (basic))][\ (! 6 ­()[(! lü! 22!(H)[„(! lü)[Ø(! 6)[«(! 6d! )]][ ®(! 6ł)][3Ą(! 62! Čd)[8(! WaitAppl˜,ā)[ž (! 6Č! Čd!)[8(!E TC_ReturnResultInd (invokeID,myDialogID, true,opCode,arg) VIA ToSCF)][ (!,x,Ŗ!",Ŗ,x)[(! ¬–Š)[ É(! 62¼! Čd)[8(! preEnd)][Ņ(!– –č!"–č– )[8(! 6Æ9! (true))][(! 6–č!Z)][Ļ(! 62¦č! Čd)[8(! TerminateDialog)]]][Ž(!śīīč!"čśī)[8(! 6©! (false))][Õ(! 6,č! Čd!)[8(!-§ TCAPFailureInd(preArrangedEndReq) VIA ToSCF)][Ū(!L~!"~L)[(! 6~!Z)][3Ų(! 6,~! Čd)[8(! WaitApplicationEnd)]]]]]]]]][Øä(!"–ō– „ „&!"„&–ō)[į(! 6 &! Čd!)[8(! *)][ź(!„Š„¼!"„¼„Š)[ē(! ©6 ¼! Čd!)[8(!. TCAPFailureInd(signalNotProcessed) VIA ToSCF)][š(!„ „R!"„R„ )[(! 6„R!Z)][3ķ(! 6 R! ČŖd)[8(! WaitApplicationEnd)]]]]]]]][±(! 6FĀ! Čd)[8(! TerminateDialog)][ŗ(!Ŗ&ŖX!"ŖXŖ&)[“(! 6FX! Čd!«)[8(!% ReleaseDialog(myDialogID) TO PARENT)][½(!Ŗ¼Ŗī!"Ŗ ŖīŖ¼)[4·(! 6Fī! Čd)[8(! )]]]]]][3~ (! 62x! Čd)[8É6,Ŗ!Z)][3 (! 6ČŖ! Čd)[8(! Idle)]]]]]]]]]]]]]][3E(! 6 &! Čd)[8(! IDLE)][K(!„Š„¼!"„¼„Š)[HEŠ! Čd!)[8(!- TCAPFailureInd(preArrangedEndReq) VIA ToSCF)][w (!„4„f!"„f„4)[(! 6„f!Z)][3_ (! 6 f! Čd)[®8(! WaitApplicationEnd)]]]]]]]]][e (!"ŠÜŠõxõx!"xŠÜ)[M (! 6! Čd!)[8(! *)][k (!xrx¤!"Æx¤xr)[S (! 6¤! Čd!)[8(!. TCAPFailureInd(signalNotProcessed) VIA ToSCF)][t (!xx:!"x:x)[(! 6x:!°Z)][3V (! 6:! Čd)[8(! WaitApplicationEnd)]]]]]]]]]]} TCAPFailureInd(signalNotProcessed) VIA ToSCF)][t (!~¤~Ö!"~Ö~¤)[(! 6~Ö!f’’’’ *)]]]]]]}! lü! ś–!(d)[z (! lü)[} (! 6)[€ (! 6d! )]][ ƒ (! 6Õ)]]]}† (! 6,! Čd)[8(! Idle)][’’’’(!"ŠōŠ9–9–R!"–RŠō)[8(! 6Æ9! (RC))][: (! 62R! Čd!)[8(!9 ReleaseCall(invokeID,myCSAid,arg!rCArg) TO mySSFpartner)][³R (!–¶–č!"–č–¶)[(! 6–č!Z)][3= (! 62č! Čd)[8(! WaitDialog)]]]]]]]][3U (! 62~! Čd)[8(!  more complicated dialog handling. */ )]]][9(!„¶„č¹!"„脶)[6*(! 6 č! Čd)[8(! lastTCdialog := TC_ContinueInd)][<(!„L„~!"„~„L)[-(! 6 ~! Čd!ŗ)[8(!I TC_ErrorInd(invokeID,myDialogID,true) /* ,errArg,lastComp) */ VIA ToSCF)][?(!„ā„!"„„ā)[(! 6„!Z)][33(! 6 ! Čd»)[8(! IDLE)]]]]]]]]]]]]]]}ultInd (invokeID,myDialogID, true,opCode,arg) VIA ToSCF)][ (!––@!"–@–)[(! 6–@!Z)][3 (! 62@! Čd+’’’’–x)[(! 6–Ŗ!Z)][3v (! 62Ŗ! Čd)[8(! SecondWaitApplicationEnd)]]]]][d (!"–ā–ūŠūŠ!"Š–ā)[+a (! 6&½! Čd)[8(! ApplicationEnd)]]][g (!"–ā–ū„ū„!"„–ā)[^ (! 6 ! Čd!)[8(! *)][s (!„x„¾Ŗ!"„Ŗ„x)[j (! 6 Ŗ! Čd!)[8(!. TCAPFailureInd(signalNotProcessed) VIA ToSCF)][p (!„„@!"„@„)[(! æ6„@!Z)][3m (! 6 @! Čd)[8(! WaitApplicationEnd)]]]]]]]][3 (! 62@! Čd)[8(! SecondWaitApplicationEnd)][ˆ (!–¤–Ö!"–ÖĄ–¤)[‚ (! 62Ö! Čd!)[8(! ApplicationEnd(preEnd,cSAid))][‹ (!–:–l!"–l–:)[(! 6–l!Z)][… (! 6Į2l! Čd)[8(! TerminateDialog)]]]]]]]]}--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------D’’’’ WaitApplicationEnd_1)][0 (!,F,x!",x,F)[ (! 6Čx! Čd!)[8(! ApplicationEnd (preEnd,cSAid))][3 (!,Ü,!"Ć,,Ü)[! (! 6Č! Čd!)[8(!, TC_EndInd(myDialogID,basic,true) VIA ToSCF)][6 (!,r,¤!",¤,r)[6$ (! 6Ȥ! ČdÄ)[8(! lastTCdialog := TC_EndInd)][9 (!,,:!",:,)[' (! 6Č:! Čd!)[8(!H TC_InvokeInd (nextInvokeIDtoSCF,myDialogID, opCode,true,arÅg) VIA ToSCF)][< (!,ž,Š!",Š,ž)[6* (! 6ČŠ! Čd)[8(!- nextInvokeIDtoSCF := nextInvokeIDtoSCF + 1 )][? (!,4,f!",fĘ,4)[(! 6,f!Z)][- (! 6Čf! Čd)[8(! TerminateDialog)]]]]]]]]]]]]]]]]}(!¼@¼r!"¼r¼@)[6$ (! 6Xr! Čd–’’’’(!"Š¶ŠĻxĻx~!"x~Š¶)[8(! 6F! else)][Ó(! 6~! Čd!)[8(!0 TC_ContinueInd(myDialogID,oSSF,true) VIA ToSCF)][ńČ(!xāx!"xxā)[6Ö(! 6! Čd)[8(! lastTCdialog := TC_ContinueInd)][ō(!"xxx‘Š‘ŠŖ!"ŠŖxx)[·(! Idle)][“ (!–Ü–!"––Ü)[ (! 62! Čd!)[8(! TC_AbortReq(dialogID))][– (!–r–¤!"–¤–z! Čd)[8(! *)]]]]]]}Ö )[(! 6ÖR!Z)][‹(! 6rR! Čd)[8(! SendCompPrimitive)]]]]]]]]]]}]]]]]}----------------------------------------------------/’’’’