Compartir a través de


Conversión de tipos de datos de Automation a Z/OS COBOL

Use las tablas de este tema como guía para especificar cómo desea que TI controle las conversiones de tipos de datos de Automation a tipos de datos COBOL. Para obtener más información sobre los tipos de datos específicos, vea Tipos de datos de TI admitidos.

Use la siguiente clave de código para interpretar los códigos de las columnas Posibles errores de conversión y Configuración de propiedades requeridas de cada tabla.

Código Descripción
r Posibles errores de intervalo.
b Posible pérdida de precisión debido a la conversión de base 2 a base 16.
p Posible pérdida de precisión debido a la especificación de escala de formato de imagen.
m Errores de mapeo posibles.
f yyyyddd y hhmmss.
Un Debe especificar Truncar,Redondear o Error en Control de errores en la pestaña denominada Definición de COBOL de la página de propiedades.
C Debe especificar la precisión y la escala rellenando los cuadros Dígitos a la izquierda y Dígitos a la derecha en la pestaña Definición de COBOL de la página de propiedades.
D Debe especificar el ancho de cadena rellenando el cuadro Tamaño de la pestaña Definición de COBOL de la página de propiedades.
E Se requiere información de asignación Unicode o EBCDIC, como una página de código.
F Para las matrices cuya longitud es menor que el máximo especificado, debe especificar Tamaño de relleno bajo Relleno final en la pestaña Definición de COBOL de la página de propiedades.
G Debe especificar cómo manejar cadenas. Haga clic en Espacio rellenado o nulo terminado en Delimitación de cadenas en la pestaña Definición de COBOL de la página de propiedades. A continuación, haga clic en Truncar o Error en Control de errores en la pestaña Definición de COBOL de la página de propiedades para especificar qué TI debe hacer si la cadena es demasiado larga.
H Se requiere el tamaño máximo.
Yo Es necesario realizar una localización.
J Se admite la inserción y eliminación opcionales de SO y SI.

En la tabla siguiente se muestran los valores predeterminados que TI usa para convertir tipos de datos de Automation en tipos de datos COBOL.

Predeterminado

Desde el tipo de datos de automatización Tipo de datos COBOL de z/OS Posibles errores de conversión Configuración de propiedades requerida
Entero sin signo de 1 byte PIC X Sin traducción Ninguno Ninguno
Entero con signo de 2 bytes PIC S9(4) COMP (entero de 16 bits) Ninguno Ninguno
Entero firmado de 4 bytes PIC S9(9) COMP (entero de 32 bits) Ninguno Ninguno
Real de 4 bytes (único) COMP-1 Br Ninguno
Real de 8 bytes (doble) COMP-2 Br Ninguno
Booleano PIC S9(4) COMP (entero de 16 bits) Ninguno Ninguno
Cadena de longitud variable PIC X m GRADOS
Divisa COMP-3 Decimal empaquetado If "pr" refers to "public relations," then the improved translation would be "relaciones públicas". C
Fecha (fecha y hora) COMP-3 Decimal empaquetado pf Cédula de Identidad
Fecha (solo fecha) COMP-3 Decimal empaquetado pf Cédula de Identidad
Fecha (solo hora) COMP-3 Decimal empaquetado Pf Cédula de Identidad
Decimal COMP-3 Decimal empaquetado If "pr" refers to "public relations," then the improved translation would be "relaciones públicas". C
Matriz (cualquier tipo de datos) OCURRE UN NÚMERO FIJO DE VECES Ninguno FH

Nota:

Al convertir números enteros o fraccionarios de los tipos de datos Visual Basic Single o Visual Basic Double a tipos de datos Decimales Empaquetados o Decimales Zonificados de llamada de programa distribuida (DPC), TI está limitada a una precisión de 1 a 18 dígitos a la izquierda del punto decimal (por ejemplo, 1,2345678901234567E+17). Al convertir números fraccionarios a tipos de datos decimales empaquetados o de datos decimales con zona DPC, debe convertir al tipo de datos Decimal de Visual Basic.

En la tabla siguiente se muestran las otras asignaciones de tipos de datos compatibles que puede establecer en proyecto de TI para invalidar los valores predeterminados presentados en la tabla anterior.

