// Time To Seconds
FUNCTION TTOS( cTime )
default cTime:= time()
RETURN ( VAL( SUBSTR( cTime, 1, 2 )) * 3600 + ;
VAL( SUBSTR( cTime, 4, 2 )) * 60 + ;
VAL( SUBSTR( cTime, 7, 2 )) ;
)
it run ok when I go to Rpreview and I can show the document as you can see here
If I try to create a Pdf it make error
- Code: Select all Expand view RUN
Error description: Error BASE/1110 Parametro errato: SUBSTR
Args:
[ 1] = T 19-09-2019 17:33:34.246
[ 2] = N 1
[ 3] = N 2
Stack Calls
===========
Called from: => SUBSTR( 0 )
Called from: source\ut\ut_timeCa.prg => TTOS( 340 )
Called from: .\source\function\PRV2PDF.PRG => FWPDF:CLOSE( 232 )
Called from: .\source\function\PRV2PDF.PRG => FWSAVEPREVIEWTOPDF( 62 )
Called from: .\source\classes\RPREVIEW.PRG => TPREVIEW:SAVEAS( 1783 )
Called from: .\source\classes\RPREVIEW.PRG => (b)TPREVIEW:TPREVIEW( 50 )