------------------------SDT2 "GDP_oAbandon--------------------------------------------------------------------------------------------------------------------------------------------------------ObjectName----------------------------------------ObjectType----------------------------------------!%&()LinkEndpoints--------------------------------!%()PageOrder------------------------------------- DP_oAbandon---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- 6--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------()[8(!j Redefined Procedure <> DP_oAbandon)]}--------------------------------------------------------------------------------------------------------------------------------()[(! l! 22!(P)[x(! l)[(! 6)[(! 6d! )]][ (! 6)][,(! 6! d)[8(! Collect_7(!4!5!7)[!(! 1!!3)]}(! 2!!3)[!(! 3!!3)[!(! 4!!3)[!(! 5!!3)]]]]]}P!%()PageOrder-------------------------------------1------------------------------------------------5------------------------------------------------5------------------------------------------------ )!%()HeadingTextl! 22!(d)[(! l)[(! 6)[(! 6d! )]][ (! 6)][3"(! 6 ,! d)[8 Wait_ oAbandon)][(!^!"^)[(! 62! d!)[8(! redefined PIC (PIC))][(!&!"&)[  (! 62&! d)[8(! PIC! pic)][(! !" )[8(! 6! Collect_ Information)][(! 6 !Z)][(!  62 ! d)[8(! Collect_ Information)]]][ (!XX !" X)[8(! 6! Collect_ NDigits)][(! 6 !Z)][( ! 6, ! d)[8(! Collect_ NDigits)]]][(!XX !" X)[8(! 6! Analyse_ Information)][(! 6 !Z)][ (! 6& ! d)[8(! Analyse_ Information)]]][(!XX !" X)[8(! 6! Select_ Route)][(! 6 !Z)][ (! 6  ! d)[8(! Select_ Route)]]][(!X~X~ !"~ X)[8(! 6! Send_ STUI)][(! 6~ !Z)][(! 6 ! d)[8(! Send_ STUI)]]][(!XxXx !"x X)[8(! 6! Send_ UTSI)][(! 6x !Z)][(! 6 ! d)[8(! Send_ UTSI)]]][(!XrXr !"r X)[8(! 6! Release_ Call, Disconnect_ Leg)][6(! 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 situation')][)(!F!"F)[(! 6F!Z)][3(! 6^F! d)[8(! -)]]]]]]]]]]]]}artyNumber := PIC!routingAddressInformation)][(!"4  !"  )[ (! 6! ,)[8(! PIC! LegId = 0)][(!3,3,!",3)[8(! 6EL! false)][ g(! 6! ,)[8(! T_BCSM_ _Existing_Flag)][j(!,F,!",,F)[8(! 6E_! true)][(! 6! d!%)[8(! 6 ! Release_ Call)][6(! 6F! d)[8(! Result := SCFRelease)][(!"!")[(! 6!)][)()]]]][(! !" )[8(! 6 ! Else)][6(! 6r! d)[8(! 'Error situation')][(!!")[(! 6!Z)][3(! 6r! d)[8(! -)]]]]][(!*X^^F!"^FX)[8(! 62! SendSTUI)][ (! 6F! d)[8(! PIC!LegId = 0)][(!^^r!"^r^)[8(! 6w! true)][6(! 6r! d)[8(! 'Cannot send anything to A')][(!^^f!"^f^)[(! 6^f!Z)][3(! 6f! d)[8(! -)]]]]][(!xxr!"rx)[8(! 6! false)][6(! 6&r! ,)[8(!7 UDArg! BCSMId:=BCSMId, UDArg!BCSMId! LegId:=PIC!LegId)][(!#()[(! l! 22!(d)[(! l)[(! 6)[(! 6d! )]][ (! 6)][3"(! 6,! d)[8(! Wait_ oAbandon)][=(!,,!",,)[%(! 6! d!)[8(! SetCS)][C(!,&,X!",X,&)[6+(! 6X! d)[8(! CS := Sender)][(!,,!",,)[(! 6,!Z)][3(! 6! d)[8(! -)]]]]]]][( ()[w(!GSDL)]},)[((! 6! d!)[8(! DataInd (UDArg))][F(!X&XX!"XXX&)[6.(! 6X! d)[8!",,&&!"&,)[(! 6! d!)[8(!# SetLegID (currentLegID, newLegID))][(!&&&X!"&X&!&)[6(! 6X! d)[8(! obcsmPars! legID := newLegID)][(!"&&,,!",&)[(! 6,!)][)()]]]]]]]]]}L! d)[8(! -)]]]]]]]]]]][(!",,RR!"R,)[(! 6! d!)[8(! DataReq_ Ind (UDArg))][(!2:!":)[6(! 6X:! d)[8(! UDArg!data := PIC!stui)][(!!")[(! 6X! $d!)[8(! DataReqInd (UDArg) to CS)][(!"4M^M^f!"^f4)[(! 6^M!)][)()]]]]]]]]]]]]]]]]]}(! 6r! )[8(! DataReq_ Ind(UDArg) to CS)][ (!!")[(! 6!)[8(! To remote Party)]]]["(!,,@!",@&,)[(! 6,@!Z)][3 (! 6@! d)[8(! -)]]]]][(!RR!"R)[8(! 6k! false)][6'(! 6! d)[8(! 'Store STUI')][ (!!")[(! 6!)[8(! ffs.)]]][(!"RR','C! d)[8(! 'Store STUI')][ (!!")[(! 6!)[8(! ffs.)]]][^(!"xFx',',@!".()[(! l! 22!(d)[m(! l)[p(! 6)[s(! 6d! )]][ v(! 6)][y(! 6,! d)[8(! Send_ UT*SI)][(!  !"  )[ (! 6! ,)[8(! T_BCSM_ _Existing_Flag)][(! X !"  X)[8(! +69q! true)][6|(! 6! d)[8(! UDArg! BCSMId:= BCSMId)][(!   R!" R  )[6(! 6R! d)[8(! UDArg!dat,a := PIC!stui)][(!  !"  )[6(! 6! d)[8(! UDArg!data_ Direction := UTSI)][(! L ~!" ~ L-)[(! 6~! d!)[8(! DataReq_ Ind(UDArg) to CS)][ (!!")[(! 6~!)[8(! To remote Party)]]][/,@xF)[(! 6R'!)][) ()]]]]]]]]]]]]]]]})[(! 6!Z)][(! 6 ! d)[8(! Select_ Route)]]]]][$(!_E(!  !"  )[(! 6 !Z)][3(! 6! d)[8(! -)]]]]]]]]]]][(!  ~!"~0 )[8(! 6&! false)][6(! 6^~! d)[8(! 'Store UTSI')][(!"  !" )[(! 6 !1)][)()]]]]]]]]]}8(! Send_ STUI)]]][*(!xx!"x)[8(! 6! Send_ UTSI)][(! 6x!Z)][(! 6DR&RX!"RXR&)[6(! 6X! d)[8(! 'Store UTSI')][ (!!")[(! 6X!)[83(! ffs.)]]][(!"RR3X3XL!"XLR)[(! 6X3!)][):()]]]]]]]]]}(!*!!!"))[8(! 6! Else)][6 (! 6^! d)[8(! 'Error situation')][E(!x!"x)[(! 6!Z)][35(! 6^! d)[8(! -)]]]]]]]]]]]]}(! -)]]]]]]]]]]]]}-------------------------------------------------------------------------------------------------------------------------------------------------------------------D()[(! l! 22!(d)[h(! l)[(! 6)[(! 6d! )]][ (! 6)][3(! 62! d)[8(! Wait_ oA Information)][(!^!"^)[ 5(! 62! )[8(!* PIC!dialled_ Digits = 9999 /* Present?*/)][(!X!"8X)[8(! 6q! true)][6D(! 6d! ,)[8(!8 CalledParty_ Number:= PIC! routingAddress_ Information)][(!R!"R)[6P9(! 6! d)[8(! Result := Collect_ Information)][(!!")['S(! 6! d)[8(! )]]]]]]][(!X:X!"X)[8(! 6q ! false)][6G(! 6! ,)[8(!* CalledParty_ Number:= PIC! dialledDigits)][(!"XRXkk!";XR)[(! 6k!)][)P()]]]]]]][/(! 6! d)[8(! Collect_ NDigits)][(!L^L!"LL^)[68<(! 6! ,)[8(!+ CalledParty_ Number := PIC! dialledDigits)][(!L&LX!"LXL&)[6>(! 6X! d)[8(! Result := Collect_ N=Digits)][(!LL!"LL)['J(! 6! d)[8(! )]]]]]]]][2(! 6! d)[8(! Analyse_ Information)][(!>r^r!"rr^)[6;(! 6! ,)[8(!0 CalledParty_ Number:= PIC! calledParty_ Number)][(!r&rX!"rXr&)[6A(! ?6X! d)[8(! Result := Analyse_ Information)][(!rr!"rr)['M(! 6! d)[8(! )]]]]]]]][V(! 6! @ d)[8(! Select_ Route)][(!x!"x)[6_(! 6d! ,)[8(!8 CalledParty_ Number:= PIC! routingAddress_ Information)][(!A@r!"r@)[6k(! 6r! d)[8(! Result := Select_ Route)][(!!")['q(! 6! Bd)[8(! )]]]]]]]]]]}\(! 6! d)[8(! Send_ UTSI)][(!rxr!"rrx)[6e(! 6! d)[8(! 'Store UT'6,@!",@R)[(! 6,'!)][) ()]]]]]][(!3x3x!"x3)[8(! 6L! true)][6[(! 6(()[(! l! 22!(<)[(! l)[(! 6)[(! 6d! )]][ (! 6)][(! 6! d)[8(! Send_ STF4(! DataReq_ Ind(UDArg) to CS)][ 5!!"5)[(! 6!)[8(! To remote Party)]]][ 4D))MUI)][ (!  &!" & )[6(! 6&! d)[8(! UDArg! BCSMId:= BCSMId)][(!  !"  )[6(! G6! d)[8(! UDArg!data := PIC!info)][(!   R!" R  )[6((! 6R! d)[8(! UDArg!data_ Direction := STUI)][+(!