DBA Data[Home] [Help]

APPS.GML_GPOAO dependencies on GML_GPOAO

Line 1: PACKAGE BODY GML_GPOAO as

1: PACKAGE BODY GML_GPOAO as
2: /* $Header: GMLPAOB.pls 115.14 2002/11/08 06:39:15 gmangari ship $ */
3: /*============================= GML_GPOAO =================================*/
4: /*============================================================================
5: PURPOSE: Creates procedures for exporting PO Ack information

Line 3: /*============================= GML_GPOAO =================================*/

1: PACKAGE BODY GML_GPOAO as
2: /* $Header: GMLPAOB.pls 115.14 2002/11/08 06:39:15 gmangari ship $ */
3: /*============================= GML_GPOAO =================================*/
4: /*============================================================================
5: PURPOSE: Creates procedures for exporting PO Ack information
6: to a flat file, and the API called to initiate
7: the extract process.

Line 80: v_ORD_Interface VARCHAR2(80) := 'GML_GPOAO_ORDERS';

76: v_Org VARCHAR2(1);
77: v_Type VARCHAR2(30) := 'GPOAO';
78: v_RequestID NUMBER := 0;
79:
80: v_ORD_Interface VARCHAR2(80) := 'GML_GPOAO_ORDERS';
81: v_OAC_Interface VARCHAR2(80) := 'GML_GPOAO_ORDER_CHARGES';
82: v_OTX_Interface VARCHAR2(80) := 'GML_GPOAO_ORDER_TEXT';
83: v_DTL_Interface VARCHAR2(80) := 'GML_GPOAO_DETAILS';
84: v_DAC_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_CHARGES';

Line 81: v_OAC_Interface VARCHAR2(80) := 'GML_GPOAO_ORDER_CHARGES';

77: v_Type VARCHAR2(30) := 'GPOAO';
78: v_RequestID NUMBER := 0;
79:
80: v_ORD_Interface VARCHAR2(80) := 'GML_GPOAO_ORDERS';
81: v_OAC_Interface VARCHAR2(80) := 'GML_GPOAO_ORDER_CHARGES';
82: v_OTX_Interface VARCHAR2(80) := 'GML_GPOAO_ORDER_TEXT';
83: v_DTL_Interface VARCHAR2(80) := 'GML_GPOAO_DETAILS';
84: v_DAC_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_CHARGES';
85: v_DTX_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_TEXT';

Line 82: v_OTX_Interface VARCHAR2(80) := 'GML_GPOAO_ORDER_TEXT';

78: v_RequestID NUMBER := 0;
79:
80: v_ORD_Interface VARCHAR2(80) := 'GML_GPOAO_ORDERS';
81: v_OAC_Interface VARCHAR2(80) := 'GML_GPOAO_ORDER_CHARGES';
82: v_OTX_Interface VARCHAR2(80) := 'GML_GPOAO_ORDER_TEXT';
83: v_DTL_Interface VARCHAR2(80) := 'GML_GPOAO_DETAILS';
84: v_DAC_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_CHARGES';
85: v_DTX_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_TEXT';
86: v_ALL_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_ALLOCATIONS';

Line 83: v_DTL_Interface VARCHAR2(80) := 'GML_GPOAO_DETAILS';

79:
80: v_ORD_Interface VARCHAR2(80) := 'GML_GPOAO_ORDERS';
81: v_OAC_Interface VARCHAR2(80) := 'GML_GPOAO_ORDER_CHARGES';
82: v_OTX_Interface VARCHAR2(80) := 'GML_GPOAO_ORDER_TEXT';
83: v_DTL_Interface VARCHAR2(80) := 'GML_GPOAO_DETAILS';
84: v_DAC_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_CHARGES';
85: v_DTX_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_TEXT';
86: v_ALL_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_ALLOCATIONS';
87: xProgress VARCHAR2(80);

Line 84: v_DAC_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_CHARGES';

80: v_ORD_Interface VARCHAR2(80) := 'GML_GPOAO_ORDERS';
81: v_OAC_Interface VARCHAR2(80) := 'GML_GPOAO_ORDER_CHARGES';
82: v_OTX_Interface VARCHAR2(80) := 'GML_GPOAO_ORDER_TEXT';
83: v_DTL_Interface VARCHAR2(80) := 'GML_GPOAO_DETAILS';
84: v_DAC_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_CHARGES';
85: v_DTX_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_TEXT';
86: v_ALL_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_ALLOCATIONS';
87: xProgress VARCHAR2(80);
88:

Line 85: v_DTX_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_TEXT';

81: v_OAC_Interface VARCHAR2(80) := 'GML_GPOAO_ORDER_CHARGES';
82: v_OTX_Interface VARCHAR2(80) := 'GML_GPOAO_ORDER_TEXT';
83: v_DTL_Interface VARCHAR2(80) := 'GML_GPOAO_DETAILS';
84: v_DAC_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_CHARGES';
85: v_DTX_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_TEXT';
86: v_ALL_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_ALLOCATIONS';
87: xProgress VARCHAR2(80);
88:
89: /* SW 07/09/99, Y2K date issue. */

