------------------------SDT2 4;DP_origAttemptAuthorised--------------------------------------------------------------------------------------------------------------------------------------------------------ObjectName----------------------------------------ObjectType----------------------------------------!%&()LinkEndpoints--------------------------------!%()PageOrder------------------------------------- 5DP_origAttemptAuthorised---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------6--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------()[8(!w Redefined Procedure <> DP_origAttemptAuthorised)]}-------------------------------------------------------------------------------------------------------------------()[(! l! 22!(L)[h(! l)[(! 6)[n(! 6d! )]][ (! 6)][3u(! 62! d)[8(! Wait_Dig_by_Dig, Wait_Enbloc)][(!^!"^)[x(! 62! d!)[8(! redefined PIC (PIC))][(!&!"& (!4!5!7)[!(! 1!!3)[!(! 2!!3)]]}(! 3!!3)]]]}(! 4!!3)]]]]}--------------------------------------------|!%()PageOrder-------------------------------------1------------------------------------------------2------------------------------------------------3------------------------------------------------- !%()HeadingTextl! 22!(2)[(! l)[ (! 6)[ (! 6d! )]][ (! 6)][3F(! 6 ! )[8Wait_Dig)[%(! 62&! d)[8(! MapFromPIC (pic))][(!!")[ {(! 62! d)[8(! PIC! pic)][(! !")[8(! 6! Release_ Call, Disconnect_ Leg)][6(! 6R! d)[8(! rArg!cause := pic!cause)][(!L!" L)[6(! 6RL! d)[8(! Result := SCFRelease)][(!"!")[(! 6!)][' (! 62! d)[8(! )]]]]]]][(!!")[8(! 6! O_ Exception)][6(! 6L! d)[8(! Result := Exception)][(!"!")[(! 6!)][)()]]]][(!!")[8(! 6! Send_ STUI)][6(! 6F! d)[8(! udArg!infoDirection := pic!infoDirection, udArg!uSIServiceIndicator := pic!uSIServiceIndicator, udArg!uSIInformation := pic!uSIInformation)][(!!")[ (! 6F! d)[8(! PIC!party)][(!F!"F)[8(! 6-! localParty)][6(! 6FF! d)[8(! udArg!callRef := sigConID)][(!!")[(! 6F! d!)[8(!! DataReq (udArg,senderRef) to CS)][(!@r!"r@)[(! 6r!Z)][3(! 6Fr! d)[8(! -)]]]]]]][(!F!"F)[8(! 6! remoteParty)][6(! 6@F! d)[8(! 'Store info.')][(!"YYr!"r)[6!"FF)[6X(! 6~! )[8(! udArg!infoDirection := pic!infoDirection, udArg!uSIServiceIndicator := pic!uSIServiceIndicator, udArg!uSIInformation := pic!uSIInformation)][j&)[6W(! 6XX! d)[8(! dpUTSIArg!party := localParty)][x(!!")[6Z(! 6&! ,)[8(! dpUTSIArg! legID:=ob. Information)][#(!^!"^)[ (! 62! )[8(!* PIC!dialled_ Digits = 9999 /* Present?*/)][2(!X!"X)[8(! 6q! true)][6(! 6d! ,)[8(!8 CalledParty_ Number:= PIC! routingAddress_ Information)][>(!R!"R)[6(! 6! d)[8(! Result := Collect_ Information)][D(!!")['(! 6! d)[8(! )]]]]]]][5(!XX!"X)[8(! 6q ! false)][6(! 6! ,)[8(!* CalledParty_ Number:= PIC! dialledDigits)][A(!"XRXkk!"&(!FF!"FF)[ [(! 6! ,)[8(! PIC!party)][m(!''!"')[8(! 6@! remoteParty)][6^(! 6! d)[8(! 'Store info.')][p(!":SFSFl!"Fl:)[(! 6FS!)][3a(! 6l! d)[8(! -)]]]]][s(!FrF!"FFr)[8(! 6_! localParty)][d(! 6! d!)[8(!! DataReq (udArg,senderRef) to C#6X! d)[8(!o obcsmPars!routingInfo! routingAddress:= pic! routingInfo!routingAddress, obcsmPars!routeList := pic!routeList)][(!x!"x)[6(! 6X! d)[8(!D cdPNIx := 1, obcsmPars!routingInfo! cdPN :=routingAddress (cdPNIx))][(!@!"@)[6(! 6X@! d)[8(! Result := Se1()[(! l! 22!(d)['(! l)[*(! 6)[-(! 6d! )]][ 0(! 6)][3B(! 6d,! d)[8(! Wait_Dig_by_Dig, Wait_Enbloc)][`(!!")[E(! 6d! d!)[8(! SetCS)][c(!&X!"X&)[6H (! 6dX! d)[8(! CS := Sender)][f(!L!"L)[(! 6L!Z)][3K(! 6dL! d)[8(! -)]]]]]!]][i(!"!")[N(! 6^! d!)[8(!# SetLegID (currentLegID, newLegID))][l(!&X!"X"&)[6Q(! 6^X! d)[8(! obcsmPars! legID := newLegID)][o(!"L!"L)[(! 6!)][)K()/S)][v(!F:Fl!"FlF:)[(! 6Fl!Z)][)a()]]]]]]]]][(! 6! d)[8(! Select_ Route)][L(!x!"$x)[6(! 6d! ,)[8(!I obcsmPars!routingInfo! routingAddress:= pic! routingInfo!routingAddress)][O(!@r!"r@)[6"%(! 6r! d)[8(! Result := Select_ Route)][R(!!")['%(! 6! d)[8(! )]]]]]]]]]]}6! d!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_ N(Digits)][8(!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)][G(!x!"x)[6(! 6d! ,)[8(!8 CalledParty_ Number:= PIC! routingAddress_ Information)][Y(!,@r!"r@)[6 (! 6r! d)[8(! Result := Select_ Route)][\(!!")['(! 6! -d)[8(! )]]]]]]]]]]}(! 6! d)[8(! Send_ STUI)][(!FxF!"FFx)[6(! 6~! )[8(! udArg!inf'csmPars!legID, dpUTSIArg!uSIServiceIndicator:= udArg!uSIServiceIndicator, dpUTSIArg!uSIInformation := udArg!uSIInformation)][{(!!")[](! 6X! d!)[0]]]]]][r(!"!")[T(! 6X! d!)[8(! DataInd (udArg))][u(!&X!"X8(! DPUTSI (dpUTSIArg) to CS)][~(!"33L!"L)[(! 63!)][)K()]]]]]]]]]]]]]}&!"&lect_ Route)][(!"!")[(! 6!)][)()]]]]]]]][(! @!"@ )[8(! 269! Collect_ Information)][6(! 62@! d)[8(! Result := Collect_ Information)][(!!")[)()]]]]]]]]]]]]]}Analyse_ Information@!"@&)[(! 6!)][)()]]]]]][(!!")[8(! 6! Select_ Route)][6(! )][@(!rr!"rr)['(! 6! d)[8(! )]]]]]]]][U(! 6L! d)[8(! Send_ STUI)][g(!FF()[w(!GSDL)]}(! 6^F! d)[8(! -)]]]]]]]]]]]]}-------------------------------------------------------------------------------------------------------------------------------------------------------------------(! 6Y!)][)()]]]]]]]][(!!")[8(! 6! Else)][6(! 6r! d)[8(! 'Error situation')]7[(!L!"L)[(! 6L!Z)][3(! 6rL! d)[8(! -)]]]]][(!,,!",8)[8(! 6E! Analyse_ Information)][ (! 6! d)[8(! cdPNPresent (pic!routingInfo))][(!,L,~!",~,L)[8(! 6E9e! true)][6(! 6~! d)[8(!5 obcsmPars!routingInfo! cdPN:= pic!routingInfo! cdPN)][(!",,@!"@,)[6(! 6,@! : d)[8(! Result := Analyse_ Information)][(!"!")[(! 6!)][)()]]]]]][(!&&~;!"&~)[8(! 6?3! else)][6(! 6~! d)[8(!I obcsmPars!routingInfo! routingAddress:= pic!routingInfo! routingAddress)][(!"&&3