COMPILE Insert protect_common
* mtr 1-24-06 
* rjc  02-23-24 - Changed EQU to POINT
point PROT.DOCONV@        TO SC_PROT_DOCONV
point PROT.DEFCONV@       TO SC_PROT_DEFCONV
point PROT.CURSCONV@      TO SC_PROT_CURSCONV
point PROT.NOPASS@        TO SC_PROT_LOCKMODE
point FILE.HANDLES@       TO SC_PROT_HANDLES
point FILE.NAMES@         TO SC_PROT_TABLEDATA
point TRANS.CONTROL@      TO SC_PROT_TRANSSTATE
point TRANS.INFO@         TO SC_PROT_TRANSDATA
point CONSISTENCY_LEVEL@  TO SC_PROT_CONSISTENCY
point TRANSFILE_HANDLES@  TO SC_PROT_TRANSHANDLES

* rjc  02-23-24 - Match Arev32 protect_Common
Dim table_handles@(8)
Dim lock_info@(7)

point table_handles@(0) To  SC_PROT_TABLELOCKS(0)
point table_handles@(1) To  SC_PROT_TABLELOCKS(1)
point table_handles@(2) To  SC_PROT_TABLELOCKS(2)
point table_handles@(3) To  SC_PROT_TABLELOCKS(3)
point table_handles@(4) To  SC_PROT_TABLELOCKS(4)
point table_handles@(5) To  SC_PROT_TABLELOCKS(5)
point table_handles@(6) To  SC_PROT_TABLELOCKS(6)
point table_handles@(7) To  SC_PROT_TABLELOCKS(7)
point table_handles@(8) To  SC_PROT_TABLELOCKS(8)

point lock_info@(0)     To  SC_PROT_LOCKDATA(0)
point lock_info@(1)     To  SC_PROT_LOCKDATA(1)
point lock_info@(2)     To  SC_PROT_LOCKDATA(2)
point lock_info@(3)     To  SC_PROT_LOCKDATA(3)
point lock_info@(4)     To  SC_PROT_LOCKDATA(4)
point lock_info@(5)     To  SC_PROT_LOCKDATA(5)
point lock_info@(6)     To  SC_PROT_LOCKDATA(6)
point lock_info@(7)     To  SC_PROT_LOCKDATA(7)