Mejorar teclado emulacion 5250

El IBM Client Access incluye el emulador de pantalla verde 5250 Personal Communications.

La configuración por omisión no incluye ciertas funciones que los usuarios de los sistemas operativos de ventanas encontramos a faltar, como son las teclas Inicio para ir al Inicio del Campo, Fin para ir al Fin del Campo, Ctrl+C para Copiar un texto seleccionado o Ctrl+V para Pegar un texto; Ctrl+X no tiene sentido en una emulación 5250.


Como hacer esta personalización de teclado de la emulación, pues seguir los siguientes pasos:

1. Bajaros el archivo as400_mejorado.kmp y lo guardais en la carpeta C:\Program Files\ibm\Client Access\Emulator\Private o donde os parezca mejor.
2. Desde la emulación de pantalla del Personal Communications, pulsais el icono o Edit, Preferences, Keyboard, Customize.
3. Despues File, Open y seleccionar el archivo de configuración de teclado que os habeis bajado.
4. A continuación salvar la nueva configuración.

A partir de ese momento ya podreis utilizar el teclado de la emulación de forma mas parecida a la que utilizais con un sistema operativo grafico de ventanas.


Esta configuración de teclado también convierte la tecla grande de Intro, como un Intro y no como Salida de Campo, esta la muevo a la tecla Ctrl de la derecha.

La clave de las claves

La elección de un buena contraseña, la palabra clave que franquea el acceso a un ordenador, es esencial para salvaguardar la seguridad de los datos que contiene. Los expertos recomiendan las siguientes reglas básicas:

1. Una contraseña ha de ser sencilla. Desde luego, la clave TMXKQGSW resulta bastante segura frente a hackers que lo intentan al azar, pero es muy difícil de recordar.
2. Una contraseña no debe tener significado. Las palabras con significado son las más fáciles de reventar. Esto no excluye que sean sencillas de memorizar. Ejemplos: ZAZAMELI, PERPOLAS, RATOGARU.
3. Una contraseña hay que memorizarla, no apuntarla. Quien no se fíe demasiado de su memoria a largo plazo, puede apuntar su palabra clave, pero nunca de manera que un extraño pueda reconocerla como tal. Así, nunca se la ha de escribir en el listín telefónico bajo CLAVE, SECRETO u ORDENADOR. Es mejor garabatearla en la agenda junto al recordatorio del cumpleaños de la abuela. En ningún caso se debe dejar la nota escrita cerca del ordenador, bajo el teléfono o pinchada en el panel de corcho.
4. De vez en cuando conviene cambiar la contraseña. Por si acaso alguien no autorizado ya lo conoce pero todavía no se ha decidido a usarlo. Tampoco es preciso cambiarlo muy a menudo, podría causarnos molestas equivocaciones.
5. Una contraseña se teclea en privado. Al introducir la clave antes de comenzar una sesión de trabajo, hay que asegurarse de que nadie mire por encima del hombro. Las personas de confianza hacen honor a su nombre respetando la intimidad del propietario de la clave.
6. Ciertas palabras nunca han de servir de contraseña:

• Nombres propios y apellidos.
• Apodos. El propio, jamás, pero tampoco el del perro o el gato.
• Palabras informáticas, como TEST, SYSTEM, CHECK, BYTE...
• Fechas de cumpleaños.
• Cadenas con método: ABCDEFGH, A1B2C3, QWERTY...
• Palabras de moda: CHUNGO, GUAI, SUPER, TOTAL...
• Nombres de la mitología, la literatura o ciencia-ficción: Zeus, Quijote, Spock, Frodo...
• La palabra clave por antonomasia: (ábrete) SESAMO.
  

Articulo extraído de la revista "Muy Interesante", noviembre 1.989

De mayúsculas a minúsculas

Como convertir un campo de mayúsculas a minúsculas o viceversa en un programa CL.

Para ello añadimos el siguiente código en nuestro programa, para convertir una variable de 5 caracteres de longitud, y utilizaremos la API QLGCNVCS.

DCL VAR(&VAR1) TYPE(*CHAR) LEN(5)
DCL VAR(&VAR2) TYPE(*CHAR) LEN(5)
DCL VAR(&VARLEN) TYPE(*CHAR) LEN(4) VALUE(X'00000005')
DCL VAR(&CASEU) TYPE(*CHAR) LEN(22) + VALUE(X'00000001000000000000000000000000000000000000')
DCL VAR(&CASEL) TYPE(*CHAR) LEN(22) + VALUE(X'00000001000000000000000100000000000000000000')
DCL VAR(&ERR) TYPE(*CHAR) LEN(4) VALUE(X'00000000')

De mayúsculas a minúsculas llamar a la API con el parámetro &CASEL:
CALL PGM(QLGCNVCS) PARM(&CASEL &VAR1 &VAR2 &VARLEN &ERR)

De minúsculas a mayúsculas llamar a la API con el parámetro &CASEU:
CALL PGM(QLGCNVCS) PARM(&CASEU &VAR1 &VAR2 &VARLEN &ERR)

Plantilla teclado IBM 3197

Plantilla de teclado del terminal 5250 de IBM modelo 3197

A veces no recordamos como eran los terminales "tontos", aunque el IBM-3197 era de los "espabilados". Esta plantilla es la "chuleta" para acordarnos de las funciones que tenia incorporadas la ALU del terminal, como configurar la dirección twinaxial, tipo de terminal (pantalla, pantalla-pantalla, pantalla-impresora), o las macros, entre otras cosas.

Imprimir fuente en DIN A-4

Como imprimir un miembro de un archivo de fuentes en formato DIN A-4 y doble cara (si nuestra impresora lo soporta):

1. Entrar al PDM con el mandato STRPDM
   
2. Seleccionar opción "9. Work with user-defined options"
3. Seleccionar archivo opciones, por omision QGPL/QAUOOPT(QAUOOPT) , pulsar Intro.
   
4. Pulsar F6=Create
5. Opción A4 (por ejemplo)
6. Introducir en la linea de mandatos:
   
7. OVRPRTF FILE(QPSUPRTF) PAGESIZE(102) LPI(9) OVRFLW(102) ALIGN(*YES) FONT(220) PRTQLTY(*DRAFT) PAGRTT(0) DUPLEX(*YES)
8. Pulsar Intro para guardar la nueva opción del PDM.
   

Como usar nueva opción A4:

Pulsar la opción A4 delante del miembro que queramos imprimir y después la opción 6=Print, si fuera necesario cambiar el listado a una cola de impresora de hojas.
A partir de pulsar la opción A4 todos los listados que pidamos en esa sesión, se imprimirán en ese formato. Con la opción DUPLEX(*YES) conseguimos imprimir por ambas caras si la impresora lo soporta.

Es posible se tenga que ajustar algún valor para que cuadre con la hoja de nuestra impresora.
Pero de todas formas el medio ambiente nos agradecera que ahorremos algunas hojas.