Hello again, I need more help with a Information system I am constructing in my COBOL class. I'll begin with a explaination...
I started with a data dictionary file which I named 'NBADATADIC'
....that seems alright. Do I add information in there now ? Do I compile it first (crtpf), or do I do the entry (strdfu) now ?Code:FMT A* .....A*. 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 *************** Beginning of data ************************************ 0001.00 * 0002.00 * Data Dictionary for NATIONAL BASKETBALL 0003.00 * 0004.00 A R RECORD 0005.00 A ASSISTPG 2S 0 TEXT('ASSISTS PER GAME') 0006.00 A BLOCKSPG 2S 0 TEXT('BLOCKS PER GAME') 0007.00 A FGPERCENT 2S 0 TEXT('FIELD GOAL PERCENT') 0008.00 A FTPERCENT 2S 0 TEXT('FREE THROW PERCENT') 0009.00 A GMSPLAYED 2S 0 TEXT('GAMES PLAYED') 0010.00 A GMSSTART 2S 0 TEXT('GAMES STARTED') 0011.00 A MINPG 2S 0 TEXT('MINUTES PER GAME') 0012.00 A PLAYERNAME 18A TEXT('PLAYER NAME') 0013.00 A PLAYERPOS 2A TEXT('POSITION CODE') 0014.00 A POSITION 7A TEXT('POSTION DESC.') 0015.00 A PPG 2S 0 TEXT('POINTS PER GAME') 0016.00 A STLPG 2S 0 TEXT('STEALS PER GAME') 0017.00 A TEAMCODE 3A TEXT('TEAM CODE') 0018.00 A TEAMNAME 11A TEXT('TEAM NAME') 0019.00 A TEAMCONF 4A TEXT('TEAM CONFRENCE') 0020.00 A THREEPTP 2S 0 TEXT('THREE PT PERCENT') 0021.00 A TURNOVERS 2S 0 TEXT('TURNOVERS') ****************** End of data *************************************
Then I still need to add two physical files. But with those physical file I need to join them with a logical file and that is where I am begging to get confused. I have a logical file named 'NBAJOIN' that should join two physical files 'NB'ATEAM' and 'NBAPOSTN'. This is what they look like........and........Code:FMT PF .....A..........T.Name++++++RLen++TDpB......Functions++++++++++++++++++ *************** Beginning of data ************************************* 0001.00 A REF(NBADATADIC) 0002.00 A R NBATEAM 0003.00 A TEAMCODE R 0004.00 A TEAMNAME R 0005.00 A TEAMCONF R ****************** End of data ****************************************Code:FMT PF .....A..........T.Name++++++RLen++TDpB......Functions++++++++++++++++++ *************** Beginning of data ************************************* 0001.00 A REF(NBADATADIC) 0002.00 A R NBAPOSTN 0003.00 A PLAYERPOS R 0004.00 A POSITION R ****************** End of data ****************************************


Reply With Quote