1 :Info: get_page_length_:  2020-07-06  get_page_length_
 2 
 3 Function: returns the page length currently in effect on a given I/O
 4 switch.  If the page length is not available (for any reason), a
 5 status code is returned, and a default page length is returned.
 6 
 7 
 8 Entry points in get_page_length_:
 9    (List is generated by the help command)
10 
11 
12 :Entry:  stream:  2020-07-06  get_page_length_$stream
13 
14 
15 Function:  This entry point returns the page length of a given I/O
16 switch, identified by name.
17 
18 
19 Syntax:
20 declare get_page_length_$stream entry (char(*), fixed bin(35)) returns
21      (fixed bin);
22 page_length = get_page_length_$stream (switch_name, code);
23 
24 
25 Arguments:
26 switch_name
27    is the name of the switch whose page length is desired.  (Input) If
28    switch_name is an empty string, the user_output I/O switch is
29    assumed.
30 code
31    is a standard status code.  (Output)
32 page_length
33    is the page length of switch_name.  (Output)
34 
35 
36 :Entry:  switch:  2020-07-06  get_page_length_$switch
37 
38 
39 Function:  This entry point returns the page length of a given I/O
40 switch, identified by pointer.
41 
42 
43 Syntax:
44 declare get_page_length_$switch entry (ptr, fixed bin(35)) returns
45      (fixed bin);
46 page_length = get_page_length_$switch (switch_ptr, code);
47 
48 
49 Arguments:
50 switch_ptr
51    is a pointer to the I/O control block of the switch whose page
52    length is desired.  (Input) If switch_ptr is null, the user_output
53    I/O switch is assumed.
54 code
55    is a standard status code.  (Output)
56 page_length
57    is the page length of switch_name.  (Output)
58 
59 
60 :Internal: history_comment.gi:  2020-07-06  history_comment
61 
62 /****^  HISTORY COMMENTS:
63   1) change(2020-07-06,GDixon), approve(2020-07-06,MCR10082),
64      audit(2020-07-22,Swenson), install(2020-07-22,MR12.6g-0048):
65      Initial version, created from get_line_length_.info.
66                                                    END HISTORY COMMENTS */