Rich,
Thanks for your response. The low page is 100,001 and the high page is
3,300,000. Also, only the Table Procedure gets the line number wrong, a
regular IDMS COBOL program gets it right and they both use the same
compute statement.
ACCEPT DB-REC-DBK FROM ACTIVE-OOAK-REC CURRENCY.
DIVIDE DB-REC-DBK BY 256
GIVING DBKEY-PAGE-WK
REMAINDER DBKEY-LINE-WK
.
Joe S Cates, Database Analyst II
Information and Organizational Systems
Database Management/Unix Administration
Montgomery County Public Schools
Rockville, MD 20850
301-279-3697
joe_cates@mcpsmd.org