Page 1 of 1

Meaning of Statements

PostPosted: Mon May 17, 2010 2:57 pm
by diptisaini
1 #KCPARSEP-PARMS
2 #KCPARSEP-IN-PARMS
3 #KCPARSEP-IN-CHAR A 1 (1:10000)
3 #KCPARSEP-IN-CHAR-COUNT N 5
2 #KCPARSEP-OUT-PARMS
3 #KCPARSEP-OUT-GROUP (1:100)
4 #KCPARSEP-OUT-GRP-PREFIX A 50
4 #KCPARSEP-OUT-GRP-SEQUENCE N 3 /* THE SEQUENCE OF THE TAG I
/* THE CURRENT SCOPE (PREFIX
4 #KCPARSEP-OUT-GRP-TAG A 5
4 #KCPARSEP-OUT-GRP-TAG-TYPE A 1 /* 'G' - GROUP
/* 'T' - TAG
4 #KCPARSEP-OUT-GRP-TAG-VALUE A 200
R 4 #KCPARSEP-OUT-GRP-TAG-VALUE /* REDEF. BEGIN : #KCPARSEP-
5 #KCPARSEP-OUT-GRP-TAG-VAL1 A 1
5 #KCPARSEP-OUT-GRP-TAG-VAL23 A 2 /* TAG VALUE
3 #KCPARSEP-OUT-COUNT N 3
3 #KCPARSEP-OUT-RETURN-CODE A 4 /* '0001' - INVALID SWIFT FM
/* '0002' - MAX LVL EXCEEDED

3 #KCPARSEP-OUT-RETURN-MESSAGE A 80


I just need to know the variables #KCPARSEP-OUT-GRP-SEQUENCE and #KCPARSEP-OUT-GRP-TAG are they coming under #KCPARSEP-OUT-GROUP ?

Re: Meaning of Statements

PostPosted: Tue May 18, 2010 5:57 am
by RGZbrog
Yes. #KCPARSEP-OUT-GROUP is a structure of 100 occurrences (at level 3) containing five fields (at level 4).

It may be easier to see the structure after converting it from DATA EDITOR format to DEFINE DATA format:
DEFINE DATA LOCAL
1 #KCPARSEP-PARMS
  2 #KCPARSEP-IN-PARMS
    3 #KCPARSEP-IN-CHAR (A1/1:10000)
    3 #KCPARSEP-IN-CHAR-COUNT (N5)
  2 #KCPARSEP-OUT-PARMS
    3 #KCPARSEP-OUT-GROUP (1:100)
      4 #KCPARSEP-OUT-GRP-PREFIX (A50)
      4 #KCPARSEP-OUT-GRP-SEQUENCE (N3)
      4 #KCPARSEP-OUT-GRP-TAG (A5)
      4 #KCPARSEP-OUT-GRP-TAG-TYPE (A1)
      4 #KCPARSEP-OUT-GRP-TAG-VALUE (A200)  4 REDEFINE #KCPARSEP-OUT-GRP-TAG-VALUE
        5 #KCPARSEP-OUT-GRP-TAG-VAL1 (A1)
        5 #KCPARSEP-OUT-GRP-TAG-VAL23 (A2)
    3 #KCPARSEP-OUT-COUNT (N3)
    3 #KCPARSEP-OUT-RETURN-CODE (A4)
    3 #KCPARSEP-OUT-RETURN-MESSAGE (A80)
END-DEFINE

Re: Meaning of Statements

PostPosted: Sat Jun 12, 2010 2:14 pm
by helenk579
Thanks you for the post.
_________________
Watch The Karate Kid Online Free