UIB-DATE-TIME-STAMP VALUE different with 15.1
Article ID: 77113
Updated On:
Products
CA Datacom
CA DATACOM - AD
CA CIS
CA Common Services for z/OS
CA 90s Services
CA Database Management Solutions for DB2 for z/OS
CA Common Product Services Component
CA Common Services
CA Datacom/AD
CA ecoMeter Server Component FOC
CA Easytrieve Report Generator for Common Services
CA Infocai Maintenance
CA IPC
Unicenter CA-JCLCheck Common Component
CA Mainframe VM Product Manager
CA Chorus Software Manager
CA On Demand Portal
CA Service Desk Manager - Unified Self Service
CA PAM Client for Linux for zSeries
CA Mainframe Connector for Linux on System z
CA Graphical Management Interface
CA Web Administrator for Top Secret
CA CA- Xpertware
Issue/Introduction
Why is the CA Datacom support for Metacobol Version 15.1 generated UIB-DATE-TIME-STAMP VALUE different than with CA MetaCOBOL+ Version 1.1?
For example, when the translation was run on April 8,2018:
Version 15.1 generated:
02 UIB-DATE-TIME-STAMP PIC S9(05) COMP-3 VALUE +42036.
Version 1.1 generated:
02 UIB-DATE-TIME-STAMP PIC S9(05) COMP-3 VALUE +82057.
For example, when the translation was run on April 8,2018:
Version 15.1 generated:
02 UIB-DATE-TIME-STAMP PIC S9(05) COMP-3 VALUE +42036.
Version 1.1 generated:
02 UIB-DATE-TIME-STAMP PIC S9(05) COMP-3 VALUE +82057.
Cause
A solution was needed for 15.1 to the DLM macro (MCT#DLM).
According to the CA Datacom® support for MetaCOBOL - 15.1 documentation section on "Other Generated Data-Names":
UIB-DATE-TIME-STAMP PIC S9(5) COMP-3.
This data item assures a unique UIB. It is intialized to the following at translation: The first byte contains the least significant character of the current day, and the remaining bytes contain the current time. A data item containing the date and time of the access.
https://docops.ca.com/ca-datacom-metacobol/15-1/en/program-development-ca-datacom-db/program-development-reference/generated-names/other-generated-data-names
But, with 15.1, the first byte contains the least significant character of the current month, rather than the current day.
According to the CA Datacom® support for MetaCOBOL - 15.1 documentation section on "Other Generated Data-Names":
UIB-DATE-TIME-STAMP PIC S9(5) COMP-3.
This data item assures a unique UIB. It is intialized to the following at translation: The first byte contains the least significant character of the current day, and the remaining bytes contain the current time. A data item containing the date and time of the access.
https://docops.ca.com/ca-datacom-metacobol/15-1/en/program-development-ca-datacom-db/program-development-reference/generated-names/other-generated-data-names
But, with 15.1, the first byte contains the least significant character of the current month, rather than the current day.
Environment
z/OS
Resolution
The VALUE should be the same as was generated with prior CA MetaCOBOL+ Version 1.1.
CA Datacom/DB 15.1 PTF SO04526 is available.
CA Datacom/DB 15.1 PTF SO04526 is available.
Feedback
Yes
No
Powered by
