Funprog F_FIC_TRACE ( XGTRACE ) Value Char XGTRACE Local Char WNAME ( 250 ) If left$ ( XGTRACE , 2 ) = "#@" & ( GBROWS | GSERVEUR ) WNAME = "" Elsif max ( instr ( 1 , XGTRACE , "/" ) ,instr ( 1 , XGTRACE , "\"),instr(1,XGTRACE," @" ) ) WNAME = XGTRACE Else WNAME = filpath ( "TRA" , XGTRACE , "tra" ) Endif If filinfo ( WNAME , 0 ) = 0 WNAME = "" Endif End WNAME
Recopilación de trucos e información para el desarrollo de aplicaciones en Sage X3 que pertenecen a otros autores y algunos propios