------------------------SDT2 ProcessPlayAnnouncement--------------------------------------------------------------------------------------------------------------------------------------------------------ObjectName----------------------------------------ObjectType----------------------------------------!%()HeadingText-----------------------------------1------------------------------------------------- ProcessPlayAnnouncement----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------6--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------()[8(!# Procedure ProcessPlayAnnouncement)]}-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------9()[(! ! !(d)[h(! )[k(! 6)[n(! 6d! )]][ q(! 6)][9C(! 6&d! )[8(!K /* This procedure is given for simulation and validation purposes only */)]][&t(! 6,! d)[8(! )][z(!^!"^)[6w(! 6,! d)[8(!( FACArg!operationCode:= playannoucement)][(!&!"&)[6=(! 6,&! d)[8(!" FACArg!invokeId:= PAArg!invokeId)][@(!!")[ }(! 6,! d)[8(! PAArg!informationToSend)][(! R!"R )[8(! 6w ! messageId)][6(! 6,R! d)[8(!4 FACArg! parameter:= 'Play Announcement- MessageId')][(!!")[(! 6,! d!)[8(!"  Srf_Facility.req (FACArg) to SRM)][(!L~!"~L)[(! 6,~! d!)[8(!" Ssf_Facility.ind (FACArg) to SRM)][(!!" (!4!5!7)[!(! 1!!3)]}(! 2!!3)]]}------------------------------------------------------------------------------------------------------------------------------------P!%()PageOrder-------------------------------------1-------------------------------------------------2---------------------------------------------------------------------------------------------------- ---- --------!%()HeadingText-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ------------------------ ------------)[6(! 6,! d)[8(!I requestAnnouncementCompletePAflag:= PAArg!requestAnnouncement_ Complete)][(!x!"x)[6(! 6,! d)[8(!C disconnectFromIpForbiddenPAflag:= PAArg!disconnectFromIpForbidden)]["(!@!"@)[(! 6@!Z)][3(! 6,@! d)[8(! Wait_ PlayAnnouncement)]]]]]]]]]]]]][(!R!"R)[8(! 6! tone)][6(! 6&R! d)[8(!/ FACArg! parameter:= 'Play Announcement- Tone')][(!"!")[(! 6!)][)()]]]][(!R!"R)[8(! 6k! displayInformation)][6(! 6 R! d)[8(!> FACArg! parameter:= 'Play Announcement- Display Information')][(!"!")[(! 6!)][)()]]]]]]]]]]][9(! 6 ! )[8(!Y DCL requestAnnouncementCompletePAflag Boolean, disconnectFromIpForbiddenPAflag Boolean;)]][3O(! 6~! d)[8(! Wait_ PlayAnnouncement)][m(!~~!"~~)[U(! 6! d!)[8(! Srf_FacPARes.ind)][v(!~x~!"~~x)[ [(! 6! d)[8(!# requestAnnouncementCompletePAflag)][y(!~~@!"~@~)[8(! 6! True)][^(! 6@! d!)[8(!, SpecialisedResourceReport (SRRArg) to Self)][(!~~!"~~)[ a(! 6! d)[8(!! disconnectFromIpForbiddenPAflag)][(!~:~l!"~l~:)[8(! 6S! False)][d(! 6l! d!)[8(! Srf_Initiated_ Release to Self)][(!~~!"~~)['g(! 6! d)[8(! )]]]]][(!*~~!"~)[8(! 6! True)][(! 6~!)][)g()]]]]]][|(!*~~!"~)[8(! 6! False)][(! 6~!)][)a()]]]]]][p(!"~~xx!"x~)[+X(! 6! d)[8(! *)]]]]]]}~!"~)[8(! 6! True)][(! 6~!)][)7()]]]]]][4(!*~~!"~)[8(! 6! False)][(! 6~!)][)()]]]]]][(!" ~ ~&!"~&)[(! 6&! d!)[8(! Srf_FacPARes.ind)][(!~~!"~~)[)%()]]]][L(!" x x&!"x&)[+I(! 6&! d)[8(! *)]]]]]]}-----------------------