IBM AS400 AllOther Interview Questions
Questions Answers Views Company eMail

HOW CAN WE ENTIRE OBJECTS& IT'S TYPE IN PGM?

1 3870

1)In a pf if we delete a record then how to insert a new record at the same place in that pf?? any logic or code? 2)A batch job is taking a lot of time to run,found that it is going into loop and wrapping up so how to skip that loop and process the job without changing the code? 3)In which scenario C D I R comes and C D G F comes in a job? 4)If a job came to error while processing a file how we can know at which record the error hit and how to skip that record and process other records without changing program code?

JDA,

3041

Hello, I have created a CMD type object. In one of the fields in Display file , I would like to see All the Source files present by pass the name of Library. Tried using CHoice(Keyword) and Choicepgm on PARM , but doesn't seems to be working. Any help please..

BlackRock,

1759

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.

HSBC,

3014

how to get the particular field's records in CL without using OVRDBF,OPNQRY? tell me the concept?

2 8307

I need to insert a record in a file using STRSQL containing the some field values same as an already existing record in that file.I know to smple insert mentioning those values one by one.But is there any another query can be prepared for the same .Please share the query if known to you. Thanks in advance.

CSC,

2230

Is it possible to add an keyfield or field to an Physical file without changing its file identifier. Example : - Say I have an existing physical file which is being used in 5 programs. Now I want to add an additional Keyfield or an field to it and I don't want to recompile the programs.

2 4208

Can be OVRDBF command mentioned after OPNQRYF command in CL?

1 4495

What is the exact difference between Service Program and Binding Directory?

1 6324

What are the types of Signature validation?

1 3586

What is an Array Data Structure?

1 3029

How to read data from *LDA (Local Data Area) in RPGLE program without using IN opcode?

1 8502

is it possible to do commitment control with out journaling?

1 2524

does cl support arrays

1 3614

pf named karthik 3members jan feb mar cmd must executed create mbr ar ap

1359


Post New IBM AS400 AllOther Questions

Un-Answered Questions { IBM AS400 AllOther }

Why we sometimes use same file name in file and tofile in ovrdbf and sometimes different?

634


how you will know whether you are in sfldrop or sflfold mode?

610


Why we are not able to perform insert delete and update operation in Join logical file?

906


how to toggle between single line and multi - line display of a particular record in a subfile?

1040


what is a query can be run in which mode?

834






how do you specify page overflow indicator for printer files in rpg?

1422


what opcode could be used to test an alphanumeric field for all numeric values?

1032


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)?

382


how can you detect and handle a record lock situation?

1171


how can we run a batch job?

706


which are the relational operators in rpg?

644


distinguish between terminating a program through seton lr and return?

538


how do u compile rpgle program?

597


What Is The Purpose Of The "n" In The Following Calculation Specification?

651


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

684