Select csrBOM_1.*, pUniq_Key As Assy_uniq, pAssyNo As assy_no, pAssyRev As Assy_Rev, pAssyDesc As Assy_Desc, ; pCustAssy As Cust_Assy, lnLevel As nLevel, pUniq_Key As Bom_Parent ; FROM csrBOM_1 Where (PART_SOURC IN('PHANTOM', 'MAKE')) Or ; (PART_SOURC = 'MAKE' And PHANT_MAKE) Into Cursor csrBOM_Two ReadwriteWhen it runs in a compiled app it gives an error "Function Arguement value, type, or count is invalid"
Select csrBOM_1.*, pUniq_Key As Assy_uniq, pAssyNo As assy_no, pAssyRev As Assy_Rev, pAssyDesc As Assy_Desc, ; pCustAssy As Cust_Assy, lnLevel As nLevel, pUniq_Key As Bom_Parent ; FROM csrBOM_1 Where PART_SOURC IN ('PHANTOM', 'MAKE') Or ; (PART_SOURC = 'MAKE' And PHANT_MAKE) Into Cursor csrBOM_Two Readwrite( Removed a set of parens and added a space after the IN parameter)