Edit D:\app\Administrator\product\11.2.0\dbhome_1\owb\lib\int\tcl\lang\ClockCmd.class
?? -? tcl/lang/ClockCmd java/lang/Object tcl/lang/Command validCmds [Ljava/lang/String; CMD_CLICKS I ConstantValue CMD_FORMAT CMD_SCAN CMD_SECONDS clicksOpts OPT_CLICKS_MILLISECONDS formatOpts OPT_FORMAT_FORMAT OPT_FORMAT_GMT scanOpts OPT_SCAN_BASE OPT_SCAN_GMT EPOCH_YEAR ? MILLIS_PER_HOUR 6? cmdProc )(Ltcl/lang/Interp;[Ltcl/lang/TclObject;)V Exceptions # tcl/lang/TclException Code LineNumberTable LocalVariableTable ( tcl/lang/TclNumArgsException * option ?arg ...? , - <init> <(Ltcl/lang/Interp;I[Ltcl/lang/TclObject;Ljava/lang/String;)V ' + / 2 option 4 5 get N(Ltcl/lang/Interp;Ltcl/lang/TclObject;[Ljava/lang/String;Ljava/lang/String;I)I 7 3 8 tcl/lang/TclIndex : ?-milliseconds? ; > switch clicksOpt A B currentTimeMillis ()J D @ E java/lang/System ??? I J setResult (I)V L H M tcl/lang/Interp millis J clicks R (clockval ?-format string? ?-gmt boolean? 4 T ((Ltcl/lang/Interp;Ltcl/lang/TclObject;)I V S W tcl/lang/TclInteger X [ \ toString ()Ljava/lang/String; ^ Z _ tcl/lang/TclObject 4 a ((Ltcl/lang/Interp;Ltcl/lang/TclObject;)Z c ` d tcl/lang/TclBoolean formatOpt argIx h i FormatClock ((Ltcl/lang/Interp;IZLjava/lang/String;)V g clockVal m ,dateString ?-base clockValue? ?-gmt boolean? n scanOpt r java/util/Date ? , v (J)V q u seconds baseClock Ljava/util/Date; , | ()V q { ? GetDate 5(Ljava/lang/String;Ljava/util/Date;Z)Ljava/util/Date; ~ ? java/lang/StringBuffer ? { ? $unable to convert date-time string " ? ? append ,(Ljava/lang/String;)Ljava/lang/StringBuffer; ? ? ? " ? Z , ? &(Ltcl/lang/Interp;Ljava/lang/String;)V "