1852: l_po_header_id po_headers_all.po_header_id%TYPE;
1853:
1854: BEGIN
1855:
1856: G_USER_ID := FND_GLOBAL.USER_ID;
1857: G_LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
1858: G_PROGRAM_ID := FND_GLOBAL.CONC_PROGRAM_ID;
1859: G_PROGRAM_APPLICATION_ID := FND_GLOBAL.PROG_APPL_ID;
1860: G_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
1853:
1854: BEGIN
1855:
1856: G_USER_ID := FND_GLOBAL.USER_ID;
1857: G_LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
1858: G_PROGRAM_ID := FND_GLOBAL.CONC_PROGRAM_ID;
1859: G_PROGRAM_APPLICATION_ID := FND_GLOBAL.PROG_APPL_ID;
1860: G_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
1861:
1854: BEGIN
1855:
1856: G_USER_ID := FND_GLOBAL.USER_ID;
1857: G_LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
1858: G_PROGRAM_ID := FND_GLOBAL.CONC_PROGRAM_ID;
1859: G_PROGRAM_APPLICATION_ID := FND_GLOBAL.PROG_APPL_ID;
1860: G_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
1861:
1862: -- Generate the batch id for the run. All records are inserted into
1855:
1856: G_USER_ID := FND_GLOBAL.USER_ID;
1857: G_LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
1858: G_PROGRAM_ID := FND_GLOBAL.CONC_PROGRAM_ID;
1859: G_PROGRAM_APPLICATION_ID := FND_GLOBAL.PROG_APPL_ID;
1860: G_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
1861:
1862: -- Generate the batch id for the run. All records are inserted into
1863: -- the interface table with this batch_id
1856: G_USER_ID := FND_GLOBAL.USER_ID;
1857: G_LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
1858: G_PROGRAM_ID := FND_GLOBAL.CONC_PROGRAM_ID;
1859: G_PROGRAM_APPLICATION_ID := FND_GLOBAL.PROG_APPL_ID;
1860: G_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
1861:
1862: -- Generate the batch id for the run. All records are inserted into
1863: -- the interface table with this batch_id
1864: -- Max will not return an exception but NULL if no records are there;