2 modi per recuperare il percorso base di un dossier
Per recuperare il percorso base di un dossier ci sono almeno due modi.
SETPARAM From PARFICBAN
Il primo modo consiste nella chiamata SETPARAM From PARFICBAN:
Local Char MACHIN(20) Local Char IRS(2) Local Char OS(20) Local Integer I Local Char YDIR(250) Call SETPARAM(YDIR,MACHIN,IRS,OS,I) From PARFICBAN
In questo modo otteniamo:
YDIR = S:\Sage\SAGEX3\folders\SAGEDEV
OS = “dos” #(se windows)
filpath
Il secondo modo è l’istruzione filpath, con parametri tutti vuoti:
filpath("","","")
filpath in genere viene chiamata per recuperare un percorso in una sottocartella del dossier corrente.
filpath(Sottocartella, NomeFile, Estensione, Dossier, Volume, Server)
I parametri sono i seguenti:
Sottocartella
nome di una sottocartella del dossierNomeFile
è il nome del fileEstensione
estensione del fileDossier
è il dossier di cui si vuole recuperare il percorso; può essere un numero o il nome del dossier. Se vuoto viene considerato il dossier corrente.Volume
codice di un volume di cui si vuole il percorso di una sottocartella o file. Invece di considerare la cartella base di un dossier come radice, si considera il percorso del volume indicato. Può essere:- “0” per indicare la cartella dove è installato l’engine.
- “A”, “B”, o altra lettera corrispondente ad un volume. Nella versione 6 erano memorizzati nel file adxvolumes. Successivamente sono definiti nel Sandbox configuration file.
Server
nome di un server con installato l’X3 engine.
Ecco un po’ di esempi di chiamate (con “DOSSIER” come dossier corrente):
filpath("","","") #"C:\Sage\SAGEX3\folders\DOSSIER" filpath("","file","pdf") #"C:\Sage\SAGEX3\folders\DOSSIER\file.pdf" filpath("","","pdf") #"C:\Sage\SAGEX3\folders\DOSSIER.pdf" filpath("sottocartella","file","pdf") #"C:\Sage\SAGEX3\folders\DOSSIER\sottocartella\file.pdf" filpath("sottocartella","","pdf") #"C:\Sage\SAGEX3\folders\DOSSIER\sottocartella.pdf" filpath("sottocartella","file","pdf","0") #"C:\Sage\SAGEX3\runtime\0\sottocartella\file.pdf" filpath("tmp","file","pdf","dossier","R") #"R:\VOLR\dossier\tmp\file.pdf" (qui va impostato il volume R nella sandbox) filpath("tmp","file","pdf","dossier","0") #"C:\Sage\SAGEX3\runtime\dossier\tmp\file.pdf"