I have been asked to write a program which reads files with same format from different branch files. (I beleive i've worked this bit out) What i need to do is write out information from each of these files to a separate central file in order to output all results across the branches to a single output

This is my 1st post and would be grateful for all help. I work better with examples but pointers are also good. Thank you in antisipation Susan

This message has been edited. Last edited by: Kerry,

You really should update your signature so we can tell what version of WebFOCUS/FOCUS you're using.

Are the branch files flat files or WebFOCUS databases or DBMS tables? One central file?

If these files have individual MASTERs, you can use the MORE command to concatenate them.

The USE command is very handy for FOCUS databases.

If they're flat files and you have only one Master, a loop of FILEDEFs for the input files and a FILEDEF (APPEND for the output would work.

If it's a mainframe batch job, you can concatenate them in the JCL.

We really need to know something about your environment.

Ditto with what Francis has said.

More info will be very useful.

I agree. More info would be useful. You might get away with MORE, or might have to move up to MATCH FILE or even MODIFY FILE. It's going to take you a while to master the latter ...

I believe i have updated my profile. I am currently testing the MORE command. It appears to be doing something but i do not seem to be able to interrogate the HOLD file, below is the code i am using
TABLE FILE BPLSD00BGAL
PRINT
SDNAME
BY SDCODE
ON TABLE SAVE AS SUPPLIER
MORE
FILE BPLSD00BIRM
MORE
FILE BPLSD00BMAN
MORE
FILE BPLSD00BPAC
MORE
FILE BPLSD00BRIS
MORE
FILE BPLSD00COAT
END

TABLE FILE SUPPLIER
PRINT
SDNAME
BY BRANCH
BY SDCODE
ON TABLE NOTOTAL
END


Below is the result i get

SET GRAPHSERVURL=http://172.16.1.214:80/ibi_apps/IBIGraphServlet
SET GRAPHENGINE=GRAPH53
TABLE FILE BPLSD00BGAL
PRINT
SDNAME
BY SDCODE
ON TABLE SAVE AS SUPPLIER
MORE
FILE BPLSD00BIRM
MORE
FILE BPLSD00BMAN
MORE
FILE BPLSD00BPAC
MORE
FILE BPLSD00BRIS
MORE
FILE BPLSD00COAT
END
TABLE FILE SUPPLIER
PRINT
SDNAME
BY BRANCH
BY SDCODE
ON TABLE NOTOTAL
END
0 NUMBER OF RECORDS IN TABLE= 7150 LINES= 7150
ALPHANUMERIC RECORD NAMED SUPPLIER
0 FIELDNAME ALIAS FORMAT LENGTH
SDCODE SDCODE A6 6
SDNAME SDNAME A40 40
TOTAL 46
0 NUMBER OF RECORDS IN TABLE= 0 LINES= 0


I hope you or anyone can assist me further


Regards

Susan

Hi,

You need to HOLD the file not SAVE ..
ON TABLE HOLD AS SUPPLIER
SAVE will not create a Master and you will not be able to query it in a TABLE request..

thanks
Sashanka

Could be that a SUPPLIER master file is already in place. If that's the case, you would have to point it to the right location though (using FILEDEF SUPPLIER DISK ...). From the output I suspect that's the problem.

Hi Susan,
Welcome to the world of FOCUS!
Your code:

quote:

TABLE FILE BPLSD00BGAL
PRINT
SDNAME
BY SDCODE
ON TABLE SAVE AS SUPPLIER
MORE
FILE BPLSD00BIRM
MORE
FILE BPLSD00BMAN
MORE
FILE BPLSD00BPAC
MORE
FILE BPLSD00BRIS
MORE
FILE BPLSD00COAT
END
TABLE FILE SUPPLIER
PRINT
SDNAME
BY BRANCH
BY SDCODE
ON TABLE NOTOTAL
END  

has an inconsistency:
You are saving 2 fields SDNAME and SDCODE in your SUPPLIER file but then you want to display 3 fields: BRANCH, SDNAME and SDCODE.
Since FOCUS did not tell you that BRANCH is not a field of SUPPLIER, this means that GamP is correct: you have an existing MASTER named SUPPLIER which has at least these 3 fields.
Also, as has been said, use HOLD and not SAVE in order to create a SUPPLIER master also.
If you need BRANCH, then it must be also in your first TABLE request and appear in all the files that you are concatenating, either physically or by use of a DEFINE command.

I hope this is clear.

Hi to everyone who posted a reply. I appreciate every input and have tried the suggestion and have resolved my problem.

Thank You all very much

Susan