🗂️ Trabajando con Archivos Físicos de Múltiples Miembros en AS400 (6)

💡 Un concepto básico: Siempre que creamos un PF, el sistema crea automáticamente un miembro por defecto con el mismo nombre que el archivo. Pero, dependiendo de nuestras necesidades, podemos agregarle más miembros.

Aquí te dejo una guía rápida de cómo hacerlo.

🔍 1. Cómo ver los miembros de un Archivo Físico

Para revisar los miembros que tiene un archivo, simplemente entramos a la pantalla de PDM indicando el nombre de nuestro archivo.

Plaintext

                        Work with Members Using PDM                 SYSTEM09

 File  . . . . . .  ACCOUNT
   Library . . . .     AMINEM                     Position to  . . . . .

 Opt  Member      Date        Text
 __   ACCOUNT        05/21/12  >>>> El miembro ACCOUNT dentro del archivo ACCOUNT

Si abrimos ese miembro, veremos sus registros de forma normal:

Plaintext

        ACLEVELID  ACORGCOD        ACCOUNTNUM   ACCURRENCY  ACNAME
000001      7        190    100,000,000,001      EUR      SURESH
000002      7        190    100,000,000,002      EUR      SHRI
000003      7        190    100,000,000,003      EUR      UPI

➕ 2. Agregar un miembro nuevo usando ADDPFM

Si lo que necesitamos es crear un miembro nuevo y totalmente vacío, podemos presionar F6 en PDM o ejecutar directamente el comando ADDPFM.

Plaintext

ADDPFM FILE(AMINEM/ACCOUNT) MBR(MBR2)

Mensaje del sistema: El miembro MBR2 se agregó al archivo ACCOUNT en AMINEM.

Si volvemos a revisar el archivo en PDM, veremos nuestro nuevo miembro listo para usarse (podemos entrar con DFU para agregarle datos, por ejemplo):

Plaintext

 Opt  Member      Date        Text
      ACCOUNT        05/21/12
      MBR2           07/23/12      >>>>>>> Nuevo miembro MBR2 agregado

📋 3. Agregar un miembro copiando datos con CPYF

Otra forma excelente de crear un miembro es copiando información de uno que ya existe. Para esto, usamos el comando CPYF:

Plaintext

CPYF FROMFILE(AMINEM/ACCOUNT) TOFILE(AMINEM/ACCOUNT) FROMMBR(ACCOUNT) TOMBR(MBR3) MBROPT(*ADD) CRTFILE(*NO) FROMRCD(1) NBRRCDS(3)

Al hacer esto, el sistema creará el miembro MBR3 automáticamente y le insertará los registros indicados. Al volver a PDM, verás tu lista actualizada con ACCOUNT, MBR2 y MBR3.

📑 4. Copiar un miembro visualmente desde PDM

Si prefieres no escribir comandos, la forma más rápida es colocar un 3 (Copiar) al lado del miembro en la pantalla principal de PDM.

Plaintext

 Opt  Member      Type        Text
 _3_  MASTER      PF          ACCOUNT RELATED INFORMATION

El sistema te abrirá una pantalla pidiéndote el archivo destino y el nuevo nombre que le quieres dar a tu copia:

Plaintext

                                 Copy Members

 From file . . . . . . . :   PRJ1
   From library  . . . . :     AMINEM

 Type the file name and library name to receive the copied members.
   To file . . . . . . . .   PRJ1
     To library  . . . . .     AMINEM

 Member         New Name
 MASTER         MASTER_CPY

¡Y listo! Así de fácil puedes organizar tu información en múltiples miembros. 🚀 ¡Espero que este tip te sirva en tu día a día!