public override Copybook VisitDataDescriptionEntryFormat1(Cobol85Parser.DataDescriptionEntryFormat1Context context)
{
Console.WriteLine($"{context.INTEGERLITERAL()} {context.dataName().GetText()}");
_level = context.INTEGERLITERAL().ToString();
_name = context.dataName().GetText();
return(new Copybook
{
Level = _level,
Name = _name
});
}
public override Field VisitDataDescriptionEntryFormat1(Cobol85Parser.DataDescriptionEntryFormat1Context context)
{
_level = context.INTEGERLITERAL().ToString();
_name = context.dataName().GetText();
var ducVisitor = new DataUsageClauseVisitor();
_usage = ducVisitor.VisitDataUsageClause(context.dataUsageClause(0));
var psVisitor = new PictureStringVisitor();
_picClause = psVisitor.VisitPictureString(context.dataPictureClause(0).pictureString());
return(new Field
{
Level = _level,
Name = _name,
Usage = _usage,
PicClause = _picClause
});
}
public override void EnterDataDescriptionEntryFormat1(Cobol85Parser.DataDescriptionEntryFormat1Context context)
{
Console.WriteLine(context.INTEGERLITERAL().ToString());
Console.WriteLine(context.dataName().GetText());
}
