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 dossier
• NomeFile è il nome del file
• Estensione estensione del file
• Dossier è 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"