Interested to Buy Any Domain ? << Click Here >> for more details...
What is the benefit of using Externally Described files
over Internally
Described?
- 19 Answers
- 41452 Views
- IBM, Patni, I also Faced
- E-Mail Answers
Answer Posted / prima krishnan
Program Described:-
For program-described files, the file name entered in
positions 7 through 14 must also be entered on:
° Input specifications if the file is a primary, secondary,
or full procedural file
° Output specifications or an output calculation operation
line if the file is an output, update, or combined file, or
if the file is an input file and records are also being
added to the file
° Extension specifications if the file is a table, array, or
record address file, or a file processed by a record-address
file
° Calculation specifications if the file name is required
for the operation code specified
° Line counter specifications if the device is a printer and
default values are to be overridden.
Externally Described File
For externally described files, the file name entered in
positions 7 through 14 is the name used to locate the record
descriptions for the file. The following rules apply to
externally described files:
° Input and output specifications for externally described
files are optional. They are required only if you are adding
RPG/400 functions, such as control fields or record
identifying indicators, to the external description retrieved.
° When an external description is retrieved, the record
definition can be referred to by its record format name on
the input, output, or calculation specifications.
° A record format name must be a unique symbolic name.
° A logical file with two record formats of the same name
cannot have the duplicate format names renamed and cannot be
externally described. However, such a file can be accessed
if it is program described.
| Is This Answer Correct ? | 0 Yes | 4 No |
Post New Answer View All Answers
Which command is used to replace CDUP command in FTP IF i WANT TO USE SFTP?
To Add A File To The 'file Selection' Option Of A Query, The Function Key To Be Pressed Is?
what does vldcmdkey means?
what is the sequence when using cursor?
what is the function of crtdupobj command?
What are the different opcodes used for file operation on a subfile in a rpg pgm?
What is the difference between iter and do? We know both are used to execute set of statements repeatedly, but what is the main difference?
what is the maximum number of subfiles that can specified in a display file ?
what is a non-join logical file?
how can a message from a message file appear as a constant on the screen?
In AS/400 projects in Companies whats the meaning of production support team.what production support involves.also what work does development,maintenance involve what are the other teams or processes that are available for as400 project.
what keyword must be used with protect keyword ?
list some of the commonly used commands for debugging?
what is message file?
I have created a command that display Source file and library. Now i want that when i enter library name and press f4 on Source file, pgm should display all the PF- SRC's in that Library. For F4 option i have used Choice program but since only limited paramters are passed in Choice pgm i am not able to paas library name and further can't call a pgm that will display list of Source files. Below is the Code snippet for CMD type object :- CMD PROMPT('Source Scan for HUB Standard') PARM KWD(SOURCE) TYPE(*CHAR) LEN(1) RSTD(*YES) + VALUES(N A) MIN(1) + CHOICE('N,A') PARM KWD(SRCFILE) TYPE(FILE) RSTD(*NO) + PROMPT('SOURCE FILE') FILE: QUAL TYPE(*NAME) LEN(10) RSTD(*NO) EXPR (*YES) + CHOICE(*PGM) + CHOICEPGM (XXXXXLIB/YYYPGM) QUAL TYPE(*NAME) LEN(10) DFT(*LIBL) + SPCVAL((*LIBL)) EXPR(*YES) PROMPT ('Library') Below is the Choice pgm:- PGM PARM(&PARM1 &PARM2) DCL VAR(&PARM1) TYPE(*CHAR) LEN (21) DCL VAR(&PARM2) TYPE(*CHAR) LEN (2000) IF COND(%SST(&PARM1 1 10) = 'CHOICE ' *AND + %SST(&PARM1 11 10) = 'SRCFILE ' *AND + (%SST(&PARM1 21 1) = 'C' *OR %SST (&PARM1 + 21 1) = 'P')) THEN (DO) /* (%SST(&PARM1 21 1) = 'C' *OR %SST (&PARM1 + */ CHGVAR VAR(&PARM2) VALUE('Name, F4 for List') ENDDO IF COND(%SST(&PARM1 1 10) = 'CHOICE ' *AND + %SST(&PARM1 11 10) = 'SRCFILE ' *AND + %SST(&PARM1 21 1) = 'P') THEN (DO) CHGVAR VAR(&PARM2) VALUE('Name, F4 for List') CALL PGM(GTSQL) PARM ('XXXXLIB') return ENDDO Thanks in Advance for looking into.
