Pessoal, fiz uma função que retornara quantidade de linhas da global, independente da quantidade de chaves que ela tenha. Com o $order você terá que percorrer cada uma das chaves da global, com o exemplo abaixo, isso não é necessário, o que faz com que a performance da consulta seja melhor.

QuantidadeLinhasGlobal(global,quantidadeLinhas) ;
new cont
;
set (cont,quantidadeLinhas)=""
;
set queryary=$query(@global@(""))
;
for   { set queryary=$query(@queryary)
quit:queryary=""
;
 set cont=$increment(cont)
;
}
;
set quantidadeLinhas=cont
;
quit 1

Espero ter ajudado de alguma forma.