Synchroniser, exporter et télécharger
Structure
SyncExportAndUpload(sSyncMapName, sEquipFilter, sService, sFolder, sLocalArchiveFolder, bLab, bOverwrite, bAllowAuth)
Paramètres
| Paramètre | Type | Description
| sSyncMapName | Chaîne de caractères | Nom de la carte de synchronisation à utiliser - il doit s'agir d'une carte de synchronisation liée à l'exportation | mapsEquipFilter | Chaîne de caractères | Requête SQL définissant le filtre des ressources à exporter. La requête SQL doit respecter le format indiqué dans l'exemple ci-dessous (commençant par « FROM GAGES WHERE ») :
FROM GAGES WHERE COMPANY = 'ABC COMPANY'sService | Chaîne | nom du service cloud, doit être soit BOX soit DROPBOXsFolder | Chaîne | dossier cloud dans lequel les fichiers ZIP de synchronisation doivent être téléchargéssLocalArchiveFolder | | Nom du dossier d'archivage local (facultatif)bLab | Booléen | True si « Action effectuée par » est « Lab/Central ». Faux si « Action effectuée par » est « Client/RemotebOverwrite | Booléen | Si True, le fichier dans le cloud peut être écrasé si un fichier correspondant exactement existe déjà | bAllowAuth | Booléen | Si True, les identifiants de connexion au cloud peuvent être demandés, si nécessaire |
Valeur de retour
Chaîne
Description
Cette fonction est liée à la synchronisation des cartes telle qu'elle est configurée dans IndySoft DataSync - Options. Cette fonction exporte un ensemble de ressources et les télécharge vers le cloud en suivant une carte de synchronisation, tout en autorisant des exceptions selon divers critères.
Exemple
sCompany = « 100003 »
if tdDoSQLRecords(1, "SELECT VARIABLE_DATE FROM COMPANY_VARS WHERE COMPANY = '" & sCompany & "' AND VARIABLE_NAME = 'LAST EXPORT DATE'") then
dtCompanyLastExport = tdFieldByNameAsDateTime(1, "VARIABLE_DATE")
Sinon
dtCompanyLastExport = 0
RunSQL("INSERT INTO COMPANY_VARS (COMPANY, VARIABLE_NAME) VALUES ('" & sCompany & "', 'LAST EXPORT DATE')")
Fin Si
sSyncMapName = "TEST1"
sEquipFilter = "FROM GAGES WHERE COMPANY = '" & sCompany & "' AND LAST_MODIFIED_DATE >= '" & FormatDateTimeForSQL(dtCompanyLastExport) & "'"
sService = "DROPBOX"
sFolder = sCompany
sLocalArchiveFolder = "C:\Temp\Uploaded" & sCompany
bLab = True
bOverwrite = True
bAllowAuth = True
sResult = SyncExportAndUpload(sSyncMapName, sEquipFilter, sService, sFolder,
sLocalArchiveFolder, bLab, bOverwrite, bAllowAuth)
DebugLog(sResult)
SendEMail("notreal@notgmail.com", "", "", "Résultats de SyncExportAndUpload", "", "SYNCMAP", sResult, False, False)
Compatibilité des applications
Gestion de l'étalonnage IndySoft, Gestion des laboratoires commerciaux IndySoft, Gestion des outils IndySoft |