Changeset: 262 fdbozzo - 29/05/2014 00:57:01:
This commit is contained in:
@@ -122,7 +122,14 @@ DEFINE CLASS CL_FXU_CONFIG AS CUSTOM
|
|||||||
PROCEDURE copiarArchivosParaTest
|
PROCEDURE copiarArchivosParaTest
|
||||||
LPARAMETERS tcFileSpec
|
LPARAMETERS tcFileSpec
|
||||||
|
|
||||||
COPY FILE (FORCEPATH( tcFileSpec, THIS.cPathDatosReadOnly )) TO (FORCEPATH( tcFileSpec, THIS.cPathDatosTest ))
|
TRY
|
||||||
|
LOCAL loEx as Exception
|
||||||
|
COPY FILE (FORCEPATH( tcFileSpec, THIS.cPathDatosReadOnly )) TO (FORCEPATH( tcFileSpec, THIS.cPathDatosTest ))
|
||||||
|
|
||||||
|
CATCH TO loEx
|
||||||
|
SET STEP ON
|
||||||
|
THROW
|
||||||
|
ENDTRY
|
||||||
ENDPROC
|
ENDPROC
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user