romfast/foxbin2prg
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

- Ajuste de algunos UT FoxUnit

Browse Source
This commit is contained in:
fdbozzo
2015-04-12 21:34:32 +02:00
parent 6eb3957069
commit f8de222420
3 changed files with 13 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
TESTS/ut__foxbin2prg__c_conversor_base__get_SeparatedLineAndComment.prg
View File

@@ -77,8 +77,8 @@ DEFINE CLASS ut__foxbin2prg__c_conversor_base__get_SeparatedLineAndComment AS Fx
*-- Visualizaci<63>n de valores
THIS.messageout( ' Linea = [' + TRANSFORM(tcLinea) + ']' )
THIS.messageout( ' Comentario = [' + TRANSFORM(tcComentario) + ']' )
THIS.messageout( ' Linea = [' + TRANSFORM(tcLinea_Esperada) + ']' )
THIS.messageout( ' Comentario = [' + TRANSFORM(tcComentario_Esperado) + ']' )
*-- Evaluaci<63>n de valores
@@ -107,14 +107,14 @@ DEFINE CLASS ut__foxbin2prg__c_conversor_base__get_SeparatedLineAndComment AS Fx
*-- DATOS DE ENTRADA
STORE 0 TO lnCodError
lcComentario = ' con algunos comentarios '
lcLinea = ' esta es una linea de c<>digo '
lcLinea = ' ' + CHR(9) + CHR(9) + ' esta es una linea de c<>digo ' + CHR(9) + ' '
lcComentario = ' ' + CHR(9) + CHR(9) + 'con algunos comentarios '
lcLineaOriginal = lcLinea + '&' + '&' + lcComentario
*-- DATOS ESPERADOS
STORE 0 TO lnCodError_Esperado
lcLinea_Esperada = lcLinea
lcComentario_Esperado = lcComentario
lcComentario_Esperado = LTRIM(lcComentario)
*-- TEST
loObj.get_SeparatedLineAndComment( @lcLineaOriginal, @lcComentario )

6
TESTS/ut__foxbin2prg__c_conversor_base__lineIsOnlyCommentAndNoMetadata.prg
View File

@@ -99,14 +99,14 @@ DEFINE CLASS ut__foxbin2prg__c_conversor_base__lineIsOnlyCommentAndNoMetadata AS
*-- DATOS DE ENTRADA
STORE 0 TO lnCodError
lcComentario = ' con algunos comentarios '
lcLinea = ' esta es una linea de c<>digo '
lcComentario = ' ' + CHR(9) + CHR(9) + 'con algunos comentarios '
lcLinea = ' ' + CHR(9) + CHR(9) + ' esta es una linea de c<>digo ' + CHR(9) + ' '
lcLineaOriginal = lcLinea + '&' + '&' + lcComentario
*-- DATOS ESPERADOS
STORE 0 TO lnCodError_Esperado
lcLinea_Esperada = lcLinea
lcComentario_Esperado = lcComentario
lcComentario_Esperado = LTRIM(lcComentario)
llRetorno_Esperado = .F.
*-- TEST

10
TESTS/ut__foxbin2prg__c_foxbin2prg__EvaluarConfiguracion.prg
View File

