1.Can any body share me about thease opcodes with example
please.Im new for AS/400.Could u please tell me in real
senario?
1.TESTN,
2.EVAL
3.EVALR,
TIME,
4.MONITOR
5. ENDMON
6.ON-ERROR
7.COMMIT
ROLLBACK?
Answer / sumit gupta
TESTN:- this opcode test whether the variable placed at
result field is numeric and return the high(HI) indicator
value as '1'. Rest LO and EQ will remain off.
Eval:- This opcode is applicable for only same type of
character. Eg:- if you want to move a character value to
numeric value then IT WILL THROUGH COMPILATION ERROR.
Bydefault, eval opcode will move from left. For eg:- let
abc=' ' then
eval abc='AAA' abc will be 'AAA '
EVALR:- same as previous diffrence is right adjust.
TIME:- This opcode will return the system time of day.
MONITOR:- this opcode is used to monitor the error in rpgle
program.
ENDMON:- This opcode is used in conjunction with MONITOR
opcode.
ON-ERROR:- This is used again wilt monitor and endmon opcode
MONITOR
ON-ERROR
ENDMON
COMMIT:- This opcode is used to commit the changes in the
file.
COMMMIT keyword is used in F-specs like
Fabc UA F DISK COMMIT(*IN03)
:
:
C If *in03='1'
C COMMIT
C ELSE
C ROLLACK
C ENDIF
If Indicator 03 is '1' then commit all the changes done in
the database file. Else rollback is done onto that database
file.
| Is This Answer Correct ? | 10 Yes | 0 No |
1.If *HIVAL SETGT is used what opcode is used to read a record? A:READ B:READPE C:CHAIN D:READP 2.How to pass numeric parameter to the rpg pgm from the command line? 3.What keyword is used on the rpg 4 definition specification to rename a subfile in an externally definition data structure? A:RENAME B;LIKE C:EXTNAME D:EXTFLD
What is ment by record level identifier?
What would be the result on writing a data record to a PF file using the "WRITE" opcode after the SETON *ON *INLR statment?
I have to change a program. This program is calling a subroutine mor than 100times within it. so will it have any performance issue? if yes than what changes i can make. Thanx for ur valuable answer.
How to update physical file in rpgle without using display file?
What is journalling and commitment control?
How to select highest score of each subject or how to select highest income of every month?
CAN WE READ RECORDS WITHOUT USING SETLL,READ,CHAIN IN RPG?
How can you delete a record from a file in RPG without using DELETE oppcode?
how we retrieve records without using key field (ex:name) from Physical File through RPG in as/400?
How to set on/off a group of indicators in a single statement?
Difference between creating a report using Printer file and WRKQRY(Query Report) ?