Um registro especial LINAGE-COUNTER separado é gerado para cada entrada FD que contém uma cláusula LINAGE.
Quando mais de um é gerado, você deve qualificar cada referência a um LINAGE-COUNTER com seu nome de arquivo relacionado.

A descrição implícita do registro especial LINAGE-COUNTER é um dos seguintes:

• Se a cláusula LINAGE especificar um nome de dados, LINAGE-COUNTER terá as mesmas PICTURE e USAGE que esse nome de dados.
• Se a cláusula LINAGE especificar um número inteiro, LINAGE-COUNTER é um item binário com o mesmo número de dígitos que esse número inteiro.

Para mais informações, consulte a cláusula LINAGE.

O valor em LINAGE-COUNTER a qualquer momento é o número da linha na qual o dispositivo está posicionado na página atual.
LINAGE-COUNTER pode ser referido nas declarações de divisão de procedimentos; não deve ser modificado por eles.

LINAGE-COUNTER é inicializado como 1 quando uma instrução OPEN para seu arquivo associado é executada.

O LINAGE-COUNTER é modificado automaticamente por qualquer instrução WRITE deste arquivo.
(Veja a instrução WRITE.)

Se a entrada de descrição do arquivo para um arquivo seqüencial contiver a cláusula LINAGE e a cláusula EXTERNAL, o item de dados LINAGE-COUNTER é um item de dados externo.
Se a entrada de descrição do arquivo para um arquivo seqüencial contiver a cláusula LINAGE e a cláusula GLOBAL, o item de dados LINAGE-COUNTER é um item de dados global.

Você pode especificar o registro especial LINAGE-COUNTER sempre que um argumento inteiro para uma função for permitido.