1 02/15/82  get_group_id_
 2 
 3 
 4 Entry points in get_group_id_:
 5    (List is generated by the help command)
 6 
 7 
 8 :Entry:  get_group_id_:  02/05/82  get_group_id_
 9 
10 
11 Function: returns the 32-character access identifier of the process in
12 which it is called.  The access identifier is of the form:
13 Person_id.Project_id.tag
14 
15 
16 Syntax:
17 declare get_group_id_ entry returns (char(32));
18 user_id = get_group_id_ ();
19 
20 
21 Arguments:
22 user_id
23    contains the access identifier that is returned to the user.
24    (Output) It is a left-justified character string, padded with
25    trailing blanks.
26 
27 
28 :Entry:  tag_star:  02/05/82 get_group_id_$tag_star
29 
30 
31 Function:  This entry point returns the access identifier of its caller
32 with the instance component replaced by an asterisk (*).
33 
34 
35 Syntax:
36 declare get_group_id_$tag_star entry returns (char(32));
37 user_id = get_group_id_$tag_star ();
38 
39 
40 Arguments:
41 user_id
42    contains the access identifier that is returned to the user.
43    (Output) It is a left-justified character string, padded with
44    trailing blanks.