Example 2

An application, which has not issued any requests to BTS, needs to know whether a particular data-container is one of the global containers associated with a particular process.

If it is not, the program needs to know whether the container is owned by the root activity of that process.

Figure 1. Browsing example 2

 EXEC CICS INQUIRE PROCESS(pname) PROCESSTYPE(ptype)
ACTIVITYID(root_id)

if process found then browse its containers
EXEC CICS STARTBROWSE CONTAINER PROCESS(pname) PROCESSTYPE(ptype)
BROWSETOKEN(c_token_1)
EXEC CICS GET NEXT CONTAINER(c_name)
BROWSETOKEN(c_token_1)
loop while container not found and there are more containers
EXEC CICS GET NEXT CONTAINER(c_name)
BROWSETOKEN(c_token_1)
end process container browse loop

if container not found browse the root activity's containers
EXEC CICS STARTBROWSE CONTAINER ACTIVITYID(root_id)
BROWSETOKEN(c_token_2)
EXEC CICS GETNEXT CONTAINER(c_name)
BROWSETOKEN(c_token_2)
loop while container not found and there are more containers
EXEC CICS GETNEXT CONTAINER(c_name)
BROWSETOKEN(c_token_2)
end root activity's container browse loop

EXEC CICS ENDBROWSE CONTAINER BROWSETOKEN(c_token_2)
EXEC CICS ENDBROWSE CONTAINER BROWSETOKEN(c_token_1)