WebSphere MQ Workflow 3.4 Generic C API Test / Prototyping Tool

[prev][next][parent][TOC]

FmcjError - Example

Testcase
/* Example31 test case ( FmcjWorkitemErrorReason(),
                         FmcjError...()  ) */


FmcjGlobalConnect 
  XpRc                              FMC_OK
End 

FmcjExecutionServiceAllocate 
  ExecutionServiceHdl               1 
  XpRc                              FMC_OK
End 

FmcjExecutionServiceLogon 
  ExecutionServiceHdl               1 
  UserId                            "ADMIN"
  Password                          "password"
  SessionMode                       Fmc_SM_Default
  AbsentIndicator                   Fmc_SA_NotSet
  XpRc                              FMC_OK
End 

FmcjExecutionServiceQueryProcessTemplates 
  ExecutionServiceHdl               1 
  Filter                            "NAME = 'ContainerProcessA'"
  SortCriteria                      NULL
  Threshold                         200 
  ProcessTemplateVectorHdl          1
  ShowAllObjectNames                TRUE
  XpRc                              FMC_OK
End 

FmcjProcessTemplateVectorFirstElement 
  ProcessTemplateVectorHdl          1
  ProcessTemplateHdl                1
End 

FmcjProcessTemplateName 
  ProcessTemplateHdl                1
  BufferLength                      100
  XpValue                           "ContainerProcessA"
End 

FmcjProcessTemplateInitialInContainer 
  ProcessTemplateHdl                1
  ReadWriteContainerHdl             1 
  XpRc                              FMC_OK
End 

FmcjProcessTemplateCreateAndStartInstance 
  ProcessTemplateHdl                1
  InstanceName                      "TestInstance_Ex31"
  SystemGroup                       NULL 
  System                            NULL
  ReadWriteContainerHdl             1 
  KeepName                          FALSE
  ProcessInstanceHdl                1
  XpRc                              FMC_OK
End 

FmcjProcessInstanceState 
  ProcessInstanceHdl                1
  XpValue                           Fmc_PS_Running
End 

FmcjExecutionServiceQueryWorkitems 
  ExecutionServiceHdl               1 
  Filter                            "OWNER = 'ADMIN'"
  SortCriteria                      NULL
  Threshold                         500 
  WorkitemVectorHdl                 1 
  ShowAllObjectNames                TRUE
  XpRc                              FMC_OK
End 

FmcjWorkitemVectorSize 
  WorkitemVectorHdl                 1 
  XpValue                           1 
End 

FmcjWorkitemVectorFirstElement 
  WorkitemVectorHdl                 1 
  WorkitemHdl                       1 
End 

FmcjWorkitemName 
  WorkitemHdl                       1 
  BufferLength                      100
End 

FmcjWorkitemStart 
  WorkitemHdl                       1 
  XpRc                              FMC_OK
End 

/* ======================================= */

TestTool_If
  ExpressionOperator                AND
End 

   FmcjWorkitemState
     WorkitemHdl                       1 
     XpValue                           Fmc_IS_InError
   End

TestTool_Then

   FmcjWorkitemRefresh
     WorkitemHdl                       1 
     XpRc                              FMC_OK
   End
    
   /* ErrorReason is a secondary attribute and needs a FmcjWorkitemRefresh() */
    
   FmcjWorkitemErrorReason
     WorkitemHdl                       1 
     ErrorHdl                          1
   End
    
   FmcjErrorRc
     ErrorHdl                          1
     XpRc                              FMC_ERROR_PEA_NOT_LOGGED_ON
   End
    
   FmcjErrorMessageText
     ErrorHdl                          1
     BufferLength                      1025
     XpValue                           "FMC01014E The PEA ADMIN is not available
"
   End    
  
   FmcjStringVectorAllocate
     StringVectorHdl                   1 
     XpRc                              FMC_OK
   End

   FmcjErrorParameters
     ErrorHdl                          1
     StringVectorHdl                   1 
     XpValue                           "ADMIN"
   End

   FmcjStringVectorSize
     StringVectorHdl                   1 
     XpValue                           1 
   End
    
   FmcjStringVectorFirstElement
     StringVectorHdl                   1 
     BufferLength                      100
     XpValue                           "ADMIN"
   End
    
   FmcjStringVectorDeallocate
     StringVectorHdl                   1 
     XpRc                              FMC_OK
   End
    
   FmcjErrorDeallocate
     ErrorHdl                          1
     XpRc                              FMC_OK
   End

