May I customize MetaCOBOL GPV macro to avoid GPV16E error

Document ID : KB000077704
Last Modified Date : 16/04/2018
Show Technical Document Details
Question:
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
 
Answer:
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,"' &)