DBA Data[Home] [Help]

APPS.ZPB_SOLVE dependencies on ZPB_AW

Line 1541: ZPB_AW.INITIALIZE_FOR_AC (p_api_version => 1.0,

1537: FND_FILE.put_line(FND_FILE.LOG,'l_taskid=' ||l_taskid);
1538:
1539:
1540: -- Test run of solve
1541: ZPB_AW.INITIALIZE_FOR_AC (p_api_version => 1.0,
1542: p_init_msg_list => FND_API.G_TRUE,
1543: x_return_status => retcode,
1544: x_msg_count => l_count,
1545: x_msg_data => errbuf,

Line 1550: l_dbname := ZPB_AW.GET_SCHEMA || '.' || ZPB_AW.GET_SHARED_AW;

1546: p_analysis_cycle_id => p_instance_id,
1547: p_shared_rw => FND_API.G_TRUE);
1548: attached := 'Y';
1549:
1550: l_dbname := ZPB_AW.GET_SCHEMA || '.' || ZPB_AW.GET_SHARED_AW;
1551: ZPB_AW.EXECUTE('APPS_USER_ID = ''' || TO_CHAR(l_userid) || '''');
1552:
1553: -- intializes the pv_status variable
1554: ZPB_ERROR_HANDLER.INIT_CONC_REQ_STATUS;

Line 1551: ZPB_AW.EXECUTE('APPS_USER_ID = ''' || TO_CHAR(l_userid) || '''');

1547: p_shared_rw => FND_API.G_TRUE);
1548: attached := 'Y';
1549:
1550: l_dbname := ZPB_AW.GET_SCHEMA || '.' || ZPB_AW.GET_SHARED_AW;
1551: ZPB_AW.EXECUTE('APPS_USER_ID = ''' || TO_CHAR(l_userid) || '''');
1552:
1553: -- intializes the pv_status variable
1554: ZPB_ERROR_HANDLER.INIT_CONC_REQ_STATUS;
1555: ZPB_AW.EXECUTE('call SV.RUN.SOLVE(''' || l_dbname || ''', ''' || TO_CHAR(p_instance_id) || ''', ''' || TO_CHAR(l_taskid) || ''')');

Line 1555: ZPB_AW.EXECUTE('call SV.RUN.SOLVE(''' || l_dbname || ''', ''' || TO_CHAR(p_instance_id) || ''', ''' || TO_CHAR(l_taskid) || ''')');

1551: ZPB_AW.EXECUTE('APPS_USER_ID = ''' || TO_CHAR(l_userid) || '''');
1552:
1553: -- intializes the pv_status variable
1554: ZPB_ERROR_HANDLER.INIT_CONC_REQ_STATUS;
1555: ZPB_AW.EXECUTE('call SV.RUN.SOLVE(''' || l_dbname || ''', ''' || TO_CHAR(p_instance_id) || ''', ''' || TO_CHAR(l_taskid) || ''')');
1556: -- retcode is an OUT parameter conc program standard - 0=success, 1=warning or 2=error.
1557: retcode := ZPB_ERROR_HANDLER.GET_CONC_REQ_STATUS;
1558:
1559: -- update

Line 1560: --ZPB_AW.EXECUTE('upd');

1556: -- retcode is an OUT parameter conc program standard - 0=success, 1=warning or 2=error.
1557: retcode := ZPB_ERROR_HANDLER.GET_CONC_REQ_STATUS;
1558:
1559: -- update
1560: --ZPB_AW.EXECUTE('upd');
1561: ZPB_AW.EXECUTE('pa.commit');
1562:
1563: commit;
1564:

Line 1561: ZPB_AW.EXECUTE('pa.commit');

1557: retcode := ZPB_ERROR_HANDLER.GET_CONC_REQ_STATUS;
1558:
1559: -- update
1560: --ZPB_AW.EXECUTE('upd');
1561: ZPB_AW.EXECUTE('pa.commit');
1562:
1563: commit;
1564:
1565: ZPB_AW.DETACH_ALL;

Line 1565: ZPB_AW.DETACH_ALL;

1561: ZPB_AW.EXECUTE('pa.commit');
1562:
1563: commit;
1564:
1565: ZPB_AW.DETACH_ALL;
1566: attached := 'N';
1567:
1568: --log solve OK
1569: FND_FILE.put_line(FND_FILE.LOG,'Solve ok');

Line 1578: ZPB_AW.DETACH_ALL;

1574: -- There are no active tasks
1575: retcode :='2';
1576:
1577: if attached = 'Y' then
1578: ZPB_AW.DETACH_ALL;
1579: end if;
1580:
1581: FND_FILE.put_line(FND_FILE.LOG, 'Solve not ok');
1582: errbuf := 'No task found';

Line 1589: ZPB_AW.DETACH_ALL;

1585: when others then
1586: retcode :='2';
1587:
1588: if attached = 'Y' then
1589: ZPB_AW.DETACH_ALL;
1590: end if;
1591:
1592: --log solve not OK
1593: FND_FILE.put_line(FND_FILE.LOG, 'Solve not ok');