PACKAGE BODY: APPS.CZ_BATCH_VALIDATE

Source

1 PACKAGE BODY CZ_BATCH_VALIDATE AS
2 /*  $Header: czbvaldb.pls 115.5 2003/11/03 20:50:32 rheramba ship $        */
3 ------------------------------------------------------------------------------------------
4 PROCEDURE VALIDATE (
5 -- single-call validation function uses tables to exchange multi-valued data
6                     config_input_list IN  CFG_INPUT_LIST,        -- input selections
7                     init_message      IN  VARCHAR2,              -- additional XML
8                     config_messages   IN  OUT NOCOPY CFG_OUTPUT_PIECES, -- table of output XML messages
9                     validation_status IN  OUT NOCOPY NUMBER,            -- status return
10                     URL               IN  VARCHAR2 DEFAULT FND_PROFILE.Value('CZ_UIMGR_URL'))
11 
12 IS
13   cfapi_input_list  cz_cf_api.CFG_INPUT_LIST;
14   i                 PLS_INTEGER;
15 BEGIN
16 
17   i := config_input_list.FIRST;
18 
19   WHILE(i IS NOT NULL)LOOP
20 
21     cfapi_input_list(i).component_code := config_input_list(i).component_code;
22     cfapi_input_list(i).quantity := config_input_list(i).quantity;
23     cfapi_input_list(i).input_seq := config_input_list(i).input_seq;
24     cfapi_input_list(i).config_item_id := config_input_list(i).config_item_id;
25 
26     i := config_input_list.NEXT(i);
27   END LOOP;
28 
29   cz_cf_api.validate(cfapi_input_list, init_message, config_messages, validation_status, URL);
30 END validate;
31 ------------------------------------------------------------------------------------------
32 END CZ_BATCH_VALIDATE;