Package com.softwaremining.cics
Class CicsBaseService
java.lang.Object
com.softwaremining.logic.BaseService
com.softwaremining.sql.ESQLBaseService
com.softwaremining.cics.CicsBaseService
- All Implemented Interfaces:
EIBFNCodes,ICicsBaseService,Keyboard,IBaseService,Service,SQLHandlerInterface,IDisplayable,Runnable
- Direct Known Subclasses:
DliBaseService
public abstract class CicsBaseService
extends ESQLBaseService
implements ICicsBaseService, EIBFNCodes, Keyboard
-
Field Summary
FieldsModifier and TypeFieldDescriptionprotected static final intintFields inherited from class com.softwaremining.sql.ESQLBaseService
staticLogger, totalRuntimeFields inherited from class com.softwaremining.logic.BaseService
calledParameters, log, PARA_NAME_POSTFIX, profiled_baseService_runtimes, totalRuntime_processControlException, totalRuntime_reflectionFields inherited from interface com.softwaremining.cics.constants.EIBFNCodes
DUPREC, EIBFN_CODE_ABEND, EIBFN_CODE_ABEND_INT, EIBFN_CODE_DELETE, EIBFN_CODE_DELETEQ_TD, EIBFN_CODE_DELETEQ_TS, EIBFN_CODE_ENDBR, EIBFN_CODE_LINK, EIBFN_CODE_LOAD, EIBFN_CODE_READ, EIBFN_CODE_READNEXT, EIBFN_CODE_READPREV, EIBFN_CODE_READQ_TD, EIBFN_CODE_READQ_TS, EIBFN_CODE_RECEIVE_MAP, EIBFN_CODE_RESETBR, EIBFN_CODE_RETURN, EIBFN_CODE_REWRITE, EIBFN_CODE_SEND_MAP, EIBFN_CODE_SEND_TEXT, EIBFN_CODE_STARTBR, EIBFN_CODE_UNLOCK, EIBFN_CODE_WRITE, EIBFN_CODE_WRITEQ_TD, EIBFN_CODE_WRITEQ_TS, EIBFN_CODE_XCTL, FILENOTFOUND, NOTOPEN, OKFields inherited from interface com.softwaremining.ui.IDisplayable
_FKEY_INPUT, _INVALIDATE, FKEY_1, FKEY_10, FKEY_11, FKEY_12, FKEY_2, FKEY_3, FKEY_4, FKEY_5, FKEY_6, FKEY_7, FKEY_8, FKEY_9Fields inherited from interface com.softwaremining.cics.ui.Keyboard
CLEAR, CLRP, ENTER, MSRE, NULL, OPID, PA1, PA2, PA3, PEN, PF1, PF10, PF11, PF12, PF13, PF14, PF15, PF16, PF17, PF18, PF19, PF2, PF20, PF21, PF22, PF23, PF24, PF3, PF4, PF5, PF6, PF7, PF8, PF9, QUIT, STRF, TRIGFields inherited from interface com.softwaremining.sql.SQLHandlerInterface
HANDLER_CONTINUE, HANDLER_GO_TO, HANDLER_METHOD_CALL, HANDLER_NOT_INTIALIZED, HANDLER_PERFORM, HANDLER_STOP, HANDLER_THROW, SQL_SCHEMA_PROP -
Constructor Summary
Constructors -
Method Summary
Modifier and TypeMethodDescriptionvoidtranslation of CALL 'CEE3ABD' https://www.ibm.com/docs/en/zos/2.4.0?topic=services-cee3abdterminate-enclave-abendvoidabendEnclave(long abendCode, long cleanup) translation of CALL 'CEE3ABD' https://www.ibm.com/docs/en/zos/2.4.0?topic=services-cee3abdterminate-enclave-abend#
not implemented yetvoidassignBmsMapSetName(String mapName, String mapset_FileName) voidassignChannelName(String channelName) voidassignNetname(String netName) voidassignProgram(ISMString programName) Deprecated.voidassignProgram(String programName) Deprecated.voidassignSessionManager(SessionManager sessionManager) for internal use onlyvoidfor internal use onlyvoidvoidcicsAddress(AddressDO addressDO) Set Address of pointers for TWA and CWAvoidcicsDefineCounter(CounterDO counterDO) Translation of CICS DEFINE COUNTER
https://www-01.ibm.com/support/knowledgecenter/SSGMCP_5.3.0/com.ibm.cics.ts .applicationprogramming.doc/commands/dfhp4_definecounter.htmlvoidDeprecated.- this is a stub methodintcicsDumpTransaction(DumpTransactionDO dumpTransactionDO) Dumps data in DAO's as well as COMMAREA and TWA to Config.DATA_DIR /dump/timestamp[/dumpCode]voidDeprecated.voidcicsEnterTracenum(EnterTracenumDO enterTracenumDO) intcicsGetcounter(CounterDO counterDO) Translation of CICS GET COUNTER
https://www-01.ibm.com/support/knowledgecenter/SSGMCP_5.3.0/com.ibm.cics.ts .applicationprogramming.doc/commands/dfhp4_definecounter.htmlvoidDeprecated.- this is a stub methodvoidcicsInquireFile(InquireFileDO inquireFileDO) Deprecated.voidcicsInquiretask(InquireTaskDO inquireTaskDO) Deprecated.intcicsPostEvent(PostEventDO postEventDO) Deprecated.- please use com.softwaremining.cics.util.EventManager.postEventprotected final inttranslation of CICS Sync Point RollbackvoidcicsSpiinquireFile(InquireFileDO inquireFileDO) Deprecated.intThis method currently does not perform anythingvoidcicsSpiinquiretask(InquireTaskDO inquireTaskDO) Deprecated.final intprotected final intcicsSyncpoint(SyncpointDO param) translation of CICS Sync PointvoidcicsUnlock(UnlockDO unlockDO) Deprecated.- this is a stub methodintcicsWaitEvent(WaitEventDO waitEventDO) Deprecated.- please use com.softwaremining.cics.util.EventManager.waitEventvoidcicsWebExtract(WebExtractDO webextractDo) voidcicsWebRead(WebReadDO param) Deprecated.- this is a stub methodvoidcicsWebReceive(WebReceiveDO param) Deprecated.- this is a stub methodvoidcicsWebSend(WebSendDO param) Deprecated.- this is a stub methodvoidcicsWebWrite(WebWriteDO param) Deprecated.- this is a stub methodvoidcommitAndReleaseConnection(boolean doCommit) for internal use only
- Commits all open transactions (if not already committed)
- closes any CicsPersistence.resultsets in this program which have not been already closed
- releases any connections associated with CicsPersistence.resultsetscreateOrRetrieveContainerListFromChannel(String channelName) For internal use onlyvoidvoiddelay()CICS Delayvoiddelay(int seconds) CICS Delayvoiddelay(ISMNumeric seconds) protected voiddestroy()Close connection all instances of ESQLProcessor Automatically called after exiting a program (normal exit, Go-Back).protected voidAutomatically called after fatal errorvoiddoFinalize(boolean forceRelease, boolean releaseConnection) Automatically called after CANCELing (ServicesFactory.cancel) running a program - it removes all wrapperListsintWhen there is No parameters, then the system should pass all the parameters which it had received through the Linkage-AreaintexecuteLink(ISMDataType commAreaField) Translation of CICS Link statement.intexecuteLink(ISMDataType[] commAreaDataObjects) intexecuteLink(ISMDataType commAreaDataObject, double commAreaLength) Translation of CICS Link statement.intexecuteLinkUsingChannel(String channelName) intTranslation of CICS Xctl function: transfers control from one application program to another.intexecuteTransferControl(boolean invokeHandler) Translation of CICS Xctl function: transfers control from one application program to another.intexecuteTransferControl(ISMDataType commAreaDataObject) Translation of CICS Xctl function: transfers control from one application program to another.intexecuteTransferControl(ISMDataType commAreaDataObject, boolean invokeHandler) Translation of CICS Xctl function: transfers control from one application program to another.intexecuteTransferControl(ISMDataType newCommArea, int commAreaLength) Translation of CICS Xctl function: transfers control from one application program to another.intexecuteTransferControl(ISMDataType newCommArea, int commAreaLength, boolean invokeHandler) Translation of CICS Xctl function: transfers control from one application program to another.intexecuteTransferControl(String newCommArea) Translation of CICS Xctl function: transfers control from one application program to another.intexecuteTransferControl(String newCommArea, int commAreaLength) Translation of CICS Xctl function: transfers control from one application program to another.intexecuteTransferControl(String newCommArea, int commAreaLength, boolean invokeHandler) Translation of CICS Xctl function: transfers control from one application program to another.for internal use onlyCICS uses a 8 Character identifier for program names ...used in CICS ASSIGN ...Deprecated.please use GetInvokingProgramNameintDeprecated.- please use lengthOfTransactionWorkArea()long2byte alpha numeric to show how program was started.getSysid()intgetTally()intDeprecated.- please use lengthOfTransactionWorkArea()used in CICS ASSIGN ...voidignoreCondition(int conditionNumber) voidignoreCondition(int[] conditionNumber) voidin ESQL projects commits are manually made e.g EXEC SQL COMMIT END-EXEC Hence turn the auto-commit off during initializationvoidvoidinvokeConditionHandler(ISMObject responseField, long responseCode, Throwable throwable) handle the condition - when a CICS operation fails, or throw an AbnormalTerminationException code - then control will be passed to this method to determine whether a.booleanisAbend()this method is used in passing abend information between CICS LINK callsbooleanbooleanbooleanIndicates whether this the first time this program is being executed, or whether the system is re-entering this program.booleanisKeyPressed(String key) check if a key has been prssedbooleanbooleanOnly used in conversion of Conversational to Pseudo-Conv ProgramsintReturns the length of Transaction Work Area associated with this Session.method used internally by SoftwareMining frameworkprotected voidFor internal use onlyvoidquit()Commit changes made by all instances of ESQLProcessorvoidvoidreInitializeAllDAOs(boolean resetDAOInitialValues) reinitializes CBLBeans to their default char-array representation, and AbstractCOntainer to their default values This allows system to reuse the Wrapper classes in other programs.voidfor internal use only used by CICS subsystemvoidresetCondition(int conditionNumber) for internal use onlyretrieveCicsPersistenceForDataset(String tableName) Retrieve the active/opened CicsPersistence DAO registered to the SQL tableNamefor internal use onlyjakarta.servlet.http.HttpServletRequestreturns the HttpServletRequest received by the Servlet engine.jakarta.servlet.http.HttpSessionReturns associated HttpSession manager, set by PseudoCOnversationalServletmethod used internally by SoftwareMining frameworkGet the internal SoftwareMining SessionManagervoidreturnFromSession(String transId) Translation of EXEC CICS Return.
terminates program execution returning control to the invoking program (or CICS Frame work).protected voidreturnFromSession(String transId, ISMBean commArea) Translation of EXEC CICS Return.
terminates program execution returning control to the invoking program (or CICS Frame work).protected voidreturnFromSession(String transId, ISMBean commArea, int commAreaLength) Translation of EXEC CICS Return.
terminates program execution returning control to the invoking program (or CICS Frame work).protected voidreturnFromSession(String transId, ISMBean commArea, String inputMessage, int commAreaLength) Translation of EXEC CICS Return.
terminates program execution returning control to the invoking program (or CICS Frame work).protected voidreturnFromSession(String transId, String commArea) Translation of EXEC CICS Return.
terminates program execution returning control to the invoking program (or CICS Frame work).protected voidreturnFromSession(String transId, String commArea, int commAreaLength) Translation of EXEC CICS Return.
terminates program execution returning control to the invoking program (or CICS Frame work).protected voidreturnFromSession(String transId, String commArea, String inputMessage) Translation of EXEC CICS Return.
terminates program execution returning control to the invoking program (or CICS Frame work).protected voidreturnFromSession(String transId, String commArea, String inputMessage, int commAreaLength) Translation of EXEC CICS Return.
terminates program execution returning control to the invoking program (or CICS Frame work).protected voidreturnFromSession(String transId, String commArea, String inputMessage, int commAreaLength, String programCode) Translation of EXEC CICS Return.
terminates program execution returning control to the invoking program (or CICS Frame work).voidsetAbend(boolean abend) this method is used in passing abend information between CICS LINK callsvoidsetAbendHandler(int defaultHandler, String methodName) voidsetAbendHandler(String methodName) voidsetAcceptResponse(AcceptResponse acceptResponse) voidsetAidEventHandler(String keyCode, String methodName) voidsetInvokeHelper(InvokeHelper invokeHelper) Invoker handler provides handlers to application program Lanchers, shutdown services and Transaction HandlersvoidsetKeyPressed(String key) voidsetNeedScreenUpdate(boolean needScreenUpdate) protected voidsetRespCode(int code, AbstractCBLField respCode) voidsetRoutedBMS(RouteDO routedBMS) voidsetTally(int tally) voidvoidsetWaitingForUser(boolean waitingForUser) Only used in conversion of Conversational to Pseudo-Conv Programsprotected voidtransfuse(List<ISMDataType> in, List<ISMDataType> out, boolean back) for internal use onlyMethods inherited from class com.softwaremining.sql.ESQLBaseService
abort, closeESQLProcessors, commit, commitThrowingException, doFinalize, getESQLProcessors, populateFromLastSQLMessage, populateFromLastSQLMessage, processSQLException, processSQLException, releaseESQLConnections, resetSQLCA, rollback, setErrorHandler, setErrorHandler, setErrorHandlerForward, setNotFoundHandler, setNotFoundHandler, setNotFoundHandlerForward, setSessionSchemaName, setWarningHandler, setWarningHandlerMethods inherited from class com.softwaremining.logic.BaseService
_goto, accept, addCallParameter, addCallParameter, addCallParameter, addCallParameter, addCallParameter, addCallParameter, addCallParameter, addCallParameter, addRuntimeParameter, addRuntimeParameter, assignCallerProgram, assignCyclicBarrier, assignInstanceNumber, assignLastKeyPressed, assignLaunchedInstances, assignPCBFile, assignTargetXMLScreen, assignUsesAnnotationBasedMethodOrdering, awaitBarrier, callJavaMethod, callJavaMethod, chain, clearCallingParameters, countCallParameters, currentDate, disableGUIScreens, doFinalize, enableReuse, execute, execute, execute, execute, execute, execute, execute, execute, executeWithPointerData, executeWithPointerData, getActiveBeanInstance, getCallerProgram, getDataWrappers, getField, getLastDisplayColumn, getLastDisplayRow, getMethodNumber, getNextPoint, getParagraph, getReportProcessorList, getReturnCode, getScreenClassName, getScreenClient, getServletRunTimeParameterFrom, getSessionId, getWrapperList, getXMLScreenDefReader, goBack, hasReflectionBasedFlowLogic, invoke, invokeRange, isCallerWaiting, isFirstInstance, isGUIScreensEnabled, isTargetXMLScreen, main, objectsAreOfTheSameClass, optimizeUsingTransfuseByReference, popNextRuntimeParameter, receiveExecuteParameter, receiveExecuteParameter, receiveExecuteParameter, receiveExecuteParameter, receiveExecuteParameter, registerDataWrapper, registerDataWrappers, registerExecuteParameters, reRegisterExecuteParameters, retrieveCalledParameters, retrieveCyclicBarrier, retrieveField, retrieveInstanceNumber, retrieveLastKeyPressed, retrieveLaunchedInstances, retrieveTotalNumberOfInstancesLaunched, run, setCallerWaiting, setCommandLineParameters, setExceptionalExitReturnCode, setHttpRequestParameterMap, setLastDisplayColumn, setLastDisplayRow, setReturnCode, setReturnCode, setReturnCode, setScreenClient, setSessionId, setUsesAnnotationBasedMethodOrdering, startUp, stop, stop, tearDown, transfuseByReferenceMethods inherited from class java.lang.Object
clone, equals, finalize, getClass, hashCode, notify, notifyAll, toString, wait, wait, waitMethods inherited from interface com.softwaremining.logic.IBaseService
_goto, addCallParameter, addCallParameter, addCallParameter, addCallParameter, addCallParameter, addCallParameter, addCallParameter, execute, execute, execute, execute, execute, execute, execute, getReturnCode, getSessionId, goBack, invoke, invokeRange, populateFromLastSQLMessage, populateFromLastSQLMessage, setReturnCode, setSessionId, stopMethods inherited from interface com.softwaremining.ui.IDisplayable
assignLastKeyPressed, assignTargetXMLScreen, disableGUIScreens, getField, getLastDisplayColumn, getLastDisplayRow, getScreenClassName, getScreenClient, getXMLScreenDefReader, isGUIScreensEnabled, isTargetXMLScreen, retrieveField, retrieveLastKeyPressed, setLastDisplayColumn, setLastDisplayRow
-
Field Details
-
_RETURN_FROM_SESSION_DEFAULT_LENGTH
protected static final int _RETURN_FROM_SESSION_DEFAULT_LENGTH- See Also:
-
DEFAULT_HANDLER
public int DEFAULT_HANDLER
-
-
Constructor Details
-
CicsBaseService
-
CicsBaseService
public CicsBaseService()Deprecated.Constructor
-
-
Method Details
-
getEibaid
- Specified by:
getEibaidin interfaceICicsBaseService
-
getDfhaid
-
setAbend
public void setAbend(boolean abend) this method is used in passing abend information between CICS LINK calls- Specified by:
setAbendin interfaceICicsBaseService
-
isAbend
public boolean isAbend()this method is used in passing abend information between CICS LINK calls- Specified by:
isAbendin interfaceICicsBaseService
-
abendEnclave
public void abendEnclave()translation of CALL 'CEE3ABD' https://www.ibm.com/docs/en/zos/2.4.0?topic=services-cee3abdterminate-enclave-abend -
abendEnclave
public void abendEnclave(long abendCode, long cleanup) translation of CALL 'CEE3ABD' https://www.ibm.com/docs/en/zos/2.4.0?topic=services-cee3abdterminate-enclave-abend#
not implemented yet -
quit
public void quit()Description copied from class:ESQLBaseServiceCommit changes made by all instances of ESQLProcessor- Overrides:
quitin classESQLBaseService
-
isCicsAutoSyncPointEnabled
public boolean isCicsAutoSyncPointEnabled()- Overrides:
isCicsAutoSyncPointEnabledin classBaseService
-
getCicsConditionManager
- Specified by:
getCicsConditionManagerin interfaceICicsBaseService
-
setRespCode
-
setInvokeHelper
Description copied from interface:ICicsBaseServiceInvoker handler provides handlers to application program Lanchers, shutdown services and Transaction Handlers- Specified by:
setInvokeHelperin interfaceICicsBaseService
-
destroy
protected void destroy()Description copied from class:ESQLBaseServiceClose connection all instances of ESQLProcessor Automatically called after exiting a program (normal exit, Go-Back). and prepare for GC- Overrides:
destroyin classESQLBaseService
-
destroyOnFatalError
protected void destroyOnFatalError()Description copied from class:BaseServiceAutomatically called after fatal error- Overrides:
destroyOnFatalErrorin classESQLBaseService
-
executeTransferControl
Translation of CICS Xctl function: transfers control from one application program to another. I.e. the control is not passed back to CALLer, and statements after executeTransferControl will not be executed.
This version does not pass any parameters to the targetProgram, hence targetProgram.isFirstTimeExecutionAndNoParameters() will return true- Specified by:
executeTransferControlin interfaceICicsBaseService- Throws:
AbnormalTerminationException
-
executeTransferControl
Translation of CICS Xctl function: transfers control from one application program to another. I.e. the control is not passed back to CALLer, and statements after executeTransferControl will not be executed.
This method does not pass any parameters to the targetProgram, hence targetProgram.isFirstTimeExecutionAndNoParameters() will return true- Specified by:
executeTransferControlin interfaceICicsBaseService- Parameters:
invokeHandler- : (Default true): Mechanism to disable conditionHandlers. SET to TRUE if RESPONSE-CODE is not provided, FALSE if RESPONSE-CODE is provided .- Throws:
AbnormalTerminationException
-
executeTransferControl
public int executeTransferControl(ISMDataType commAreaDataObject) throws AbnormalTerminationException Translation of CICS Xctl function: transfers control from one application program to another. I.e. the control is not passed back to CALLer, and statements after executeTransferControl will not be executed.- Specified by:
executeTransferControlin interfaceICicsBaseService- Parameters:
commAreaDataObject- : this data will be passed to target-program as Communication-Area.- Throws:
AbnormalTerminationException
-
executeTransferControl
public int executeTransferControl(ISMDataType commAreaDataObject, boolean invokeHandler) throws AbnormalTerminationException Translation of CICS Xctl function: transfers control from one application program to another. I.e. the control is not passed back to CALLer, and statements after executeTransferControl will not be executed.- Specified by:
executeTransferControlin interfaceICicsBaseService- Parameters:
commAreaDataObject- : this data will be passed to target-program as Communication-Area.invokeHandler- : (Default true): Mechanism to disable conditionHandlers. SET to TRUE if RESPONSE-CODE is not provided, FALSE if RESPONSE-CODE is provided .- Throws:
AbnormalTerminationException
-
executeTransferControl
Translation of CICS Xctl function: transfers control from one application program to another. I.e. the control is not passed back to CALLer, and statements after executeTransferControl will not be executed.- Specified by:
executeTransferControlin interfaceICicsBaseService- Parameters:
newCommArea- : this data will be passed to target-program as Communication-Area.- Throws:
AbnormalTerminationException
-
executeTransferControl
public int executeTransferControl(String newCommArea, int commAreaLength) throws AbnormalTerminationException Translation of CICS Xctl function: transfers control from one application program to another. I.e. the control is not passed back to CALLer, and statements after executeTransferControl will not be executed.- Specified by:
executeTransferControlin interfaceICicsBaseService- Parameters:
newCommArea- : this data will be passed to target-program as Communication-Area.commAreaLength- : newCommArea will be trimmed to this length prior to passing to targetProgram- Throws:
AbnormalTerminationException
-
executeTransferControl
public int executeTransferControl(ISMDataType newCommArea, int commAreaLength) throws AbnormalTerminationException Translation of CICS Xctl function: transfers control from one application program to another. I.e. the control is not passed back to CALLer, and statements after executeTransferControl will not be executed.- Specified by:
executeTransferControlin interfaceICicsBaseService- Parameters:
newCommArea- - this data will be passed to target-program as Communication-Area.invokeHandler- : (Default true): Mechanism to disable conditionHandlers. SET to TRUE if RESPONSE-CODE is not provided, FALSE if RESPONSE-CODE is provided .- Throws:
AbnormalTerminationException
-
executeTransferControl
public int executeTransferControl(ISMDataType newCommArea, int commAreaLength, boolean invokeHandler) throws AbnormalTerminationException Translation of CICS Xctl function: transfers control from one application program to another. I.e. the control is not passed back to CALLer, and statements after executeTransferControl will not be executed.- Specified by:
executeTransferControlin interfaceICicsBaseService- Parameters:
newCommArea- - this data will be passed to target-program as Communication-Area.commAreaLength- : newCommArea will be trimmed to this length prior to passing to targetPrograminvokeHandler- : (Default true): Mechanism to disable conditionHandlers. SET to TRUE if RESPONSE-CODE is not provided, FALSE if RESPONSE-CODE is provided .- Throws:
AbnormalTerminationException
-
executeTransferControl
public int executeTransferControl(String newCommArea, int commAreaLength, boolean invokeHandler) throws AbnormalTerminationException Translation of CICS Xctl function: transfers control from one application program to another. I.e. the control is not passed back to CALLer, and statements after executeTransferControl will not be executed.- Specified by:
executeTransferControlin interfaceICicsBaseService- Parameters:
newCommArea- - this data will be passed to target-program as Communication-Area.commAreaLength- : newCommArea will be trimmed to this length prior to passing to targetPrograminvokeHandler- : (Default true): Mechanism to disable conditionHandlers. SET to TRUE if RESPONSE-CODE is not provided, FALSE if RESPONSE-CODE is provided .- Throws:
AbnormalTerminationException
-
returnFromSession
Translation of EXEC CICS Return.
terminates program execution returning control to the invoking program (or CICS Frame work). When a transid is specified - control will be passed to the program associated with transid, next time a screen is displayed and user clicks on a function/Return key.. Usually the transId will be the one associated with the current program.- Specified by:
returnFromSessionin interfaceICicsBaseService- Parameters:
transId- - transaction Id (referring to a program) to pass to the caller program.- Throws:
ControlException
-
returnFromSession
Translation of EXEC CICS Return.
terminates program execution returning control to the invoking program (or CICS Frame work). When a transid is specified - control will be passed to the program associated with transid, next time a screen is displayed and user clicks on a function/Return key. Usually the transId will be the one associated with the current program.- Parameters:
transId- - transaction Id to pass to the caller programcommArea- - communication-Area data to pass to the caller program- Throws:
ControlException
-
returnFromSession
protected void returnFromSession(String transId, ISMBean commArea, int commAreaLength) throws ControlException Translation of EXEC CICS Return.
terminates program execution returning control to the invoking program (or CICS Frame work). When a transid is specified - control will be passed to the program associated with transid, next time a screen is displayed and user clicks on a function/Return key. Usually the transId will be the one associated with the current program.- Parameters:
transId- - transaction Id to pass to the caller programcommArea- - communication-Area data to pass to the caller programcommAreaLength- - commArea will be trimmed (or expanded) to this length- Throws:
ControlException
-
returnFromSession
Translation of EXEC CICS Return.
terminates program execution returning control to the invoking program (or CICS Frame work). When a transid is specified - control will be passed to the program associated with transid, next time a screen is displayed and user clicks on a function/Return key. Usually the transId will be the one associated with the current program.- Parameters:
transId- - transaction Id to pass to the caller programcommArea- - communication-Area data to pass to the caller program- Throws:
ControlException
-
returnFromSession
protected void returnFromSession(String transId, String commArea, int commAreaLength) throws ControlException Translation of EXEC CICS Return.
terminates program execution returning control to the invoking program (or CICS Frame work). When a transid is specified - control will be passed to the program associated with transid, next time a screen is displayed and user clicks on a function/Return key. Usually the transId will be the one associated with the current program.- Parameters:
transId- - transaction Id to pass to the caller programcommArea- - communication-Area data to pass to the caller programcommAreaLength- - commArea will be trimmed (or expanded) to this length- Throws:
ControlException
-
returnFromSession
protected void returnFromSession(String transId, ISMBean commArea, String inputMessage, int commAreaLength) throws ControlException Translation of EXEC CICS Return.
terminates program execution returning control to the invoking program (or CICS Frame work). When a transid is specified - control will be passed to the program associated with transid, next time a screen is displayed and user clicks on a function/Return key. Usually the transId will be the one associated with the current program.- Parameters:
transId- - transaction Id to pass to the caller programcommArea- - communication-Area data to pass to the caller programinputMessage- - inputMessage passed to sessionManagercommAreaLength- - commArea will be trimmed (or expanded) to this length- Throws:
ControlException
-
returnFromSession
protected void returnFromSession(String transId, String commArea, String inputMessage) throws ControlException Translation of EXEC CICS Return.
terminates program execution returning control to the invoking program (or CICS Frame work). When a transid is specified - control will be passed to the program associated with transid, next time a screen is displayed and user clicks on a function/Return key. Usually the transId will be the one associated with the current program.- Parameters:
transId- - transaction Id to pass to the caller programcommArea- - communication-Area data to pass to the caller programinputMessage- - inputMessage passed to sessionManager- Throws:
ControlException
-
returnFromSession
protected void returnFromSession(String transId, String commArea, String inputMessage, int commAreaLength) throws ControlException Translation of EXEC CICS Return.
terminates program execution returning control to the invoking program (or CICS Frame work). When a transid is specified - control will be passed to the program associated with transid, next time a screen is displayed and user clicks on a function/Return key. Usually the transId will be the one associated with the current program.- Parameters:
transId- - transaction Id to pass to the caller programcommArea- - communication-Area data to pass to the caller programinputMessage- - inputMessage passed to sessionManagercommAreaLength- - commArea will be trimmed (or expanded) to this length- Throws:
ControlException
-
returnFromSession
protected void returnFromSession(String transId, String commArea, String inputMessage, int commAreaLength, String programCode) throws ControlException Translation of EXEC CICS Return.
terminates program execution returning control to the invoking program (or CICS Frame work). When a transid is specified - control will be passed to the program associated with transid, next time a screen is displayed and user clicks on a function/Return key. Usually the transId will be the one associated with the current program.- Parameters:
transId- - transaction Id to pass to the caller programcommArea- - communication-Area data to pass to the caller programinputMessage- - inputMessage passed to sessionManagercommAreaLength- - commArea will be trimmed (or expanded) to this length- Throws:
ControlException
-
executeLink
Translation of CICS Link statement. Calls another program, and at end of its execution it will return control to this program.- Specified by:
executeLinkin interfaceICicsBaseService- Parameters:
commAreaField-
-
executeLink
Translation of CICS Link statement. Calls another program, and at end of its execution it will return control to this program.- Specified by:
executeLinkin interfaceICicsBaseService- Parameters:
commAreaDataObject- : : this data will be passed to target-program as Communication-Area.commAreaLength- : length of data in commAreaDataObject will be trimmed to this length prior to passing to targetProgram
-
executeLink
- Specified by:
executeLinkin interfaceICicsBaseService- Parameters:
commAreaDataObject- : : the set of data will be passed to target-program as Communication-Area.
-
executeLink
public int executeLink()When there is No parameters, then the system should pass all the parameters which it had received through the Linkage-Area- Specified by:
executeLinkin interfaceICicsBaseService
-
executeLinkUsingChannel
-
cicsSyncpoint
- Specified by:
cicsSyncpointin interfaceICicsBaseService- Throws:
ControlException
-
cicsSyncpoint
translation of CICS Sync Point -
cicsRollbackSyncpoint
protected final int cicsRollbackSyncpoint()translation of CICS Sync Point Rollback -
commitAndReleaseConnection
public void commitAndReleaseConnection(boolean doCommit) for internal use only
- Commits all open transactions (if not already committed)
- closes any CicsPersistence.resultsets in this program which have not been already closed
- releases any connections associated with CicsPersistence.resultsets- Overrides:
commitAndReleaseConnectionin classBaseService
-
doFinalize
public void doFinalize(boolean forceRelease, boolean releaseConnection) Description copied from class:ESQLBaseServiceAutomatically called after CANCELing (ServicesFactory.cancel) running a program - it removes all wrapperLists- Overrides:
doFinalizein classESQLBaseService
-
cicsDocumentCreate
Deprecated.- this is a stub method- Specified by:
cicsDocumentCreatein interfaceICicsBaseService
-
cicsWebWrite
Deprecated.- this is a stub method- Specified by:
cicsWebWritein interfaceICicsBaseService
-
cicsWebRead
Deprecated.- this is a stub method- Specified by:
cicsWebReadin interfaceICicsBaseService
-
cicsWebReceive
Deprecated.- this is a stub method- Specified by:
cicsWebReceivein interfaceICicsBaseService
-
cicsWebSend
Deprecated.- this is a stub method- Specified by:
cicsWebSendin interfaceICicsBaseService
-
cicsHandleAbend
Deprecated.- this is a stub method- Specified by:
cicsHandleAbendin interfaceICicsBaseService
-
setAbendHandler
- Specified by:
setAbendHandlerin interfaceICicsBaseService
-
setAbendHandler
- Specified by:
setAbendHandlerin interfaceICicsBaseService
-
cancelAbendHandler
public void cancelAbendHandler()- Specified by:
cancelAbendHandlerin interfaceICicsBaseService
-
resetCondition
public void resetCondition(int conditionNumber) -
ignoreCondition
public void ignoreCondition(int conditionNumber) - Specified by:
ignoreConditionin interfaceICicsBaseService
-
ignoreCondition
public void ignoreCondition(int[] conditionNumber) - Specified by:
ignoreConditionin interfaceICicsBaseService
-
setAidEventHandler
- Specified by:
setAidEventHandlerin interfaceICicsBaseService
-
isAidEventManagerActive
public boolean isAidEventManagerActive() -
invokeAidEventHandler
public void invokeAidEventHandler() -
invokeConditionHandler
handle the condition - when a CICS operation fails, or throw an AbnormalTerminationException code - then control will be passed to this method to determine whether a. We use default CICS condition handler b. We Ignore condition c. We pass control (via goto) to a named condition handler -
cicsUnlock
Deprecated.- this is a stub methodNot applicable in java- Specified by:
cicsUnlockin interfaceICicsBaseService
-
getClassName
used in CICS ASSIGN ... PROGRAM(prog-name)- Specified by:
getClassNamein interfaceICicsBaseService- Returns:
- return the upper-cased, package-removed class name E.g. it will return CICSPROGRAM1 for class com.softwaremining.examples.CicsProgram1
-
getUserId
used in CICS ASSIGN ... PROGRAM(prog-name)- Specified by:
getUserIdin interfaceICicsBaseService- Returns:
- return the upper-cased, package-removed class name E.g. it will return CICSPROGRAM1 for class com.softwaremining.examples.CicsProgram1
-
setUserId
- Specified by:
setUserIdin interfaceICicsBaseService
-
getInvokingProgramName
- Specified by:
getInvokingProgramNamein interfaceICicsBaseService
-
getInvokingProgram
Deprecated.please use GetInvokingProgramName- Specified by:
getInvokingProgramin interfaceICicsBaseService- Returns:
-
getReturnprog
-
assignChannelName
-
getChannel
-
assignNetname
-
getNetname
-
getAbendCode
- Specified by:
getAbendCodein interfaceICicsBaseService
-
getProgramId
- Specified by:
getProgramIdin interfaceICicsBaseService
-
getProgramName
- Specified by:
getProgramNamein interfaceICicsBaseService
-
getStartcode
2byte alpha numeric to show how program was started. values are:
QD - transient data ATI
S - Interval control start command without data
SD - Interval control start command with data
TD - Terminal Input
U - other task attached by user
- Specified by:
getStartcodein interfaceICicsBaseService- Returns:
-
getSysid
- Specified by:
getSysidin interfaceICicsBaseService
-
getApplid
- Specified by:
getApplidin interfaceICicsBaseService
-
transfuse
for internal use only- Overrides:
transfusein classBaseService
-
setAcceptResponse
- Specified by:
setAcceptResponsein interfaceICicsBaseService
-
getAcceptResponse
Description copied from interface:ICicsBaseServicefor internal use only- Specified by:
getAcceptResponsein interfaceICicsBaseService- Returns:
-
setNeedScreenUpdate
public void setNeedScreenUpdate(boolean needScreenUpdate) -
isNeedScreenUpdate
public boolean isNeedScreenUpdate() -
getCicsOriginalProgramName
CICS uses a 8 Character identifier for program names ... Ie programName PROGRAM1 will result in com.mypackage.Program1 . This method will keep the original name assigned (e.g. PROGRAM1);- Specified by:
getCicsOriginalProgramNamein interfaceICicsBaseService
-
retrieveSessionManager
Get the internal SoftwareMining SessionManager- Specified by:
retrieveSessionManagerin interfaceICicsBaseService
-
assignSessionManager
for internal use only -
retrieveHttpSession
public jakarta.servlet.http.HttpSession retrieveHttpSession()Returns associated HttpSession manager, set by PseudoCOnversationalServlet -
retrieveHttpServletRequest
public jakarta.servlet.http.HttpServletRequest retrieveHttpServletRequest()returns the HttpServletRequest received by the Servlet engine.
Access to this variable allows the application logic to directly query the request for other INPUT fields assigned in HTML - the ones which do not map to original BMS screens.- Returns:
-
isFirstTimeExecutionAndNoParameters
public boolean isFirstTimeExecutionAndNoParameters()Indicates whether this the first time this program is being executed, or whether the system is re-entering this program.- Specified by:
isFirstTimeExecutionAndNoParametersin interfaceICicsBaseService- Returns:
-
IsWaitingForUI
public boolean IsWaitingForUI()Only used in conversion of Conversational to Pseudo-Conv Programs- Returns:
-
setWaitingForUser
public void setWaitingForUser(boolean waitingForUser) Only used in conversion of Conversational to Pseudo-Conv Programs- Specified by:
setWaitingForUserin interfaceICicsBaseService- Parameters:
waitingForUser-
-
isKeyPressed
check if a key has been prssed- Specified by:
isKeyPressedin interfaceICicsBaseService- Parameters:
key- : one of entries in "com.softwaremining.cics.Keyboard" interface- Returns:
-
setKeyPressed
- Specified by:
setKeyPressedin interfaceICicsBaseService
-
getKeyPressed
- Specified by:
getKeyPressedin interfaceICicsBaseService
-
getResponseCode
public long getResponseCode()- Specified by:
getResponseCodein interfaceICicsBaseService
-
makeUpClassScreenSourceName
method used internally by SoftwareMining framework- Specified by:
makeUpClassScreenSourceNamein interfaceIDisplayable- Overrides:
makeUpClassScreenSourceNamein classBaseService- Returns:
- - a string representing the XML screen file for program. For example, for class com.softwaremining.examples.Loan, the following string will be returned: /com/softwaremining/examples/loan/xml/screens/Loan.xml
-
assignBmsMapSetName
-
retrieveBmsMapSet_FileName
for internal use only- Returns:
-
retrieveJSPName
method used internally by SoftwareMining framework- Returns:
-
retrieveDBDecorator
-
reInitializeBaseService
public void reInitializeBaseService()Description copied from class:BaseServicefor internal use only used by CICS subsystem- Overrides:
reInitializeBaseServicein classBaseService
-
reInitializeAllDAOs
public void reInitializeAllDAOs(boolean resetDAOInitialValues) Description copied from class:BaseServicereinitializes CBLBeans to their default char-array representation, and AbstractCOntainer to their default values This allows system to reuse the Wrapper classes in other programs. This is only used in Cics applications . NOTES: A goBack() and end of the execution will clear all DAO's passed via AddCallParameters (Linkage-Section).- Overrides:
reInitializeAllDAOsin classBaseService
-
initializeBaseService
public void initializeBaseService()Description copied from class:ESQLBaseServicein ESQL projects commits are manually made e.g EXEC SQL COMMIT END-EXEC Hence turn the auto-commit off during initialization- Overrides:
initializeBaseServicein classESQLBaseService
-
delay
public void delay()CICS Delay- Specified by:
delayin interfaceICicsBaseService- Parameters:
seconds-
-
delay
public void delay(int seconds) CICS Delay- Specified by:
delayin interfaceICicsBaseService- Parameters:
seconds-
-
delay
- Specified by:
delayin interfaceICicsBaseService
-
getRoutedBMS
- Specified by:
getRoutedBMSin interfaceICicsBaseService
-
setRoutedBMS
- Specified by:
setRoutedBMSin interfaceICicsBaseService
-
cicsEnq
Deprecated.CICS ENQ - cannot reserve any resources in web-application ...- Specified by:
cicsEnqin interfaceICicsBaseService- Parameters:
enqDO-
-
cicsGetcounter
Translation of CICS GET COUNTER
https://www-01.ibm.com/support/knowledgecenter/SSGMCP_5.3.0/com.ibm.cics.ts .applicationprogramming.doc/commands/dfhp4_definecounter.html- Specified by:
cicsGetcounterin interfaceICicsBaseService- Parameters:
counterDO-
-
cicsDefineCounter
Translation of CICS DEFINE COUNTER
https://www-01.ibm.com/support/knowledgecenter/SSGMCP_5.3.0/com.ibm.cics.ts .applicationprogramming.doc/commands/dfhp4_definecounter.html- Specified by:
cicsDefineCounterin interfaceICicsBaseService- Parameters:
counterDO-
-
cicsSpiinquiretask
Deprecated.- Specified by:
cicsSpiinquiretaskin interfaceICicsBaseService
-
cicsSpiinquireFile
Deprecated.- Specified by:
cicsSpiinquireFilein interfaceICicsBaseService
-
cicsInquireFile
Deprecated.- Specified by:
cicsInquireFilein interfaceICicsBaseService
-
cicsInquiretask
Deprecated.- Specified by:
cicsInquiretaskin interfaceICicsBaseService
-
assignProgram
Deprecated. -
assignProgram
Deprecated. -
assignThreadManagerDAO
for internal use only- Parameters:
data-
-
retrieveDataManagerStr
for internal use only- Returns:
-
retrieveStartCode
-
cicsWebExtract
- Specified by:
cicsWebExtractin interfaceICicsBaseService
-
retrieveCicsPersistenceForDataset
Retrieve the active/opened CicsPersistence DAO registered to the SQL tableName- Parameters:
tableName-- Returns:
-
cicsDumpTransaction
Dumps data in DAO's as well as COMMAREA and TWA to Config.DATA_DIR /dump/timestamp[/dumpCode]- Specified by:
cicsDumpTransactionin interfaceICicsBaseService- Parameters:
dumpTransactionDO-- Returns:
-
cicsEnterTracenum
- Specified by:
cicsEnterTracenumin interfaceICicsBaseService
-
cicsAddress
Set Address of pointers for TWA and CWA- Specified by:
cicsAddressin interfaceICicsBaseService- Parameters:
addressDO-
-
getTwaleng
Deprecated.- please use lengthOfTransactionWorkArea()- Returns:
-
getLengthOfTransactionWorkArea
Deprecated.- please use lengthOfTransactionWorkArea()- Returns:
-
lengthOfTransactionWorkArea
public int lengthOfTransactionWorkArea()Returns the length of Transaction Work Area associated with this Session. if no TWA exists, a zero length is returned.- Specified by:
lengthOfTransactionWorkAreain interfaceICicsBaseService- Returns:
-
cicsSpiInquireSystem
This method currently does not perform anything- Specified by:
cicsSpiInquireSystemin interfaceICicsBaseService
-
cicsPostEvent
Deprecated.- please use com.softwaremining.cics.util.EventManager.postEvent -
cicsWaitEvent
Deprecated.- please use com.softwaremining.cics.util.EventManager.waitEvent -
reactivateHandlers
public void reactivateHandlers()- Specified by:
reactivateHandlersin interfaceICicsBaseService
-
deactivateHandlers
public void deactivateHandlers()- Specified by:
deactivateHandlersin interfaceICicsBaseService
-
setTally
public void setTally(int tally) - Specified by:
setTallyin interfaceICicsBaseService
-
getTally
public int getTally()- Specified by:
getTallyin interfaceICicsBaseService
-
getFieldTally
- Specified by:
getFieldTallyin interfaceICicsBaseService
-
getChannelList
-
createOrRetrieveContainerListFromChannel
For internal use only- Parameters:
channelName-- Returns:
-
processCicsAbendException
Description copied from class:BaseServiceFor internal use only- Overrides:
processCicsAbendExceptionin classBaseService
-