979: -- |------------------------------< load_mgr_row >----------------------------|
980: -- ----------------------------------------------------------------------------
981: --
982: -- Description:
983: -- This procedure uploads a single row into pay_magnetic_records
984: -- table. If the row being uploaded already exists in the table then the
985: -- row is only updated with the new values else the row is inserted.
986: --
987: -- ----------------------------------------------------------------------------
1004: --
1005: l_proc varchar2(72) := g_package||'load_mgr_row';
1006: l_rec PAY_MGR_SHD.G_REC_TYPE;
1007: l_exists varchar2 (1);
1008: l_magnetic_block_id PAY_MAGNETIC_RECORDS.MAGNETIC_BLOCK_ID%TYPE;
1009: l_next_block_id PAY_MAGNETIC_RECORDS.NEXT_BLOCK_ID%TYPE;
1010: l_formula_id PAY_MAGNETIC_RECORDS.FORMULA_ID%TYPE;
1011: --
1012: cursor csr_exists is
1005: l_proc varchar2(72) := g_package||'load_mgr_row';
1006: l_rec PAY_MGR_SHD.G_REC_TYPE;
1007: l_exists varchar2 (1);
1008: l_magnetic_block_id PAY_MAGNETIC_RECORDS.MAGNETIC_BLOCK_ID%TYPE;
1009: l_next_block_id PAY_MAGNETIC_RECORDS.NEXT_BLOCK_ID%TYPE;
1010: l_formula_id PAY_MAGNETIC_RECORDS.FORMULA_ID%TYPE;
1011: --
1012: cursor csr_exists is
1013: select null
1006: l_rec PAY_MGR_SHD.G_REC_TYPE;
1007: l_exists varchar2 (1);
1008: l_magnetic_block_id PAY_MAGNETIC_RECORDS.MAGNETIC_BLOCK_ID%TYPE;
1009: l_next_block_id PAY_MAGNETIC_RECORDS.NEXT_BLOCK_ID%TYPE;
1010: l_formula_id PAY_MAGNETIC_RECORDS.FORMULA_ID%TYPE;
1011: --
1012: cursor csr_exists is
1013: select null
1014: from pay_magnetic_records
1010: l_formula_id PAY_MAGNETIC_RECORDS.FORMULA_ID%TYPE;
1011: --
1012: cursor csr_exists is
1013: select null
1014: from pay_magnetic_records
1015: where magnetic_block_id = l_magnetic_block_id
1016: and sequence = p_sequence;
1017:
1018: --