------------------------SDT2 "7DP_oCalledPartyBusy--------------------------------------------------------------------------------------------------------------------------------------------------------ObjectName----------------------------------------ObjectType----------------------------------------!%&()LinkEndpoints--------------------------------!%()PageOrder------------------------------------- #DP_oCalledPartyBusy--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------6--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------()[8(!r Redefined Procedure <> DP_oCalledPartyBusy)]}------------------------------------------------------------------------------------------------------------------------()[(! l! 22!(L)[h(! l)[(! 6)[((! 6d! )]][ (! 6)][3(! 62! d)[8(! Wait_ oC(!4&!5!7)[!(! 1!!3)[!(! 2!!3)]]}(! 3!!3)[!(! 4!!3)]]]]}--------------------------------------------|!%()PageOrder-------------------------------------1------------------------------------------------2------------------------------------------------4------------------------------------------------- 0!%()HeadingTextl! 22!(1)[+(! l)[.(! 6)[1(! 6d! )]][ 4(! 6)][37(! 6 ! )[8Wait)][alled_ PartyBusy)][(!^!"^)[(! 62! d!)[8(! redefined PIC (PIC))][(!&!"& )[%g(! 62&! d)[8(! MapfromPIC (pic))][j(!!")[ (! 62! d)[8(! PIC! pic)][(! !" )[8(! 6R! Select_ Route)][6(! 62! d)[8(!o obcsmPars!routingInfo! routingAddress:= pic! routingInfo!routingAddress, obcsmPars!routeList  := pic!routeList)][(!!")[6(! 62! d)[8(!D cdPNIx := 1, obcsmPars!routingInfo! cdPN :=routingAddress (cdPNIx))][ (!~ !"~)[6(! 62! d)[8(! Result := selectRoute)]['(!F!"F)['(! 62F! d)[8 (! )]]]]]]]]][(!&&!"&)[8(! 6?! Analyse_ Information)][ (! 6! d)[8(! cdPNPresent (pic!routingInfo))][(!&&!"&&)[8(! 6?! true)][6(! 6! d)[8(!5 obcsmPars!routingInfo! cdPN:= pic!routingInfo! cdPN)][ (!&~&!"&&~)[60(! 6! d)[8(! Result := analyse_ Information)][<(!"&&--F!"F&)[(! 6-!)][)()]]]]]][(!  !" )[8(! 69! else)][6(! 6! d)[8(!I obcsmPars!routingInfo! routingAddress:= pic!routingInfo! routingAddress)][(!" ~ &&!"& ~)[(! 6&!)][)0()]]]]]][(!!"0(! 6!Z)][3(! 6^! d)[8(! -)]]]]]]]]]]]]]]}^F! d)[8(! 'Error situation')][ (!!")[n*tion')][ (!F!"F)[(! 6F!Z)][3(! 6^F! d)[8(! -)]]]]]]]]]]]]}Ll)[r(! 6! $&)[6(! 6&! d)[8(! obcsmPars! legID := newLegID)][(!"&&,,!",&)[(! 6,!)][)()]]]])[8(! 6! Release_ Call, Disconnect_ Leg)][6#(! 6~! d)[8(! rArg!cause := pic!cause)][&(!~!"~)[6(! 6~! d)[8(! Result := SCFRelease)][(!"--F!"F)[(! 6-!)][)()]]]]]][(! ()[(! l! 22!(d)[(! l)[(! 6)[(! 6d! )]][ (! 6)][3(! 6! d)[8(! Wait_ oCalled_ PartyBusy)][(!,^,!",,^)[(! 6! d!)[8(! SetCS)][(!,,&!",&,)[6(ars!legID, dpUTSIArg!uSIServiceIndicator:= udArg!uSIServiceIndicator, dpUTSIArg!uSIInformation := udArg!uSIInformation)][(!~~!"~~)[ (! 6! d!)[8(! DPUTSI (dpUTSIArg) to CS)][%(!"~L~ee~!"~~L)[(! 6Xe!)][)O()]]]]]]]]]]]]]}@)[(! 6R!)[8(! ffs.)]]][(!r!"r)[(! 6!Z)][3(! 6X! d)[8(! -)]]]]]]]]} UDArg!data_ Direction := UTSI)][(!]][(!",^,w w !" ,^)[(! 6! d!)[8(! DataInd (udArg))][(!  &!" & )[6(! 6&! d)[8(! dpUTSIArg!party := localParty)][(!  !"  )[6(! 6! ,)[8(! dpUTSIArg! legID:=obcsmPars!legID, dpUTSIArg!uSIServiceIndicator:= udArg!uSIServiceIndicator, dpUTSIArg!uSIInformation := udArg!uSIInformation)][(! R !"  R)[(! 6! d!)[8(! DPUTSI (dpUTSIArg) to CS)][(!"  ,,!", )[(! 6,!)][)()]]]]]]]]]]]]]} (!XXX!"X!")[8(! 6! O_ Exception)][6(! 6! d)[8(! Result := Exception)][(!"--F!"!F)[(! 6&-!)][)()]]]]]]]]]]]]]})[(! 6! d!)[8(! DataInd (udArg))][(!~&~X!"~X~&Y)[6(! 6X! d)[8(! dpUTSIArg!party := localParty)][(!~~!"~~)[6 (! 6! )[8(! dpUTSIArg! legID:=obcsmP()[w(!GSDL)]}l:)[(! 6Xl! d!)[8(! DataReq_ Ind(UDArg) to CS)][ (! !" )[(! 6l)[(! 6! d!)[8(! DataReqInd (UDArg))][(!&X!"X&)[6(! 6X! d)[8(! dpUTSIArg!p&)]]]]]]]]]]]]]}-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------arty := remoteParty)][(!"XX!"X)[(! 6X!)][) ()]]]]]]]]]}&&!"&)[(! '6&!)][)I()]]]]]]]]]}------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------.%(! 6&! d)[8(! CS := Sender)][(!,,!",,)[(! 6,!Z)][3(! 6! d)[8(! -)]]]]]]][)(!",^,w&w&!"&,^)[(! 6! d!)[8(!# SetLegID (currentLegID, newLegID))][(!&&&!"&&d)[8(! Result := Analyse_ Information)][(!rr!"rr)['(! 6! d)[8(! )]]]]]]]][(! 6! d)[8+(! Select_ Route)][(!x!"x)[6(! 6d! ,)[8(!I obcsmPars!routingInfo! routingAddress:= pic! routingInfo!routingAddress)][(!,@r!"r@)[6(! 6r! d)[8(! Result := Select_ Route)][(!!")['(! 6! -d)[8(! )]]]]]]]]]]}(! 6! d)[8(! Select_ Route)][(!x!"x)[6(! 6d! ,)[8(!I obcsmPars!rou%.tingInfo! routingAddress:= pic! routingInfo!routingAddress)][(!@r!"r@)[6(! 6r! d)[8(! Result := Select_ Route)][(!/!")['(! 6! d)[8(! )]]]]]]]]]]}X)[8(! 6q! Select_ Route)][6(! 6 ! d)[8(!s7)[8(! 6! Send_ STUI)][6B(! 6x! d)[8(! udArg!infoDirection := pic!infoDirection, udArg!uSIServiceIndicator := pic!uSIServiceIndicator, udArg!uSIInformation := pic!uSIInformati2situation')][ (!!")[(! 6!Z)][3(! 6r! d)[8(! -)]]]]][(!!"on)][T(!!")[ E(! 6x! d)[8(! PIC!party)][](!x!"x)[8(! 6-! 3 localParty)][6(! 6xx! d)[8(! udArg!callRef := sigConID)][(!!")[N(! 6x! d!)[8(!! Da4taReq (udArg,senderRef) to CS)][`(!r!"r)[(! 6!Z)][3K(! 6x! d)[8(! -)]]]]]]][W(!@5x!"x@)[8(! 6! remoteParty)][6H(! 6rx! d)[8(! 'Store info.')][Z(!"!"6)[(! 6!)][)K()]]]]]]]][(!!")[8(! 6! Else)][6(! 6r! d)[8(! 'Error 1(! 6!Z)][3(! 6^! d)[8(! -)]]]]]]]]]]]]]]}senderRef) to CS)][ (! R!"R )[(! 6R!)[8(!o