Interested to Buy Any Domain ? << Click Here >> for more details...
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.
3541Post New HSBC IBM AS400 AllOther Interview Questions
- HSBC C Interview Questions (1)
- HSBC OOPS Interview Questions (2)
- HSBC Programming Languages AllOther Interview Questions (2)
- HSBC Networking Administration Interview Questions (1)
- HSBC Exchange Server Interview Questions (1)
- HSBC Oracle Architecture Interview Questions (1)
- HSBC MS Access Interview Questions (1)
- HSBC DB Administration Interview Questions (1)
- HSBC SQL PLSQL Interview Questions (7)
- HSBC Windows AllOther Interview Questions (1)
- HSBC Solaris Commands Interview Questions (1)
- HSBC Solaris AllOther Interview Questions (1)
- HSBC QTP Interview Questions (2)
- HSBC Test Director Interview Questions (1)
- HSBC Manual Testing Interview Questions (5)
- HSBC COBOL Interview Questions (13)
- HSBC JCL Interview Questions (13)
- HSBC CICS Interview Questions (6)
- HSBC DB2 Interview Questions (4)
- HSBC VSAM Interview Questions (3)
- HSBC RPG400 Interview Questions (18)
- HSBC DB400 Interview Questions (2)
- HSBC COOLPLEX Interview Questions (1) HSBC IBM AS400 AllOther Interview Questions (3)
- HSBC Core Java Interview Questions (2)
- HSBC JDBC Interview Questions (2)
- HSBC Websphere Interview Questions (1)
- HSBC Java Related AllOther Interview Questions (1)
- HSBC Cognos Interview Questions (11)
- HSBC Informatica Interview Questions (5)
- HSBC Actuate Interview Questions (2)
- HSBC Data Stage Interview Questions (11)
- HSBC SAS Interview Questions (19)
- HSBC Data Warehouse General Interview Questions (1)
- HSBC HR Questions Interview Questions (1)
- HSBC Requirements Management Interview Questions (2)
- HSBC SAP SD (Sales & Distribution) Interview Questions (1)
- HSBC Digital Certificates Interview Questions (1)
- HSBC Visual Effects Interview Questions (1)
- HSBC Software Quality Analysis Interview Questions (1)
- HSBC Mechanical Engineering Interview Questions (1)
- HSBC Electrical Engineering Interview Questions (3)
- HSBC Electronics Communications Interview Questions (2)
- HSBC Engineering AllOther Interview Questions (3)
- HSBC Business Administration Interview Questions (3)
- HSBC Marketing Sales Interview Questions (6)
- HSBC Banking Finance Interview Questions (9)
- HSBC Business Management AllOther Interview Questions (3)
- HSBC Audit Interview Questions (1)
- HSBC CompanyAffairs CS Interview Questions (3)
- HSBC Accounting General Interview Questions (8)
- HSBC Accounting AllOther Interview Questions (19)
- HSBC Call Centre AllOther Interview Questions (132)
- HSBC SSC General Studies Interview Questions (1)
- HSBC NDA Interview Questions (1)
- HSBC BSRB Clerical Interview Questions (2)
- HSBC Group I Interview Questions (1)
- HSBC General Knowledge_Current Affairs Interview Questions (3)
- HSBC Government AllOther Interview Questions (1)
- HSBC Everything Else AllOther Interview Questions (1)
- HSBC English Interview Questions (3)
- HSBC General Aptitude Interview Questions (5)
- HSBC Puzzles Interview Questions (1)
- HSBC Placement Papers Interview Questions (3)
- HSBC CCNA Interview Questions (1)
- HSBC Microsoft Certifications Interview Questions (1)
- HSBC Certifications AllOther Interview Questions (1)
What are the streamlined sales and use tax agreement?
What does the .exe mean?
What is use of settimeout function in javascript?
What do you mean by ognl?
How can I learn c++ easily?
quantity of material needed for rubble stone masonry for 1:4 and 1:6
What is posix in linux?
What is the meaning of @classmethod and @staticmethod ?
What are inbuilt functions in c?
if you have compressed file which has multiple source files, after make of this source file, you are getting undefined reference error. How your will debug this problem ? What might be different root causes for this ?
What is the two main roles of operating system?
What is Time capital
What is try catch in scala?
How can we avoid including a header more than once?
Expand CPI-C.
