*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (ES) AUTOGENERADO - ˇˇATENCIÓN!! - ˇˇNO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!!
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.20" SourceFile="filename_caps.pjx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
LPARAMETERS tcDir
lcCurdir = SYS(5)+CURDIR()
CD ( EVL( tcDir, JUSTPATH( SYS(16) ) ) )
*
_Author = ""
_Company = ""
_Address = ""
_City = ""
_State = ""
_PostalCode = ""
_Country = ""
*--
_Comments = "Capitalization for files"
_CompanyName = "Fernando D. Bozzo"
_FileDescription = "Capitalization for files"
_LegalCopyright = "MIT License"
_LegalTrademark = "MIT License"
_ProductName = "FILENAME_CAPS"
_MajorVer = "2"
_MinorVer = "4"
_Revision = "0"
_LanguageID = ""
_AutoIncrement = "0"
*
*
*<.HomeDir = 'g:\desa\foxbin2prg\filename_caps' />
FOR EACH loProject IN _VFP.Projects FOXOBJECT
loProject.Close()
ENDFOR
STRTOFILE( '', '__newproject.f2b' )
BUILD PROJECT Filename_caps.pjx FROM '__newproject.f2b'
FOR EACH loProject IN _VFP.Projects FOXOBJECT
loProject.Close()
ENDFOR
MODIFY PROJECT 'Filename_caps.pjx' NOWAIT NOSHOW NOPROJECTHOOK
loProject = _VFP.Projects('Filename_caps.pjx')
WITH loProject.FILES
.ADD('config\config.fpw') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" />
.ADD('filename_caps.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" />
*
.ITEM('__newproject.f2b').Remove()
*
*
*
*
*
.ITEM("config\config.fpw").Type = 'T'
*
ENDWITH
WITH loProject
*
.SetMain("filename_caps.prg")
.Debug = .T.
.Encrypted = .F.
*<.CmntStyle = 1 />
*<.NoLogo = .F. />
*<.SaveCode = .T. />
*<.User = '' />
.ProjectHookLibrary = ''
.ProjectHookClass = ''
*
ENDWITH
_VFP.Projects('Filename_caps.pjx').Close()
*ERASE '__newproject.f2b'
CD (lcCurdir)
RETURN