1) Can we declare a Display file in CL?

2) How many no. of files can be declared in a CL?

3) What is Non-Join Logical file and its importance?

Answer Posted / jay choudhari

* To declare frist physical file.

CL CODE:

DCLF FILE(PHYSICAL FILE NAME)
READ: RCVF RCDFMT(PF RECORD FMT NAME)
MONSMS MSGID(CPF0864) EXEC(GOTO CMDLBL(END))
OPERATIONS
GOTO CMDLBL(READ)

END: ENDPGM

Is This Answer Correct ?    3 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

when would you use or not use this approach?

885


what is the function of rlu ?

971


How to reverse the string in rpg

1197


Service Program : S1 Modules in S1 : M1 M1 having two procedures : ADD, SUB Current Binder Language STRPGMEXP PGMLVL(*CURRENT) EXPORT SYMBOL("ADD") EXPORT SYMBOL("SUB") ENDPGMEXP Doubt: I need to add one new Module to the Service Program M2 having one procedure ‘MULT’ How to add this new module to the service program S1 ? If I need to recreate the service program again, Do I need to mention the Module M1 again while recreating along with new Module M2? There is no Binding Directory. Binder language structure will be like this STRPGMEXP PGMLVL(*CURRENT) EXPORT SYMBOL("ADD") EXPORT SYMBOL("SUB") EXPORT SYMBOL("MULT") ENDPGMEXP STRPGMEXP PGMLVL(*PREVIOUS) EXPORT SYMBOL("ADD") EXPORT SYMBOL("SUB") ENDPGMEXP

1925


define the purpose of the iter operation?

1012






what is the purpose of overrides?

1013


during input operation which indicator position is seton if there is a record lock?

919


how can a cgi check whether an ifs object is available?

635


what is the maximum number of files allowed in rpg?

931


define the purpose of the *cat function?

972


what is the function of cpyf command?

991


which single rpg opcode performs both setll and reade?

1089


In 'o' Specs What Is The Opcode For Write?

694


what is message file?

594


how do you pass parameters in cl?

1031