STACK [TOP ]
|
COMMAND operand1
[operand2 [(parameter)]]
|
||
[DATA ] [FORMATTED ]
{operand2
[(parameter)]}
|
This document covers the following topics:
For an explanation of the symbols used in the syntax diagram, see Syntax Symbols.
Related Statements: INPUT
| RELEASE
The STACK
statement is used to place any of the following
into the Natural stack:
the name of a Natural program or Natural system command to be executed;
data to be used during the execution of an INPUT
statement.
For further information on the stack, see Further Programming Aspects, Stack Processing in the Programming Guide.
Operand Definition Table:
Operand | Possible Structure | Possible Formats | Referencing Permitted | Dynamic Definition | ||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
operand1
|
C | S | A | G | N | A | yes | yes | ||||||||||||
operand2
|
C | S | A | G | N | A | U | N | P | I | F | B | D | T | L | G | yes | yes |
Syntax Element Description:
Syntax Element | Description |
---|---|
TOP
|
TOP Option:
If you specify Example: The following statement causes the content of the
variable STACK TOP #FIELDA |
DATA
|
DATA Option:
This option, which is also the default, causes data to be placed in
the stack which are to be used as input data for an Delimiter characters or input assign characters contained within
the data values will be processed as delimiters. For details on how data from
the stack are processed by an Example: The following statements cause the contents of the
variables MOVE 'ABC' TO #FIELD1 MOVE 'XYZ' TO #FIELD2 STACK #FIELD1 #FIELD2 These variables will be passed as data to the next
INPUT #FIELD1 #FIELD2 Note: |
FORMATTED
|
FORMATTED Option:
This option causes all data to be passed on a field-by-field basis
to the next Examples: The following statements cause MOVE 'ABC,DEF' TO #FIELD1 MOVE 'XYZ' TO #FIELD2 STACK TOP DATA FORMATTED #FIELD1 #FIELD2 ... INPUT #FIELD1 #FIELD2 Assuming the input delimiter character to be the comma
(profile/session parameter MOVE 'ABC,DEF' TO #FIELD1 STACK TOP DATA #FIELD1 ... INPUT #FIELD1 #FIELD2 Note: |
COMMAND
operand1
|
COMMAND Option:
To place a command (or program name) in the stack, you specify the
keyword Example: The following statement causes the command
STACK TOP COMMAND 'RUN' |
COMMAND operand1 operand2
...
|
COMMAND with Data Option:
Together with a command
( Data stacked with a command are always stacked unformatted. Note: |
parameter
|
Date Format:
If |
** Example 'STKEX1': STACK ************************************************************************ DEFINE DATA LOCAL 1 #CODE (A1) END-DEFINE * INPUT // 10X 'PLEASE SELECT COMMAND' // 10X 'LIST VIEW (V)' / 10X 'LIST PROGRAM * (P)' / 10X 'TECH INFO (T)' / 10X 'STOP (.)' // 20X 'CODE:' #CODE * * DECIDE ON FIRST #CODE VALUE 'V' STACK TOP DATA 'VIEW' STACK TOP COMMAND 'LIST' VALUE 'P' STACK TOP COMMAND 'LIST PROGRAM *' VALUE 'T' STACK TOP COMMAND 'LAST *' STACK TOP COMMAND 'TECH' STACK TOP COMMAND 'SYSPROD' VALUE '.' STOP NONE REINPUT 'PLEASE ENTER VALID CODE' END-DECIDE * * END
PLEASE SELECT COMMAND LIST VIEW (V) LIST PROGRAM * (P) TECH INFO (T) STOP (.) CODE:P
16:46:28 ***** NATURAL LIST COMMAND ***** 2005-01-19 User HTR - LIST Objects in a Library - Library SYSEXSYN Cmd Name Type S/C SM Version User ID Date Time --- *________ P__________ *__ * *______ *________ *__________ *________ __ ACREX1 Program S/C S 4.1.03 RKE 2004-11-11 16:32:37 __ ACREX2 Program S/C S 4.1.03 RKE 2005-01-05 10:29:51 __ ADDEX1 Program S/C S 4.1.03 RKE 2004-11-11 16:36:49 __ AEDEX1R Program S/C R 4.1.03 RKE 2004-11-11 16:40:34 __ AEDEX1S Program S/C S 4.1.03 RKE 2004-11-11 16:39:57 __ AEPEX1R Program S/C R 4.1.03 RKE 2004-11-11 16:41:57 __ AEPEX1S Program S/C S 4.1.03 RKE 2004-11-11 16:42:31 __ AEPEX2 Program S/C S 4.1.03 RKE 2004-11-11 16:43:37 __ ASDEX1R Program S/C R 4.1.03 RKE 2004-11-11 17:00:21 __ ASDEX1S Program S/C S 4.1.03 RKE 2004-11-11 17:00:50 __ ASGEX1R Program S/C R 4.1.03 RKE 2004-11-11 17:02:01 __ ASGEX1S Program S/C S 4.1.03 RKE 2004-11-11 17:02:08 __ ATBEX1R Program S/C R 4.1.03 RKE 2004-11-11 17:03:18 __ ATBEX1S Program S/C S 4.1.03 RKE 2004-11-11 17:03:05 14 Objects found Top of List. Command ===> Enter-PF1---PF2---PF3---PF4---PF5---PF6---PF7---PF8---PF9---PF10--PF11--PF12--- Help Print Exit Sort -- - + ++ > Canc