Reg: Fetch Input Data Structure Attributes in DATA-INTO Parser

Hi All,

I am planning to add logic in the DATA-INTO Parser Program, before
populating the value into Data Structure, I need to verify the length of
the fields to validate whether any truncation is happening.

For example

dcl-ds Ds_Input;
name char(5);
number zoned(4:0);
end-ds;

data = '{"name": "David John","number": 123}';
data-into Ds_Input %data(data:dataOption) %parser('mpParser':userParm);

In the above example, the name attribute is the character of length 5 but
the value will be 10 characters. I want to validate this in the Parser
Program.

Is it possible to get the attribute inside the parser program like the
attribute of the field "name" is a character of length 5 and the attribute
of a field "number" is numeric of length 4 with 0 decimal places when
parsing field by field?

Regards,
Suren