root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Patch level :10.0 cd

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :controllo delle personalizzazioni VE in custom di studio e di ditta


git-svn-id: svn://10.65.10.50/trunk@17830 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2008-12-09 11:32:12 +00:00
parent 01d8d3a4be
commit 1734194597
1 changed files with 10 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
setup/wizard.cpp
View File

@ -370,19 +370,20 @@ bool CampoWizardPage3::ForwardValidate()
//a) custom di studio //a) custom di studio
if (!CheckCustomDir(strStudy + "custom", strPrgPath)) if (!CheckCustomDir(strStudy + "custom", strPrgPath))
return ErrorBox("Sono presenti personalizzazioni relative ai documenti di vendita.\n" return ErrorBox("Sono presenti personalizzazioni relative ai documenti di vendita.\n"
"Richiedere l'intervento dell'assistenza tecnica.\nL'aggiornamento verrà terminato."); "Richiedere l'intervento dell'assistenza tecnica.\nImpossibile proseguire l'aggiornamento.");
//b) custom di ditta //b) custom di ditta
wxArrayString asDirsList; wxDir dirStudy(strStudy);
const size_t uFirmDirs = wxDir::GetAllFiles(strStudy, &asDirsList, "", wxDIR_DIRS); wxString strDir;
for (size_t i = 0; i < uFirmDirs; i++) //deve farsi un giro sulle sole directory che abbiano nome lungo 6 caratteri (sono le ditte)
{ for (bool ok = dirStudy.GetFirst(&strDir, wxT("??????"), wxDIR_DIRS); ok; ok = dirStudy.GetNext(&strDir))
const wxString strDir = asDirsList[i].Lower(); {
if (strDir.Len() == 6 && strDir.EndsWith("a") && atol(strDir) > 0) strDir.MakeLower();
if (strDir.EndsWith("a") && atol(strDir) > 0)
{ {
if (!CheckCustomDir(strDir + "custom", strPrgPath)) if (!CheckCustomDir(strStudy + strDir + "/custom", strPrgPath))
{ {
wxString strMsg = "Sono presenti personalizzazioni relative ai documenti di vendita nella ditta "; wxString strMsg = "Sono presenti personalizzazioni relative ai documenti di vendita nella ditta ";
strMsg << strDir << ".\nRichiedere l'intervento dell'assistenza tecnica."; strMsg << strDir << ".\nRichiedere l'intervento dell'assistenza tecnica.\nImpossibile proseguire l'aggiornamento.";
return ErrorBox(strMsg); return ErrorBox(strMsg);
} }
} }