TestTool_EndIf

/* ======================================= */

FmcjExecutionServiceLogoff 
  ExecutionServiceHdl               1 
  XpRc                              FMC_OK
End 

FmcjGlobalDisconnect 
  XpRc                              FMC_OK
End


Result

C API Test Tool for MQ Workflow v31_50 Windows 95/NT: FMCTJCA1 
Test case: EXAMPLE31 
Thu Sep 24 08:28:37 1998 
============================================================================
+++> 
============================================================================
FmcjGlobalConnect 
..........RC Report.........................................................
AcRc = FMC_OK = 0 
XpRc = FMC_OK
+++OK+++
============================================================================
FmcjExecutionServiceAllocate 
parameter:  ExecutionServiceHdl = 1 
..........RC Report.........................................................
AcRc = FMC_OK = 0 
XpRc = FMC_OK
+++OK+++
============================================================================
FmcjExecutionServiceLogon 
parameter:  ExecutionServiceHdl = 1 
parameter:  UserID = ADMIN 
parameter:  Password = password 
parameter:  SessionMode = Fmc_SM_Default = 0 
parameter:  AbsentIndicator = Fmc_SA_NotSet = 0 
..........RC Report.........................................................
AcRc = FMC_OK = 0 
XpRc = FMC_OK
+++OK+++
============================================================================
FmcjExecutionServiceQueryProcessTemplates 
parameter:  ExecutionServiceHdl = 1 
parameter:  Filter = NAME = 'ContainerProcessA'
parameter:  SortCriteria = NULL 
parameter:  Threshold = 200 
parameter:  ProcessTemplateVectorHdl = 1 
..........Object Names Report...............................................
vector size = 1 
0) ContainerProcessA 
..........RC Report.........................................................
AcRc = FMC_OK = 0 
XpRc = FMC_OK
+++OK+++
============================================================================
FmcjProcessTemplateVectorFirstElement 
parameter:  ProcessTemplateVectorHdl = 1 
parameter:  ProcessTemplateHdl = 1 
..........Status Report.....................................................
ProcessTemplateHdl = 0x1984330 
============================================================================
FmcjProcessTemplateName 
parameter:  ProcessTemplateHdl = 1 
parameter:  BufferLength = 100 
..........Value Report......................................................
AcValue = "ContainerProcessA"
XpValue = "ContainerProcessA"
+++OK+++
============================================================================
FmcjProcessTemplateInitialInContainer 
parameter:  ProcessTemplateHdl = 1 
parameter:  ReadWriteContainerHdl = 1 
..........Status Report.....................................................
ReadWriteContainerHdl = 0x19858a0 
..........RC Report.........................................................
AcRc = FMC_OK = 0 
XpRc = FMC_OK
+++OK+++
============================================================================
FmcjProcessTemplateCreateAndStartInstance 
parameter:  ProcessTemplateHdl = 1 
parameter:  InstanceName = TestInstance_Ex31
parameter:  SystemGroup = NULL 
parameter:  System = NULL 
parameter:  ReadWriteContainerHdl = 1 
parameter:  KeepName = FALSE 
parameter:  ProcessInstanceHdl = 1 
..........Status Report.....................................................
ProcessInstanceHdl = 0x1985260 
..........RC Report.........................................................
AcRc = FMC_OK = 0 
XpRc = FMC_OK
+++OK+++
============================================================================
FmcjProcessInstanceState 
parameter:  ProcessInstanceHdl = 1 
..........Value Report......................................................
AcValue = "Fmc_PS_Running"
XpValue = "Fmc_PS_Running"
+++OK+++
============================================================================
FmcjExecutionServiceQueryWorkitems 
parameter:  ExecutionServiceHdl = 1 
parameter:  Filter = OWNER = 'ADMIN'
parameter:  SortCriteria = NULL 
parameter:  Threshold = 500 
parameter:  WorkitemVectorHdl = 1 
..........Object Names Report...............................................
vector size = 1 
0) Prog_A_ContainerTest_PersonInfo
..........RC Report.........................................................
AcRc = FMC_OK = 0 
XpRc = FMC_OK
+++OK+++
============================================================================
FmcjWorkitemVectorSize 
parameter:  WorkitemVectorHdl = 1 
..........Value Report......................................................
AcSize = 1 
XpSize = 1 
+++OK+++   
============================================================================
FmcjWorkitemVectorFirstElement 
parameter:  WorkitemVectorHdl = 1 
parameter:  WorkitemHdl = 1 
..........Status Report.....................................................
WorkitemHdl = 0x1988040 
============================================================================
FmcjWorkitemName 
parameter:  WorkitemHdl = 1 
parameter:  BufferLength = 100 
..........Value Report......................................................
AcValue = "Prog_A_ContainerTest_PersonInfo"
XpValue = Expected value missing 
============================================================================
FmcjWorkitemStart 
parameter:  WorkitemHdl = 1 
..........RC Report.........................................................
AcRc = FMC_OK = 0 
XpRc = FMC_OK
+++OK+++
============================================================================
TestTool_If
============================================================================
FmcjWorkitemState 
parameter:  WorkitemHdl = 1 
..........Value Report......................................................
AcValue = "Fmc_IS_InError"
XpValue = "Fmc_IS_InError"
API expression is TRUE;  IF expression is TRUE 
============================================================================
TestTool_Then
============================================================================
FmcjWorkitemRefresh 
parameter:  WorkitemHdl = 1 
..........RC Report.........................................................
AcRc = FMC_OK = 0 
XpRc = FMC_OK
+++OK+++
============================================================================
FmcjWorkitemErrorReason 
parameter:  WorkitemHdl = 1 
parameter:  ErrorHdl = 1 
..........Status Report.....................................................
ErrorHdl = 0x1984790 
============================================================================
FmcjErrorRc 
parameter:  ErrorHdl = 1 
..........RC Report.........................................................
AcRc = FMC_ERROR_PEA_NOT_LOGGED_ON = 1014 
XpRc = FMC_ERROR_PEA_NOT_LOGGED_ON
+++OK+++
============================================================================
FmcjErrorMessageText 
parameter:  ErrorHdl = 1 
parameter:  BufferLength = 1025 
..........Value Report......................................................
AcValue = "FMC01014E The PEA ADMIN is not available
"
XpValue = "FMC01014E The PEA ADMIN is not available
"
+++OK+++
============================================================================
FmcjStringVectorAllocate 
parameter:  StringVectorHdl = 1 
..........RC Report.........................................................
AcRc = FMC_OK = 0 
XpRc = FMC_OK
+++OK+++
============================================================================
FmcjErrorParameters 
parameter:  ErrorHdl = 1 
parameter:  StringVectorHdl = 1 
..........Object Names Report...............................................
vector size = 1 
..........Value Report......................................................
AcValue = "ADMIN"
XpValue = "ADMIN"
+++OK+++
============================================================================
FmcjStringVectorSize 
parameter:  StringVectorHdl = 1 
..........Value Report......................................................
AcSize = 1 
XpSize = 1 
+++OK+++
============================================================================
FmcjStringVectorFirstElement 
parameter:  StringVectorHdl = 1 
parameter:  BufferLength = 100 
..........Value Report......................................................
AcValue = "ADMIN"
XpValue = "ADMIN"
+++OK+++
============================================================================
FmcjStringVectorDeallocate 
parameter:  StringVectorHdl = 1 
..........RC Report.........................................................
AcRc = FMC_OK = 0 
XpRc = FMC_OK
+++OK+++
============================================================================
FmcjErrorDeallocate 
parameter:  ErrorHdl = 1 
..........RC Report.........................................................
AcRc = FMC_OK = 0 
XpRc = FMC_OK
+++OK+++
============================================================================
TestTool_EndIf
============================================================================
FmcjExecutionServiceLogoff 
parameter:  ExecutionServiceHdl = 1 
..........RC Report.........................................................
AcRc = FMC_OK = 0 
XpRc = FMC_OK
+++OK+++
============================================================================
FmcjGlobalDisconnect 
..........RC Report.........................................................
AcRc = FMC_OK = 0 
XpRc = FMC_OK
+++OK+++
============================================================================
FmcjProcessTemplateVectorDeallocate( 1 ) ended with RC = 0 
FmcjProcessTemplateDeallocate( 1 ) ended with RC = 0 
FmcjProcessInstanceDeallocate( 1 ) ended with RC = 0 
FmcjWorkitemVectorDeallocate( 1 ) ended with RC = 0 
FmcjReadWriteContainerDeallocate( 1 ) ended with RC = 0 
FmcjWorkitemDeallocate( 1 ) ended with RC = 0 
FmcjExecutionServiceDeallocate( 1 ) ended with RC = 0 

Cleanup done by Test Tool 
============================================================================
====== Test case ended normally ============================================