JSON Data structure

So I have one of those JSON structures that doesn't have root object name.. it looks like this

[
{
"id": "37257",
"recordType": "salesorder",
"External_ID": "10040031",

...more here

I used YAJLGEN (thank you very much) to create my DS. Likewise I'm using YAJLINTO.

YAJLGEN created this template:
dcl-proc readTheJson;

num_jsonDoc int(10) inz(0);
dcl-ds jsonDoc qualified dim(5);
ID varchar(5) inz('');
RECORDTYPE varchar(10) inz('');
EXTERNAL_ID varchar(8) inz('');
.... More here

data-into jsonDoc %DATA( ifsPathname
: 'doc=file case=convert countprefix=num_')
%PARSER( 'YAJLINTO'
: '{ "document_name": "jsonDoc", +
"number_prefix": "YAJL_" }');

So this works if I remove "num_jsonDoc" above the DS. I can deal with this, but was wondering if there's any way to include the counter?

I would like to do
For x = 1 to num_jsonDoc;
Instead of
For x = 1 to %elem(jsonDoc);
(other logic here to handle blank elements)

Just curious.

TIA
Greg