bound_time_rtns_.bind 04/26/87 1559.7rew 04/26/87 1557.5 24192 /* *********************************************************** * * * Copyright, (C) Honeywell Information Systems Inc., 1984 * * * *********************************************************** */ /* HISTORY COMMENTS: 1) change(84-02-10,Falksenj), approve(), audit(), install(): Pre-hcom comments. 10 Feb 1984 J A Falksen created. 2) change(87-04-09,Lippard), approve(86-11-24,MCR7576), audit(87-04-21,Dickson), install(87-04-26,MR12.1-1026): Delete set_time_zone and time_table_. END HISTORY COMMENTS */ /* bound_time_rtns_ This bound segment contains non-hardcore date/time stuff */ Objectname: bound_time_rtns_; Global: delete; Order: datebin_, date_time, date_time_equal, date_time_interval, display_time_info, set_time_default; Addname: calendar_clock, dsti, clock, date, date_time, date_time_after, date_time_before, date_time_equal, date_time_interval, date_time_valid, datebin_, day, day_name, display_time_info, dtaf, dtbe, dteq, dti, dtv, hour, long_date, long_year, minute, month, month_name, print_time_default, print_time_defaults, ptd, set_time_default, std, taf, tbe, teq, time, time_after, time_before, time_equal, year; objectname: datebin_; retain: datebin_, shift, wkday, time, dayr_clk, revert, revertabs, clockathr, next_shift_change, datofirst, dayr_mo, last_midnight, this_midnight, preceding_midnight, following_midnight; objectname: date_time; synonym: date, day, day_name, hour, long_date, long_year, calendar_clock, clock, minute, month, month_name, time, year; retain: date_time, date, day, day_name, hour, long_date, long_year, calendar_clock, clock, minute, month, month_name, time, year; objectname: date_time_equal; synonym: date_time_after, dtaf, date_time_before, dtbe, date_time_equal, dteq, date_time_valid, dtv; retain: date_time_after, dtaf, time_after, taf, date_time_before, dtbe, time_before, tbe, date_time_equal, dteq, time_equal, teq, date_time_valid, dtv; objectname: display_time_info; synonym: display_time_info, dsti; retain: display_time_info, dsti; objectname: date_time_interval; synonym: date_time_interval, dti; retain: date_time_interval, dti; objectname: set_time_default; synonym: std, set_time_default, print_time_default, print_time_defaults, ptd; retain: std, set_time_default, print_time_default, print_time_defaults, ptd; /* END */  date_time 08/30/84 1205.0re 08/30/84 1205.1 47232 XTTVT0NTYT^vagmtV LT<V#GT-tz^ycyeartime^mnhour^dndayX?#english-lang-zone^Hd:^MH^Z9mymonth^Z9MHminute^9999yc^Z9Hdday_name^Z9dmclock(sub_error_)-language-time_zonemonth_namelong_yearlong_date^my/^dm/^ycdate_timesub_error_calendar_clockdate_time_$format^mn ^Z9dm, ^9999yc^my/^dm/^yc ^Hd^99v.9MH ^xxxxza^xxxda^/^a requires a ^[zone^;language^] name operand.^/Date/Time args were: ^va^[ -zone ^a^;^s^]^[ -lang ^a^;^s^] Usage:^-^[^;[^]^a ^[format_string ^]{convert_date_to_binary_args} {-control_args}^[^;]^]fP%@ @@ &P@ `@$Q@mP%@ @@P@ `@$QrP%@ @@s@@ @H@@G@@N@@ @$PP@N@J@ J@G@NP@HP `@`Q(@wP%@ @@` P@ `@$XQ{P%@ @@5Q@R@P@P%@ @@' Q@P@yP%@ @@Q@R@P@jP%@ @@ P@ `@$/Q@ZP%@ @@ Q@R@P@JP%@ @@Q@R@P@;P%@ @@Q@R@P@,P%@ @@ Q@P@P%@ @@Q@R@P@P%@ @@Q@P@(@J@ @@ @@ F@ @@@@@N@@ @$PP@N@ O(@$PP@@P@@(P$PNP O@P@@ P@@O@P@@9J@NPN@3(@(@F@@J@@@N@O@N,@ F@@@H@@G@@N@@@@@@N(@HPG@ @@` 0N(@HPG@ @@` 'HPG@ F`)  F`A  F`@ F`3  F`@ ~@GN@G@@.@ n@`,@@(@@T@@i@$@@ `@`L@&@N@(@@*@,@.@"@ $P P@ @N@5@@9<0< F@ UM@@ F@ PM@ @N@B@@D@0@F@@H@@J@@L@@N@ @P@@R@V@X@Z@\@^@`@d@b@f@@@$@@@@@@  @@@  F@ F@  @@ F@  @@ @@ P'@@P@T @P@i@B@P@ `@`QL@D@@F@@H@@J@ @L@eN@]P@R@jT@@@$PP@ @O@@>@i@ @@@ `@` @>@@ @ E@@N@ `@` @O@-@@$@@&@@(@$*@',@3.@"@ $PP@ @N@@PP `@`@@@\@\ F@9J@@N@j@@l@@@n@O@p@@r@@t@O@v@z@|@@~@@@@h@@@@G@V@@@G00$PPj@@l@@n@HPp@@r@v@x@z@@|@~@h@@@@@@F@b@@f@f@j@b@l@`@n@h@ $PP@`@ P @@@h @@ l `@r@h@t@v@x@p@$P P@bP Pd@ F@F  `@j@h@$PP@@@^az@D@~@ P@@@z@@@@@@z@w@|@$P P@H@?#"  date_time  symbol_tablef active_fnc_err_com_err_convert_date_to_binary_#cu_ af_arg_ptr&'* af_return_arg&-1arg_ptr&46 date_time_format9<> error_table_ not_act_fncAEHnoargAKMioa_PPRcontinue_to_signal_UUZfind_condition_info_]]cm `calendar_clockrf`iclockwm`pdate{r`udayw`zday_name{`~hour` long_date#` long_year4`minuteC`monthR` month_namea`timeo`year~` sub_error_.1 &&&%&,&3&8&@&J&O&T&\&esymbtreeJsS*KZqQPL/I 6"' *alllMultics PL/I Compiler, Release 28d, of October 4, 1983GJohnson.SysMaint.aoptimize map< X!"K#|D$3YVF4M+F_HX$AmcH{>spec>on>date_time>date_time.pl1>ldd>include>condition_info.incl.pl1>ldd>include>condition_info_header.incl.pl1>ldd>include>sub_error_info.incl.pl1pl1info i date_timekCzv|_ ;kv|C@P ( <_xTTPk + Vj Z+k_j@Vj XVBk XVBk +V`Z +XVBk  +@eU*eU*eU*eU*obj_map P Xp  date_time_equal 12/13/84 1339.0re 12/13/84 1141.7 35496 timeval34TV-dtVT V TTtrue#GT-datefalseUsage: ^a ^adate_time stringdate_time_validdate_time_afterdate_time_beforedate_time_equaldate_time1 date_time2 {-control_arg}cP%@iP%@nP%@qP%@ @@ @@$jg@O@uP%@{P%@P%@P%@ @@ @@$j@s@O@P%@P%@P%@P%@ @@ @@$jL@O@P%@P%@ @@e @@^j@@@@@@@@@@@@@@N@P `@`@N4@@ @N@-@@@@@@@@@@@@>i@@ `@`@ O@@>@@@@P@ e@`@N@ `@` @,@@T@@i@"@@ `@`@$@@&@@(@*@,@ @ $PP@ @@@ N@@PP `@$ @@@@@$PP@@@ N@@PP `@$ @@@@@$PP@@@(@@@@0@@2@@4@@6@j@8@:@<@@@>@B@.@$P P@(@@@@0@@2@@4@@6@j@8@:@}<@@@y>@vB@.@$PP@@@@F@@H@@J@@L@D@$PP@@$PNP (@P@@P@@ @ P@@P@@@@(@(@@@@ @N@%@P@@R@@T@@V@N@@@P@ F`9 F`*@ ,@@NuF@@N,@@Nk@@@@@VZ@P^@@`@@b@@d@Z@f@ h@j@ l@\@$PP@@P@ @@`@'@VZ@P^@@`@@b@@d@Z@f@h@j@l@\@$PP@@P@ @@`@@@:@^aZ@@p@@r@Z@t@@@v@z@|@~@@n@@@H@@@@@P@@@@@@@@@@@@$PP@@$PP@!!?# date_time_equal symbol_tablec  error_table_ not_act_fncactive_fnc_err_ suppress_name"&com_err_)),)"/convert_date_to_binary_228relative2;>cu_ af_return_argABF af_arg_ptrAILarg_ptrAOQioa_TTV date_time_ from_clockY\_teqi6`b time_equalnc=`fdteqqiD`lunK`tbe{q]`t time_beforeud`xdtbe{k`~date_time_beforer`taf` time_after`dtaf`date_time_after`dtv`date_time_valid`{ &&!&(&.&1&:&@&H&N&S&X&asymbtreeKMR#KPL/I 6"' *FRc|RRMultics PL/I Compiler, Release 28d, of October 4, 1983GJohnson.SysMaint.aoptimize map4#Zz=K=#ZzK>spec>temp>7065>date_time_equal.pl1>spec>temp>7065>time_value.incl.pl1pl1info Ndate_time_equalUG+Z</Ot@P ~<=O `-PZjk+VjkkkP ZZkk +Z+PV`Z + +PV`Z ++XV@V`Z@eU*eU*eU*eU* obj_map {{( 0H  date_time_interval 12/13/84 1339.0re 12/13/84 1142.0 62712 timeoff2+000000000000000000000000+000000000000000000000005+000000000000000000000005+000000000000000000000005+000000000000000000000005+000000000000000000000005+000000000000000000000005+000000000000000000000005+000000000000000000000005+000000000000000000000005+000000000000000000000005+000000000000000000000005+000000000000000000000005+000000000000000000000005+000000000000000000000005+000000000000000000000005+000000000000000000000005+000000000000000000000005+000000000000000000000005+000000000000000000000005+000000000000000000000005XT^vaT%T.VTGTT-zu-nzu-lg-fd-bfTTVV TT<V#-unit-units-long-lang-brief-zero_units-language 0123456789-default--no_zero_units-fractional_digitsUnknown offset name. ^aUnknown time language. ^a ^aInvalid positional arg. ^a^/^[from^;to^]-time value: ^aValue may not exceed 20. ^a ^aNumeric value required. ^a ^aCall to date_time_$from_clock failed.Missing value for -^[lang^;^;units^] argument.^/Usage:^-date_time_interval {from-time} to-time {-ctl_args}uP%@xP%@r(@@t@ @@ nf@@@@@ @O@,@NQ(@@@@@@@@F@@@$PP@F@ G(@$PPL@#N@Ph@j@(P$PNP G@Ph@j@PL@N@G(@PL@ N@@@$PPF@@@<<F@@@@@@-@*@'@@ L@@@(@(@(@(@(@@B@B@N@kB@@D@@A@@F@@@h@@@N(@DPt@A@r@TNi(@DPA@T`-.@.@>Nt`A.@.@@>$A@V@(@@@,  @@$P@@@@v@@@@@ @ @@@@@L@@@@A@+f@@@f@N A@V@(@@@  @@$P@@@@v@@DP@@ @ @@@@@L@@@NAA@V@DP@|@l@@@@@@@ $P"P@l@ A@V@(@@@@@$P@@@@DP@n@n@e @@ @@L@@@l@OQ@l@N@@@,@DPA@T`-.@.@>Ns @@`v F`S F`:@ F`Z F`.@f@ F`@  F`5@ @@`ns F`) F`f@h F`0 F`Z@] F` F` @R F`  F`@@GA@V@^a@$PP@@@@@@@@@ @@ @@L@@@*@N ,@@FA@@OA@V@(@@@@@$P@@@@@@@@ @@ @@L@@@B,@@sNP@@@(@@~@B@B@NCVD@B@OA@V@@@FN@~@@F@@@@z@@ @@$PP@F@"A@V@@@  F@@$P@@@@B@@DP@m@j @e @h@@@@L@@@B,@tPD@r@A@V@DP@U@m@@@@N@@@ $P"P@m@#A@V@(@@@h@@$P@@@@n@@DP@.@. @ @@@@@L@@@@"N N@(@@@q00@@$P@@@@@@ @ @ @ @@L@@@@@Q@ @@@@@@@f@@O=@@@H@@J@@@@F@@@$P P@F@@@'((F@@$P@@@@@@@@ L@@@(@l@l@NFl@F@Rl@N@J@@R@ @@@@ F`wFN@f@P@P(@@lR R@N,@ F@bP@@@R@@@ 1@@ 1 Y2P>@@t`Y>@.@.@@@@~@@@~@N@@@.@ o@eY@u`>@.@.@@@@~@N@@u`?@.@.@@@@~@N@@N,@ F@@$P&P@$@m@@l@$>@~@O~@N@@@.@ n@`@:@R+@@@$P&P@$@m@@l@$>@~@O~@N@@@.@ n@`@$P&P@$@m@@l@$>@~@O~@N@@@.@ n@`@@N,@ F@l,@'@u`>@.@.@@@@~@N@G@@@@@@@@@@@@ $P$P@ @N@@PP `@`@ `g -1?#+1 +0-date_time_interval symbol_tableu  error_table_badopt not_act_fncnoarg!#active_fnc_err_&&*com_err_--0convert_date_to_binary_relative39<cu_ af_arg_ptr?@C af_return_arg?FJarg_ptr?MO date_time_from_clock_intervalRUZget_time_info_indexR]bioa_eeg time_info_ offset_namesjmqdtix#`t{u*`(date_time_interval&& &%&,&2&>&E&L&Q&\&d&i&ssymbtreeKMR#KPL/I 6"' *annnMultics PL/I Compiler, Release 28d, of October 4, 1983GJohnson.SysMaint.aoptimize map<&Zz>K F XTEKN&XT@KX$ZzK>spec>temp>7065>date_time_interval.pl1>ldd>include>time_names.incl.pl1>ldd>include>time_info_search.incl.pl1>spec>temp>7065>time_offset.incl.pl1pl1info idate_time_intervalC%@@Pgy !gy x3>-<#x_?&@PVjZZjZ ZZ+Vj|Z #Qk C9UYUYUYUYobj_map |(&  datebin_ 08/05/87 0808.7re 08/04/87 1641.5 57600 T TTTT#4TTV V?Gwhotabdatebin_?#u^a>whotab+86400000000installation_parms^a>installation_parms +=PP@PPh@Pb@PV@PX@ PZ@ P\@P^@P`@Pd@Pf@b(PV(PX(PZ(P\(P^(P(@@(@@(@hP~@|@@N@bPH@VPG@XPI@ZPJ@\PK@^PL@`PM@dPF@fP@pIPP@PPh@Pf@fPhP~@|@@F@fP@pNPP@PPh@Pd@d(PhP~@|@@M@dP@SPP@PPh@P\@P^@P`@\P^P`PhP~@|@@|J@\PK@^PL@`P@pYPP@PPh@PPhP~@|@@bO@PP@^PP@PPV@PX@PZ@P\@ P^@ P`@Ph@@@m@(@(@(@@(@ @@@@@@@@@@@@@@@@@@@D@@A@@@,$P P@VP~@XP~@ZPm~@@(@@D@@@@@@@@\P@^P@`P@@@@@@@hP@A@@@0$PP@A@hP@NdPP@PPb@Ph@hP @@l@(@(@(@@(@@@@@@@@@@@@@@@@@@@@D@@A@@@,$P P@(@(@(@(@(@@(@}@D@@@@bP@@@@@@@@@@@@@@@hP@A@@@0$PP@@NjPP@PP\@Ph@\PO@@@@\>PFB?@hP@pPP@PPZ@@@(@(@(@=@(@.@@@@@ZP@@@@@@@@@@@@@B@@A@@@,$P P@<N@PP@uPP@PPV@PX@PZ@(@(@(@@(@@VP@XP@ZP@@@@@@@@@@@@@B@@A@@@,$P P@[O@PP@;|PP@PPh@@@LB@hP@;PP@PPh@@@; B@?hP@_PP@PPh@PP~@|@@B@hP@_PP@PPh@PP~@|@@B@?hP@PP@PPh@hPPPPP~@|@@F@PP@@@P@2@hP@2@~@P@|@@iK@@@@K.@(@[@(@L@H@@G@@I@@J@@K@@@@@@@@@@D@@A@@@,$P P@ F@PNP9@; |@@|D@PO@.(@(@(@(@@(@$@(@@D@@@@@@@@@@@@@@@@@@@@B@@A@@@0$PP@z!FB@hPF@P@ PP@"PP@@@PP@ @@`@@@@j@l@PD@@D@@H@@G@@I@@J@@K@@L@@T@@M@@@@N@@O@@A@@@4$P P@j@p@(@(@(@(@@$PP@(@(@D@@@@@@@@P@@Q@@@@@@R@@@@@@@@A@@@4 P@A@p@@@0@[@@ms@(@@@@@@@@@ @@ @@@A@@c@`@]@b@@W@T@@$PP@@@Y0@-T@c@R @(@@@`A@@@@@@ @ @@ @@@@@0@-@*@+@%@"@(@@$P@P@@)0@X" @(@@@@ @@@@@ @@ @@@A@@ @@@@@@@@$PP@@@0@. @c@@(@@b@A@@ @@@@@ @@ @@@@@@@@@@@@@$P@P@+D@P4O@2O@@@1@F@@(@Q@F@P@@R@0>@>@P@0F@`.$.@EF@p@v@x@P$@"@@((@)(@*(@,@+(@.@H@2@G@4@I@6@(@8@)@:@*@<@,@>@+@@@.@B@B@D@A@F@0@,$P P@v@!B!+7datebin_  symbol_table= sub_err_decode_clock_value_allencode_clock_value_$offsets')hcs_initiate,.1sys_info time_zone47:B 3`shiftI=t@@datebin_$shiftNBtEwkdaySI`LtimeYN`Qdayr_clk^S`VrevertdY`\ revertabsj^R`a clockathrpd`g datofirstuj`mdayr_mo|p`s last_midnightu>`x this_midnight|O`preceding_midnightc`following_midnightw`next_shift_change` test_datebin"`.&&&&&+&3&<?#?#>system_control_dir symbtreeMLMTL*PL/I 3!& *dnnnMultics PL/I Compiler, Release 29, of July 28, 1986GJohnson.SysMaint.aoptimize map<-mMT1H.m+MST$6~F%]["K>special_ldd>install>MR12.1-1054>datebin_.pl1>spec>install>1056>installation_parms.incl.pl1>ldd>include>rcp_init_flags.incl.pl1>ldd>include>whotab.incl.pl1pl1info ldatebin_B! _B`_ B!W!A; h+z6  B |E|%QA iZ _|IOg9O  G| 3\dPk ++@kVj+UXVBk  +V`Zk PV`Zk PPPPXV@\@eU*eU*obj_map @T.4  display_time_info 09/16/86 1116.4re 09/16/86 1116.3 160056 W| | | | | | | | | | | | | | | | | | | ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyztinfo002display_time_infoVVT^a^/+99:00V+10+13TV?GVX@NTTT TT%TTLXTX TXdTT#V TTT T T TTXT 4TT*VT#T"V-tb-map-fmt-da-day-all@X^6i: ^a^a-----^atokenstokensversion-zones-zone-words-word-token-table-offset-month-lang-format-days?#+60000000+3600000000 Other words^aword_namesword_namesoffset_names^aday_namesday_namesmonth_names^azone_nameszone_names^aversiontime_info_$-language Language name^24a "^va"^[^/^]^aoffset_names^amonth_names^alanguage_nameslanguage_names^/known time zones:item.table(^i) =^b^adate_time_keywordsdate_time_keywords^[^s ^a:^; ^vx ^s^] ^a Day name (long, short) Named format stringsdefault_language_indexToken not found in ^a. ^a Month name (long, short) Usage: dsti -control_argsToken(^3i): "^a"^[ (ambiguous)^] Zone info(short,offset,long)^a is not a zone in time_info_.^a is not a language in time_info_.Missing value for -table argument. Offset("this",singular,plural,short)No other control args allowed with -token.sPP%@xPP%@o@(@Y(@ @@ @@ @@ "@@(@R@r@@t@@v@X@x@p@P@X@ s(@$PPx@Jz@ P~@@$PNP s@P~@=@ Px@z@s(@Px@4z@R@ PX@Y@ `@$kZ@T@T@N@[T@|@V@~@S@@X@@z@~@@VPS@ F` F` @@@ F`  F` F`@1 F` F` @& F`  F`)T@RN@#>@@|@V@~@S@@X@@z@~@@VPS@T`-.@.@>N @@` T,@@@ F`V@ F`q@ F`h@ F`_ F`<NT@RN@.>@@|@V@~@S@@X@@z@~@@VPS@T`-.@.@>NS@>i@S@ `@` E@N@ `@` @T,@@ F`(@@@$p$@@@p@@@@@@ $P P@@ F`%@T@RN@>@@|@V@~@S@@X@@z@~@@VPS@T`-.@.@>Ni @@` T,@d F` F`@Y F` F`%@T@RN@L>@@|@V@~@S@@X@@z@~@@VPS@T`-.@.@>N2 @@` T,@-T`-.@.@>N$PPX@$PPX@S@V@^a@X@@7@@@@@j@j@e@@@@ P@@T,@@@(@@@;,z,@@@z@@M@J@C@@ $P P@@@@@ F` @ `@$@>@T@@i@@ `@`@ O@<@P@@@X@@@@@@@@ @@$PP@ @X@[[p@nr@X@@@p@@@@@@@@@$P P@@P@@ F@$PPX@@i@@ `@`@ O@dNdY@ `@`Z @@>@T@@i@@ `@`@ O@_@n@n@@X@@@@@@@@@@$PP@ @X@@i@@ `@`@ O@<dNdY@ `@`Z @PB@@u@@>@T@@i@@ `@`@ O@ @@@@X@@@@@@t@w@@@$PP@ @X@p@r@t@X@@*@p@@@@]@]@Q@P@@$P P@@PD@@>@T@@i@@ `@`@ O@@kn@n@@X@@@@@@-@0@;@@$PP@ @X@p@r@X@@@p@@@@@@ @ @@$P P@@PF@@ >@T@@i@@ `@`@ O@J @&@@@X@@@@@@@@@@$PP@ @X@++p@*r@X@@@p@@@@@@@@@$P P@@PH@@@@@@ >@T@@i@@ `@`@ O@ @n@n@@X@@@@@@@@@@$PP@ @X@p@r@X@@V@p@@@@@@z@|@@$P P@@PJ@@ >@T@@i@@ `@`@ O@ @@@@X@@@@@@Y@\@g@@$PP@ @X@p@r@X@@@p@@@@D@D@4@7@@$P P@@PL@@ >@T@@i@@ `@`@ O@g @Rn@n@@X@@@@@@@@"@@$PP@ @X@np@nr@X@@@p@@@@@@@@@$P P@@PN@@ >@T@@i@@ `@`@ O@ @ @@@X@@@@@@@@@@$PP@ @X@p@r@X@@@p@@@@@@@@@$P P@@PP@@>@T@@i@@ `@`@ O@@n@n@@X@@@@@@@@@@$PP@ @X@n@X@@C@n@@@@v@v@c@i@@$P P@@P@ F@ @tt@@ F@ $P P@@@  @ft@ PF@q*@@AN(@@@$p$@@@p@@@@;@8@#@"@@$P P@@P@ F@ -~@6t@ PF@q*@@AN(@@@ p @@@p@@@@ @@@@@$P P@@P@@@@@0@P@>@@@@@@@@@N@@@FP @@@@ >@~@@@FPF@@@@@$PP@@`BQ@Q@Q@@@@@$PP@DP@v@v@N@,@@@@v@)v@NJ@@@@DPO@O@O@@@@@@s@@@m@@$PP@v,@@@@.@@@@d@@$PP@@@v@ v@N@q@(@@@v@@@@C@;@a@@ $PP@v,@@H*@@@@'@@$PP@v@v@ NE@(@vW@@v@@@@@@5@@ $PP@v,@@P.@@@@@@@$PP@v@ v@N@(@:'@@v@@@@@@@@ $PP@v,@@D.@@((@@@@$PP@NP@@v@ v@N@@(@@@v@@@@@@@@ $PP@v,@@B.@@@@@@$PP@PP@@v@v@N@@(@@@v@@@@@@@@ $PP@v,@@@A<@0@P@>@@@@@@@4  @@U@@$PP@@@@v@ v@N@s@(@t@@v@@@@E@=@c@@ $PP@v,@,@lW@w0@P@>@u@@@@@@P@@@t@t@N@< PF@q*@@@@  @NC@@@@t@@O@@@@@@@@@$PP@P@@@N@v>@@A@N@T@@ >@LPFO@ `@`@NFP @@@@ >@~@FPFO@ `@`@N@@@ >@JPiFjO@ `@`@NNP@$@@@@$>@~@FO@ `@`@NPP@ @@@@ >@~@@@@>>@FO@ `@`@fNHP@@@@@>@~@FO@ `@`@RN3NP@$@@@@$>@~@F>i@O@ `@`@@ N@@>O@@@O@ e@`@>@@@ E@@@N@@ `@` @(@@@@@ @@@@@@@A@>@@@@@$P P@|@@@@ @N@0~@@$>@P6F$@@@:@@|@@@@@@@@@@@@@@$PP@|@,@,@t,@@^a@X@@@@@Z@@@@@@@x@@@@@(@PPT@P >@LPN~@N@@@.@ m@`~@N@.@ m@$6LPN~@N@@@.@ m@`@dFP @P@P >@~@FPN~@N@@@.@ m@`MP@P >@JPjN~@N@@@.@ m@`~@N@.@ m@$JPgN~@N@@@.@ m@`@#NP@$@P@P$>@~@N~@N@@@.@ m@`@@N,@ F@N~@N@@@.@ m@`~@N@.@ m@$N~@N@@@.@ m@`@~@N@.@ m@$N~@N@@@.@ m@`PP@ @P@P >@~@@@@@>>@N~@N@@@.@ m@`@@P@P>@~@F@ F` b@ F` e@~@N@.@ m@$[~@N@@@.@ m@`HP@@P@P>@~@(@F@ @@`@@~@N@.@ n@`@N,@ F@-@N@@@@@~@N@.@ o@`~@N@.@ o@$HP@@P@P@@P>@~@O~@N@@@.@ n@`4NP@$@P@P$>@~@N~@N@@@.@ m@`@~@N@.@ m@$N~@N@@@.@ m@`@N,@ F@PP(~@N@.@ o@$FP @P@P >@~@FPO~@N@@@.@ n@`@@N,@ F@@ P@ `@`@@@@P @-i` @+i` @ @@@@@@@ @@[ ?@ @@@@@@@PP @@@@@@@A@P@@i@PP `p`@d @@`  @@P@@N@>@Ft@ PF @F@  @@t@>@t@~@@u`.@.@@@@~@@T@(@@@L@i@@ `@`@ @i @@@@@@@}@@@@@$P P@ @@@ @"@@&@W(@$@$PP@*@*@.@X@0@M@2@,@ $P"P@M@~FN@>K@v@v@N@AO@HP@#@@4@v@4>@#~@F8@$@:@%@<@6@ @,#@$@@@@#44@N>@~@@@@@5)(@@@5A)5@)@@@ 5@@#5@@5*@@*NN@>K@)(@@%)$@6@&@%@$@L@5@&@@#@)@@@@#5K@ @@$*#@$@@@@@#5@@@@r*@@*mB@@BA@uL@@@@A@@@@'@Z5 '@>@@@@.@'@.@HP@@@@A@v@A>@@~@ >O>O(@O@k@~(>@MN@f@@#5bO(@$@6@P@^a5@5@8@*@:@<@>@6@$PP@K@^@'@ '@^N@!5@$P@@@v5oH@P@.@'@ O@@.)@@5 @@@@#P(@@@#P'.@^a#@#@8@*@:@<@P>@6@$PP@K@ @@$ *@(~@>^a#@#@8@*@:@h<@9>@6@$PP@O@T&@6@R@Q@Q@0NQ,@ F@R0Q~@NQ@Q.@ o@`LR0Q~@NQ@Q.@ o@$RHP@#@@@@v@@>@#~@O0Q~@N@@Q@Q.@ n@`@RQ@0NQ,@ F@RO0Q~@N@@Q@Q.@ n@`R@~#@#~@@Q@ n@`R )d@(~@> R@Q@HP@#@@@@v@@>@#~@O0Q~@N@@Q@Q.@ n@`@RQ@0NQ,@ F@bRO0Q~@N@@Q@Q.@ n@`R0Q~@NQ@Q.@ n@$KR0Q~@NQ@Q.@ n@`&RQ@0NQ,@ F@3R0Q~@NQ@Q.@ n@`LR@(~@#@> `@*(@>#@Q@ e@`R+^a#@#@8@*@:@<@r>@6@$PP@v,@v@HPN@@#@@@@v@@>@#~@F8@&@:@L@<@6@ @aj@P&eO@N$@6@P@K@ @@$ *^a#@#@8@*@:@k<@<>@6@$PP@K@_@'@'@_N@!#@P@@@,#%H@P@.@'@ O@@.)@@#5@@5@P(@@@@GP'.@ @@@@8@*@:@<@>@6@$PP@@@&@&(@$@$PP@@`@b@P@D@@@Df @@L f m@@mH F@@@Ff j @@= j JbPP@@J @P@@m`@a   !"#$%&'()*+,-./0123456789:;<=>?@abcdefghijklmnopqrstuvwxyz[\]^_`abcdefghijklmnopqrstuvwxyz{|}~      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~8 !!!!! e!!v!! O!!v!! N!!v!! ~!!v!! }!!v!! !!v!!!c!c!c?#:+0+2+7+1) ( ? , ] [|-asss9 99display_time_info symbol_tables active_fnc_err_com_err_cu_ af_arg_ptr # af_return_arg&*arg_ptr-/ cv_entry_225 error_table_bad_arg8<>badopt8ACnoarg8FH not_act_fnc8KNunimplemented_version8QWioa_ZZ\time_defaults_language_cfget_line_length_switchinpxg`dsti{sn`v$&&&%&,&1&7&@&E&J&P&Y&^&h&rsymbtreeL*JGvL PL/I 3!& *errrMultics PL/I Compiler, Release 29, of July 28, 1986GJohnson.SysMaint.aoptimize map<6fqLJ&XT@KT XTEK\$f CLR->special_ldd>install>MR12.0-1159>display_time_info.pl1>ldd>include>time_info_search.incl.pl1>ldd>include>time_names.incl.pl1>ldd>include>time_defaults_.incl.pl1pl1info mdisplay_time_infoe@ P<O7 <=O4x><QO4x izF<9Ot=x/:~<)O4xOi<;OtMyc4 $Sty6i<kOpx/ xn!0PVjZZjZ@ ZP P+kZkVk#UPZj@eU*eU*eU*eU*eT obj_map |t$|R  set_time_default 08/19/86 2036.6re 08/19/86 2036.6 121968 /.+*date date_time time language lang zone debug db -sys -system print_time_defaults set_time_defaultabcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZTT XdX?V?GTT(T TT TTT%T XT T$T,VTToffTTV LT&TT"timedateX TT:-popVTV#true4X@Vstd_stk zone: false?#^a "^a"-system-pushlanguage:time format:date format:system_zonesystem_timesystem_langsystem_datedate_time ^vx ^aDefault ^a ^a (system_zone, (system_lang)system_date_timedate/time debugging:date/time format:Setting zone "^a". (** UNKNOWN KEYWORD **)return_conversion_errorSetting language "^a".System default language: ^aSystem default zone: ^a ^a (^a)System default time format: "^a"System default date format: "^a"No value available to pop. ^aSetting debug switch to "^a".Active function must have a keyword.The keyword is not usable here. ^aSystem default date/time debugging: "^a"System default date/time format: "^a"^[ Format is: "^va" error at: ^vx^^^]Active function only accepts one keyword. ^a^a USAGE:^-std key value {-push} value may be -pop or -sys0P%@0P%@0P%@$$POP.@$P@N@@G@ cN@c@dPdP `@$J@L@(@a(@b(@U(@(@@@@B@ B@N@B@@D@@A@@F@@@P@@DPA@ F`b@lU@ F`V36@^@ ^@N@  DPA@ `F ^,@A@V@^a@$P*P@{@@@DP@@@@@@@J@@@A@ N U@ `@`V2@ F` F` F`@ F`a@A@@N@@ `@`T`-.@.@>N$P,PF@$P*PF@B,@|@ F`"$P2PF@D@D@A(@A@V@@@&<<F@@@@@@@P@M@G@@@@J@@@^@Na@@@@NG@$P.P@@@@V@@@@,@)@"@@(@@J@@@@ F` @ F`@ F`; (@@@$$@@@@@@@@@@@@J@@@T@@i@@@ `@`O@@F@@@@@@@ $P P@ @F@(@@((O@C@@F@@@@@@@@@@ @O@ @@@@@@@@@J@@@b@a@ $P@0@@@@4P@^@b@$PDPT@DPi@@DPDP `@`@@@@@@@ @a@ $P@@DP@@@@@  $PDPDP `@$@$PDPDP `@`@b@$PBPT@BPi@@BPBP `@` @@\@@@@@ @a@ $P @@BP@@@@@ $PBPBP `@$z@$PBPBP `@`@b@$P@@HP@-@@@V@a@ $P@@@@@w@@ @ `@$6@T@@i@@@ `@`F@@@@@@$P&P@ @F@#@@SF@@@@@@@@@@@@J@@b@ $P@@@@@5@@b@$PFPT@FPi@@FPFP `@`@@@@@@@ @a@ $P@@FP@@@@@  $PFPFP `@$@$PFPFP `@`@b@$PNPT@NPi@@NPNP `@`@@@@@@@ @a@ $P@@@@@@@ @ `@$@T@@i@@@ `@`F@@@@c@@$P(P@ @F@&@@".@F@@@@@@@K@H@5@I@@J@@b@ $P@@@@@@@b@!$PRPon@ @@@@*@$@@S@ @ @@@@@@@D@a@ $P @@@@@e@@@@@ F`^@ F``@0@ F`@ F``(@$@@n  $P*P@@@@@@@@@@@J@@b@ $P @@@@@"@`@$PRP@(@@@>  @@|@@@V@@@@@@@J@@@0P%@0P%@0P%@$$$PPOP.@$P@N(@@yN@@@@@B@B@N@hB@@D@@A@@F@@@P@@H(@T@T@ N6H@4 DPA@ `F +H@G@#@ T@NA@V@(@@@,,@@ @@@@@=@/@,@@@@J@@@T@O0T,@H@A@V@^a@$P,P@@@@DP@$@ @@@@@J@@N@B,@@@@G@@(@@@$$@@@@@@@@@ J@@@N@@@ @@@$PRP@@@M@@@M@)$P<PFcN@c@OdPdP `@`@ $PDPcN@c@dPdPDP `@`@G@/@c@X@@@7  @@dP@@@@@@6P@c@X@@@@@@@dP@@@@@@@ 4@@L@R$P<PFcN@c@OdPdP `@`@ $PBPcN@c@dPdPBP `@`@G@.@c@X@@@((@@dP@@L@@@@6P@c@X@@@ @@@@dP@@T@3@@@@ @@@N@{$P<PFcN@c@OdPdP `@`@ $PFPcN@c@dPdPFP `@`@G@0@c@X@@@  @@dP@@@@@@6P@c@X@%%@$@@@@@dP@@@@@@@ @@0l@$P>P @:P@:P >@~@>PFcN@c@OdPdP `@`@$PHPu@ >@.@.@@@ ~@cN@c@dPdPHP `@`@G@=@c@X@@@"@@dP@@@@@@6P@':PJNP dPc@~@N@.@ e@$c@X@@:@@@@@dP@@@s@@@@ @@@dcN@c@dPdP$P8P `@`@G@:P_@@T@@i@@@ `@`@@@@@i@@@ "P@ @c@X@_@@@  $P@P@@_@@@>@~@@v@@@@@ $P@P@@_@@@>@~@@@@@dP@@@F@@ @@@@@@6P@j$PNPcN@c@dPdPNP `@`@G@](@8P @p@@i@@ `p` `F@ c@~@N@.@ e@$1  @c@~@N@.@ e@$PLPc@~@LNPLP@.@ e@`@@cN@,@ F@=c@X@PP@@@@@ @@ @@@$P@@@@dP@@@@@@@ B@@l@ cN@c@dPdP `@$$PRP cN@c@dPdP `@$ cN@c@dPdP `@$G@2@c@X@@@/((@@@@d@@@@$P6P@2c@X@@@@$P @@@@@@n@G@@@@ @@ F` cN@c@@ `@$X cN@c@@ `@$X@ @P'@ PcN@c@dPdP `@$G@@@@P@-i`@+i`@@@!@@@! @@ T@@[?@@@ @@@ !@@!PP @@@@@@N(@@@$@d@&@c@(@F@*@"@$PP@F@ G(@$PPJ@L@PP@R@!$P0NPG@PP@R@PJ@L@f@d@c@G(@F@$@&@(@*@"@P@N@@P(@"PP@U@T@$PP@@@@@PP@P@U@@N@@P `@`PT@@@@P'@T(@PP0@@PP@P@@@@B@ `@`@C@PP@@@T@ B@PP@ `@`C@@@@P(@"PP@U@P@V@T@S(@P(@"PP@U@P@V@T@S@X@Z@PPx@]@z@"P@P~@@v@U@X@@PP@]@@ @"P@P@ @@ $P6P@PP@P@@ @@10@0@P@XW@JX@JZ@@i@x@@ `@`]@z@W@~@@v@ @X@@U@@]@@@@@@ $P6P@ @@PP@@T@E@@@$pP(@"PP@]@P@P@dNd@@ `@`A P@S@@T`^.@.@>N@ PH(@<P[@Z@ Z@[N@5 P PH@1$P<P^@)FP@P@ `F@ `@"d@~@N@@@.@ o@$A`@Od@~@N@@@@@.@ n@`A@@dN@,@ F@A P@ P@H@Z,@ P PH@Yd@~@N@@@.@ o@$AN@ PH(@<P\@Z@Z@\N@E P PH@A$P<P^@)FP@P@@ `F`2d@~@N@@@.@ o@$AZ@)F`@u@ >@.@.@@a@ a~@a@`@`@`@d@~@aN@a@@@@.@ o@eA@@dN@,@ F@A P@ P@H@Z,@@@PP@ `@`A@@?#8  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`ABCDEFGHIJKLMNOPQRSTUVWXYZ{|}~      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~) (onset_time_default symbol_table active_fnc_err_com_err_cu_ af_arg_ptr # af_return_arg&*arg_ptr-/ date_time_ valid_format259get_time_info_index2<Aset_time_defaults2DIset_lang2LOset_zone2RU error_table_bad_argX\^badoptXacbigargXfh not_act_fncXknwrong_no_of_argsXqvget_system_free_area_yyioa_sys_info time_zone time_info_default_language_indexdate_time_keywordslanguage_names zone_namestime_defaults_ date_timedatetimelanguagelanguage_index zone_long zone_short zone_deltadebug?`DF`stdM`print_time_defaults`print_time_default`ptd ` return_falsepush poplist list$format$form'y"T?#?#?#?#?#?#?#&&&%&,&1&;&C&K&Q&W&`&e&j&p&x&&&&&&&&&&&&&&&&symbtreeL*JGvL5PL/I 3!& *jvvvMultics PL/I Compiler, Release 29, of July 28, 1986Martinson.SysMaint.aoptimize map<5fLJ XTEKR&XT@K\8fL]>special_ldd>install>MR12.0-1120>set_time_default.pl1>ldd>include>time_names.incl.pl1>ldd>include>time_info_search.incl.pl1>special_ldd>install>MR12.0-1120>time_defaults_.incl.pl1pl1info rset_time_default#SpxSx[0P(^( P oEx/ P)<=(^( P o|EO|n'x6in < tS4_ s  i)| <O4@<K@O x  Z(P ?> <eO4x 3@PVjZZjZ@ Z_j+Zk Z@k _j+Vj_j@k@+Z@k Zjk V`Z +XV@C9UYUYUYUYUYUYUYUYUYUY`obj_map (TB0