c
	Integer*4	Process_id,		Base_Priority
	Integer*4	Process_State,		Process_Status
	Integer*4	Cpu_Time,		Process_Index
c
	Common /JpiVal/	Process_Id,		Base_Priority,
	1		Process_State,		Process_Status,
	1		Cpu_Time,		Process_Index
c
