Unable to insert data at table level

Question

Dear sirs,

we are facing new issue while inserting data via VB.net but same query if i execute via SQL server the data inserting

so please help to overcome this issue

VB code

Dim kSQL As String = Query6.Replace("@", Requestid)
Dim cmd1 As New SqlCommand(kSQL, sqlSoftcodeCn)
cmd1.CommandTimeout = 1000000
cmd1.ExecuteNonQuery()
cmd1.Dispose()

SQL:  (query6 this will pass)

INSERT INTO PdcChequeRemovalMaillogs(Request_id,WORKFLOW_LINE_ID,ROLE_ID,LEVEL_ID,STATUS_ID)  select Top 1 header_id,line_id,role_id,level_id,status_id from FnGetPdcChequeRemovalApproverWithLink(7) Order by Level_id