Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Divide time
Message
De
27/01/2005 14:35:58
 
 
À
27/01/2005 14:18:33
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Versions des environnements
Visual FoxPro:
VFP 5
Database:
Visual FoxPro
Divers
Thread ID:
00981137
Message ID:
00981383
Vues:
43
You're welcome!

>hi,
>thank you so much,it works.
>m.qasem
>>Hi Mohammed,
>>
>>as I have told you before: SHOW the time, CALCULATE seconds! Try this:
>>local lnSec10,lnSec11
>>SUM CTOT(plan) - CTOT("00:00:00") to lnSec
>>* ? PADL(INT(lnSec/3600), 2, "0") + ":" + ;
>>				PADL(INT((lnSec%3600)/60),2, "0") + ":" + ;
>>				PADL(lnSec % 60,2, "0")
>>
>>SUM VAL(LEFT(plan,2))*3600 + ;
>>	VAL(SUBSTR(plan,4,2))*60 + ;
>>	VAL(RIGHT(plan,2)) TO lnSec
>>lnSec10=lnSec
>>
>>THISFORM.TEXT10.VALUE= PADL(INT(lnSec/3600), 2, "0") + ":" + ;
>>				PADL(INT((lnSec%3600)/60),2, "0")
>>
>>*				lnCost=thisform.text3.value
>>*THISFORM.TEXT10.VALUE = ROUND(lnSec/3600*lnCost,2)
>>SUM CTOT(true) - CTOT("00:00:00") to lnSec
>>* ? PADL(INT(lnSec/3600), 2, "0") + ":" + ;
>>				PADL(INT((lnSec%3600)/60),2, "0") + ":" + ;
>>				PADL(lnSec % 60,2, "0")
>>
>>SUM VAL(LEFT(true,2))*3600 + ;
>>	VAL(SUBSTR(true,4,2))*60 + ;
>>	VAL(RIGHT(true,2)) TO lnSec
>>lnSec11=lnSec
>>
>>THISFORM.TEXT11.VALUE= PADL(INT(lnSec/3600), 2, "0") + ":" + ;
>>				PADL(INT((lnSec%3600)/60),2, "0")
>>thisform.text12.value=transform((lnSec11/lnSec10)*100)+'%'
>>
>>
>>>hi all,
>>>i need help, to divide two times via the code under as..
>>>thisform.text12.value=(thisform.text11.value/thisform.text10.value)*100%
>>>
>>>SUM CTOT(plan) - CTOT("00:00:00") to lnSec
>>>* ? PADL(INT(lnSec/3600), 2, "0") + ":" + ;
>>>				PADL(INT((lnSec%3600)/60),2, "0") + ":" + ;
>>>				PADL(lnSec % 60,2, "0")
>>>
>>>SUM VAL(LEFT(plan,2))*3600 + ;
>>>	VAL(SUBSTR(plan,4,2))*60 + ;
>>>	VAL(RIGHT(plan,2)) TO lnSec
>>>
>>>THISFORM.TEXT10.VALUE= PADL(INT(lnSec/3600), 2, "0") + ":" + ;
>>>				PADL(INT((lnSec%3600)/60),2, "0")
>>>
>>>*				lnCost=thisform.text3.value
>>>*THISFORM.TEXT10.VALUE = ROUND(lnSec/3600*lnCost,2)
>>>SUM CTOT(true) - CTOT("00:00:00") to lnSec
>>>* ? PADL(INT(lnSec/3600), 2, "0") + ":" + ;
>>>				PADL(INT((lnSec%3600)/60),2, "0") + ":" + ;
>>>				PADL(lnSec % 60,2, "0")
>>>
>>>SUM VAL(LEFT(true,2))*3600 + ;
>>>	VAL(SUBSTR(true,4,2))*60 + ;
>>>	VAL(RIGHT(true,2)) TO lnSec
>>>
>>>THISFORM.TEXT11.VALUE= PADL(INT(lnSec/3600), 2, "0") + ":" + ;
>>>				PADL(INT((lnSec%3600)/60),2, "0")
>>>
>>>thanks.
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform