--Created by Tony Liu
--get ledger mapping id
BEGIN
SELECT coa_mapping_id
INTO vl_mapping_id
FROM gl_coa_mappings
WHERE NAME = vgc_mapping_name
AND rownum = 1;
END;
--Clear temp table
BEGIN
DELETE gl_accts_map_int_gt;
END;
--Insert R12 CCID
BEGIN
INSERT INTO gl_accts_map_int_gt
(from_ccid, coa_mapping_id)
VALUES
(pi_ccid, vl_mapping_id);
END;
-- call API
gl_accounts_map_grp.map(mapping_name => vgc_mapping_name,
create_ccid => TRUE,
debug => NULL);
COMMIT;
--get secondary ledger ccid
BEGIN
SELECT to_ccid INTO vl_convert_ccid FROM gl_accts_map_int_gt;
END;
--return ccid
RETURN vl_convert_ccid;
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/10359218/viewspace-700966/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/10359218/viewspace-700966/