Recompila los lógicos dependientes y los programas que los manejen. El día 23 de diciembre de 2011 17:06, Jorge Merino <[email protected]> escribió: > CGHPF está perfecto para lo que quieres hacer. Asegúrate de que los archivos > lógicos también son cambiados antes de compilar todos tus programas que usan > el archivo físico y los lógicos. > > > > Jorge > > > > From: [email protected] > [mailto:[email protected]] On Behalf Of Peñaherrera, > Mauro > Sent: Friday, December 23, 2011 8:44 AM > To: forum.help400 > Subject: consulta sobre archivos PF > > > > Se requiere realizar cambios de estructura en archivos físicos que tienen > una cantidad grande de data, para evitar respaldos y copias de data hasta > recompilar el físico y luego devolver los datos que nos tomaría mucho > tiempo, queremos mediante el comando CHGPF realizar el cambio de estructura, > claro que esto no nos evita la recompilación de los programas utilizados por > este archivo pero si nos evita el manejo de data, realizar este proceso > tiene algún otro impacto que debería considerar ?. > > > > En espera de sus comentarios y/o sugerencias. > > > > Ejemplo: > > > > Estructura actual del archivo: > > > > > > DOCU11R Visualización de Campos de Archivos > > Q22001412 > > Arch.: SMXF003 Lib.: QTEMP Nombre Reg.: SMXF00R > > Codigos de empresa manejar > > Nombre Long. Dec. T Texto > > > > SM0COD 6 0 P COD.EMPRESA > > SM0TXT 50 A TXT > > SM0STS 1 A STS > > SM0FCR 8 0 P FEC.CRE > > SM0HCR 6 0 P HOR.CRE > > SM0UCR 10 A USR.CRE > > SM0FMO 8 0 P FEC.MOD > > SM0HMO 6 0 P HOR.MOD > > SM0UMO 10 A USR.MOD > > > > Se aumenta en el fuente del archivo dos campos: > > > > A SM0STA 1A TEXT('STA') > > A COLHDG('STA') > > A SM0FCA 8 0 TEXT('FEC') > > > > Se aplica el comando CHGPF para que tome el nuevo fuente, el mismo ya tiene > los campos nuevos > > > > Cambiar archivo físico > (CHGPF) > > > > Teclee elecciones, pulse > Intro. > > > > > Archivo físico . . . . . . . . . > SMXF003 > Nombre > > Biblioteca . . . . . . . . . . > QTEMP Nombre, *LIBL, > *CURLIB > > Sistema . . . . . . . . . . . . *LCL *LCL, *RMT, > *FILETYPE > > Archivo fuente . . . . . . . . . > qddssrc Nombre, > *NONE > > Biblioteca . . . . . . . . . . > ARCHISYS Nombre, *LIBL, > *CURLIB > > Miembro fuente . . . . . . . . . smxf003 Nombre, > *FILE > > Opciones de listado fuente . . . *SRC, *NOSRC, > *SOURCE... > > + para más > valores > > Nivel gravedad generación . . . 20 > 0-30 > > Nivel gravedad señalización . . 0 > 0-30 > > Supr arch lóg dependiente . . . *NO *NO, > *YES > > Eliminar restricción . . . . . . *RESTRICT *RESTRICT, > *REMOVE > > Fecha caducidad para miembro . . *NONE Fecha, *SAME, > *NONE > > Máximo de miembros . . . . . . . 1 Número, *SAME, > *NOMAX > > Tamaño de vía de acceso . . . . *MAX1TB *SAME, *MAX4GB, > *MAX1TB > > Mantenimiento de vía de acceso *IMMED *SAME, *IMMED, *REBLD, > *DLY > > > Más... > > Reviso nueva estructura: > > > > > > DOCU11R Visualización de Campos de Archivos > > Q22001412 > > Arch.: SMXF003 Lib.: QTEMP Nombre Reg.: SMXF00R > > Codigos de empresa manejar > > Nombre Long. Dec. T Texto > > > > SM0COD 6 0 P COD.EMPRESA > > SM0TXT 50 A TXT > > SM0STS 1 A STS > > SM0STA 1 A STA > > SM0FCA 8 0 P FEC > > SM0FCR 8 0 P FEC.CRE > > SM0HCR 6 0 P HOR.CRE > > SM0UCR 10 A USR.CRE > > SM0FMO 8 0 P FEC.MOD > > SM0HMO 6 0 P HOR.MOD > > SM0UMO 10 A USR.MOD > > > > > > > > ________________________________ > > En Diners Club cuidamos el planeta; REDUCIMOS, RECICLAMOS Y REUTILIZAMOS los > recursos que usamos. > > Nota de descargo: La información contenida en este e-mail y sus anexos es > confidencial y sólo puede ser utilizada por el destinatario del mismo. Esta > información no debe ser distribuida, ni copiada total o parcialmente por > ningún medio sin la autorización de DINERS/INTERDIN. Además, DINERS/INTERDIN > no asume responsabilidad sobre información, opiniones o criterios contenidos > en este e-mail. > > Disclaimer: The information contained in this e-mail and its attached files > are confidential and intended only for the use of the person to which it is > addressed. This information can not be totally or partially distributed nor > copied by any media without the authorization from DINERS/INTERDIN. In > addition, DINERS/INTERDIN does not assume responsibility about this > information, opinions or criteria contented in this e-mail. > > > ____________________________________________________ > Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) > Forum.Help400 © Publicaciones Help400, S.L.
-- Atentamente. RP Director Técnico Tel. 93 255 31 51 Fax. 93 255 31 09 ____________________________________________________ Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd ) Forum.Help400 © Publicaciones Help400, S.L.
