PROC COM_SENT(INT BB1, INT BB2, INT BB3, INT BB4)

STOPRE
$A_OUT[1]=BB1
$A_OUT[2]=BB2
$A_OUT[3]=BB3
$A_OUT[4]=BB4
STOPRE
G4 F1

M17