Observação: O file ADABAS 99 possui carregados apenas 15 registros ( ISNs ).
| Descritor CARGO | Ocorrências | Lista de ISNs | ||||
| ANALISTA | 3 | 2 | 10 | 11 | ||
| CONSULTOR | 1 | 6 | ||||
| DBA | 2 | 1 | 13 | |||
| OPERADOR | 4 | 5 | 7 | 9 | 12 | |
| PROGRAMADOR | 5 | 3 | 4 | 8 | 14 | 15 |
Considere o trecho de programa abaixo:
0430 READ FTC-CARGO WITH CARGO = 'CONSULTOR'
0440 WHERE CARGO NE 'OPERADOR'
0450 LOOP(0430)
0460 DISPLAY *COUNTER(0430)
O valor de *COUNTER, quando executado o comando DISPLAY, é
