DBA Data[Home] [Help]

APPS.AR_GTA_TRX_HEADERS_ALL_PKG dependencies on AR_GTA_TRX_HEADERS_ALL

Line 1: PACKAGE BODY AR_GTA_TRX_HEADERS_ALL_PKG AS

1: PACKAGE BODY AR_GTA_TRX_HEADERS_ALL_PKG AS
2: --$Header: ARGUGHAB.pls 120.0.12010000.3 2010/01/19 09:12:38 choli noship $
3: --+=======================================================================+
4: --| Copyright (c) 1998 Oracle Corporation |
5: --| Redwood Shores, CA, USA |

Line 13: --| table AR_GTA_TRX_HEADERS_ALL,these handlers |

9: --| ARUGHAB.pls |
10: --| |
11: --| DESCRIPTION |
12: --| This package provides table handers for |
13: --| table AR_GTA_TRX_HEADERS_ALL,these handlers |
14: --| will be called by 'Golden Tax Workbench' form and 'Golden Tax |
15: --| invoie import' program to operate data in table |
16: --| AR_GTA_TRX_HEADERS_ALL |
17: --| |

Line 16: --| AR_GTA_TRX_HEADERS_ALL |

12: --| This package provides table handers for |
13: --| table AR_GTA_TRX_HEADERS_ALL,these handlers |
14: --| will be called by 'Golden Tax Workbench' form and 'Golden Tax |
15: --| invoie import' program to operate data in table |
16: --| AR_GTA_TRX_HEADERS_ALL |
17: --| |
18: --| PROCEDURE LIST |
19: --| PROCEDURE Insert_Row |
20: --| PROCEDURE Update_Row |

Line 46: -- table AR_GTA_TRX_HEADERS_ALL to create a new record

42: --
43: -- DESCRIPTION:
44: --
45: -- This procedure is to insert data that are passed in by parameters into
46: -- table AR_GTA_TRX_HEADERS_ALL to create a new record
47: --
48: -- PARAMETERS:
49: -- In: p_ra_gl_date GL date
50: -- p_ra_gl_period GL Period

Line 243: ar_gta_trx_headers_all

239: CURSOR C IS
240: SELECT
241: ROWID
242: FROM
243: ar_gta_trx_headers_all
244: WHERE
245: gta_trx_header_id=p_gta_trx_header_id;
246: BEGIN
247:

Line 260: --Insert data into table AR_GTA_TRX_HEADERS_ALL

