The .L command displays all or some of the statements currently stored in the stack. This command is useful for identifying a statement that you want to examine, execute, or modify.
Format
|
.L [n [,m]] [(process)] |
Parameter(s)
|
n |
Specifies the number of statements to display. If no value is specified, .L uses the last value specified for n. By default, .L displays 20 statements. |
|
m |
Specifies the number of the statement from which the display begins. If no value is specified, .L begins the display with the first statement in the stack (the statement most recently entered or executed). |
|
process |
Number of a process other than your own. This option allows you to list statements in the stack of the specified process. You must have SYS2 privileges to use this option. |
The value set for n remains in effect as the Paging setting. This parameter determines how many statements can be viewed with the .L command; it does not affect the number of statements actually stored in the stack (see .S Command). The current Paging setting can be displayed with the .Q command.
|
NOTE |
Do not confuse the .L command with the .S command. The .L command, when used with a number argument (.Ln), sets the number of statements that are to be displayed; the .S command sets the number of statements that are to be stored in the stack, regardless of how many are displayed. |
When you log off, the system retains the current stack and automatically makes it available when you next log on.
|
NOTE |
If the .L command produces an error message, the system administrator needs to turn the TCL Stacker on from the SYSPROG account with the STACK-ON command. |
Displaying All Stack Statements
This example lists all statements in a stack of 20 statements:
|
>.L 001 clear-file dict customers2 002 clear-file customers2 003 copy dict customers* 004 list customers last-name 005 SORT CUSTOMERS 006 SORT ORDERS @INPUT LAST-NAME 007 SORT ONLY DICT ORDERS 008 LIST DICT ORDERS 009 LIST ORDERS @INPUT CUSTOMER.NAME 010 LIST ORDERS @INPUT 011 LIST ORDERS REPORT 012 LIST ORDERS 013 SORT DICT WITH D/CODE "Q""DY""DX""DZ""DC""D""DCX""DCY" D/CODE F/BASE F/MOD HEADING "PAGE'P' *** 'F' *** FILE DEFINING ITEMS 'DL'" BY D/CODE1 M/DICT 014 LISTFILES 015 LIST NEWORDERS REPORT 016 LIST DICT NEWORDERS 017 LIST NEWORDERS 018 SORT DICT WITH D/CODE "Q""DY""DX""DZ""DC""D""DCX""DCY"D/CODE F/BASE F/MOD 019 LISTFILES 020 LIST DICT PAYROLL |
Displaying Selected Stack Statements
This example lists the first four statements in the stack:
|
>.L4 001 CLEAR-FILE DICT CUSTOMERS2 002 CLEAR-FILE CUSTOMERS2 003 COPY DICT CUSTOMERS * 004 LIST CUSTOMERS LAST-NAME |
The next example lists four statements beginning at statement 8:
|
>.L4,8 008 LIST DICT ORDERS 009 LIST ORDERS @INPUT CUSTOMER.NAME 010 LIST ORDERS @INPUT 011 LIST ORDERS REPORT |
Because the default n is the last value entered for n, you can get the same result by typing:
|
>.L,8 008 LIST DICT ORDERS 009 LIST ORDERS @INPUT CUSTOMER.NAME 010 LIST ORDERS @INPUT 011 LIST ORDERS REPORT |
See Also