Skip to main content
A
amedina1-Visitor
1-Visitor
March 11, 2011
Question

pro/e time clock logging

  • March 11, 2011
  • 3 replies
  • 1725 views
Is there a way to log the wait time between actions when the clock window is
shown? We are trying to figure come up with a gauge of how much time is
wasted to waiting for the computer to do something.

regards,

Alfonso

    3 replies

    A
    amedina1-VisitorAuthor
    1-Visitor
    March 11, 2011
    Actually, I want to use the clock or some other Proe event to figure out how
    much time people have to wait for something to load or a drawing to
    refresh.... to be able to show that we can make an economical business
    decision to upgrade some hardware.

    regards,

    Alfonso

    <james_<br/>
    > Alphonso,
    >
    > Not sure if it is still the case but the clock used to steal the window
    > "focus" and generally cause annoyance so I've had clock no in my config for
    > years.
    >
    >
    >
    >
    > Is there a way to log the wait time between actions when the clock window
    > is shown? We are trying to figure come up with a gauge of how much time is
    > wasted to waiting for the computer to do something.
    >
    > regards,
    >
    > Alfonso
    >
    M
    mjenkins10-Marble
    10-Marble
    March 11, 2011

    You can run the OCUS benchmark and compare to hardware times listed on the website:


    http://www.proesite.com/newframe.htm?/OCUSB5/ocusb5.htm

    In Reply to alfonso medina:


    Actually, I want to use the clock or some other Proe event to figure out how
    much time people have to wait for something to load or a drawing to
    refresh.... to be able to show that we can make an economical business
    decision to upgrade some hardware.

    regards,

    Alfonso

    <james_<br/>
    > Alphonso,
    >
    > Not sure if it is still the case but the clock used to steal the window
    > "focus" and generally cause annoyance so I've had clock no in my config for
    > years.
    >
    >
    >
    >
    > Is there a way to log the wait time between actions when the clock window
    > is shown? We are trying to figure come up with a gauge of how much time is
    > wasted to waiting for the computer to do something.
    >
    > regards,
    >
    > Alfonso
    >
    A
    amedina1-VisitorAuthor
    1-Visitor
    March 11, 2011
    here is the perl program i wrote. it parses the trailfiles out put by proe.
    Each time you open a part or assembly or drawing it will produce two lines
    like this one:

    !10-Mar-11 14:46:51 Start ilws://location/part.prt.1
    !10-Mar-11 14:80:51 End ilws://location/part.prt.1

    So I take the times and get the difference. This will show directly what the
    benefits of WF2 to WF4 will be when opening stuff. Unfortunatelly OLEF's
    program cannot handle just random trail files to compare. Its trailfile
    sends a time stamp command every time it changes the stuff its testing. That
    way the OCUS test can just show how long it took. I want to do the same
    here, but I can't expect people to send out a time stamp even every time
    they do something.

    regards,

    Alfonso


    #!/usr/local/bin/perl -w
    # written by Alfonso Medina O
    # this program's intension in to obtain useful data from the result of
    runing the ptc status command
    use strict;
    #use Data::Dump::Streamer;
    our @lines;
    our %seen; #prevent repeats
    our %part;
    our @parts;
    our $item = "time_keep.txt";
    our $timstart=();
    our $timend=();
    our $elapsed=();
    our $size=();

    open(FILE,"$item") or die "Cannot open '$item' error given: $!";
    @lines = <file>;
    close(FILE);
    #chomp (@lines);
    #shift (@lines);
    #shift (@lines);


    foreach my $line(@lines) {
    #print "$line\n";
    #!10-Mar-11 14:46:51 End ilws://csdcad2/43474/ESQ102.prt.1
    if ($line=~/(\d*)\:(\d*)\:(\d*)\s*(\S*)\s*ilws(\S*)/){ #if there are
    leading spaces. this makes sure we have good data for the rest
    my $state = "$4$5";
    $seen{$state}++;
    next if $seen{$state} > 1;
    $part{$5}{part}="$5";
    $part{$5}{state}="$4";
    $part{$5}{$4}{seconds}="$3";
    $part{$5}{$4}{minutes}="$2";
    $part{$5}{$4}{hours}="$1";
    push(@parts, "$5");
    #print "$1, $2, $3, $4, $5\n";
    }
    }
    %seen=(); #prevent repeats
    foreach my $line(@parts) {
    $seen{$line}++;
    next if $seen{$line} > 1;
    #print
    "$part{$line}{Start}{seconds},$part{$line}{Start}{minutes},$part{$line}{Start}{hours}\n";
    $timstart=$part{$line}{Start}{seconds}+(60*$part{$line}{Start}{minutes})+(60*60*$part{$line}{Start}{hours});
    $timend=$part{$line}{End}{seconds}+(60*$part{$line}{End}{minutes})+(60*60*$part{$line}{End}{hours});

    $elapsed+=$timend-$timstart;
    #print "$elapsed\n";
    $size++;
    }

    print "Time elapsed while opening $size items\n$elapsed seconds\n";
    Terms & ConditionsCookie settingsAccessibility statement