I have SQLRPGLE program in which there are some update
statements which executed correctly. there were no errors run
time. Once the program gets over, the file was not updated
with the new values. What might be the reason?

Answers were Sorted based on User's Feedback



I have SQLRPGLE program in which there are some update statements which executed correctly. there ..

Answer / kishore

at the time of compiling program take f4 & set commit option *NONE

or in program place

c/exec sql
c/+ set option commit = *none
c/end-ecxec

after write statement like

c/exec sql
c/+ update table name set empname = 'value'
c/end-ecxe

Is This Answer Correct ?    9 Yes 1 No

I have SQLRPGLE program in which there are some update statements which executed correctly. there ..

Answer / shashank jain

In your code write
c/exec sql
c/+ set isolation level = NC
c/end-exec
before your update statement

Or
try this as your update statement both will work
c/exec sql
c/+ update table name set empname = 'value' with NC
c/end-exec

Is This Answer Correct ?    2 Yes 0 No

Post New Answer

More IBM AS400 AllOther Interview Questions

What is a Join Logical File, Can it be used for Update ?

1 Answers  


How can we find from which source the program has been compiled for a given RPGLE program object?

5 Answers  


How to retrieve data from data area?

1 Answers  


1. There is a file called Month. Month has 12 members called Jan, Feb, ..., Dec. How to design a rpg code which can access any member and show its content. (User can ask for any member when required)?

0 Answers  


define what a data queue is along with a brief example of what it may be used for?

1 Answers   IBM,






What is the purpose of OPNQRYF (Open Query File)?

1 Answers  


what is service program?

0 Answers   IBM,


define the purpose of the %sst function?

1 Answers   IBM,


how can a procedure will be added in to a srvpgm

4 Answers   TCS,


in which specification the report layout can be defined?

1 Answers   IBM,


what is the function of crtdupobj command?

1 Answers   IBM,


can you explain the difference between spacea,spaceb,skipa and skipb. I'm new to learning about as400 and printer files. can any one give me an example using source code showing the difference that occurs between using these 4 keywords. A-Physical file PF004 source UNIQUE R RR STUNAM 10 ROLLNU 5 0 MARKS 3 0 SEX 6 K ROLLNU 4 records present in PF004 are STUNAM ROLLNU MARKS SEX KAVYA 12,344 55 FEMALE MADHAVAN 14,579 60 MALE RAMYA 14,785 70 FEMALE KRISHNAN 14,988 72 MALE B-Printer File PRINT1 source A R HEADER A 10 3'STUNAM' A 10 20'ROLLNU' A 10 30'MARKS' A 10 40'SEX' A R DETAIL A SPACEB(1) A STUNAM 10 3 A ROLLNU 5 0 20 A MARKS 3 0 30 A SEX 6 40 A R FOOTER A SPACEB(1) A 20'END OF REPORT' C-RPG/400 Program PRTTPG source FPF004 I F E DISK FPRINT1 O E PRINTER C WRITE HEADER C READ PF004 60 C *IN60 DOWEQ *OFF C WRITE DETAIL C READ PF004 60 C ENDDO C WRITE FOOTER C SETON LR D-spooled file result set Display Spooled File File . . . . . : PRINT1 Page/Line 1/10 Control . . . . . Columns 1 - 130 Find . . . . . . *...+....1....+....2....+....3....+....4....+....5....+.... 6....+....7....+....8....+....9....+....0....+....1....+.... 2....+....3 STUNAM ROLLNU MARKS SEX KAVYA 12344 055 FEMALE MADHAVAN 14579 060 MALE RAMYA 14785 070 FEMALE KRISHNAN 14988 072 MALE END OF REPORT Bottom F3=Exit F12=Cancel F19=Left F20=Right F24=More keys I have changed from SPACEB to SPACEA now in my printer file source E-Changed PRINT1 Source A R HEADER A 10 3'STUNAM' A 10 20'ROLLNU' A 10 30'MARKS' A 10 40'SEX' A R DETAIL A SPACEA(1) A STUNAM 10 3 A ROLLNU 5 0 20 A MARKS 3 0 30 A SEX 6 40 A R FOOTER A SPACEA(1) A 20'END OF REPORT' F-Spooled file Result Set after keyword change Display Spooled File File . . . . . : PRINT1 Page/Line 1/10 Control . . . . . Columns 1 - 130 Find . . . . . . *...+....1....+....2....+....3....+....4....+....5....+.... 6....+....7....+....8....+....9....+....0....+....1....+.... 2....+....3 KAVYAM 12344U 055KS FEMALE MADHAVAN 14579 060 MALE RAMYA 14785 070 FEMALE KRISHNAN 14988 072 MALE END OF REPORT Bottom F3=Exit F12=Cancel F19=Left F20=Right F24=More keys Overprinting not displayed.

0 Answers   Tieto,


Categories