------------------------SDT2  5DP_RouteSelected--------------------------------------------------------------------------------------------------------------------------------------------------------ObjectName----------------------------------------ObjectType----------------------------------------!%&()LinkEndpoints--------------------------------!%()HeadingText----------------------------------- "DP_RouteSelected-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------6--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------()[8(!% ;FPAR IN/OUT Result DPResultType;)]}-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------;()[8(! Procedure DP_RouteSelected)]}--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------2()[(! l! 22!(P)[h(! l)[k(! 6)[n(! 6d! )]][ q(! 6)][&t(! 6,! d)[8(! )][!%()HeadingText-----------------------------------!%()PageOrder-------------------------------------1-------------------------------------------------2-------------------------------------------------  #!%()HeaderText------------------------------------1------------------------------------------------------------------------------------------------------------------------------------------------------- ----------------2--------(!!")[6w(! 6d! ,)[8(!: DP!legID:=obcsmPars!legID, DP!bcsmEvent := RouteSelected)][(!X!" X)[z(! 6! d!)[8(! DP(DP) to CS)][(! !" )[(! 6 !Z)][3}(! 6 ! d)[8 (! Wait_ Route_ Selected)][(!!")[(! 6! d!)[8(! PIC_ Resume)][(!L!"L )[6(! 6L! d)[8(! Result := Resume)][(!!")['(! 6! d)[8(! )]]]]]]][V (!4!5!7)[!(! 1!!3)[!(! 2!!3)[!(! 3!!3)]]]}----------------------------------------------------------------------------------------(!"!")[(! 6! d!)[8(! SetCS)][(!L!"L)[6(! 6L! d)[8(! CS := Sender)][b(!r!"r)[(! 6r!Z)][3(! 6r! d)[8(! -)]]]]]]][(!"RR!"R)[e(! 6! d!)[8(! DataInd (udArg))][w(!RRL!"RLR)[6k(! 6L! d)[8(! dpUTSIArg!party := localParty)][}(!RR!"RR)[6q(! 6! )[8(! dpUTSIArg! legID:=legID, dpUTSIArg!uSIServiceIndicator:= udArg!uSIServiceIndicator, dpUTSIArg!uSIInformation := udArg!uSIInformation)][(!RR!"RR)[t(! 6! d!)[8(! DPUTSI (dpUTSIArg) to CS)][(!"R@RYYr!"rR@)[(! 6Y!)][)()]]]]]]]]]]]]]]]]]]]}(! 6L! d!)[8(! PIC (PIC))]XR)[(! 6k!)][)()]]]]]]][(! 6! d)[8(! Collect_ NDigits)][(!L^L!"LL^)[6(! 6! ,)[8(!+ CalledParty_ Number := PIC! dialledDigits)][(!L&LX!"LXL&)[6(! 6X! d)[8(! Result := Collect_ NDigits)][ (!LL!"LL)['(! 6! d)[8(! )]]]]]]]][(! 6! d)[8(! Analyse_ Information)][(!r^r!"rr^)[6(! 6! ,)[8(!0 CalledParty_ Number:= PIC! calledParty_ Number)][(!r&rX!"rXr&)[6(! 6X! d)[8(! Result := Analyse_ Information)][#(!rr!"rr)['(! 6! d)[8(! )]]]]]]]][(! 6!  d)[8(! Select_ Route)][/(!x!"x)[6(! 6d! ,)[8(!8 CalledParty_ Number:= PIC! routingAddress_ Information)][A(!@r!"r@)[6(! 6r! d)[8(! Result := Select_ Route)][D(!!")['(! 6! d)[8(! )]]]]]]]][(! 6! d)[8(! Send_ STUI)][(!xxx!"xxx)[6(! 6! )[8(! udArg!infoDirection := pic!infoDirection, udArg!uSIServiceIndicator := pic!uSIServiceIndicator, udArg!uSIInformation := pic!uSIInformation)][(!xrx!"xxr)[ (! 6! ,)[8(! PIC!party)][(!  !" )[8(! 69! remoteParty)][6(! 6! d)[8(! 'Store info.')][(!"  xx4!"x4 )[(! 6x!)][3(! 64! d)[8(! -)]]]]][(!x:x!"xx:)[8(! 6S! localParty)][(! 6! d!)[8(!! DataReq (udArg,senderRef) to CS)][(!xx4!"x4x)[(! 6x4!Z)][)()]]]]]]]]]]]}]]]]]]]]}ore STUI')][M(!"  MLMLf!"Lf )[(! 6LM!)][)()]]]]]]][(! 6! d)[8(! Send_ UTSI)][5(!rxr!"rrx)[6(! 6! d)[8(! 'Store UTSI')][>(!rr@!"r@r)[!(! 6r@!Z)][3(! 6@! d)[8(! -)]]]]]]]]}Error situation')][(!F!"F)[(! 6F!Z)][3(! 6^g0()[w(!GSDL)]}(! -)]]]]]]]]]]]]}-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------()[(! l! 22!(d)[h(! l)[(! 6)[\(! 6d! )]][ (! 6)][3](! 62! d)[8(! Wait_ Ro%X!"X)[8(! 6q ! false)][6(! 6! ,)[8(!* CalledParty_ Number:= PIC! dialledDigits)][)(!"XRXkk!"ute_ Selected)][(!^!"^)[`(! 62! d!)[8(! PIC (PIC))][(!&!"&)[ c&(! 62&! d)[8(! PIC! pic)][(! !" )[8(! 6! Collect_ Information)][(! 6 !Z)][f(! 62' ! d)[8(! Collect_ Information)]]][(!XX !" X)[8(! 6! Collect_ NDigits)][(! 6 !Z)][i(! (6, ! d)[8(! Collect_ NDigits)]]][(!XX !" X)[8(! 6! Analyse_ Information)][(! 6 !Z)][l)(! 6& ! d)[8(! Analyse_ Information)]]][(!XX !" X)[8(! 6! Select_ Route)][(! 6 !Z)][o*(! 6  ! d)[8(! Select_ Route)]]][(!X~X~ !"~ X)[8(! 6! Send_ STUI)][(! 6~ !Z)][r(! +6 ! d)[8(! Send_ STUI)]]][(!XrXr !"r X)[8(! 6q! Release_ Call, Disconnect_ Leg)][6x(! 6 ! d)[8,(! Result := SCFRelease)][(!rr!"rr)['{(! 6! d)[8(! )]]]]][(!*XSXS!"-X)[8(! 6dL! O_ Exception)][6~(! 62! d)[8(! Result := Exception)][(!F!"F)['(! 62F.! d)[8(! )]]]]][(!*XSXS!"X)[8(! 6e! Else)][6(! 6^! d)[8(! 'Error situati/on')][(!F!"F)[(! 6F!Z)][3(! 6^F! d)[8(! -)]]]]]]]]]]]]} d)[8(! 'Error situation')][(!F!"F)[(! 6F!Z)][3(! 6^F! d)[8(! -)]]]]]]]]]]]]}]]]]]]]]]}}Ll)[(! 6! ()[(! l! 22!(d)[x(! l)[(! 6)[(! 6d! )]][ (! 6)][(! 6! d)[8(! Collect_32(!  :!" 3:)[8(! 69! false)][6(! 6:! d)[8(! 'Store STUI')][W(!  #1L Information)][ (!^!"^)[ (! 62! )[8(!* PIC!dialled_ Digits = 9999 /* Present?*/)][(!X!"4X)[8(! 6q! true)][6(! 6d! ,)[8(!8 CalledParty_ Number:= PIC! routingAddress_ Information)][&(!R!"R)[65(! 6! d)[8(! Result := Collect_ Information)][,(!!")['(! 6! d)[8(! )]]]]]]][(!X$