How can you check the existence of object in a system?
Answer / nitin trivedi
With the help of CHKOBJ clp command, we can find existence of object on the system.
The usage of command in clp is as follows:
CHKOBJ OBJ(JBA001DT) OBJTYPE(*DTAARA)
MONMSG MSGID(CPF9801) EXEC(DO)
CRTDTAARA DTAARA(QGPL/JBA001DT) TYPE(*CHAR) LEN(6) +
VALUE('010196') TEXT('The last day that had job acct.+ data extracted')
ENDDO
RTVDTAARA DTAARA(JBA001DT *ALL) RTNVAR (&FROMDATE)
The execution of above steps is listed below:
steps
1: First it checks the data area object on the system.
2: If the data area object not found, the MONMSG command executes with the help of message identifier, next we can dynamically create the data area.
3. If the data area object found, control transfers to statement below ENDDO.
It is always good CLP programming approach to check the object before you rename, delete the objects on the system.
| Is This Answer Correct ? | 0 Yes | 0 No |
How can we change the uppercase to Lowercase in RPG?
load all subfile logic in sqlrpgle and when updating particular record it must be lock form other jobs (not a file)?
what is a query can be run in which mode?
how can I control the way a remote browser uses its cache?
during input operation which indicator position is seton if there is a record lock?
I have 1 rd in my flat file. say reord from 1 to 10 position : 'AS400NDB2400' I need to change the value from N to Y using SQL stmt ...How can I update this....?
Which command is used to replace CDUP command in FTP IF i WANT TO USE SFTP?
how can I predict the performance of my cgis?
How to create a data queues?
Q.How primary file can be defined in RPG/400?Please write the senario with opcode specification?
what is the correct about QTEMP library(below mention)? a.it is Unique to a job b.it can be shared between different job c.it can only be deleted by QSECOFR d.Non Please give me the answer for this?
what is the use of CPYFRMQRYF?