TABLE FILE SYSCOLUM
PRINT *
END 

quote:

Originally posted by BabakNYC:
The master files are in app directories on the server. Take a look at what's in SYSCOLUM.mas. Try something like

 
TABLE FILE SYSCOLUM
PRINT *
END 

The fex's are in your repository which is usually an RDBMS. The information about fex's is located in a bunch of tables in the RDBMS. You'll probably have to have admin rights to query that data.

TABLEF FILE _EDAHOME/CATALOG/SYSAPPS
PRINT APPFULL
ON TABLE HOLD AS DIRLIST
END

TABLEF FILE _EDAHOME/CATALOG/SYSAPPS
PRINT APPFULL FNAME FEXT APPLOC FDATE FTIME FSIZE
WHERE APPFULL EQ 'baseapp/proto'
END

SET ALL=ON
TABLEF FILE _EDAHOME/CATALOG/SYSAPPS
PRINT *
WHERE APPFULL EQ 'baseapp'
END  

  
TABLE FILE SYSTABLE
BY TBTYPE 
BY NAME
END

quote:

Originally posted by BabakNYC:

  
TABLE FILE SYSTABLE
BY TBTYPE 
BY NAME
END

-* Show adapters, connections and servers
 
-* Get location of edsprof.prf 
-SET &EDACONF=FGETENV(7, 'EDACONF', 64, 'A64') ;
-SET &EDASPROF =&EDACONF || '\etc\edasprof.prf' ;
FILEDEF SYSCONN DISK &EDASPROF 
-RUN 
 
 
DEFINE FILE sysconn 
  RUN_DATE/A24 TITLE 'Run Date'='&DATEYYMD' || ' &TOD'; 
  HOST_NAME/A80V TITLE 'Host Name'=RTRIM( FGETENV( 12, 'COMPUTERNAME', 15, 'A15' ) || FGETENV( 8, 'HOSTNAME', 64, 'A64' ) ) ;
END
 
TABLE FILE SYSCONN 
PRINT 
 RUN_DATE
 HOST_NAME 
 ENGINE 
 CONNECTION
 SERVER
 DEFAULT_DATABASE
 USER_ID 
IF _CONN_ATTR EQ 'CONNECTION_ATTRIBUTES' 
END 
  

FILENAME=SYSCONN, SUFFIX=DFIX    ,
 CODEPAGE=1252, $
  SEGMENT=EDASPROF, SEGTYPE=S0, $
    FIELDNAME=_ENGINE, USAGE=A69V, ACTUAL=A69VB,
      MISSING=ON, ACCESS_PROPERTY=(INTERNAL), $
    FIELDNAME=ENGINE, USAGE=A64, ACTUAL=A64B,
      MISSING=ON, $
    FIELDNAME=_SET, USAGE=A10V, ACTUAL=A10VB,
      MISSING=ON, ACCESS_PROPERTY=(INTERNAL), $
    FIELDNAME=_CONN_ATTR, USAGE=A64V, ACTUAL=A64VB,
      MISSING=ON, ACCESS_PROPERTY=(INTERNAL), $
    FIELDNAME=_CONNECTION, USAGE=A256V, ACTUAL=A256V,
      MISSING=ON, $
    FIELDNAME=_SERVER, USAGE=A212V, ACTUAL=A212VB,
      MISSING=ON, ACCESS_PROPERTY=(INTERNAL), $
    DEFINE CONNECTION/A16 MISSING ON ALL  WITH _ENGINE=TOKEN(_CONNECTION,'/',1); $
    DEFINE SERVER/A212V MISSING ON ALL=IF (EDIT( _SERVER, '9' ) EQ '''') THEN TOKEN( _SERVER, '''', 2 ) ELSE TOKEN( _SERVER, '/', 1 );
      TITLE='SERVER', $
    DEFINE DEFAULT_DATABASE/A64 MISSING ON ALL=IF  POSITION (';' ,_SERVER) NE 0 AND  POSITION ('''' ,_SERVER) NE 1
THEN TOKEN (_SERVER,';',-1) ELSE MISSING; $
    DEFINE USER_ID/A64 MISSING ON ALL=IF POSITION( '''', _SERVER ) EQ 1 THEN TOKEN( TRIM_( LEADING, '/', TOKEN( _SERVER, '''', 3 ) ), ',', 1 ) ELSE TOKEN( TOKEN( _SERVER, '/', 2 ), ',', 1 ); $
  

SEGNAME=EDASPROF, 
  DELIMITER=' ', 
  HEADER=NO, 
  CONNECTION=<local>, $
  

quote:

Originally posted by Clif:

[/code]