Changeset: 107 Arreglo retorno cod estado

This commit is contained in:
fernando
2013-12-21 00:30:33 +01:00
parent 822b2d488f
commit 4d888d2449
3 changed files with 8 additions and 1 deletions

View File

@@ -275,7 +275,7 @@ lnResp = goCnv.ejecutar( tc_InputFile, tcType_na, tcTextName_na, tlGenText_na, t
, '', NULL, NULL, .F., tcOriginalFileName )
IF _VFP.STARTMODE = 0
RETURN
RETURN lnResp
ENDIF
*-- Muy <20>til para procesos batch que capturan el c<>digo de error
@@ -541,6 +541,8 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM
CD (JUSTPATH(THIS.c_CurDir))
*SET PATH TO (lcPath)
ENDTRY
RETURN lnResp
ENDPROC
@@ -7984,6 +7986,11 @@ DEFINE CLASS c_conversor_pjx_a_prg AS c_conversor_bin_a_prg
SCATTER FIELDS NAME,TYPE,EXCLUDE,COMMENTS,CPID,TIMESTAMP,ID,OBJREV MEMO NAME loReg
loReg.NAME = LOWER( ALLTRIM( loReg.NAME, 0, ' ', CHR(0) ) )
loReg.COMMENTS = CHRTRAN( ALLTRIM( loReg.COMMENTS, 0, ' ', CHR(0) ), ['], ["] )
*-- TIP: Si el "Name" del objeto est<73> vac<61>o, lo salteo
IF EMPTY(loReg.NAME)
LOOP
ENDIF
TRY
loProject.ADD( loReg, loReg.NAME )