- Ajuste de algunos UT FoxUnit

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

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 )