Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
MATCH in FOCUS programming

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Other Mainframe Topics
Author Message
anindyamondal

New User


Joined: 04 Apr 2007
Posts: 3
Location: Kolkata

PostPosted: Wed Apr 04, 2007 1:24 pm    Post subject: MATCH in FOCUS programming
Reply with quote

Hi,
We generally use MATCH FILE filename--> format for matching two files and the results are saved in a HOLD file. But if I am reading data from a flat file which has no mfd, using FIXFORM and then uses MATCH variable name format....what does it mean? with whom the matching is taking place...Please have a look at the code

FIXFORM X49 PCODE/6 PCLINE/1 RPCODE/6 X13
MATCH ECODE
ON MATCH TYPE ON PCETABLE
"<1 <PCODE <7 <PCLINE <8 <RPCODE <14 <ECODE"
ON NOMATCH REJECT
-*ON MATCH CONTINUE
-*MATCH PCODE PCLINE RPCODE
-*ON MATCH TYPE "DUPLICATE ECODE <TRAN <ECODE <PCODE <PCLINE <RPCODE"

DATA ON ENTW
END
Back to top
View user's profile Send private message
References
h.dinesh

New User


Joined: 06 Dec 2006
Posts: 46
Location: Chennai

PostPosted: Wed Apr 04, 2007 3:56 pm    Post subject:
Reply with quote

anindyamondal,

I feel that you have missed a MODIFY command before FIXFORM.

Code:
FIXFORM X49 PCODE/6 PCLINE/1 RPCODE/6 X13


MATCH command over here is different from MATCH FILE which as you know is used for matching of two files. The MATCH here could be a part of MODIFY.

Please let us know if the given code is after a MODIFY command.
Back to top
View user's profile Send private message
paray2x

New User


Joined: 28 Dec 2005
Posts: 21

PostPosted: Fri Apr 06, 2007 7:57 pm    Post subject:
Reply with quote

Hi,

Dinesh is correct. There should be a modify file command.

This code explains the layout of your transaction file. You don't need an MFD for this method.

FIXFORM X49 PCODE/6 PCLINE/1 RPCODE/6 X13

Here X indicates spaces/un used space and others are fieldname/length.

Corrections welcome...
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Other Mainframe Topics All times are GMT + 6 Hours
Page 1 of 1