Insert Multiple records to a non business view table in a Header less details form:
Code to be written in OK Button Clicked event:
Sample code is as below do the changes as required:
VA frm_GetGridNumber_MATH01 = "1"
Get Max Grid Rows(FC Grid, VA frm_GetMaxGridRows_Math01)
While VA frm_GetGridNumber_MATH01 is less than VA frm_GetMaxGridRows_Math01
Get Grid Row(FC Grid, VA frm_GetGridNumber_MATH01)
//
If GC Project is greater than <Blank>
F561234.Select
F561234.Fetch Next
If SV File_IO_Status is equal to CO SUCCESS
F561234.Update
Else
F561234.Insert
End If
End If
VA frm_GetGridNumber_MATH01 = [VA frm_GetGridNumber_MATH01]+1
End While
Code to be written in OK Button Clicked event:
Sample code is as below do the changes as required:
VA frm_GetGridNumber_MATH01 = "1"
Get Max Grid Rows(FC Grid, VA frm_GetMaxGridRows_Math01)
While VA frm_GetGridNumber_MATH01 is less than VA frm_GetMaxGridRows_Math01
Get Grid Row(FC Grid, VA frm_GetGridNumber_MATH01)
//
If GC Project is greater than <Blank>
F561234.Select
F561234.Fetch Next
If SV File_IO_Status is equal to CO SUCCESS
F561234.Update
Else
F561234.Insert
End If
End If
VA frm_GetGridNumber_MATH01 = [VA frm_GetGridNumber_MATH01]+1
End While
No comments:
Post a Comment