cobol_num_type

cobol_num_type 
      ::= 
      ( "pic" | "picture" ) [ "is" ] 
      "s" cobol_nines_spec 
      [ "usage" [ "is" ] ] "display" "sign" "leading" "separate" 

This rule is called by

-> cobol_type_spec