CALL "DP_DIAGNOSIS" // fc9
ptr_slave :=P#L 0.0 BOOL 1
ptr_unit :=P#L 0.0 BOOL 1
id_dp :=W#16#3101
clear :=FALSE
fail_slave:=#fail_slave
fail_unit :=#fail_unit
dp_diag :=#dp_diag

A #dp_diag
BEC
CALL "STP"