@@ -89,7 +89,7 @@ DEFINE CLASS ut__foxbin2prg__c_foxbin2prg__EvaluarConfiguracion AS FxuTestCase O
THIS.messageout( 'l_ClearUniqueID: ' + TRANSFORM(loFB2P_Esperado.l_ClearUniqueID) )
THIS.messageout( 'n_Debug: ' + TRANSFORM(loFB2P_Esperado.n_Debug) )
THIS.messageout( 'n_ExtraBackupLevels: ' + TRANSFORM(loFB2P_Esperado.n_ExtraBackupLevels) )
THIS.messageout( 'l_OptimizeByFilestamp: ' + TRANSFORM(loFB2P_Esperado.l_OptimizeByFilestamp) )
THIS.messageout( 'n_OptimizeByFilestamp: ' + TRANSFORM(loFB2P_Esperado.n_OptimizeByFilestamp) )
*-- VALIDACIONES
THIS.assertequals( TRANSFORM(loFB2P_Esperado.PJX_Conversion_Support), TRANSFORM(loFB2P.PJX_Conversion_Support), '> PJX_Conversion_Support' )
@@ -107,7 +107,7 @@ DEFINE CLASS ut__foxbin2prg__c_foxbin2prg__EvaluarConfiguracion AS FxuTestCase O
THIS.assertequals( TRANSFORM(loFB2P_Esperado.l_ClearUniqueID), TRANSFORM(loFB2P.l_ClearUniqueID), '> l_ClearUniqueID' )
THIS.assertequals( TRANSFORM(loFB2P_Esperado.n_Debug), TRANSFORM(loFB2P.n_Debug), '> n_Debug' )
THIS.assertequals( TRANSFORM(loFB2P_Esperado.n_ExtraBackupLevels), TRANSFORM(loFB2P.n_ExtraBackupLevels), '> n_ExtraBackupLevels' )
THIS.assertequals( TRANSFORM(loFB2P_Esperado.l_OptimizeByFilestamp), TRANSFORM(loFB2P.l_OptimizeByFilestamp), '> l_OptimizeByFilestamp' )
THIS.assertequals( TRANSFORM(loFB2P_Esperado.n_OptimizeByFilestamp), TRANSFORM(loFB2P.n_OptimizeByFilestamp), '> n_OptimizeByFilestamp' )
ELSE
*-- Visualizaci<63>n de valores
@@ -175,7 +175,7 @@ DEFINE CLASS ut__foxbin2prg__c_foxbin2prg__EvaluarConfiguracion AS FxuTestCase O
ADDPROPERTY( loFB2P_Esperado, 'l_ClearUniqueID', .T. )
ADDPROPERTY( loFB2P_Esperado, 'n_Debug', 0 )
ADDPROPERTY( loFB2P_Esperado, 'n_ExtraBackupLevels', 1 )
ADDPROPERTY( loFB2P_Esperado, 'l_OptimizeByFilestamp', .F. )
ADDPROPERTY( loFB2P_Esperado, 'n_OptimizeByFilestamp', 0 )
*STRTOFILE('', 'TESTS\DATOS_TEST\foxbin2prg.cfg')
@@ -228,7 +228,7 @@ DEFINE CLASS ut__foxbin2prg__c_foxbin2prg__EvaluarConfiguracion AS FxuTestCase O
ADDPROPERTY( loFB2P_Esperado, 'l_ClearUniqueID', .F. )
ADDPROPERTY( loFB2P_Esperado, 'n_Debug', 0 )
ADDPROPERTY( loFB2P_Esperado, 'n_ExtraBackupLevels', 0 )
ADDPROPERTY( loFB2P_Esperado, 'l_OptimizeByFilestamp', .F. )
ADDPROPERTY( loFB2P_Esperado, 'n_OptimizeByFilestamp', 0 )
*--
STRTOFILE( '* ' + PROGRAM() + CRLF, 'TESTS\DATOS_TEST\foxbin2prg.cfg')
STRTOFILE( 'PJX_Conversion_Support: 1' + CRLF, 'TESTS\DATOS_TEST\foxbin2prg.cfg', 1 )
@@ -298,7 +298,7 @@ DEFINE CLASS ut__foxbin2prg__c_foxbin2prg__EvaluarConfiguracion AS FxuTestCase O
ADDPROPERTY( loFB2P_Esperado, 'l_ClearUniqueID', .T. )
ADDPROPERTY( loFB2P_Esperado, 'n_Debug', 1 )
ADDPROPERTY( loFB2P_Esperado, 'n_ExtraBackupLevels', 1 )
ADDPROPERTY( loFB2P_Esperado, 'l_OptimizeByFilestamp', .T. )
ADDPROPERTY( loFB2P_Esperado, 'n_OptimizeByFilestamp', 1 )
*--
STRTOFILE( '* ' + PROGRAM() + CRLF, 'TESTS\DATOS_TEST\foxbin2prg.cfg')
STRTOFILE( 'PJX_Conversion_Support: 1' + CRLF, 'TESTS\DATOS_TEST\foxbin2prg.cfg', 1 )