different type of cursor?


No Answer is Posted For this Question
Be the First to Post Answer

Post New Answer

More IBM AS400 AllOther Interview Questions

Q.1.What is differences in STRDBG and STRISDB debugging commands? 2.Where we should use STRDBG and STRISDB Debugging commands?

6 Answers   CTS,


What is the purpose of OVRDTA keyword ?

1 Answers  


Hi Friends, I need immediately answer for this: Senario is that,I am selecting records from the display and window subfile on the basis of Reason Code and some more fields but spool file not showing the same records which i have selected by display and window subfile. Q.What could be the causes(resons)to not show records properly (just selected in the display file and Window subfile)according the selection criteria of the records. Q.What would be the solutions to show records properly in the spool file just as selected in in the display file and window subfile according to the selection criteria.

1 Answers   IBM,


Can anybody please tell me what is difference between SQL (STRSQL ) and WRKQRY .....?

3 Answers  


what is elastic and non elastic subrile?

0 Answers   IBM,






What is the Select and Omit criteria in logical file?

1 Answers  


which are the relational operators in rpg?

0 Answers   IBM,


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.

0 Answers   HSBC,


WHAT IS DECIMAL DATA ERROR IN RPG IV...WHEN WILL IT HAPPENS?

6 Answers   CTS,


What is Group Job?

1 Answers  


What is the use of E specification in RPG?

1 Answers  


How do you combine two record formats in RLU ?

1 Answers  


Categories