Hi,

Try :

Local Char OS : OS = GOS
Local Char MACHINE : MACHINE=adxmac(0)
Local Char LISTFIC(90)(9999), DOSFIC(250), ZFIC(90)
Local Shortint NBRFIC, ZIF

DOSFIC="d:\" # your folder

Call LISFIC(OS,MACHINE,DOSFIC,NBRFIC,LISTFIC) From SELFICREP

 For ZIF=0 To NBRFIC-1
    ZFIC=LISTFIC(ZIF)
Next

End

Hi bimiman,

Thank you for your suggestion but didn't work. 

Reading through "Calling classic code from service code and vice-versa" in documentation one can find this:

I don't see global variables in my code. Maybe in sub program.

Just trying to print GOS will return error

(1st line) "Local Char OS : OS = GOS"

You're right.

Just replace GOS by "dos"  (or "unix")

it will allow to go until the LISFIC call.

As soon as it calls LISFIC will show this error in UI

and in Syracuse logs,

Hello, 

Can't you just simply query the ADOSSIER table like below?

Hello, 

Can't you just simply query the ADOSSIER table like below?

Hi,

We are trying to list system files for a specific directory (eg. c:/abcd)

The provided code seems to list all the folders in a solution.

Any idea?

Sorry, I thought it's that folders, that make sense now. 

Let me check on that, is the folder outside of X3 directory? Like c:\abcd

In other words with the Sandbox configuration, we don't automatically have access to all windows directory. meaning that if you use your own code for like SEED\TMP does that work?

Folder is inside of X3 solution folder

Using following snippet will resolve one storage area like '[tmp]/folderA' and will return the full physical path for the intended fs directory. 

# Compute full path of Storage Volume
Gosub ENUM_VOLFIL_TYPE From ASYRSTO
OK = func ASYRSTO.CTL_VOLFIL(2, STOAREA, FOLDERFULLPATH, E_TYPE_FOLDER, MESSAGE)

Next step would be to iterate files in this fs directory but none of previous methods seem to work (maybe because they rely on global vars not defined?)

Meanwhile we have made some progress through JS bundles but wondering whether there's any easier way.