@Begoguay, le acabo de echar un ojo y parece ser que para que haya salida hay poner otra directiva adicional que es PRINT:
A.1.32 PRINT compile option
Es lo que dice el comentario (note) de la directiva
LIST:
Citación del post de Fujitsu
|
❞
If the PRINT compile option is not specified, no object program list is output regardless of the specification of this option.
|
Es decir
PRINT,LIST
Te genera el fichero
[nombre_form].LST en
MainDebug.
Lo que pasa es que el contenido no es el que te esperas. Así que he investigado un poco y la directiva que tú necesitas no es
LIST sino que es
MAP.
Conclusión: lo que tienes que poner es esto: debe ser
PRINT,MAP y así sí que salen las variables, su longitud etc. El resultado es así:
Código:
NetCOBOL V10.1.0 MAINFORM THU JAN 19 13:55:58 2023 0001
LINE ADDR OFFSET REC-OFFSET LVL NAME LENGTH ATTRIBUTE BASE DIM
**MAINFORM**
28 GWA+00000110 0 01 IDX-V 4 COMP-5 BGW.000000
29 GWA+00000118 0 01 GLB-VENTANAS 48 GROUP-V BGW.000000
30 GWA+00000118 0 05 GLB-VENTANA 24 GROUP-F BGW.000000 1
31 GWA+00000118 0 10 GLB-HWND 4 COMP-5 BGW.000000 1
32 GWA+0000011C 4 10 GLB-NOMBRE 20 ALPHANUM BGW.000000 1
35 GWA+00000148 0 01 DESTINO 46 GROUP-F BGW.000000
36 GWA+00000148 0 03 FILLER 6 ALPHANUM BGW.000000
37 GWA+0000014E 6 03 LLEGAR 40 ALPHANUM BGW.000000
39 GWA+00000178 0 01 ORIGEN 46 GROUP-F BGW.000000
40 GWA+00000178 0 03 FILLER 6 ALPHANUM BGW.000000
41 GWA+0000017E 6 03 SALIR 40 ALPHANUM BGW.000000
43 GWA+000001A8 0 01 TOOLTIP 10 ALPHANUM BGW.000000
47 [EBP+FFFFFF48]+00000000 0 01 POW-FORM 44 GROUP-F BVA.000001
48 [EBP+FFFFFF48]+00000000 0 02 POW-SELF 4 COMP-5 BVA.000001
49 [EBP+FFFFFF48]+00000004 4 02 POW-SUPER 4 ALPHANUM BVA.000001
50 [EBP+FFFFFF48]+00000008 8 02 POW-THIS 4 COMP-5 BVA.000001