rpcursor = SYS(2015) CREATE CURSOR (rpcursor)(mainkey I, vendor c(100), amt n(10,2), rp l) SELECT op_main_key AS mainkey, op_vendor AS vendor, op_amt AS amt, op_py AS rp ; FROM o_ord_main WHERE op_py = .t. INTO CURSOR rp_cursor1 SELECT p_mainkey AS mainkey, p_vendor AS vendor, p_amt AS amt, p_py AS rp ; FROM sub_payment WHERE p_py = .t. INTO CURSOR rp_cursor2 SELECT r_mainkey AS mainkey, r_vendor AS vendor, r_payamt AS amt, r_py AS rp ; FROM req_payment WHERE r_py = .t. INTO CURSOR rp_cursor3 SELECT (rpcursor) APPEND FROM ( DBF("rp_cursor1")) APPEND FROM ( DBF("rp_cursor2")) APPEND FROM ( DBF("rp_cursor3")) * UNION SELECT op_main_key AS mainkey, op_vendor AS vendor, op_amt AS amt, op_py AS rp ; FROM o_ord_main WHERE op_py = .t. ; UNION ALL ; SELECT p_mainkey AS mainkey, p_vendor AS vendor, p_amt AS amt, p_py AS rp ; FROM sub_payment WHERE p_py = .t. ; UNION ALL ; SELECT r_mainkey AS mainkey, r_vendor AS vendor, r_payamt AS amt, r_py AS rp ; FROM req_payment WHERE r_py = .t. ; INTO CURSOR rp_cursor>I am using select command to extract information from 3 tables into cursors and then use scatter command to consolidate the information into cursor rpcursor as follows:
rpcursor = SYS(2015) >CREATE CURSOR (rpcursor)(mainkey I, vendor c(100), amt n(10,2), rp l) >brows > > >rp_cursor1 = SYS(2015) >SELECT op_main_key, op_vendor, op_amt, op_py FROM o_ord_main WHERE op_py = .t. INTO CURSOR (rp_cursor1) >brows >SCATTER memvar >INSERT INTO (rpcursor) FROM memvar >SELECT (rpcursor) >brows > >rp_cursor2 = SYS(2015) >SELECT p_mainkey, p_vendor, p_amt, p_py FROM sub_payment WHERE p_py = .t. INTO CURSOR (rp_cursor2) >brows >SCATTER memvar >INSERT INTO (rpcursor) FROM memvar >SELECT (rpcursor) >brows > >rp_cursor3 = SYS(2015) >SELECT r_mainkey, r_vendor, r_payamt, r_py FROM req_payment WHERE r_py = .t. INTO CURSOR (rp_cursor3) >browse >SCATTER memvar >INSERT INTO (rpcursor) FROM memvar >SELECT (rpcursor) >brows >>
INSERT INTO (rpcursor) FROM memvarcommand, it only puts zero's into the rpcursor. When I browse rp_cursor1 - rp_cursor3 I do see the information in there. What am I doing wrong here?