?
程序举例:
TAR1 #T_AR1 //save addressregister 1
TAR2 #T_AR2 //save addressregister 2
LAR1 P##DST_BLOCK_SAVE_OUTPUTS //destination of error text
L B#16#10 //pointer coding (has to be always b#16#10)
T LB [AR1,P#0.0]
L B#16#2 //byte access
T LB [AR1,P#1.0]
L #OUTPUT_RANGE //length
T LW [AR1,P#2.0]
L #TMP_DBNR_OVERRIDE //generated DB of Manual-Override
T LW [AR1,P#4.0]
L P#DBX 0.0 //start-bit in destination
T LD [AR1,P#6.0]
LAR1 #T_AR1 //restore addressregister 1
LAR2 #T_AR2 //restore addressregister 2
?
CALL "BLKMOV"
SRCBLK :=P#Q 0.0 BYTE 128
RET_VAL:=#STATUS
DSTBLK :=#DST_BLOCK_SAVE_2OUTPUTS