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.
3505Post 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)
How recorded command can be edited in ide?
Explain their methods? Tell me their parameter names also have you used threads in servlet?
Why use identity in sql server?
How to executed jquery selectors? : jquery mobile
Throw some light on internal process memory.
Why was the empire state building made of steel?
How would you diagnose or do exception handling in the pig?
How to make a DIV editable in HTML?
Can you create a multi-colored text on a web page?
How do I copy a formula down an entire column?
What is Incisors?
What is singleton class in javascript? Explain
What is spring ioc and di?
Define cross correlation and auto-correlation?
You have 30 people working under you with 2 working indirect. Each employee can do 150 units/hour. Each work day has two 15 min breaks and one 30 min lunch. In a 5 day work week, how many total units can you complete?
