L     P##IO_Data
LAR1                              // load AR 1 with the start address of the Pointer
A(
L     B [AR1,P#2.0]               // load the memory area of the Pointer
L     B#16#84                     // 84h = Datablock
==I                               // IF the assigned variable is a DB variable
)
JNB   NoDB                        // THEN:
L     W [AR1,P#0.0]               //     load the DB number from the Pointer
T     #TM_Datablock
OPN   DB [#TM_Datablock]          //     and open the DB first
NoDB: NOP   0

L     D [AR1,P#2.0]               // load the Byte.Bit address from the Pointer
LAR1                              // load AR1 with the Byte.Bit address
T     #TM_DWORD                   // and also store Byte.Bit address in TEMP variable