256:
257: END IF; --( l_proc_level >= l_dbg_level)
258:
259:
260: --Insert data into table AR_GTA_TRX_HEADERS_ALL
261: INSERT INTO ar_gta_trx_headers_all(
262: ra_gl_date
263: ,ra_gl_period
264: ,set_of_books_id

Line 261: INSERT INTO ar_gta_trx_headers_all(

257: END IF; --( l_proc_level >= l_dbg_level)
258:
259:
260: --Insert data into table AR_GTA_TRX_HEADERS_ALL
261: INSERT INTO ar_gta_trx_headers_all(
262: ra_gl_date
263: ,ra_gl_period
264: ,set_of_books_id
265: ,bill_to_customer_id

Line 467: -- This procedure is used to update data in table AR_GTA_TRX_HEADERS_ALL

463: -- Update_Row Public
464: --
465: -- DESCRIPTION:
466: --
467: -- This procedure is used to update data in table AR_GTA_TRX_HEADERS_ALL
468: -- according to parameters passed in
469: --
470: -- PARAMETERS:
471: -- In: p_ra_gl_date GL date

Line 668: --Update data on table AR_GTA_TRX_HEADERS_ALL

664: );
665:
666: END IF; --( l_proc_level >= l_dbg_level)
667:
668: --Update data on table AR_GTA_TRX_HEADERS_ALL
669: UPDATE ar_gta_trx_headers_all
670: SET
671: ra_gl_date = p_ra_gl_date
672: ,ra_gl_period = p_ra_gl_period

Line 669: UPDATE ar_gta_trx_headers_all

665:
666: END IF; --( l_proc_level >= l_dbg_level)
667:
668: --Update data on table AR_GTA_TRX_HEADERS_ALL
669: UPDATE ar_gta_trx_headers_all
670: SET
671: ra_gl_date = p_ra_gl_date
672: ,ra_gl_period = p_ra_gl_period
673: ,set_of_books_id = p_set_of_books_id

Line 778: -- AR_GTA_TRX_HEADERS_ALL

774: --
775: -- DESCRIPTION:
776: --
777: -- This procedure is used to update implement lock on row level on table
778: -- AR_GTA_TRX_HEADERS_ALL
779: --
780: -- PARAMETERS:
781: -- In: p_ra_gl_date GL date
782: -- p_ra_gl_period GL Period

Line 971: ar_gta_trx_headers_all

967: CURSOR c IS
968: SELECT
969: *
970: FROM
971: ar_gta_trx_headers_all
972: WHERE ROWID=p_row_id
973: FOR UPDATE OF gta_trx_header_id NOWAIT;
974:
975: recinfo c%ROWTYPE;

Line 1635: -- AR_GTA_TRX_HEADERS_ALL

1631: --
1632: -- DESCRIPTION:
1633: --
1634: -- This procedure is used to delete record from table
1635: -- AR_GTA_TRX_HEADERS_ALL
1636: --
1637: -- PARAMETERS:
1638: -- In:
1639: --

Line 1662: l_consolidation_flag AR_GTA_TRX_HEADERS_ALL.CONSOLIDATION_FLAG%TYPE;

1658: l_dbg_level NUMBER :=FND_LOG.G_Current_Runtime_Level;
1659: l_proc_level NUMBER :=FND_LOG.Level_Procedure;
1660: -- added by Allen Yang for bug 8605196: ENHANCEMENT FOR GOLDEN TAX ADAPTER R12.1.2
1661: -----------------------------------------------------------------------------------
1662: l_consolidation_flag AR_GTA_TRX_HEADERS_ALL.CONSOLIDATION_FLAG%TYPE;
1663: l_consol_trx_num AR_GTA_TRX_HEADERS_ALL.CONSOLIDATION_TRX_NUM%TYPE;
1664: -----------------------------------------------------------------------------------
1665: BEGIN
1666:

Line 1663: l_consol_trx_num AR_GTA_TRX_HEADERS_ALL.CONSOLIDATION_TRX_NUM%TYPE;

1659: l_proc_level NUMBER :=FND_LOG.Level_Procedure;
1660: -- added by Allen Yang for bug 8605196: ENHANCEMENT FOR GOLDEN TAX ADAPTER R12.1.2
1661: -----------------------------------------------------------------------------------
1662: l_consolidation_flag AR_GTA_TRX_HEADERS_ALL.CONSOLIDATION_FLAG%TYPE;
1663: l_consol_trx_num AR_GTA_TRX_HEADERS_ALL.CONSOLIDATION_TRX_NUM%TYPE;
1664: -----------------------------------------------------------------------------------
1665: BEGIN
1666:
1667: --log for debug

Line 1685: FROM AR_GTA_TRX_HEADERS_ALL

1681: SELECT gta_trx_number
1682: , consolidation_flag
1683: INTO l_consol_trx_num
1684: ,l_consolidation_flag
1685: FROM AR_GTA_TRX_HEADERS_ALL
1686: WHERE rowid = p_rowid;
1687:
1688: -- set all consolidated invoices as stats 'DRAFT' and consolidation_flag NULL
1689: IF NVL(l_consolidation_flag, ' ') = '0'

Line 1691: UPDATE AR_GTA_TRX_HEADERS_ALL

1687:
1688: -- set all consolidated invoices as stats 'DRAFT' and consolidation_flag NULL
1689: IF NVL(l_consolidation_flag, ' ') = '0'
1690: THEN
1691: UPDATE AR_GTA_TRX_HEADERS_ALL
1692: SET STATUS = 'DRAFT'
1693: ,CONSOLIDATION_FLAG = NULL
1694: ,CONSOLIDATION_TRX_NUM = NULL
1695: -- modified by Allen Yang for bug #8882568 concurrency control 05-Sep-2009

Line 1705: --Delete row from table AR_GTA_TRX_HEADERS_ALL

1701: AND CONSOLIDATION_FLAG = '1';
1702: END IF; -- NVL(l_consolidation_flag, ' ') = '0'
1703: --------------------------------------------------------------------------
1704:
1705: --Delete row from table AR_GTA_TRX_HEADERS_ALL
1706: DELETE
1707: FROM
1708: ar_gta_trx_headers_all
1709: WHERE rowid = p_rowid;

Line 1708: ar_gta_trx_headers_all

1704:
1705: --Delete row from table AR_GTA_TRX_HEADERS_ALL
1706: DELETE
1707: FROM
1708: ar_gta_trx_headers_all
1709: WHERE rowid = p_rowid;
1710:
1711: --In case of delete failed,raise error
1712: IF (SQL%NOTFOUND)

Line 1738: -- from table AR_GTA_TRX_HEADERS_ALL

1734: --
1735: -- DESCRIPTION:
1736: --
1737: -- This procedure is used to retrieve record by parameter p_header
1738: -- from table AR_GTA_TRX_HEADERS_ALL
1739: --
1740: -- PARAMETERS:
1741: -- In: p_header_id Identifier of GTA invoice header
1742: --

Line 1744: -- table AR_GTA_TRX_HEADERS_ALL

1740: -- PARAMETERS:
1741: -- In: p_header_id Identifier of GTA invoice header
1742: --
1743: -- Out: x_trx_header_rec record to store a row fetched from
1744: -- table AR_GTA_TRX_HEADERS_ALL
1745: --
1746: --
1747: -- DESIGN REFERENCES:
1748: -- GTA-Txt-Interface-TD.doc

Line 1779: --Retrive data from AR_GTA_TRX_HEADERS_ALL and store them into PL/SQL record

1775: );
1776:
1777: END IF; --( l_proc_level >= l_dbg_level)
1778:
1779: --Retrive data from AR_GTA_TRX_HEADERS_ALL and store them into PL/SQL record
1780: SELECT
1781: ra_gl_date
1782: ,ra_gl_period
1783: ,set_of_books_id

Line 1940: ar_gta_trx_headers_all

1936: ,x_trx_header_rec.consolidation_id
1937: ,x_trx_header_rec.consolidation_trx_num
1938:
1939: FROM
1940: ar_gta_trx_headers_all
1941: WHERE gta_trx_header_id=p_header_id;
1942:
1943: --log for debug
1944: IF( l_proc_level >= l_dbg_level)

Line 1987: l_consol_trx_num AR_GTA_TRX_HEADERS_ALL.GTA_TRX_NUMBER%TYPE;

1983: IS
1984: l_procedure_name VARCHAR2(100) :='Unmerge_Row';
1985: l_dbg_level NUMBER :=FND_LOG.G_Current_Runtime_Level;
1986: l_proc_level NUMBER :=FND_LOG.Level_Procedure;
1987: l_consol_trx_num AR_GTA_TRX_HEADERS_ALL.GTA_TRX_NUMBER%TYPE;
1988: BEGIN
1989:
1990: --log for debug
1991: IF( l_proc_level >= l_dbg_level)

Line 2002: FROM AR_GTA_TRX_HEADERS_ALL

1998:
1999: -- get current consolidation invoice number
2000: SELECT gta_trx_number
2001: INTO l_consol_trx_num
2002: FROM AR_GTA_TRX_HEADERS_ALL
2003: WHERE rowid = p_rowid;
2004:
2005: -- set status of consolidated invoices as 'DRAFT' and consolidation_flag as null
2006: UPDATE AR_GTA_TRX_HEADERS_ALL

Line 2006: UPDATE AR_GTA_TRX_HEADERS_ALL

2002: FROM AR_GTA_TRX_HEADERS_ALL
2003: WHERE rowid = p_rowid;
2004:
2005: -- set status of consolidated invoices as 'DRAFT' and consolidation_flag as null
2006: UPDATE AR_GTA_TRX_HEADERS_ALL
2007: SET STATUS = 'DRAFT'
2008: , CONSOLIDATION_FLAG = NULL
2009: , CONSOLIDATION_TRX_NUM = NULL
2010: -- added by Allen Yang for bug #8882568 concurrency control 05-Sep-2009

Line 2019: --Delete row from table AR_GTA_TRX_HEADERS_ALL

2015: WHERE CONSOLIDATION_TRX_NUM = l_consol_trx_num
2016: AND CONSOLIDATION_FLAG = '1';
2017:
2018: -- need to delete data from AR_GTA_TRX_HEADERS_V first?????
2019: --Delete row from table AR_GTA_TRX_HEADERS_ALL
2020: /* will delete_record in form trigger, so remove the logic here
2021: DELETE
2022: FROM
2023: ar_gta_trx_headers_all

Line 2023: ar_gta_trx_headers_all

2019: --Delete row from table AR_GTA_TRX_HEADERS_ALL
2020: /* will delete_record in form trigger, so remove the logic here
2021: DELETE
2022: FROM
2023: ar_gta_trx_headers_all
2024: WHERE rowid = p_rowid;
2025: */
2026: --In case of update failed,raise error
2027: IF (SQL%NOTFOUND)

Line 2043: END ar_gta_trx_headers_all_pkg;

2039: END IF; --( l_proc_level >= l_dbg_level)
2040: END Unmerge_Row;
2041:
2042:
2043: END ar_gta_trx_headers_all_pkg;