Entramos al servidor
y escribimos: STRPDM (que significa Start Programming Development Manager)
Seleccionamos la opcion 2 (Work with objects)
Ingresamos la Library (biblioteca) con la que vamos a trabajar. GARAS181 en este caso.
Se muestran los objetos que hay dentro de la biblioteca.
Nos posicionamos con el cursor al lado de QCBLLESSRC (si no esta en pantalla, con "Pg Up" y "Pg Dn" lo buscamos)
y con la opcion 12 (Work with) entramos a la carpeta.
(LE es la forma abreviada de ILE que significa Integrated Language Environment, y SRC significa SOURCE)
Se muestran los objetos que hay dentro de la biblioteca.
Con F6=Create creamos el archivo de tipo especial para incrustar codigo SQL en el COBOL
En Source member . . . . . . . . . SRCMBR, reemplazamos el *PRV por el nombre del miembro / programa COBOL ej: CBLSQL001
En Source type . . . . . . . . . . TYPE, reemplazamos el *SAME por el tipo de archivo que usaremos para
SQL incustado en COBOL cuyo nombre es SQLCBL
En Text 'description' . . . . . . . TEXT, reemplazamos el *BLANK por un texto descriptivo de el archivo que estamos creando
Finalmente ENTER para pasar al editor de codigo
Con este tipo de miembro, cada vez que el editor detecte una instruccion SQL entre comandos
EXEC SQL y END-EXEC lo indicara reemplazando el numero de linea por 'SQL'