You can display the number of messages in STOQs by using the WY command or the STOQ_WY library procedure.
Using the WY (Display Process Status) Command in MARC
To display the CRCR or STOQ communications status of a particular process, enter a command of the following form in MARC:
WY <mix number>
The WY command displays an extra line called the IPC State for any process that meets one of the following criteria:
-
The process is using a WAIT statement to wait on one of the events CRCR_INPUT, CRCR_OUTPUT, STOQ_INPUT, or STOQ_OUTPUT.
-
The process attempted a send or receive operation using CRCR or STOQ and is waiting for the operation to complete.
The following is an example of the WY command output for a process waiting on a receive operation or the STOQ_INPUT event relative to the STOQ named QUEUE1:
Status of Task 9069\9109 AT 13:56:45 Priority: 50 Origination: MP021/OCJFM_1/CANDE/2/CANDE/1 (LSN 1018) MCS: SYSTEM/CANDE Usercode: DELTA1 Stack State: Waiting on an event Program name: (CPB)OBJECT/UTP/STOQ/RECV/TOPQ/WAIT ON EVAMCP IPC State: WTG STOQ RECV QUEUE1
If the process is using a WAIT statement to wait on multiple events, at least one of which is a CRCR or STOQ event, then the IPC Status line displays WTG COMPLEX WAIT and is followed by lines listing the individual CRCR or STOQ events. The following is an example of the IPC portion of this display:
IPC State: -WTG COMPLEX WAIT- WTG STOQ RECV QUEONE WTG CRCR RECV (DELTA1)OBJECT/CWT/SEND/ONE WTG CRCR SEND (DELTA1)OBJECT/CWT/RECV/TWO
If you enter the WY command without a mix number, the output displays abbreviated information about all the user processes on the system. CRCR and STOQ status information is displayed for those processes waiting on CRCR or STOQ events. In the following output example, processes 9113 and 8996 are waiting on CRCR and STOQ events:
Response returned at 20:10:42
JOB# MIX# Pr (UC)Name/ Status
==== ==== == =========================================================
7179/6903 99 (OPCON)*SYSTEM/DELTA/REFIT
8699/8715 80 *CANDE/STACK02
6954/6954 80 *SYSTEM/CANDE
9110/9113 50 (DELTA1)(CPB)OBJECT/CWT/WAIT ON EVAMCP
WTG COMPLEX WAIT
WTG STOQ RECV QUEONE
WTG CRCR RECV (EVAENG)OBJECT/CWT/SEND/ONE
6955/6981 80 *SYSTEM/COMS
6955/6978 80 COMS/INPUT
6955/6979 80 COMS/TANK
8962/8996 50 (DELTA1)(CPB)OBJECT/UTP/CRCR/RECV/WAIT ON EVAMCP
WTG CRCR RECV (EVAENG)OBJECT/UTP/CRCR/SEND/WAITThe MARC WY command should not be confused with the Y (Status Interrogate) system command. The differences are as follows:
-
At an ODT, the commands Y, WY, and WHY each invoke the Y (Status Interrogate) system command. This command does not give any specific information about the use of CRCR or STOQ by a process.
-
In MARC, the commands Y, WY, and WHY each invoke the MARC WY command. This command displays IPC Status information if the process is waiting on CRCR or STOQ communications.
Using the EVA_WY Library Procedure
The following are the ALGOL declarations for the EVA_WY library procedure:
LIBRARY EVASUPPORT (LIBACCESS = BYFUNCTION,
FUNCTIONNAME = “EVASUPPORT.”);
PROCEDURE EVA_WY(MIX_NUM, RESULT_ARRAY);
VALUE MIX_NUM;
INTEGER MIX_NUM;
ARRAY RESULT_ARRAY[0];
LIBRARY EVASUPPORT;The following are explanations of the parameters:
MIX_NUM
The user program uses this parameter to specify the process that is being interrogated.
RESULT_ARRAY
The system uses this parameter to return information to the user about the specified process or processes. The following format is repeated for each process that is reported on:
|
Word |
Field |
Value and Meaning |
|---|---|---|
|
0 |
47:02 |
Type of action
|
|
45:01 |
Send of receive indication
|
|
|
15:16 |
Mix number of the process |
|
|
1 |
Length in bytes of program name for CRCR or queue Name for STOQ. For complex wait entries, this word is unused. |
|
|
2 through N |
Program name for CRCR or queue name for STOQ. For complex wait entries, this word is unused. N is the number of the last word in this entry. The value of N depends on the program name length specified in Word 1. If the program name does not end at a word boundary, the remainder of word N is unused. The next entry, if any, starts at word N + 1. |

