Nested data structure

[gregwga50]

I need to define an external data structure DSORDFIL for a file named ORDERFIL. ORDERFIL has a field named ORDAT in format YYYYMMDD. How can I define a nested data structure within DSORDFIL that contains 3 fields oryy, ormm,ordd that are subfields of ORDAT

[JonBoy]

Not tested but something like this

dcl-ds xxxx extname('yyyy')  Qualified;
   dcl-ds zzzz samepos(ORDAT);
      yyyy  
      mm
      dd
   end-ds;