May I customize MetaCOBOL GPV macro to avoid GPV16E error
search cancel

May I customize MetaCOBOL GPV macro to avoid GPV16E error

book

Article ID: 77704

calendar_today

Updated On:

Products

Datacom DATACOM - AD CIS COMMON SERVICES FOR Z/OS 90S SERVICES DATABASE MANAGEMENT SOLUTIONS FOR DB2 FOR Z/OS COMMON PRODUCT SERVICES COMPONENT Common Services CA ECOMETER SERVER COMPONENT FOC Easytrieve Report Generator for Common Services INFOCAI MAINTENANCE IPC UNICENTER JCLCHECK COMMON COMPONENT Mainframe VM Product Manager CHORUS SOFTWARE MANAGER CA ON DEMAND PORTAL CA Service Desk Manager - Unified Self Service PAM CLIENT FOR LINUX ON MAINFRAME MAINFRAME CONNECTOR FOR LINUX ON MAINFRAME GRAPHICAL MANAGEMENT INTERFACE WEB ADMINISTRATOR FOR TOP SECRET Xpertware

Issue/Introduction



May I customize MetaCOBOL GPV macro to avoid GPV16E error? Under CA MetaCOBOL+ 1.1, we customized the GPV macro to increase &V@REDEFINES variable from 200 to 500 for some programs with several Datacom DATAVIEWs. May we do the same with CA Datacom support for MetaCOBOL version 15.1? 
 

Environment

z/OS
 

Resolution

Yes, the CA Datacom support for MetaCOBOL version 15.1 macros can be user customized.
Be sure not to change the SMP/e target macros (MCT#*) in the CABDSAMP library.
Member MCT#GPV should be copied and modified in your source macro library.
 

Additional Information

The errors that occur during the translation if the increase is needed are:

N99 GPV16E-MORE THAN 200 "REDEFINES,"
N99 INCREASE OCCURS FOR &V@REDEFINES.
N05 INVALID INDEX FOR VARIABLE TABLE


Customize a copy of CADBSAMP member MCT#GPV for your use as the GPV macro.
The increase from 200 will be in these GPV macro statements:

&GLOBAL &V@REDEFINES(200) 99999 /* TDS ADDRESS OF REDEFINES
&GLOBAL &V@RL = 200 999 /* OCCURENCES
&NOTE &( GPV16 &V@S - 'MORE THAN 200 "REDEFINES,"' &)