Crystal Syntax Time Conversion

Hi, I need to do the same conversion for SysTime but using a Custom VB.Net Code in the Script Editor of the Part Transaction History Tracker. Can anyone please help?

Thank You
--- In vantage@yahoogroups.com, "Vic Drecchio" <vic.drecchio@...> wrote:
>
> Dustin, create the formula as shown below. Substitute
> {PartTran.systime} with your field that you wish to convert.
>
>
>
> // Formula to convert SysTime field
>
> //
>
> Local Numbervar Minute := ({PartTran.systime} mod 3600) / 60;
> Local Numbervar Hour := Int ({PartTran.systime} / 3600);
> Local Numbervar Second := (Minute mod 60) / 60;
> Local StringVar Hr := ToText(Hour);
> Local StringVar Min := If Len(ToText (Minute)) = 1 then "0" + ToText
> (Minute) else ToText (Minute);
> Local StringVar Sec := If Len(ToText (Second)) = 1 then "0" + ToText
> (Second) else ToText (Second);
>
>
>
> Hr + ":" + Min + ":" + Sec
>
>
>
>
>
>
>
>
>
>
>
> Vic Drecchio
> ERP Administrator
>
> TIMCO Aerosystems
>
> Greensboro, NC
> Email: vic.drecchio@...
> Mobile: 704.530.3092
>
>
>
>
>
> ________________________________
>
> From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com] On Behalf
> Of melissa hietala
> Sent: Monday, February 08, 2010 5:00 PM
> To: vantage@yahoogroups.com
> Subject: [Vantage] Crystal Syntax Time Conversion
>
>
>
>
>
> How do I convert a system time value to an an actual time value in
> crystal? For instance, how do I convert the value of "49,207" to a time
> value equivalent of "13 Hours, 40 minutes, and 7 seconds" (1:40 pm and 7
> seconds?)
>
> Any thoughts?
>
> Thanks,
>
> Dustin Biniek
>
> [Non-text portions of this message have been removed]
>
>
>
>
>
> [Non-text portions of this message have been removed]
>
How do I convert a system time value to an an actual time value in crystal? For instance, how do I convert the value of "49,207" to a time value equivalent of "13 Hours, 40 minutes, and 7 seconds" (1:40 pm and 7 seconds?)
Â
Any thoughts?

Thanks,

Dustin Biniek




[Non-text portions of this message have been removed]
Dustin, create the formula as shown below. Substitute
{PartTran.systime} with your field that you wish to convert.



// Formula to convert SysTime field

//

Local Numbervar Minute := ({PartTran.systime} mod 3600) / 60;
Local Numbervar Hour := Int ({PartTran.systime} / 3600);
Local Numbervar Second := (Minute mod 60) / 60;
Local StringVar Hr := ToText(Hour);
Local StringVar Min := If Len(ToText (Minute)) = 1 then "0" + ToText
(Minute) else ToText (Minute);
Local StringVar Sec := If Len(ToText (Second)) = 1 then "0" + ToText
(Second) else ToText (Second);



Hr + ":" + Min + ":" + Sec











Vic Drecchio
ERP Administrator

TIMCO Aerosystems

Greensboro, NC
Email: vic.drecchio@...
Mobile: 704.530.3092





________________________________

From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com] On Behalf
Of melissa hietala
Sent: Monday, February 08, 2010 5:00 PM
To: vantage@yahoogroups.com
Subject: [Vantage] Crystal Syntax Time Conversion





How do I convert a system time value to an an actual time value in
crystal? For instance, how do I convert the value of "49,207" to a time
value equivalent of "13 Hours, 40 minutes, and 7 seconds" (1:40 pm and 7
seconds?)

Any thoughts?

Thanks,

Dustin Biniek

[Non-text portions of this message have been removed]





[Non-text portions of this message have been removed]
Thanks Vic. This looks like it should get me what I need.

Thanks,

Dustin Biniek




________________________________
From: Vic Drecchio <vic.drecchio@...>
To: vantage@yahoogroups.com
Sent: Mon, February 8, 2010 4:10:59 PM
Subject: RE: [Vantage] Crystal Syntax Time Conversion

Â
Dustin, create the formula as shown below. Substitute
{PartTran.systime} with your field that you wish to convert.

// Formula to convert SysTime field

//

Local Numbervar Minute := ({PartTran.systime} mod 3600) / 60;
Local Numbervar Hour := Int ({PartTran.systime} / 3600);
Local Numbervar Second := (Minute mod 60) / 60;
Local StringVar Hr := ToText(Hour) ;
Local StringVar Min := If Len(ToText (Minute)) = 1 then "0" + ToText
(Minute) else ToText (Minute);
Local StringVar Sec := If Len(ToText (Second)) = 1 then "0" + ToText
(Second) else ToText (Second);

Hr + ":" + Min + ":" + Sec

Vic Drecchio
ERP Administrator

TIMCO Aerosystems

Greensboro, NC
Email: vic.drecchio@ timco.aero
Mobile: 704.530.3092

____________ _________ _________ __

From: vantage@yahoogroups .com [mailto:vantage@yahoogroups .com] On Behalf
Of melissa hietala
Sent: Monday, February 08, 2010 5:00 PM
To: vantage@yahoogroups .com
Subject: [Vantage] Crystal Syntax Time Conversion

How do I convert a system time value to an an actual time value in
crystal? For instance, how do I convert the value of "49,207" to a time
value equivalent of "13 Hours, 40 minutes, and 7 seconds" (1:40 pm and 7
seconds?)

Any thoughts?

Thanks,

Dustin Biniek

[Non-text portions of this message have been removed]

[Non-text portions of this message have been removed]







[Non-text portions of this message have been removed]