33: l_msg_header XNP_MESSAGE.MSG_HEADER_REC_TYPE ;
34: BEGIN
35: x_error_code := 0 ;
36: x_error_message := NULL ;
37: XNP_XML_UTILS.initialize_doc ( ) ;
38: /*construct the XML header */
39: /* retreive the next message ID */
40: XNP_MESSAGE.get_sequence ( l_msg_header.message_id ) ;
41: IF (p_reference_id IS NULL) THEN
43: ELSE
44: l_msg_header.reference_id := p_reference_id ;
45: END IF ;
46: /* append header parameters to make header */
47: XNP_XML_UTILS.write_element ( 'MESSAGE_ID',l_msg_header.message_id ) ;
48: XNP_XML_UTILS.write_leaf_element ( 'REFERENCE_ID',l_msg_header.reference_id ) ;
49: l_msg_header.opp_reference_id := p_opp_reference_id ;
50: XNP_XML_UTILS.write_leaf_element ( 'OPP_REFERENCE_ID',l_msg_header.opp_reference_id ) ;
51: l_msg_header.message_code := 'CSENIUPD' ;
44: l_msg_header.reference_id := p_reference_id ;
45: END IF ;
46: /* append header parameters to make header */
47: XNP_XML_UTILS.write_element ( 'MESSAGE_ID',l_msg_header.message_id ) ;
48: XNP_XML_UTILS.write_leaf_element ( 'REFERENCE_ID',l_msg_header.reference_id ) ;
49: l_msg_header.opp_reference_id := p_opp_reference_id ;
50: XNP_XML_UTILS.write_leaf_element ( 'OPP_REFERENCE_ID',l_msg_header.opp_reference_id ) ;
51: l_msg_header.message_code := 'CSENIUPD' ;
52: XNP_XML_UTILS.write_leaf_element ( 'MESSAGE_CODE',l_msg_header.message_code ) ;
46: /* append header parameters to make header */
47: XNP_XML_UTILS.write_element ( 'MESSAGE_ID',l_msg_header.message_id ) ;
48: XNP_XML_UTILS.write_leaf_element ( 'REFERENCE_ID',l_msg_header.reference_id ) ;
49: l_msg_header.opp_reference_id := p_opp_reference_id ;
50: XNP_XML_UTILS.write_leaf_element ( 'OPP_REFERENCE_ID',l_msg_header.opp_reference_id ) ;
51: l_msg_header.message_code := 'CSENIUPD' ;
52: XNP_XML_UTILS.write_leaf_element ( 'MESSAGE_CODE',l_msg_header.message_code ) ;
53: l_msg_header.version := p_version ;
54: XNP_XML_UTILS.write_leaf_element ( 'VERSION',l_msg_header.version ) ;
48: XNP_XML_UTILS.write_leaf_element ( 'REFERENCE_ID',l_msg_header.reference_id ) ;
49: l_msg_header.opp_reference_id := p_opp_reference_id ;
50: XNP_XML_UTILS.write_leaf_element ( 'OPP_REFERENCE_ID',l_msg_header.opp_reference_id ) ;
51: l_msg_header.message_code := 'CSENIUPD' ;
52: XNP_XML_UTILS.write_leaf_element ( 'MESSAGE_CODE',l_msg_header.message_code ) ;
53: l_msg_header.version := p_version ;
54: XNP_XML_UTILS.write_leaf_element ( 'VERSION',l_msg_header.version ) ;
55: l_msg_header.creation_date := SYSDATE ;
56: l_msg_header.recipient_name := p_recipient_list ;
50: XNP_XML_UTILS.write_leaf_element ( 'OPP_REFERENCE_ID',l_msg_header.opp_reference_id ) ;
51: l_msg_header.message_code := 'CSENIUPD' ;
52: XNP_XML_UTILS.write_leaf_element ( 'MESSAGE_CODE',l_msg_header.message_code ) ;
53: l_msg_header.version := p_version ;
54: XNP_XML_UTILS.write_leaf_element ( 'VERSION',l_msg_header.version ) ;
55: l_msg_header.creation_date := SYSDATE ;
56: l_msg_header.recipient_name := p_recipient_list ;
57: XNP_XML_UTILS.write_element ( 'CREATION_DATE',l_msg_header.creation_date ) ;
58: l_msg_header.sender_name := p_sender_name ;
53: l_msg_header.version := p_version ;
54: XNP_XML_UTILS.write_leaf_element ( 'VERSION',l_msg_header.version ) ;
55: l_msg_header.creation_date := SYSDATE ;
56: l_msg_header.recipient_name := p_recipient_list ;
57: XNP_XML_UTILS.write_element ( 'CREATION_DATE',l_msg_header.creation_date ) ;
58: l_msg_header.sender_name := p_sender_name ;
59: XNP_XML_UTILS.write_leaf_element ( 'SENDER_NAME',l_msg_header.sender_name ) ;
60: XNP_XML_UTILS.write_leaf_element ( 'RECIPIENT_NAME',l_msg_header.recipient_name ) ;
61: l_msg_header.direction_indr := 'O' ;
55: l_msg_header.creation_date := SYSDATE ;
56: l_msg_header.recipient_name := p_recipient_list ;
57: XNP_XML_UTILS.write_element ( 'CREATION_DATE',l_msg_header.creation_date ) ;
58: l_msg_header.sender_name := p_sender_name ;
59: XNP_XML_UTILS.write_leaf_element ( 'SENDER_NAME',l_msg_header.sender_name ) ;
60: XNP_XML_UTILS.write_leaf_element ( 'RECIPIENT_NAME',l_msg_header.recipient_name ) ;
61: l_msg_header.direction_indr := 'O' ;
62: l_msg_header.order_id := p_order_id ;
63: l_msg_header.wi_instance_id := p_wi_instance_id ;
56: l_msg_header.recipient_name := p_recipient_list ;
57: XNP_XML_UTILS.write_element ( 'CREATION_DATE',l_msg_header.creation_date ) ;
58: l_msg_header.sender_name := p_sender_name ;
59: XNP_XML_UTILS.write_leaf_element ( 'SENDER_NAME',l_msg_header.sender_name ) ;
60: XNP_XML_UTILS.write_leaf_element ( 'RECIPIENT_NAME',l_msg_header.recipient_name ) ;
61: l_msg_header.direction_indr := 'O' ;
62: l_msg_header.order_id := p_order_id ;
63: l_msg_header.wi_instance_id := p_wi_instance_id ;
64: l_msg_header.fa_instance_id := p_fa_instance_id ;
61: l_msg_header.direction_indr := 'O' ;
62: l_msg_header.order_id := p_order_id ;
63: l_msg_header.wi_instance_id := p_wi_instance_id ;
64: l_msg_header.fa_instance_id := p_fa_instance_id ;
65: XNP_XML_UTILS.write_leaf_element ( 'ITEM_ID', XNP$ITEM_ID );
66: XNP_XML_UTILS.write_leaf_element ( 'REVISION', XNP$REVISION );
67: XNP_XML_UTILS.write_leaf_element ( 'LOT_NUMBER', XNP$LOT_NUMBER );
68: XNP_XML_UTILS.write_leaf_element ( 'SERIAL_NUMBER', XNP$SERIAL_NUMBER );
69: XNP_XML_UTILS.write_leaf_element ( 'QUANTITY', XNP$QUANTITY );
62: l_msg_header.order_id := p_order_id ;
63: l_msg_header.wi_instance_id := p_wi_instance_id ;
64: l_msg_header.fa_instance_id := p_fa_instance_id ;
65: XNP_XML_UTILS.write_leaf_element ( 'ITEM_ID', XNP$ITEM_ID );
66: XNP_XML_UTILS.write_leaf_element ( 'REVISION', XNP$REVISION );
67: XNP_XML_UTILS.write_leaf_element ( 'LOT_NUMBER', XNP$LOT_NUMBER );
68: XNP_XML_UTILS.write_leaf_element ( 'SERIAL_NUMBER', XNP$SERIAL_NUMBER );
69: XNP_XML_UTILS.write_leaf_element ( 'QUANTITY', XNP$QUANTITY );
70: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTED_BY', XNP$TRANSACTED_BY );
63: l_msg_header.wi_instance_id := p_wi_instance_id ;
64: l_msg_header.fa_instance_id := p_fa_instance_id ;
65: XNP_XML_UTILS.write_leaf_element ( 'ITEM_ID', XNP$ITEM_ID );
66: XNP_XML_UTILS.write_leaf_element ( 'REVISION', XNP$REVISION );
67: XNP_XML_UTILS.write_leaf_element ( 'LOT_NUMBER', XNP$LOT_NUMBER );
68: XNP_XML_UTILS.write_leaf_element ( 'SERIAL_NUMBER', XNP$SERIAL_NUMBER );
69: XNP_XML_UTILS.write_leaf_element ( 'QUANTITY', XNP$QUANTITY );
70: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTED_BY', XNP$TRANSACTED_BY );
71: XNP_XML_UTILS.write_leaf_element ( 'TO_NETWORK_LOC_ID', XNP$TO_NETWORK_LOC_ID );
64: l_msg_header.fa_instance_id := p_fa_instance_id ;
65: XNP_XML_UTILS.write_leaf_element ( 'ITEM_ID', XNP$ITEM_ID );
66: XNP_XML_UTILS.write_leaf_element ( 'REVISION', XNP$REVISION );
67: XNP_XML_UTILS.write_leaf_element ( 'LOT_NUMBER', XNP$LOT_NUMBER );
68: XNP_XML_UTILS.write_leaf_element ( 'SERIAL_NUMBER', XNP$SERIAL_NUMBER );
69: XNP_XML_UTILS.write_leaf_element ( 'QUANTITY', XNP$QUANTITY );
70: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTED_BY', XNP$TRANSACTED_BY );
71: XNP_XML_UTILS.write_leaf_element ( 'TO_NETWORK_LOC_ID', XNP$TO_NETWORK_LOC_ID );
72: XNP_XML_UTILS.write_leaf_element ( 'FROM_PARTY_SITE_ID', XNP$FROM_PARTY_SITE_ID );
65: XNP_XML_UTILS.write_leaf_element ( 'ITEM_ID', XNP$ITEM_ID );
66: XNP_XML_UTILS.write_leaf_element ( 'REVISION', XNP$REVISION );
67: XNP_XML_UTILS.write_leaf_element ( 'LOT_NUMBER', XNP$LOT_NUMBER );
68: XNP_XML_UTILS.write_leaf_element ( 'SERIAL_NUMBER', XNP$SERIAL_NUMBER );
69: XNP_XML_UTILS.write_leaf_element ( 'QUANTITY', XNP$QUANTITY );
70: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTED_BY', XNP$TRANSACTED_BY );
71: XNP_XML_UTILS.write_leaf_element ( 'TO_NETWORK_LOC_ID', XNP$TO_NETWORK_LOC_ID );
72: XNP_XML_UTILS.write_leaf_element ( 'FROM_PARTY_SITE_ID', XNP$FROM_PARTY_SITE_ID );
73: XNP_XML_UTILS.write_leaf_element ( 'TO_PARTY_SITE_ID', XNP$TO_PARTY_SITE_ID );
66: XNP_XML_UTILS.write_leaf_element ( 'REVISION', XNP$REVISION );
67: XNP_XML_UTILS.write_leaf_element ( 'LOT_NUMBER', XNP$LOT_NUMBER );
68: XNP_XML_UTILS.write_leaf_element ( 'SERIAL_NUMBER', XNP$SERIAL_NUMBER );
69: XNP_XML_UTILS.write_leaf_element ( 'QUANTITY', XNP$QUANTITY );
70: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTED_BY', XNP$TRANSACTED_BY );
71: XNP_XML_UTILS.write_leaf_element ( 'TO_NETWORK_LOC_ID', XNP$TO_NETWORK_LOC_ID );
72: XNP_XML_UTILS.write_leaf_element ( 'FROM_PARTY_SITE_ID', XNP$FROM_PARTY_SITE_ID );
73: XNP_XML_UTILS.write_leaf_element ( 'TO_PARTY_SITE_ID', XNP$TO_PARTY_SITE_ID );
74: XNP_XML_UTILS.write_leaf_element ( 'WORK_ORDER_NUMBER', XNP$WORK_ORDER_NUMBER );
67: XNP_XML_UTILS.write_leaf_element ( 'LOT_NUMBER', XNP$LOT_NUMBER );
68: XNP_XML_UTILS.write_leaf_element ( 'SERIAL_NUMBER', XNP$SERIAL_NUMBER );
69: XNP_XML_UTILS.write_leaf_element ( 'QUANTITY', XNP$QUANTITY );
70: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTED_BY', XNP$TRANSACTED_BY );
71: XNP_XML_UTILS.write_leaf_element ( 'TO_NETWORK_LOC_ID', XNP$TO_NETWORK_LOC_ID );
72: XNP_XML_UTILS.write_leaf_element ( 'FROM_PARTY_SITE_ID', XNP$FROM_PARTY_SITE_ID );
73: XNP_XML_UTILS.write_leaf_element ( 'TO_PARTY_SITE_ID', XNP$TO_PARTY_SITE_ID );
74: XNP_XML_UTILS.write_leaf_element ( 'WORK_ORDER_NUMBER', XNP$WORK_ORDER_NUMBER );
75: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTION_DATE', XNP$TRANSACTION_DATE );
68: XNP_XML_UTILS.write_leaf_element ( 'SERIAL_NUMBER', XNP$SERIAL_NUMBER );
69: XNP_XML_UTILS.write_leaf_element ( 'QUANTITY', XNP$QUANTITY );
70: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTED_BY', XNP$TRANSACTED_BY );
71: XNP_XML_UTILS.write_leaf_element ( 'TO_NETWORK_LOC_ID', XNP$TO_NETWORK_LOC_ID );
72: XNP_XML_UTILS.write_leaf_element ( 'FROM_PARTY_SITE_ID', XNP$FROM_PARTY_SITE_ID );
73: XNP_XML_UTILS.write_leaf_element ( 'TO_PARTY_SITE_ID', XNP$TO_PARTY_SITE_ID );
74: XNP_XML_UTILS.write_leaf_element ( 'WORK_ORDER_NUMBER', XNP$WORK_ORDER_NUMBER );
75: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTION_DATE', XNP$TRANSACTION_DATE );
76: XNP_XML_UTILS.write_leaf_element ( 'FROM_NETWORK_LOC_ID', XNP$FROM_NETWORK_LOC_ID );
69: XNP_XML_UTILS.write_leaf_element ( 'QUANTITY', XNP$QUANTITY );
70: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTED_BY', XNP$TRANSACTED_BY );
71: XNP_XML_UTILS.write_leaf_element ( 'TO_NETWORK_LOC_ID', XNP$TO_NETWORK_LOC_ID );
72: XNP_XML_UTILS.write_leaf_element ( 'FROM_PARTY_SITE_ID', XNP$FROM_PARTY_SITE_ID );
73: XNP_XML_UTILS.write_leaf_element ( 'TO_PARTY_SITE_ID', XNP$TO_PARTY_SITE_ID );
74: XNP_XML_UTILS.write_leaf_element ( 'WORK_ORDER_NUMBER', XNP$WORK_ORDER_NUMBER );
75: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTION_DATE', XNP$TRANSACTION_DATE );
76: XNP_XML_UTILS.write_leaf_element ( 'FROM_NETWORK_LOC_ID', XNP$FROM_NETWORK_LOC_ID );
77: /* retreieve the XML header */
70: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTED_BY', XNP$TRANSACTED_BY );
71: XNP_XML_UTILS.write_leaf_element ( 'TO_NETWORK_LOC_ID', XNP$TO_NETWORK_LOC_ID );
72: XNP_XML_UTILS.write_leaf_element ( 'FROM_PARTY_SITE_ID', XNP$FROM_PARTY_SITE_ID );
73: XNP_XML_UTILS.write_leaf_element ( 'TO_PARTY_SITE_ID', XNP$TO_PARTY_SITE_ID );
74: XNP_XML_UTILS.write_leaf_element ( 'WORK_ORDER_NUMBER', XNP$WORK_ORDER_NUMBER );
75: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTION_DATE', XNP$TRANSACTION_DATE );
76: XNP_XML_UTILS.write_leaf_element ( 'FROM_NETWORK_LOC_ID', XNP$FROM_NETWORK_LOC_ID );
77: /* retreieve the XML header */
78: XNP_XML_UTILS.get_document ( l_xml_header ) ;
71: XNP_XML_UTILS.write_leaf_element ( 'TO_NETWORK_LOC_ID', XNP$TO_NETWORK_LOC_ID );
72: XNP_XML_UTILS.write_leaf_element ( 'FROM_PARTY_SITE_ID', XNP$FROM_PARTY_SITE_ID );
73: XNP_XML_UTILS.write_leaf_element ( 'TO_PARTY_SITE_ID', XNP$TO_PARTY_SITE_ID );
74: XNP_XML_UTILS.write_leaf_element ( 'WORK_ORDER_NUMBER', XNP$WORK_ORDER_NUMBER );
75: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTION_DATE', XNP$TRANSACTION_DATE );
76: XNP_XML_UTILS.write_leaf_element ( 'FROM_NETWORK_LOC_ID', XNP$FROM_NETWORK_LOC_ID );
77: /* retreieve the XML header */
78: XNP_XML_UTILS.get_document ( l_xml_header ) ;
79: /* append the XML headerto message */
72: XNP_XML_UTILS.write_leaf_element ( 'FROM_PARTY_SITE_ID', XNP$FROM_PARTY_SITE_ID );
73: XNP_XML_UTILS.write_leaf_element ( 'TO_PARTY_SITE_ID', XNP$TO_PARTY_SITE_ID );
74: XNP_XML_UTILS.write_leaf_element ( 'WORK_ORDER_NUMBER', XNP$WORK_ORDER_NUMBER );
75: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTION_DATE', XNP$TRANSACTION_DATE );
76: XNP_XML_UTILS.write_leaf_element ( 'FROM_NETWORK_LOC_ID', XNP$FROM_NETWORK_LOC_ID );
77: /* retreieve the XML header */
78: XNP_XML_UTILS.get_document ( l_xml_header ) ;
79: /* append the XML headerto message */
80: XNP_XML_UTILS.initialize_doc ( ) ;
74: XNP_XML_UTILS.write_leaf_element ( 'WORK_ORDER_NUMBER', XNP$WORK_ORDER_NUMBER );
75: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTION_DATE', XNP$TRANSACTION_DATE );
76: XNP_XML_UTILS.write_leaf_element ( 'FROM_NETWORK_LOC_ID', XNP$FROM_NETWORK_LOC_ID );
77: /* retreieve the XML header */
78: XNP_XML_UTILS.get_document ( l_xml_header ) ;
79: /* append the XML headerto message */
80: XNP_XML_UTILS.initialize_doc ( ) ;
81: XNP_XML_UTILS.xml_decl ;
82: XNP_XML_UTILS.begin_segment ( 'MESSAGE') ;
76: XNP_XML_UTILS.write_leaf_element ( 'FROM_NETWORK_LOC_ID', XNP$FROM_NETWORK_LOC_ID );
77: /* retreieve the XML header */
78: XNP_XML_UTILS.get_document ( l_xml_header ) ;
79: /* append the XML headerto message */
80: XNP_XML_UTILS.initialize_doc ( ) ;
81: XNP_XML_UTILS.xml_decl ;
82: XNP_XML_UTILS.begin_segment ( 'MESSAGE') ;
83: XNP_XML_UTILS.write_element( 'HEADER', l_xml_header );
84: /* construct the message body */
77: /* retreieve the XML header */
78: XNP_XML_UTILS.get_document ( l_xml_header ) ;
79: /* append the XML headerto message */
80: XNP_XML_UTILS.initialize_doc ( ) ;
81: XNP_XML_UTILS.xml_decl ;
82: XNP_XML_UTILS.begin_segment ( 'MESSAGE') ;
83: XNP_XML_UTILS.write_element( 'HEADER', l_xml_header );
84: /* construct the message body */
85: XNP_XML_UTILS.begin_segment ( 'CSENIUPD' ) ;
78: XNP_XML_UTILS.get_document ( l_xml_header ) ;
79: /* append the XML headerto message */
80: XNP_XML_UTILS.initialize_doc ( ) ;
81: XNP_XML_UTILS.xml_decl ;
82: XNP_XML_UTILS.begin_segment ( 'MESSAGE') ;
83: XNP_XML_UTILS.write_element( 'HEADER', l_xml_header );
84: /* construct the message body */
85: XNP_XML_UTILS.begin_segment ( 'CSENIUPD' ) ;
86: IF ( XNP$ITEM_ID IS NULL) THEN
79: /* append the XML headerto message */
80: XNP_XML_UTILS.initialize_doc ( ) ;
81: XNP_XML_UTILS.xml_decl ;
82: XNP_XML_UTILS.begin_segment ( 'MESSAGE') ;
83: XNP_XML_UTILS.write_element( 'HEADER', l_xml_header );
84: /* construct the message body */
85: XNP_XML_UTILS.begin_segment ( 'CSENIUPD' ) ;
86: IF ( XNP$ITEM_ID IS NULL) THEN
87: x_error_message :='Missing Mandatory Attribute - ITEM_ID' ;
81: XNP_XML_UTILS.xml_decl ;
82: XNP_XML_UTILS.begin_segment ( 'MESSAGE') ;
83: XNP_XML_UTILS.write_element( 'HEADER', l_xml_header );
84: /* construct the message body */
85: XNP_XML_UTILS.begin_segment ( 'CSENIUPD' ) ;
86: IF ( XNP$ITEM_ID IS NULL) THEN
87: x_error_message :='Missing Mandatory Attribute - ITEM_ID' ;
88: fnd_message.set_name('XNP','XNP_MISSING_MANDATORY_ATTR');
89: fnd_message.set_token('ATTRIBUTE','ITEM_ID' ) ;
89: fnd_message.set_token('ATTRIBUTE','ITEM_ID' ) ;
90: x_error_message := fnd_message.get ;
91: RAISE e_MISSING_MANDATORY_DATA ;
92: END IF ;
93: XNP_XML_UTILS.write_leaf_element ( 'ITEM_ID', XNP$ITEM_ID ) ;
94: XNP_XML_UTILS.write_leaf_element ( 'REVISION', XNP$REVISION ) ;
95: XNP_XML_UTILS.write_leaf_element ( 'LOT_NUMBER', XNP$LOT_NUMBER ) ;
96: XNP_XML_UTILS.write_leaf_element ( 'SERIAL_NUMBER', XNP$SERIAL_NUMBER ) ;
97: IF ( XNP$QUANTITY IS NULL) THEN
90: x_error_message := fnd_message.get ;
91: RAISE e_MISSING_MANDATORY_DATA ;
92: END IF ;
93: XNP_XML_UTILS.write_leaf_element ( 'ITEM_ID', XNP$ITEM_ID ) ;
94: XNP_XML_UTILS.write_leaf_element ( 'REVISION', XNP$REVISION ) ;
95: XNP_XML_UTILS.write_leaf_element ( 'LOT_NUMBER', XNP$LOT_NUMBER ) ;
96: XNP_XML_UTILS.write_leaf_element ( 'SERIAL_NUMBER', XNP$SERIAL_NUMBER ) ;
97: IF ( XNP$QUANTITY IS NULL) THEN
98: x_error_message :='Missing Mandatory Attribute - QUANTITY' ;
91: RAISE e_MISSING_MANDATORY_DATA ;
92: END IF ;
93: XNP_XML_UTILS.write_leaf_element ( 'ITEM_ID', XNP$ITEM_ID ) ;
94: XNP_XML_UTILS.write_leaf_element ( 'REVISION', XNP$REVISION ) ;
95: XNP_XML_UTILS.write_leaf_element ( 'LOT_NUMBER', XNP$LOT_NUMBER ) ;
96: XNP_XML_UTILS.write_leaf_element ( 'SERIAL_NUMBER', XNP$SERIAL_NUMBER ) ;
97: IF ( XNP$QUANTITY IS NULL) THEN
98: x_error_message :='Missing Mandatory Attribute - QUANTITY' ;
99: fnd_message.set_name('XNP','XNP_MISSING_MANDATORY_ATTR');
92: END IF ;
93: XNP_XML_UTILS.write_leaf_element ( 'ITEM_ID', XNP$ITEM_ID ) ;
94: XNP_XML_UTILS.write_leaf_element ( 'REVISION', XNP$REVISION ) ;
95: XNP_XML_UTILS.write_leaf_element ( 'LOT_NUMBER', XNP$LOT_NUMBER ) ;
96: XNP_XML_UTILS.write_leaf_element ( 'SERIAL_NUMBER', XNP$SERIAL_NUMBER ) ;
97: IF ( XNP$QUANTITY IS NULL) THEN
98: x_error_message :='Missing Mandatory Attribute - QUANTITY' ;
99: fnd_message.set_name('XNP','XNP_MISSING_MANDATORY_ATTR');
100: fnd_message.set_token('ATTRIBUTE','QUANTITY' ) ;
100: fnd_message.set_token('ATTRIBUTE','QUANTITY' ) ;
101: x_error_message := fnd_message.get ;
102: RAISE e_MISSING_MANDATORY_DATA ;
103: END IF ;
104: XNP_XML_UTILS.write_leaf_element ( 'QUANTITY', XNP$QUANTITY ) ;
105: XNP_XML_UTILS.write_leaf_element ( 'WORK_ORDER_NUMBER', XNP$WORK_ORDER_NUMBER ) ;
106: XNP_XML_UTILS.write_leaf_element ( 'TO_PARTY_SITE_ID', XNP$TO_PARTY_SITE_ID ) ;
107: XNP_XML_UTILS.write_leaf_element ( 'FROM_PARTY_SITE_ID', XNP$FROM_PARTY_SITE_ID ) ;
108: XNP_XML_UTILS.write_leaf_element ( 'TO_NETWORK_LOC_ID', XNP$TO_NETWORK_LOC_ID ) ;
101: x_error_message := fnd_message.get ;
102: RAISE e_MISSING_MANDATORY_DATA ;
103: END IF ;
104: XNP_XML_UTILS.write_leaf_element ( 'QUANTITY', XNP$QUANTITY ) ;
105: XNP_XML_UTILS.write_leaf_element ( 'WORK_ORDER_NUMBER', XNP$WORK_ORDER_NUMBER ) ;
106: XNP_XML_UTILS.write_leaf_element ( 'TO_PARTY_SITE_ID', XNP$TO_PARTY_SITE_ID ) ;
107: XNP_XML_UTILS.write_leaf_element ( 'FROM_PARTY_SITE_ID', XNP$FROM_PARTY_SITE_ID ) ;
108: XNP_XML_UTILS.write_leaf_element ( 'TO_NETWORK_LOC_ID', XNP$TO_NETWORK_LOC_ID ) ;
109: XNP_XML_UTILS.write_leaf_element ( 'FROM_NETWORK_LOC_ID', XNP$FROM_NETWORK_LOC_ID ) ;
102: RAISE e_MISSING_MANDATORY_DATA ;
103: END IF ;
104: XNP_XML_UTILS.write_leaf_element ( 'QUANTITY', XNP$QUANTITY ) ;
105: XNP_XML_UTILS.write_leaf_element ( 'WORK_ORDER_NUMBER', XNP$WORK_ORDER_NUMBER ) ;
106: XNP_XML_UTILS.write_leaf_element ( 'TO_PARTY_SITE_ID', XNP$TO_PARTY_SITE_ID ) ;
107: XNP_XML_UTILS.write_leaf_element ( 'FROM_PARTY_SITE_ID', XNP$FROM_PARTY_SITE_ID ) ;
108: XNP_XML_UTILS.write_leaf_element ( 'TO_NETWORK_LOC_ID', XNP$TO_NETWORK_LOC_ID ) ;
109: XNP_XML_UTILS.write_leaf_element ( 'FROM_NETWORK_LOC_ID', XNP$FROM_NETWORK_LOC_ID ) ;
110: IF ( XNP$TRANSACTION_DATE IS NULL) THEN
103: END IF ;
104: XNP_XML_UTILS.write_leaf_element ( 'QUANTITY', XNP$QUANTITY ) ;
105: XNP_XML_UTILS.write_leaf_element ( 'WORK_ORDER_NUMBER', XNP$WORK_ORDER_NUMBER ) ;
106: XNP_XML_UTILS.write_leaf_element ( 'TO_PARTY_SITE_ID', XNP$TO_PARTY_SITE_ID ) ;
107: XNP_XML_UTILS.write_leaf_element ( 'FROM_PARTY_SITE_ID', XNP$FROM_PARTY_SITE_ID ) ;
108: XNP_XML_UTILS.write_leaf_element ( 'TO_NETWORK_LOC_ID', XNP$TO_NETWORK_LOC_ID ) ;
109: XNP_XML_UTILS.write_leaf_element ( 'FROM_NETWORK_LOC_ID', XNP$FROM_NETWORK_LOC_ID ) ;
110: IF ( XNP$TRANSACTION_DATE IS NULL) THEN
111: x_error_message :='Missing Mandatory Attribute - TRANSACTION_DATE' ;
104: XNP_XML_UTILS.write_leaf_element ( 'QUANTITY', XNP$QUANTITY ) ;
105: XNP_XML_UTILS.write_leaf_element ( 'WORK_ORDER_NUMBER', XNP$WORK_ORDER_NUMBER ) ;
106: XNP_XML_UTILS.write_leaf_element ( 'TO_PARTY_SITE_ID', XNP$TO_PARTY_SITE_ID ) ;
107: XNP_XML_UTILS.write_leaf_element ( 'FROM_PARTY_SITE_ID', XNP$FROM_PARTY_SITE_ID ) ;
108: XNP_XML_UTILS.write_leaf_element ( 'TO_NETWORK_LOC_ID', XNP$TO_NETWORK_LOC_ID ) ;
109: XNP_XML_UTILS.write_leaf_element ( 'FROM_NETWORK_LOC_ID', XNP$FROM_NETWORK_LOC_ID ) ;
110: IF ( XNP$TRANSACTION_DATE IS NULL) THEN
111: x_error_message :='Missing Mandatory Attribute - TRANSACTION_DATE' ;
112: fnd_message.set_name('XNP','XNP_MISSING_MANDATORY_ATTR');
105: XNP_XML_UTILS.write_leaf_element ( 'WORK_ORDER_NUMBER', XNP$WORK_ORDER_NUMBER ) ;
106: XNP_XML_UTILS.write_leaf_element ( 'TO_PARTY_SITE_ID', XNP$TO_PARTY_SITE_ID ) ;
107: XNP_XML_UTILS.write_leaf_element ( 'FROM_PARTY_SITE_ID', XNP$FROM_PARTY_SITE_ID ) ;
108: XNP_XML_UTILS.write_leaf_element ( 'TO_NETWORK_LOC_ID', XNP$TO_NETWORK_LOC_ID ) ;
109: XNP_XML_UTILS.write_leaf_element ( 'FROM_NETWORK_LOC_ID', XNP$FROM_NETWORK_LOC_ID ) ;
110: IF ( XNP$TRANSACTION_DATE IS NULL) THEN
111: x_error_message :='Missing Mandatory Attribute - TRANSACTION_DATE' ;
112: fnd_message.set_name('XNP','XNP_MISSING_MANDATORY_ATTR');
113: fnd_message.set_token('ATTRIBUTE','TRANSACTION_DATE' ) ;
113: fnd_message.set_token('ATTRIBUTE','TRANSACTION_DATE' ) ;
114: x_error_message := fnd_message.get ;
115: RAISE e_MISSING_MANDATORY_DATA ;
116: END IF ;
117: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTION_DATE', XNP$TRANSACTION_DATE ) ;
118: IF ( XNP$TRANSACTED_BY IS NULL) THEN
119: x_error_message :='Missing Mandatory Attribute - TRANSACTED_BY' ;
120: fnd_message.set_name('XNP','XNP_MISSING_MANDATORY_ATTR');
121: fnd_message.set_token('ATTRIBUTE','TRANSACTED_BY' ) ;
121: fnd_message.set_token('ATTRIBUTE','TRANSACTED_BY' ) ;
122: x_error_message := fnd_message.get ;
123: RAISE e_MISSING_MANDATORY_DATA ;
124: END IF ;
125: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTED_BY', XNP$TRANSACTED_BY ) ;
126: XNP_XML_UTILS.end_segment ( 'CSENIUPD' ) ;
127: XNP_XML_UTILS.end_segment ( 'MESSAGE') ;
128: XNP_XML_UTILS.get_document( l_xml_doc ) ;
129: /* assign the header and msg text to output parameters */
122: x_error_message := fnd_message.get ;
123: RAISE e_MISSING_MANDATORY_DATA ;
124: END IF ;
125: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTED_BY', XNP$TRANSACTED_BY ) ;
126: XNP_XML_UTILS.end_segment ( 'CSENIUPD' ) ;
127: XNP_XML_UTILS.end_segment ( 'MESSAGE') ;
128: XNP_XML_UTILS.get_document( l_xml_doc ) ;
129: /* assign the header and msg text to output parameters */
130: x_msg_header := l_msg_header ;
123: RAISE e_MISSING_MANDATORY_DATA ;
124: END IF ;
125: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTED_BY', XNP$TRANSACTED_BY ) ;
126: XNP_XML_UTILS.end_segment ( 'CSENIUPD' ) ;
127: XNP_XML_UTILS.end_segment ( 'MESSAGE') ;
128: XNP_XML_UTILS.get_document( l_xml_doc ) ;
129: /* assign the header and msg text to output parameters */
130: x_msg_header := l_msg_header ;
131: x_msg_text := l_xml_doc ;
124: END IF ;
125: XNP_XML_UTILS.write_leaf_element ( 'TRANSACTED_BY', XNP$TRANSACTED_BY ) ;
126: XNP_XML_UTILS.end_segment ( 'CSENIUPD' ) ;
127: XNP_XML_UTILS.end_segment ( 'MESSAGE') ;
128: XNP_XML_UTILS.get_document( l_xml_doc ) ;
129: /* assign the header and msg text to output parameters */
130: x_msg_header := l_msg_header ;
131: x_msg_text := l_xml_doc ;
132: /* handle exceptions */