Compatible con el integrador de transacciones

Desde el tipo de datos de automatización Tipo de datos COBOL de z/OS Posibles errores de conversión Configuración de propiedades requerida
Entero sin signo de 1 byte PIC S9(4) COMP (entero de 16 bits) Ninguno Ninguno
Entero sin signo de 1 byte COMP-3 Decimal empaquetado Ninguno C
Entero con signo de 2 bytes COMP-3 Decimal compactado Ninguno C
Entero con signo de 2 bytes DISPLAY Decimal zonificado Ninguno C
Entero firmado de 4 bytes COMP-3 Decimal empaquetado Ninguno C
Entero firmado de 4 bytes DISPLAY Decimal zonificado Ninguno C
Real de 4 bytes (único) PIC S9(4) COMP (entero de 16 bits) p,r Ninguno
Real de 4 bytes (único) PIC S9(9) COMP (entero de 32 bits) p,r Ninguno
Real de 4 bytes (único) COMP-3 Decimal empaquetado p,r C
Real de 4 bytes (único) DISPLAY Decimal zonificado p,r C
Real de 8 bytes (doble) PIC S9(4) COMP (entero de 16 bits) p,r Ninguno
Real de 8 bytes (doble) PIC S9(9) COMP (entero de 32 bits) p,r
Real de 8 bytes (doble) COMP-3 Decimal empaquetado p,r C
Real de 8 bytes (doble) DISPLAY Decimal zonificado p,r C
Booleano PIC S9(9) COMP (entero de 32 bits) Ninguno Ninguno
Booleano COMP-3 Decimal empaquetado Ninguno C
Cadena de longitud variable PIC G m DEGJ
Divisa PIC S9(?)V9(?) COMP (16 bit) If "pr" refers to "public relations," then the improved translation would be "relaciones públicas". Ninguno
Divisa PIC S9(?)V9(?) COMP (32-bit) If "pr" refers to "public relations," then the improved translation would be "relaciones públicas". Ninguno
Divisa DISPLAY Decimal zonificado If "pr" refers to "public relations," then the improved translation would be "relaciones públicas". C
Decimal PIC S9(?)V9(?) COMP (16 bits) If "pr" refers to "public relations," then the improved translation would be "relaciones públicas". Ninguno
Decimal PIC S9(?)V9(?) COMP (32 bits) If "pr" refers to "public relations," then the improved translation would be "relaciones públicas". Ninguno
Decimal DISPLAY Decimal zonificado If "pr" refers to "public relations," then the improved translation would be "relaciones públicas". C
Matriz (cualquier tipo de datos) SE PRODUCE EN FUNCIÓN DE Ninguno FH

Nota:

Cuando se convierten números enteros o fraccionarios de tipos de datos single o doble de Visual Basic en tipos de datos decimales empaquetados o decimales con zona DPC, TI se limita a una precisión de 1 a 18 dígitos a la izquierda del separador decimal (por ejemplo, 1,2345678901234567E+17).

En la tabla siguiente se muestran asignaciones de tipos de datos compatibles adicionales que admite el entorno en tiempo de ejecución de TI.

Compatible únicamente con el entorno de ejecución de TI.

Desde el tipo de datos de automatización Tipo de datos COBOL de z/OS Posibles errores de conversión Configuración de propiedades requerida
Entero sin signo de 1 byte PIC S9(9) COMP (entero de 32 bits) Ninguno Ninguno
Entero sin signo de 1 byte DISPLAY Decimal con zona Ninguno C
Booleano DISPLAY Decimal zonificado Ninguno C

En este momento, TI no admite ninguna otra conversión de tipos de datos de Automation a COBOL.

Nota:

Cuando el uso de COBOL es DISPLAY sin un signo y se cambia el tipo de automatización a String, la imagen de COBOL se cambia a PIC X, que tiene la misma representación interna de datos. La longitud sigue siendo la misma y, por tanto, no afecta al programa central.

Véase también

Tipos de datos de TI admitidos
Conversión de tipos de datos de COBOL z/OS a Automation
Conversión de tipos de datos