Line 86: v_ALL_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_ALLOCATIONS';

82: v_OTX_Interface VARCHAR2(80) := 'GML_GPOAO_ORDER_TEXT';
83: v_DTL_Interface VARCHAR2(80) := 'GML_GPOAO_DETAILS';
84: v_DAC_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_CHARGES';
85: v_DTX_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_TEXT';
86: v_ALL_Interface VARCHAR2(80) := 'GML_GPOAO_DETAIL_ALLOCATIONS';
87: xProgress VARCHAR2(80);
88:
89: /* SW 07/09/99, Y2K date issue. */
90: v_Creat_Date_From DATE := TO_DATE(v_Creation_Date_From, 'YYYY/MM/DD HH24:MI:SS');

Line 103: ec_debug.push ( 'GML_GPOAO.Extract_GPOAO_Outbound' );

99:
100: BEGIN
101:
102: ec_debug.enable_debug ( v_debug_mode );
103: ec_debug.push ( 'GML_GPOAO.Extract_GPOAO_Outbound' );
104: ec_debug.pl ( 3, 'v_Filename: ',v_Filename);
105: ec_debug.pl ( 3, 'v_OutputPath: ',v_OutputPath );
106: ec_debug.pl ( 3, 'v_Orgn_Code: ',v_Orgn_Code);
107: ec_debug.pl ( 3, 'v_Order_No_From: ',v_Order_No_From);

Line 136: ec_debug.pl ( 0, 'EC', 'GML_GPOAO_START', NULL );

132: END;
133: ec_debug.pl(3, 'v_RunID: ',v_RunID);
134:
135: xProgress := 'GPOAO-10-1015';
136: ec_debug.pl ( 0, 'EC', 'GML_GPOAO_START', NULL );
137:
138: xProgress := 'GPOAO-10-1020';
139: ec_debug.pl ( 0, 'EC', 'ECE_RUN_ID', 'RUN_ID', v_RunID );
140:

Line 143: GML_GPOAO.populate_interface_tables(

139: ec_debug.pl ( 0, 'EC', 'ECE_RUN_ID', 'RUN_ID', v_RunID );
140:
141: xProgress := 'GPOAO-10-1030';
142:
143: GML_GPOAO.populate_interface_tables(
144: v_CommunicationMethod,
145: v_TransactionType,
146: v_Orgn_code,
147: v_Order_No_From,

Line 165: GML_GPOAO.put_data_to_output_table(

161:
162:
163: xProgress := 'GPOAO-10-1040';
164:
165: GML_GPOAO.put_data_to_output_table(
166: v_CommunicationMethod,
167: v_TransactionType,
168: v_Orgn_code,
169: v_Order_No_From,

Line 231: ec_debug.pl ( 0, 'EC', 'GML_GPOAO_COMPLETE' ,NULL );

227: utl_file.fclose(v_OutputFilePtr);
228: END IF;
229:
230: xProgress := 'GPOAO-10-1170';
231: ec_debug.pl ( 0, 'EC', 'GML_GPOAO_COMPLETE' ,NULL );
232:
233: xProgress := 'GPOAO-10-1180';
234: DELETE FROM ece_output
235: WHERE run_id = v_RunID;

Line 248: ec_debug.pop ( 'GML_GPOAO.Extract_GPOAO_Outbound' );

244: 'TABLE_NAME',
245: 'ECE_OUTPUT' );
246: END IF;
247:
248: ec_debug.pop ( 'GML_GPOAO.Extract_GPOAO_Outbound' );
249: ec_debug.disable_debug;
250: COMMIT;
251:
252: EXCEPTION

Line 464: ec_debug.push ( 'GML_GPOAO.Populate_Interface_Tables' );

460: /* */
461: /* Load each PL/SQL table. The FOR loop implicitly handles all */
462: /* cursor processing. */
463: /* */
464: ec_debug.push ( 'GML_GPOAO.Populate_Interface_Tables' );
465: ec_debug.pl ( 3, 'p_Orgn_Code : ',p_Orgn_Code );
466: ec_debug.pl ( 3, 'p_Order_No_From : ',p_Order_No_From );
467:
468: v_Orgn_Code := p_Orgn_Code;

Line 1066: SELECT GML_GPOAO_ORDERS_S.nextval

1062: /* insert this record into the Order interface table. */
1063: /* */
1064:
1065: xProgress := 'GPOAOB-10-1810';
1066: SELECT GML_GPOAO_ORDERS_S.nextval
1067: INTO v_ORD_Key
1068: FROM sys.dual;
1069:
1070: xProgress := 'GPOAOB-10-1820';

Line 1084: GML_GPOAO_X.populate_ORD_ext ( v_ORD_Key,

1080: /* extension table. */
1081: /* */
1082:
1083: xProgress := 'GPOAOB-10-1830';
1084: GML_GPOAO_X.populate_ORD_ext ( v_ORD_Key,
1085: v_ORD_Table );
1086:
1087: /* */
1088: /* Execute the Order Charges level SELECT statement. */

Line 1154: GML_GPOAO_X.populate_OAC_ext ( v_OAC_Key,

1150: /* extension table. */
1151: /* */
1152:
1153: xProgress := 'GPOAOB-10-1890';
1154: GML_GPOAO_X.populate_OAC_ext ( v_OAC_Key,
1155: v_OAC_Table );
1156:
1157: END LOOP; /* while oac */
1158:

Line 1226: GML_GPOAO_X.populate_OTX_ext ( v_OTX_Key,

1222: /* extension table. */
1223: /* */
1224:
1225: xProgress := 'GPOAOB-10-1960';
1226: GML_GPOAO_X.populate_OTX_ext ( v_OTX_Key,
1227: v_OTX_Table );
1228:
1229: END LOOP; /* while otx */
1230:

Line 1303: SELECT GML_GPOAO_DETAILS_S.nextval

1299: /* insert this record into the Detail interface table. */
1300: /* */
1301:
1302: xProgress := 'GPOAOB-10-2070';
1303: SELECT GML_GPOAO_DETAILS_S.nextval
1304: INTO v_DTL_Key
1305: FROM sys.dual;
1306: ec_debug.pl( 3, 'V_DTL_Key:', v_DTL_Key);
1307:

Line 1322: GML_GPOAO_X.populate_DTL_ext ( v_DTL_Key,

1318: /* extension table. */
1319: /* */
1320:
1321: xProgress := 'GPOAOB-10-2090';
1322: GML_GPOAO_X.populate_DTL_ext ( v_DTL_Key,
1323: v_DTL_Table );
1324:
1325: /* */
1326: /* Execute the Detail Charges level SELECT statement. */

Line 1390: GML_GPOAO_X.populate_DAC_ext ( v_DAC_Key, v_DAC_Table );

1386: /* extension table. */
1387: /* */
1388:
1389: xProgress := 'GPOAOB-10-2150';
1390: GML_GPOAO_X.populate_DAC_ext ( v_DAC_Key, v_DAC_Table );
1391:
1392: END LOOP; /* while dac */
1393:
1394: /* */

Line 1461: GML_GPOAO_X.populate_DTX_ext ( v_DTX_Key, v_DTX_Table );

1457: /* extension table. */
1458: /* */
1459:
1460: xProgress := 'GPOAOB-10-2230';
1461: GML_GPOAO_X.populate_DTX_ext ( v_DTX_Key, v_DTX_Table );
1462: END LOOP; /* while dtx */
1463:
1464: /* */
1465: /* Execute the Allocations level SELECT statement. */

Line 1530: GML_GPOAO_X.populate_ALL_ext ( v_ALL_Key, v_ALL_Table );

1526: /* extension table. */
1527: /* */
1528:
1529: xProgress := 'GPOAOB-10-2230';
1530: GML_GPOAO_X.populate_ALL_ext ( v_ALL_Key, v_ALL_Table );
1531:
1532: END LOOP; /* while all */
1533:
1534: END LOOP; /* while dtl */

Line 1558: ec_debug.pop ( 'GML_GPOAO.Populate_Interface_Tables' );

1554: /* */
1555:
1556:
1557: xProgress := 'GASNOB-10-2300';
1558: ec_debug.pop ( 'GML_GPOAO.Populate_Interface_Tables' );
1559:
1560: COMMIT;
1561:
1562: /* */

Line 1823: ec_debug.push ( 'GML_GPOAO.Put_Data_To_Output_Table' );

1819: ** Debug statements for the parameter values.
1820: **
1821: */
1822:
1823: ec_debug.push ( 'GML_GPOAO.Put_Data_To_Output_Table' );
1824: ec_debug.pl ( 3, 'p_CommunicationMethod: ', p_CommunicationMethod );
1825: ec_debug.pl ( 3, 'p_TransactionType: ', p_TransactionType );
1826: ec_debug.pl ( 3, 'p_Orgn_Code: ', p_Orgn_Code );
1827: ec_debug.pl ( 3, 'p_Order_No_From: ', p_Order_No_From );

Line 3334: ec_debug.pop ( 'GML_GPOAO.Put_Data_To_Output_Table' );

3330: /* Commit the interface table DELETEs. */
3331: /* */
3332:
3333: xProgress := 'GASNOB-40-3070';
3334: ec_debug.pop ( 'GML_GPOAO.Put_Data_To_Output_Table' );
3335: COMMIT;
3336:
3337: /* */
3338: /* Close all open cursors. */

Line 3405: END GML_GPOAO;

3401: app_exception.raise_exception;
3402:
3403: END Put_Data_To_Output_Table;
3404:
3405: END GML_GPOAO;