Meaning of Statements



Software AG's platform-independent programming language with full support for open-source and Internet applications

Meaning of Statements

Postby diptisaini » Mon May 17, 2010 2:57 pm

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 ?
diptisaini
 
Posts: 90
Joined: Sun Mar 14, 2010 5:12 pm
Has thanked: 0 time
Been thanked: 0 time

Re: Meaning of Statements

 

Re: Meaning of Statements

Postby RGZbrog » Tue May 18, 2010 5:57 am

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
User avatar
RGZbrog
 
Posts: 101
Joined: Mon Nov 23, 2009 1:34 pm
Location: California, USA
Has thanked: 0 time
Been thanked: 0 time

Re: Meaning of Statements

Postby helenk579 » Sat Jun 12, 2010 2:14 pm

Thanks you for the post.
_________________
Watch The Karate Kid Online Free
helenk579
 
Posts: 2
Joined: Sat Jun 12, 2010 2:06 pm
Has thanked: 0 time
Been thanked: 0 time


Return to Natural

 


  • Related topics
    Replies
    Views
    Last post