I try to insert multiple records into a remote view, I have a Listbox with the multiselected option

WITH THISFORM.LIST3
FOR i = 1 TO .ListCount
IF .Selected(i)
nNumberSelected = 0 && a variable to track the number
nNumberSelected = nNumberSelected + 1
l_usc_number=pset2.usc_number
l_cmf_code=pset1.cmf_product_pack_number
l_cmf_name=pset1.cmf_product_name
INSERT INTO prodset_val_exp (cmf_product_pack_number,usc_number,cmf_product_name) VALUES (l_cmf_code,l_usc_number,l_cmf_name)

ENDIF
ENDFOR
endwith

but this return a error, can some one help me