------------------------SDT2  .PIC_O_Retention--------------------------------------------------------------------------------------------------------------------------------------------------------ObjectName----------------------------------------ObjectType----------------------------------------!%&()LinkEndpoints--------------------------------!%()HeadingText----------------------------------- )PIC_O_Retention------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------6--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------()[8(!A ;FPAR IN/OUT Result PICResultType, IN Reinvoke Boolean;)]}-------------------------------------------------------------------------------------------------------------------------------------------------------------------------W()[8(! Procedure PIC_O_Retention)]}---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------1()[(! l! 22!(P)[h(! l)[k(! 6)[n(! 6d! )]][ q(! 6)][&t(! 6^! d)[8(! )][!%()HeadingText-----------------------------------!%()PageOrder-------------------------------------1-------------------------------------------------2------------------------------------------------- !%()HeaderText------------------------------------1------------------------------------------------------------------------------------------------------------------------------------------------------- ------------------------(!&!"&)[ (! 6^&! d)[8(! Reinvoke)][ (!"&XqXq!"&X)[(! 6 !)[8(!g If call processing returns to PIC_O_Retention after handling of a MidCall, no DP should be generated.)]]][(!!")[8(! 6! false)][ z(! 6^! d)[8(!& false /* For simulation purposes. */)][ (!^,!",^)[}(! 6,!)[8(!# Can the network retain c all info?)]]][(!&   !"  &)[8(! 69! true)][6(! 6 ! d)[8(! SET (RetentionO))][(!  !"   )[(! 6 !Z)][3(! 6! d)[8(! Wait_ oRetention)][(!  L!" L )[(! 6L ! d!)[8(! Retention_ O)][(!  !"  )[6(! 6! d)[8(! Result := Success)][(!" F __x!"x F)[(! 6_!)]['(! 6^x! d)[8(! )]]]]]]][(!"  3~3~L!"~L )[(! 6L! d!)[8(! Service_ Feature_ Ind(SFtArg))][(!~~!"~~)[6(! 6! d)[8(! Result := MidCall)][(!"~F~__x!"x~F)[(! 6 _!)][)()]]]]]]]]]][(! !" )[8(! 69! false)][6(! 6^! d)[8(! Result := Success)][(!Fx!"xF)[)()]]]]]][(!*&XX  !"*(!4!5!7)[!(! 1!!3)[!(! 2!!3)]]}(! 3!!3)]]]}----------------------------------------------------------------------------------------|()[(! l! 22!(L)[7(! l)[:(! 6)[=(! 6d! )]][ @(! 6)][3(! 62^! d)[8(! Wait_ oRetention)][(!!")[(! 62! d!)[8(! SetCS)][(!X!"X)[6(! 62! d)[8(! CS := Sender)][(!~!"~)[(! 6~!Z)][3^(! 62~! d)[8(! -)]]]]]]][(!"!")[(! 6^! d!)[8(!# SetLegID (currentLegID, newLegID))][(!X!"X)[6(! 6^! d)[8(! obcsmPars! legID := newLegID)][(!"~!"~)[(! 6!)][)^()]]]]]][](!"!")[<(! 6X! d!)[8(! DataInd (udArg))][N(!X!"X)[6B(! 6X! d)[8(! dpUTSIArg!party := localParty)][T(! !" )[6H(! 6& ! ,)[8(! dpUTSIArg! legID:=obcsmPars!legID, dpUTSIArg!uSIServiceIndicator:= udArg!uSIServiceIndicator, dpUTSIArg!uSIInformation := udArg!uSIInformation)][Z(!!")[K(! 6X! d!)[8(! DPUTSI (dpUTSIArg) to CS)][`(!"Lee~!"~L)[(! 6e!)][)^()]]]]]]]]]][(!"~~!"~)[(! 6! d!)[8(! PIC (PIC))][(!~X~!"~~X)[%(! 6! d)[8(! MapFromPIC (pic))][(!~~ !"~ ~)[ (! 6 ! d)[8(! PIC! pic)][(!~~!"~~)[8(! 6!  Send_ STUI)][6(! 6! ,)[8(! udArg!infoDirection := pic!infoDirection, udArg!uSIServiceIndicator := pic!uSIServiceIndicator, udArg!uSIInformation := pic!uSIInformation)][(!~~~!'-)]]]]][(!~F~!"~~F)[8(! 6_! localParty)][6(! 6! d)[8(! udArg!callRef := sigconID)][(!~~@!"+()[(! l! 22!(d)[(! l)[(! 6)[(! 6d! )]][ (! 6)]]]}c(! 6 &! d)[8(! Send_ ST"L~!"~L)[(! 6~!Z)][3(! 6r~! d)[8(! -)]]]]]]]]]]]]]]}--------------------------- ------------------------UI)][x(!!")[6(! 6! )[8(! udArg!infoDirection := pic!infoDirection, udArg!uSIServiceIndicator := pic!uSIServiceIndicator, udArg!uSIInformati#on := pic!uSIInformation)][(!!")[ f(! 6! ,)[8(! PIC!party)][(!,,!",$)[8(! 6E! remoteParty)][6(! 6! d)[8(! 'Store info.')][(!",,--F!"F,)[(! 6-!)%][3o(! 6 F! d)[8(! -)]]]]][{(!L!"L)[8(! 6e! localParty)][l(! 6 ! d!)[8&(!! DataReq (udArg,senderRef) to CS)][(!F!"F)[(! 6F!Z)][)o()]]]]]]]]]]]}]]]]]]]]})][)()]]]]]]][(! 6X! d"~~~)[ (! 6! d)[8(! PIC!party)][(!!")[8(! 6-! remoteParty)][6(! (6 ! d)[8(! 'Store info.')][(!"~~!"~)[(! 6~!)][3(! 6! d)[8(! ()[w(!GSDL)]}]]]]}I')][(!~~L!"~L~)[(! 6~L!Z)][3(! 6L! d)[8(! -)]]]]]]]]]]}------------------------------ &X)[8(! 6! true)][(! 6 !)][)()]]]]]]]}--------------------------------------------------------------------------------------------------------------------------~@~)[(! 6@! d!)[8(!! DataReq (udArg,senderRef) to CS)][(!~~!"~~)[(! 6~!Z),][)()]]]]]]]]]][(!RR!"R)[8(! 6k! Release_ Call)][6(! 6x! d)[8(! rArg!cause := pic!cause)][(!-L~!"~L)[6(! 6x~! d)[8(! Result := SCFRelease)][(!!")['(! 6x! .d)[8(! )]]]]]]][(!RR!"R)[8(! 6k! Else)][6(! 6r! d)[8(! 'Error situation')][(!!