------------------------SDT2 ˙˙˙˙ExportLeg--------------------------------------------------------------------------------------------------------------------------------------------------------ObjectName----------------------------------------ObjectType----------------------------------------!%&()LinkEndpoints--------------------------------!%()HeadingText----------------------------------- ˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ExportLeg------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ ˙˙˙˙6--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------˙˙˙˙()[8(!6 ;FPAR IN legId LegType; RETURNS leg ExportLegType;)]}]}----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------L˙˙˙˙()[8(!= Procedure <> ExportLeg)]}-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------S˙˙˙˙()[(! lü! 22!(d)[h(! lü)[k(! 6)[n(! 6d! )]][ q(! 6)][&t(! 6 –! Čd)[8(! )][z!%()HeadingText-----------------------------------!%()PageOrder-------------------------------------1---------------------------------------------------------------------------------------------------- --------˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙----˙˙˙˙!%()HeaderText--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ------------------------------------˙˙˙˙(!„ú„^!"„^„ú)[6w(! 6î^! ,–)[8(!& csID := call GetLegLocation (legID))][ƒ(!„ô„&!"„&„ô)[€( ! 6 &! Čd!)[8(! CSExportLegReq (legID))][1‰(!čXX!"XčX)[7†(! 6&!)[8(! to call GetCSPtr(csID))]]][( !„Š„ź!"„ź„Š)[(! 6„ź!Z)][3Œ(! 6 ź! Čd)[8(! WaitForCS)][•(!„ „R!"„R„ )[’ (! 6 R! Čd!)[8(! CSExportLeg_ Resp(leg))][›(!„ś„č!"„č„ś)[6¤(! 6 č! Čd)[8(! ll(legID) := 0)][§ (!„L„~!"„~„L)['˜(! 6 ~! Čd)[8(! )]]]]]]][Ą(!"„ „9~9~R!"~R„ )[+ž(! 6R!  Čd)[8(! *)]]]]]]]]]][9}(! 6d,! )[8(! DCL csID CallSegmentID;)]]]]}ID;)]]]]}ID;)]]]]}lSegmentID CallSegmentID;)]]]]}----------------------------------------------------------------------‰˙˙˙˙(!4§!5!7)[!(! 1!!3)]}--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------P˙˙˙˙()[w(!GSDL)]}-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------˙˙˙˙