×
Discuss about Archiving, Close of Business, Delivery Setup, Security Management System, Global Processing etc…
COMO file usage
- Pradeep
- Topic Author
- Offline
- New Member
Less
More
- Posts: 8
- Thank you received: 0
18 years 1 week ago #442
by Pradeep
COMO file usage was created by Pradeep
I am trying to develop an understanding of how the COMO file is used to analyse problems, but the only information I can find is in the jbase 4.1 utilities programmers reference manual which just gives the syntax of for turning on and off of a session trace. Does anyone know where I can find a more detailed explanation s of COMO file usage?
I also understand the volume of the COMO file can become very large. Are there utilities or routines that can be used to process the COMO file to reduce and summarise the trace?
Thanks for any help or advice.
Pradeep
I also understand the volume of the COMO file can become very large. Are there utilities or routines that can be used to process the COMO file to reduce and summarise the trace?
Thanks for any help or advice.
Pradeep
Please Log in or Create an account to join the conversation.
- ashok
- Offline
- Junior Member
Less
More
- Posts: 30
- Thank you received: 0
18 years 1 week ago #443
by ashok
Replied by ashok on topic COMO FIle
COMO is used to store acitivity log, it's similar to HOLD file you write on COMO like this:
*
SUBROUTINE SELECT.TIME
*Routine to display the time taken to execute the select.
*
*
*
$INSERT I_COMMON
$INSERT I_EQUATE
$INSERT I_F.COMPANY
*
*
DEBUG
EXECUTE 'COMO ON ':'CATEG.ENT.SELECT:':ID.COMPANY:':':TIME() **** START WRITING ON COMO FILE
GOSUB INITIALISATION
GOSUB EXECUTE.SELECT
GOSUB DISPLAY.TEXT
EXECUTE 'COMO OFF ':'CATEG.ENT.SELECT:':ID.COMPANY:':':TIME() **** STOP
RETURN
*
*
INITIALISATION:
PRINT 'INPUT THE SELECT STATEMENT TO BE EXECUTED:' ; INPUT SELECT.STATEMENT
SELECTED = 0
KEY.LIST = ''
START.TIME = TIME()
PRINT 'START.TIME :':START.TIME
RETURN
EXECUTE.SELECT:
*
IF SELECT.STATEMENT THEN
EXECUTE SELECT.STATEMENT CAPTURING OUTPUT
SYSTEM.RETURN.CODE = @SYSTEM.RETURN.CODE
SELECTED = @SELECTED
END
*
READLIST KEY.LIST ELSE KEY.LIST = '' ;* Return the IDs
RETURN
DISPLAY.TEXT:
*
PRINT 'END.TIME :':TIME()
ELAPSED.TIME = TIME()-START.TIME ;* How long the select took
MSG = SELECT.STATEMENT:' Selected=':SELECTED:' time=':ELAPSED.TIME:'secs'
PRINT MSG
RETURN
*
END
_________________
Ashok Pandey
Mayor Street
Dublin
Ireland
*
SUBROUTINE SELECT.TIME
*Routine to display the time taken to execute the select.
*
*
*
$INSERT I_COMMON
$INSERT I_EQUATE
$INSERT I_F.COMPANY
*
*
DEBUG
EXECUTE 'COMO ON ':'CATEG.ENT.SELECT:':ID.COMPANY:':':TIME() **** START WRITING ON COMO FILE
GOSUB INITIALISATION
GOSUB EXECUTE.SELECT
GOSUB DISPLAY.TEXT
EXECUTE 'COMO OFF ':'CATEG.ENT.SELECT:':ID.COMPANY:':':TIME() **** STOP
RETURN
*
*
INITIALISATION:
PRINT 'INPUT THE SELECT STATEMENT TO BE EXECUTED:' ; INPUT SELECT.STATEMENT
SELECTED = 0
KEY.LIST = ''
START.TIME = TIME()
PRINT 'START.TIME :':START.TIME
RETURN
EXECUTE.SELECT:
*
IF SELECT.STATEMENT THEN
EXECUTE SELECT.STATEMENT CAPTURING OUTPUT
SYSTEM.RETURN.CODE = @SYSTEM.RETURN.CODE
SELECTED = @SELECTED
END
*
READLIST KEY.LIST ELSE KEY.LIST = '' ;* Return the IDs
RETURN
DISPLAY.TEXT:
*
PRINT 'END.TIME :':TIME()
ELAPSED.TIME = TIME()-START.TIME ;* How long the select took
MSG = SELECT.STATEMENT:' Selected=':SELECTED:' time=':ELAPSED.TIME:'secs'
PRINT MSG
RETURN
*
END
_________________
Ashok Pandey
Mayor Street
Dublin
Ireland
Please Log in or Create an account to join the conversation.
- Pradeep
- Topic Author
- Offline
- New Member
Less
More
- Posts: 8
- Thank you received: 0
18 years 1 week ago #444
by Pradeep
Replied by Pradeep on topic COMO File Usage
Ashok,
I thank you for the rapid and informative response to my query. You, and others like you, provide an invaluable service by availing inexperienced people, like myself, of your field experience and expertise, thus greatly augmenting the information from vendor sources.
The kind of advice and help available from this forum, not only benefits those involved in delivering support, but also Temenos prospects, customers and clients, all of whom we would like to see become advocates!
Rgds
Pradeep
I thank you for the rapid and informative response to my query. You, and others like you, provide an invaluable service by availing inexperienced people, like myself, of your field experience and expertise, thus greatly augmenting the information from vendor sources.
The kind of advice and help available from this forum, not only benefits those involved in delivering support, but also Temenos prospects, customers and clients, all of whom we would like to see become advocates!
Rgds
Pradeep
Please Log in or Create an account to join the conversation.
- ashok
- Offline
- Junior Member
Less
More
- Posts: 30
- Thank you received: 0
18 years 1 week ago #445
by ashok
Replied by ashok on topic COMO file usage
Most Welcome!!!
_________________
Ashok Pandey
Mayor Street
Dublin
Ireland
_________________
Ashok Pandey
Mayor Street
Dublin
Ireland
Please Log in or Create an account to join the conversation.
Time to create page: 0.082 seconds