===== Este ejemplo esta realizado con un DSPF ===== 1-Buscar la entrada. 2- Entrar con opción 12 3-Luego opción 6, Luego F6 ALTA Aparece la siguiente pantalla para cargar: Solo cargar los resaltado ---- ==== Cambiar estado de Objeto (ZCHGOBJSTS) ==== Teclee elecciones, pulse Intro. Nombre del objeto . . . . . . . pantalla Nombre Tipo de objeto . . . . . . . . dspf CMD,CMDSF, COPY,DDMF,DSPF, Codigo de estado . . . . . . . . *SELECT Nombre, *NEXT, *PRV... Tipo de version . . . . . . . . *STD *STD, *ESP INTRO ---- La segunda pantalla: DCMie - Seleccion de estados posibles Estado actual. . . . . Teclee opciones, pulse Intro. 1=Selección 5=Visualizar Op Tipo Comando Descripción 1 ENTORNO DE DESARROLLO INTRO ---- La Tercer pantalla pantalla: ==== Crear objeto en el DCM (ZCRTDCMOBJ) ==== Teclee elecciones, pulse Intro. Nombre del objeto . . . . . . . > PANTALLA Nombre Tipo de objeto . . . . . . . . > DSPF CMD, CMDSF, COPY, DDMF, DSPF, Texto descriptivo . . . . . . . > 'Texto Descriptivo (no dejar en Blanco)' Codigo de Aplicacion . . . . . . > ANBGPP ANBGPF, ANBGPFLB, ANBGPH, ANBG Tipo de source . . . . . . . . . > DSPF *NONE, C, CBL, CL, CLE, CLLE Archivo source en produccion . . *CALC *NONE,*CALC,. . . Libreria source en produccion *CALC Nombre, *NONE, *CALC Miembro source en produccion . . *OBJ Nombre, *NONE, *OBJ Empresa propietaria . . . . . . *ANY *ANY, QBE,,,, Cantidad de versiones . . . . . *SYSVAL Número, *SYSVAL Versiones por periodo . . . . . *SYSVAL Número, *SYSVAL INTRO Viene la cuarta y ultima pantalla: Chkout (ZCHKOUTC) Teclee elecciones, pulse Intro. Nombre del objeto . . . . . . . > PANTALLA Nombre Tipo de objeto . . . . . . . . > DSPF CMD, CMDSF, COPY, DDMF, DSPF, Archivo source en desarrollo . . qddssrc Nombre, *NONE, *STMF Libreria source en desarrollo ANBGDS Nombre, *NONE Miembro source en desarrollo . . > *OBJ Nombre, *NONE, *OBJ Libreria de pruebas . . . . . . > ANBGDP Nombre, *SRCLIB, *PATH Codigo de requerimiento . . . . > R12086R0 *NONE,, Tipo de Chkout . . . . . . . . . > *STD *STD, *ESP INTRO Con la carga del objeto es decirle al DCM que tome el fuente (en este caso Pantalla) y empiece a administrarlo. Luego hay que indicar que tome Pantalla para nuestra entrada, de la siguiente manera: Entrar en el menú inicial del DCM, seleccionar 3 y buscar la Entrada, opción 12 y luego con opción 1: F6 ALTA Adicionar entradas a una lista (ZADDOBJLE) Teclee elecciones, pulse Intro. Nombre de lista de objetos . . . > UAVS50292@ Nombre Tipo de lista . . . . . . . . > *INST *INST, *RMVL, *DSTL, *WRKL Nombre del objeto . . . . . . . pantalla Nombre, genérico*, *ALL Tipo de objeto . . . . . . . . dspf CMD, CMDSF, COPY, DDMF, DSPF, + para más valores *ALL Reemplazar entrada existente . . > *NO *YES, *NO Crear lista . . . . . . . . . . > *NO *YES, *NO Ahora si ingresamos a la opción 2 vamos a poder ver y modificar el fuente