FB99
This block can convert DINT to S5Time and very useful when you want take Time(Sec) from WinCC or Protool or ...

Time_INT(Input) : Time (Sec) in DINT Format
S5Timer(Output) : Time in S5TIME Format
Remain_Time_Int(Input) : Remaining Time in DINT Fromat (From "BI" S5Timers)
Shoe_Time(Output) : Remaining Time in DINT Format (For showing in WinCC)

Hello Sydney
This function same as FC40 (TIM_S5TI) from Standard liberary.
For writing this function at the first I study source of FC40 and change it with my request.
------------------------------------------------------------
Source FC40 (TIM_S5TI) (SIEMENS Liberary):
SET
SAVE // BIE setzen
L 0 // Zeitbasis löschen
T #y_Base
L #IN
T #d_Temp
L 0 // Zeitwert negativ
<D // ja, dann S5_Time := 0
JC FEHL
TAK
L L#9990000 // Zeitwert > als erlaubt
<=D
JC LOP
L W#16#3999 // ja, S5_Time := 3.999
JC FEHL
LOP: L #d_Temp // Zeit
L L#10
/D // Zeit : 10
T #d_Temp
L L#999 // Ergebnis : > 999
<=D
JC FERT // ja, dann Basis + 1
L #y_Base
INC 1
T #y_Base
JU LOP
FERT: TAK // Zeitwert holen
DTB // Wandlung BCD
L #y_Base // Basis einblenden
SLW 12
OW
JU RET
FEHL: CLR // BIE := 0
SAVE
RET: T #RET_VAL
BE
------------------------------------------------------------
Source FB99 (TIM_S5TI) (My Liberary):
SET
SAVE
L 0
T #y_Base
L #Time_INT
L L#1000
*D
T #d_Temp
L 0
<D
JC FEHL
TAK
L L#9990000
<=D
JC LOP
L W#16#3999
JC FEHL
LOP: L #d_Temp
L L#10
/D
T #d_Temp
L L#999
<=D
JC FERT
L #y_Base
INC 1
T #y_Base
JU LOP
FERT: TAK
DTB
L #y_Base
SLW 12
OW
JU RET
FEHL: CLR
SAVE
RET: T #S5Timer

L #Time_INT
T #INT_Time

A(
L #INT_Time
L L#10
>=D
)
A(
L #INT_Time
L L#100
<D
)
JNB _001
L #Remain_Time_Int
L 10
/I
T #Show_Time
_001: NOP 0

A(
L #INT_Time
L L#100
>=D
)
A(
L #INT_Time
L L#1000
<D
)
JNB _002
L #Remain_Time_Int
T #Show_Time
_002: NOP 0

A(
L #INT_Time
L L#1000
>=D
)
JNB _003
L #Remain_Time_Int
L 10
*I
T #Show_Time
_003: NOP 0

BE
------------------------------------------------------------
So, there are some difference between FC40 and FB99.
In line 3 of Source (FB99) you seeing this:
L #Time_INT
L L#1000
*D
T #d_Temp
so , time base is Secound ,no milisecond.

And about input of FB99 :
You are right, but there is a facile solution.
For example, for 300 Sec :

A(
L L#300
T MD 0
SET
SAVE
CLR
A BR
)
JNB _001
CALL FB 99 , DB99
Time_INT :=MD0
Remain_Time_Int:=
S5Timer :=
Show_Time :=
_001: NOP 0

So FB99 work correctly.
I think FB99 is onlyuseful and it's not very interesting and exceptional.

Thank you for your attention.