------------------------SDT2FGBillingManager----------------------------------------------------ObjectName----------------------------------------ObjectType----------------------------------------!%&()LinkEndpoints--------------------------------!%()HeadingText----------------------------------- #BillingManager-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------5--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------()[8(! process BillingManager)]}------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------.()[8(! (1, 1); )]}CIF CurrentPage 1 */ /* CIF TEXT (70, 1090), (1273, 670) */ /* CIF Keep Specific Geode TextMode 4 */ /* CIF Keep Specific Geode Modified */)]}-------------------------------------------------------------------------------"()[(! l! 22!(d)[(! l)[(! 6)[(! 6d! d)]][ (! 6)][2z(! 6^! d!S)[8(! )!%()HeadingText-----------------------------------!%()PageOrder-------------------------------------1-------------------------------------------------DefinitionPage------------------------------------ "$!%()HeaderText------------------------------------1-------------------------------------------------4---------------------------------------------------------------------------------------------------- ----7----A----][}(!^!"^)[6(! 6^! d!S)[8(! )][1F(!&X!"X&)[7C(! 6X! ! !S)[8(!! bil_register(Marie)!nb_com := 0)]]][(!X!"X)[6(! 6^X! d!S)[8(! )][1L(!&X !"X&)[7I(! 6XX!! !S)[8(! bil_register(John)!nb_com := 0)]]][(! !" )[6(! 6^ ! d!S)[8(! )][1R(!&RXR!"XR&R)[7O(! 6X !! !S)[8(!& bil_register(parispizza)!nb_com := 0)]]][ (!!")[6(! 6^! d!S)[8(! )][1X(!&X!"X&)[7U(! 6X!!  !S)[8(!% bil_register(lyonpizza)!nb_com := 0)]]][(!L!"L)[(! 6!Z)][3(! 6^! d!S)[8(! ready)]]]]]]]]]]]]]]}&)[7U(! 6X!! !S)[8(! bil_register(lyonpizza)!nb_com := 0 /* CIF NEXTSTATE (200, 711), (205, 88) */ /* CIF Keep Specific Geode TextMode 4 */ /* CIF Keep Specific Geode Modified */)]]][(!L!"L)[(! 6!Z)][3(! 6^! d!S)[8(! ready)]]]]]]]]]]]]]]}783), (166, 86) */ /()[(! l! 22!(d)[(! l)[!(! 6)[$(! 6d! d)]][ '(! 6)][3(! 6! d!S)[8(! r2DECISION (1336, 410), (547, 150) */ /* CIF Keep S3finitionPageextMode 4 */ /* CIF Keep Specific Ge4finitionPage)][()[()][ DefinitionPage(! billing_PIDs(mobile_id) = )7$eady)][(!XX,!"X,X)[(! 6,! d!S!)[8(! com_finish)][1v(!^^!"^^^)[7s(! 6,!! !S)[8(! (mobile_id, correspondant))]]][(!XX!"XX)[ (! 6! d!S)[8(! billing_PIDs(mobile_id) = NULL)][(!XXX!"XXX)[8(! 69 ! (TRUE))][ (! 6! d!S)[8(!$ billing_PIDs(correspondant) = NULL)][(!~~!"~)[8(! 6! (FALSE))][6(! 6! d!S)[8(! )][1(!!")[7(! 6!! !S)[8(! tmp := mobile_id)]]][(!~~~!"~~~)[6(! 6~! d!S)[8(! )][1(!!")[7(! 6~!! !S)[8(! mobile_id := correspondant )]]][(!~~F!"~F~)[6(! 6F! d!S)[8(! )][1(!xx!"xx)[7(! 6F!! !S)[8(! correspondant := tmp )]]][(!~~!"~~)[(! 6! d!S!)[8(! com_finish)][1(!@@!"@@)[7(! 6!! !S)[8(! to billing_PIDs(mobile_id))]]][(!~r~!"~~r)[(! 6~!Z)][3(! 6! d!S)[8(! waitReport)]]]]]]]]]]][(!X X~!"X~X )[8(! 6qR! (TRUE))][(! 6X~!Z)][3(! 6~! d!S)[8(! ready)]]]]][(!"XXXqq!"XX)[8(! 6! (FALSE))][(! 62! d!S!)[8(! com_finish)][1|(!@,@!",@@)[7y(! 6,!! !S)[8(! to billing_PIDs(mobile_id))]]][(!r!"r)[(! 6!Z)][3(! 62! d!S)[8(! waitReport)]]]]]]]]]]]]}(!X X~!"X~X )[8(! 6?R! (TRUE /* CIF NEXTSTATE (1968, 950), (200, 83) */ /* CIF Keep Specific Geode TextMode 4 */ /* CIF Keep Specific Geode Modified */))][(! 6X~!Z)][3(! 6~! d!S)[8(! ready)]]]]][(!"XXX qq!"XX)[8(! 6! (FALSE /* CIF OUTPUT (1095, 680), (464, 111) */ /* CIF Keep Specific Geode TextMode 4 */ /* CIF Keep Specific Geode Modified */))][(! 62! ! d!S!)[8(! com_finish)][1|(!@,@!",@@)[7y(! 6,!! !S)[8(! to billing_PIDs(mobile_id) /* CIF NEXTSTA'(!4K!5!7)[!(! DefinitionPage!)[!(! 1!!2!3)[!(! 2!!3)[!(! 3!!3)[!(! 4!!G()[w(!GSDL)]}-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------()[(! l! 22!(d)[h(! l)[k(! 6)[n(! 6d! )]][ t(! 6 )][9w(! 62! !S)[8(! n%ewtype billing_register_t ARRAY( Mobile_ID_t, billing_report_t); endnewtype; newtype billing_PID_t ARRAY( Mobile_ID_t, PID); endnewtype; dcl billing_PIDs billing_PID_t, mobile_id, correspondant, tmp mobile_ID_t, bil_register billing_register_&t, time NATURAL;)]]]]}F End Text */ /* CIF CurrentPage 1 */ /* CIF START (202, 120), (200, 120) */ /* CIF Keep Specific Geode TextMode 4 */ /* CIF Keep Specific Geode Modified */ )]]]]}-------------------------------------------------------------------TE (1227, 821), (200, 83) */ /* CIF Keep Specific Geode TextMode 4 */ /* CIF Keep Specific Geode Modified */)]]][(!r!"r)[(! 6!Z)][3(! 62! ( d!S)[8(! waitReport)]]]]]]]]]]]]}------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------@()[(! l! 22!(d)[*(! l)[-(! 6)[0(! 6d! d)]][ 3(! 6)][3(! 6,! d!S)[8(! w*aitReport)][=(!,^!"^,)[+@(! 6,^! d!S)[8(! *)]]][(!",EE^!"^,)[+(! 6&^! d!S!)[8(! report)][1(! !" )[7(! 6 ^!! !S)[8(! (mobile_id, time)),]]][(!&!"&)[6(! 6&&! d!S)[8(! )][1(!X X!" XX)[7(! 6 &!-! !S)[8(!U bil_register(mobile_id)!bil(bil_register(mobile_id)!nb_com)!called := correspondant)]]][(!!")[6"(! 6&! d!.S)[8(! )][1(!   !"   )[7(! 6 !! !S)[8(!N bil_register(mobile_id)!bil(bil_register(mobile_id)!nb_com)!duration := time/)]]][%(!R!"R)[6((! 6&! d!S)[8(! )][1(! !" )[7(! 6 !0! !S)[8(!X bil_register(mobile_id)!bil(bil_register(mobile_id)!nb_com)!price := Float(time) * 0.5)]]][+(!~!"~)[6.(! 6&~! d1!S)[8(! )][1(! !" )[7(! 6 ~!! !S)[8(!F bil_register(mobile_id)!nb_com := bil_register(mobile_id)!nb_com + 1)]]]2[1(!F!"F)[64(! 6&F! d!S)[8(! )][1(!x x!" xx)[7(! 6 F!3! !S)[8(!! billing_PIDs(mobile_id) := NULL)]]][7(!!")[(! 6!Z)][3:(! 6&! d!S)[84(! ready)]]]]]]]]]]]]]]]]]]}]}de TextMode 4 */ /* CIF Keep Specific Geode Modified */)]]][1(!F!"F)[64(! 6&F! d!S)[8(! )][1(!!x x!" xx)[7(! 6 F!! !S)[8(! billing_PIDs(mobile_id) := NULL /* CIF NEXTSTATE (3160, 891), (154, 86) */ /* CIF Keep Specific Geode TextMode 4 */ /6* CIF Keep Specific Geode Modified */)]]][7(!!")[(! 6!Z)][3:(! 6&! d!S)[8(! ready)]]]]]]]]]]]]]]]]]]}------()[(! l! 22!(d)[6(! l)[9(! 6)[<(! 6d! d)]][ ?(! 6)][3(! 6^! d!S)[8(! r8eady)][(!!")[(! 6! d!S!)[8(! com_start)][1^(!X&&!"&&&X&)[7[9(! 6!! !S)[8(! (mobile_id))]]][(!X!"X)[ (! 6! d!S)[8(! )][1d(!X:!"X)[7a(! 6!! !S)[8(! Billing)]]][(! !" )[6(! 6 ! d;!S)[8(! )][1j(!XRR!"RXR)[7g(! 6 !! !S)[8(!& billing_PIDs(mobile_id) := offspring)]]][(!<!")[(! 6! d!S!)[8(! com_start)][1p(!X!"X)[7m(! 6!! =!S)[8(!( (mobile_id) to Billing_PIDs(mobile_id))]]][(!L~!"~L)[(! 6~!Z)][3(! 6~! d!S)[8(!> -)]]]]]]]]]]]]]]}X)[7m(! 6!! !S)[8(! (mobile_id) to Billing_PIDs(mobile_id) /* CIF NEXTSTATE (768, 783), (166, 86) */ /* CIF Keep Specific Geode TextMode 4 */ /* CIF Keep Specific Geode Modified */)]]][(!L~!"~L)[(! 6~!Z)][3(! 6~! d!S)[8(! -)]]]]]]]]]]]]]]}-----------5()[(! l! 22!(d)[B(! l)[E(! 6)[H(! 6d! d)]][ K(! 6)][3(! 6,,! d!S)[8(! rB5-------------------------------------------------DefinitionPage------------------------------------------------------------------------------------------------------------------------------------------ --------@$----------------eady)][(!!")[(! 6,! d!S!)[8(! getReport)][1(!&!"&)[7C(! 6&!! !S)[8(! (mobile_id))]]][(!&!"&)[(! 6,! d!S!)[8(! DBgiveReport)][D1(!&!"&)[7(! 6&!! !S)[8(!3 (bil_register(mobile_id), mobile_id) to sender)]]][ (!!"E)[(! 6!Z)][3 (! 6,! d!S)[8(! ready)]]]]]]]]]]} /* CIF Keep Specific Geode Modified */)]]][ (!!")[(! 6!Z)][3 (! 6,! d!S)[8(! ready)]]]]]]]]]]}--------------------------------------------------------------------------------------------------------------------?3)[!(! 5!!3)]]]]]]}-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------9