Command CICS o Command-CICS es un producto de software que permite a las organizaciones migrar de CICS de "nivel macro" a CICS de "nivel de comando" sin ninguna reprogramación, de modo que las empresas pudieran migrar a versiones posteriores de CICS que no admitían programas de aplicación de nivel macro. [1] Las versiones posteriores de CICS ofrecían muchas ventajas sobre las versiones anteriores, pero decenas de miles de programas de aplicación estaban efectivamente excluidos de la nueva versión a menos que estuvieran preparados para operar dos versiones completamente diferentes de CICS en los mismos sistemas operativos , lo que creaba problemas tanto operativos como de mantenimiento. También se requerían dos licencias CICS diferentes y simultáneas.
Cuando IBM lanzó por primera vez CICS a finales de los años 60, utilizaba macros de IBM Assembler para generar las llamadas del sistema API al núcleo de monitorización de teleprocesamiento de CICS . Esto también era así incluso si los programas se escribían en COBOL o PL/1 . Ken Dakin, un programador independiente y director ejecutivo de APT Ltd. en el Reino Unido, se dio cuenta de que al crear un producto de middleware , el problema podría resolverse para casi todas las situaciones. Ken Dakin se acercó a IBM para comercializar su producto, pero no recibió ningún interés en ese momento, a pesar del hecho de que decenas de miles de programas de aplicación de sus clientes necesitarían ser convertidos o reescritos para las nuevas versiones de CICS, lo que costaría muchos millones de dólares.
Command-CICS interceptó aplicaciones de nivel macro a través de un "stub" (estático) editado por Link ubicado por delante del módulo de carga ( MVS ) o fase ( DOS/VSE ). Al obtener el control del Programa de Control de Programa CICS (PCP), se estableció un entorno de "pseudo nivel macro" que consistía en un puntero a un (único) pseudo "Área de Sistema Común" (CSA), un puntero a un Área de Control de Transacción más Área de Trabajo de Transacción (TCA+TWA) y una pseudo Entrada de Terminal de Control de Terminal (TCTTE) y otros artefactos de un entorno de nivel macro. Antes de pasar el control directamente al punto de entrada del programa original, Command-CICS configuró los registros de propósito general reales , R13 y R12 para apuntar a los pseudo bloques de control. El CSA era el bloque de control principal que contenía punteros a los programas del núcleo CICS (Programa de Control de Archivo, Programa de Control de Almacenamiento, etc.) en un entorno CICS de nivel macro real. El CSA de Command-CICS tenía punteros alternativos a los puntos de entrada de Command-CICS en su lugar. Fue posible utilizar CEDF para depurar las llamadas del programa de aplicación cuando se utilizó Command-CICS.
El programa de aplicación procedía a ejecutar instrucciones de código de máquina normales hasta su primera llamada a la API de nivel macro, por lo que no añadía ninguna sobrecarga al programa hasta ese momento. Tan pronto como la llamada a la API salía del programa de aplicación, el código Command-CICS obtenía el control y reemplazaba el enlace original con su propia llamada equivalente de nivel Command. En las versiones originales de CICS de nivel Command anteriores (que admitían programas de nivel Macro y Command), el "Programa de interfaz de ejecución" de CICS (DFHEIP) convertía la llamada de nivel Command en una llamada de nivel macro real . Esto añadiría una sobrecarga adicional muy pequeña solo durante las llamadas de CICS. Sin embargo, las versiones posteriores de CICS ejecutaban la API de CICS directamente, por lo que no imponían ninguna sobrecarga adicional de "compatibilidad con versiones anteriores".
Command-CICS fue vendido inicialmente por APT Ltd en el Reino Unido y por APT International en Europa continental y el resto del mundo. En la actualidad, CommandCICS es ofrecido por Advanced Software Products Group, Inc. de Naples, Florida , Estados Unidos.
CICS/COMET para z/OS: un producto similar de UNICOM Systems Inc. [2] Agrega algo de sobrecarga (debido al requisito de agregar dinámicamente un código auxiliar).