Walks you through the process of creating a Debug Configuration and setting break points.
Create a Debug Configuration
- In the COBOL Explorer, click the
ProgramREST project.
- From the main menu, click
Run > Debug Configurations.
- In the left pane, right-click
COBOL Enterprise Server; then select
New Configuration from the context menu.
- At the very top of the right pane, type
ProgramREST into the
Name field.
- On the
General tab click the
Browse button that corresponds to the
Connection and
Server fields.
- Select
ESREST; then click
OK.
Note: If the ESREST
enterprise server instance is the only instance defined in
Enterprise Server, these fields are completed for you.
- Under
Debugging type, click the
Web Service tab.
This shows that all debug Web services are invoked by a request from the client.
- Click
Apply; then click
Debug.
- Answer
Yes to any prompts to open views or perspectives.
- In the
Debug view, you should now see an entry for debugging
ProgramREST [COBOL Enterprise Server].
Set Breakpoints
You want to be able to see when the client program hands off control to the service running in
Enterprise Server. Because the program hands off control at two points in its execution – first to run the MakeAppt operation, and second to
run the CheckAppt operation – you set a breakpoint at each hand-off point in the code so you can step through the program.
The code that calls the service is contained in the
MakeCheckAppt-proxy.cbl file:
call "InvokeService03"
It appears twice in the program. You want to set a breakpoint just before each of these call statements.
- From the COBOL Explorer, expand
ProgramREST > COBOL Programs > client.
- Double-click
MakeCheckAppt-proxy.cbl. This places the source code into the COBOL editor.
- Press
Ctrl+F to search for the following code:
move 256 to wsc-srvc-faultcode-len
- Place your mouse pointer in the left-most column at that line of code and double-click to set a breakpoint.
Note: When the breakpoint has been set, a dot appears in the left-most column.
- Search for the next instance of:
move 256 to wsc-srvc-faultcode-len
and set another breakpoint.