shanmudhaya
New User
Joined: 03 Jun 2008
Posts: 3
Location: Inida
|
|
|
|
Hi,
I have one main module that contains the XML generate statement and the submodule does the XML parsing. I have open and close statments for the output files in both the modules and write the XML data in the output file in the called module. Since it calls the submodule so many times, the job took much time to complete. I tried removing the open and close statements in called module and retain only write statements in the called module. But i got the protection exception. Could anyone help me on this?
Mainmodule: XXXXMAIN
Sub Module: XXXXSUB
XML GENETARE:
XML GENERATE WS-XML-OUTPUT-DATA
FROM INPUTDATA
COUNT IN WS-XML-CHAR-COUNT.
XML PARSING IN SUBMODULE:
XML PARSE XXXXSUB-XML-IN-REC
PROCESSING PROCEDURE 03100-XML-PARSE
ON EXCEPTION
DISPLAY 'PROBLEM IN ' XXXXSUB-PGM-NAME
DISPLAY 'XML ERROR CODE: ' XML-CODE
DISPLAY 'XML RECORD: ' XXXXSUB-XML-IN-REC
MOVE WS-LAST-PARA
TO XXXXSUB-ERROR-PARA
SET XXXXSUB-INVALID-INPUT
TO TRUE
MOVE WS-INVALID-INPUT-XML
TO XXXXSUB-ERROR-MSG
END-XML
or
Is there any option to reduce the running time and space?
Thanks!!!
Regards,
Raja |
|
