Untitled

 avatar
unknown
plain_text
5 months ago
10 kB
4
Indexable
Sequence                                                           8
Statement                          IF LS-ABK-EPIC-CODE = 'I ' OR 'P'
Program_Name                                                PAJSFN20
Paragraph_Name                                        0000-MAINLINE.
Keywords                                                          IF
Conditional_Seq                                                  NaN
Parameters         [{'logical_operator': '', 'attribute': 'LS-ABK...
Source                                                          None
Target                                                          None
Name: 7, dtype: object

Sequence                             9
Statement                     CONTINUE
Program_Name                  PAJSFN20
Paragraph_Name          0000-MAINLINE.
Keywords                      CONTINUE
Conditional_Seq                    8.0
Parameters         Extractor Under DEV
Source                            None
Target                            None
Name: 8, dtype: object

Sequence                            10
Statement                         ELSE
Program_Name                  PAJSFN20
Paragraph_Name          0000-MAINLINE.
Keywords                          ELSE
Conditional_Seq                    8.0
Parameters         Extractor Under DEV
Source                            None
Target                            None
Name: 9, dtype: object

Sequence                                                          11
Statement                             MOVE 'N'  TO WS-END-OF-CLIP-SW
Program_Name                                                PAJSFN20
Paragraph_Name                                        0000-MAINLINE.
Keywords                                                        MOVE
Conditional_Seq                                                 10.0
Parameters         {'Attributes': ["'N'"], 'Attribute_Literals': ...
Source                                                       ["'N'"]
Target                                         ['WS-END-OF-CLIP-SW']
Name: 10, dtype: object

Sequence                                                          12
Statement                              MOVE 'FIRST' TO READ-POSITION
Program_Name                                                PAJSFN20
Paragraph_Name                                        0000-MAINLINE.
Keywords                                                        MOVE
Conditional_Seq                                                 10.0
Parameters         {'Attributes': ["'FIRST'"], 'Attribute_Literal...
Source                                                   ["'FIRST'"]
Target                                             ['READ-POSITION']
Name: 11, dtype: object

Sequence                                                          13
Statement          PERFORM 3500-READ-ALL-LINE-RENP THRU 3500-EXIT...
Program_Name                                                PAJSFN20
Paragraph_Name                                        0000-MAINLINE.
Keywords                                                     PERFORM
Conditional_Seq                                                 10.0
Parameters         {'start_paragraph': '3500-READ-ALL-LINE-RENP',...
Source                                                          None
Target                                                          None
Name: 12, dtype: object

Sequence                                                          14
Statement                                IF LS-FATAL-ERROR-IND = 'Y'
Program_Name                                                PAJSFN20
Paragraph_Name                                        0000-MAINLINE.
Keywords                                                          IF
Conditional_Seq                                                 10.0
Parameters         [{'logical_operator': '', 'attribute': 'LS-FAT...
Source                                                          None
Target                                                          None
Name: 13, dtype: object

Sequence                            15
Statement              GO TO 0000-EXIT
Program_Name                  PAJSFN20
Paragraph_Name          0000-MAINLINE.
Keywords                            GO
Conditional_Seq                   14.0
Parameters         Extractor Under DEV
Source                            None
Target                            None
Name: 14, dtype: object

Sequence                            16
Statement                       END-IF
Program_Name                  PAJSFN20
Paragraph_Name          0000-MAINLINE.
Keywords                           END
Conditional_Seq                   14.0
Parameters         Extractor Under DEV
Source                            None
Target                            None
Name: 15, dtype: object

Sequence                                                          17
Statement                             IF WS-SET-E1051-SUSP-IND = 'Y'
Program_Name                                                PAJSFN20
Paragraph_Name                                        0000-MAINLINE.
Keywords                                                          IF
Conditional_Seq                                                 10.0
Parameters         [{'logical_operator': '', 'attribute': 'WS-SET...
Source                                                          None
Target                                                          None
Name: 16, dtype: object

Sequence                                                          18
Statement                                   IF LS-ABK-STA-CODE = 'J'
Program_Name                                                PAJSFN20
Paragraph_Name                                        0000-MAINLINE.
Keywords                                                          IF
Conditional_Seq                                                 17.0
Parameters         [{'logical_operator': '', 'attribute': 'LS-ABK...
Source                                                          None
Target                                                          None
Name: 17, dtype: object

Sequence                                                          19
Statement                                   MOVE 'E1243' TO AIG-CODE
Program_Name                                                PAJSFN20
Paragraph_Name                                        0000-MAINLINE.
Keywords                                                        MOVE
Conditional_Seq                                                 18.0
Parameters         {'Attributes': ["'E1243'"], 'Attribute_Literal...
Source                                                   ["'E1243'"]
Target                                                  ['AIG-CODE']
Name: 18, dtype: object

Sequence                                                          20
Statement                 PERFORM 8000-APPLY-SUSP     THRU 8000-EXIT
Program_Name                                                PAJSFN20
Paragraph_Name                                        0000-MAINLINE.
Keywords                                                     PERFORM
Conditional_Seq                                                 18.0
Parameters         {'start_paragraph': '8000-APPLY-SUSP', 'end_pa...
Source                                                          None
Target                                                          None
Name: 19, dtype: object

Sequence                            21
Statement                         ELSE
Program_Name                  PAJSFN20
Paragraph_Name          0000-MAINLINE.
Keywords                          ELSE
Conditional_Seq                   18.0
Parameters         Extractor Under DEV
Source                            None
Target                            None
Name: 20, dtype: object

Sequence                                                          22
Statement                                   MOVE 'E1051' TO AIG-CODE
Program_Name                                                PAJSFN20
Paragraph_Name                                        0000-MAINLINE.
Keywords                                                        MOVE
Conditional_Seq                                                 21.0
Parameters         {'Attributes': ["'E1051'"], 'Attribute_Literal...
Source                                                   ["'E1051'"]
Target                                                  ['AIG-CODE']
Name: 21, dtype: object

Sequence                                                          23
Statement                 PERFORM 8000-APPLY-SUSP     THRU 8000-EXIT
Program_Name                                                PAJSFN20
Paragraph_Name                                        0000-MAINLINE.
Keywords                                                     PERFORM
Conditional_Seq                                                 21.0
Parameters         {'start_paragraph': '8000-APPLY-SUSP', 'end_pa...
Source                                                          None
Target                                                          None
Name: 22, dtype: object

Sequence                            24
Statement                       END-IF
Program_Name                  PAJSFN20
Paragraph_Name          0000-MAINLINE.
Keywords                           END
Conditional_Seq                   18.0
Parameters         Extractor Under DEV
Source                            None
Target                            None
Name: 23, dtype: object

Sequence                            25
Statement                       END-IF
Program_Name                  PAJSFN20
Paragraph_Name          0000-MAINLINE.
Keywords                           END
Conditional_Seq                   17.0
Parameters         Extractor Under DEV
Source                            None
Target                            None
Name: 24, dtype: object

Sequence                            26
Statement                       END-IF
Program_Name                  PAJSFN20
Paragraph_Name          0000-MAINLINE.
Keywords                           END
Conditional_Seq                    8.0
Parameters         Extractor Under DEV
Source                            None
Target                            None
Name: 25, dtype: object

Editor is loading...
Leave a Comment