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.
hi i am electronics & telecomm engg & appling 4 the AAI jr executive (electronics/ATC) written test. pls forward me the syllabus & old question papers.I will be very much thankful to you. shahrukhkhalid911@gmail.com and shahrukh_khalid911@yahoo.co.in
1.antenna is passive or active?? add why? 2.diff b/w tch drop & tch block?? 3 diff. b/w sdcch drop & sdcch block??
why passive components are used in pre emphasis and de emphasis?
what is directivity effect?
how many safeties should be present in boiler?what are they?
quantity of sand and cement for 10m2 plastering 10mm thick for the ratio of 1:4,1:3and its leabour data
mapper or reducer?
What is loop1 and loop2 in MTS LT?
what are the sample questions asking to the test cunducting for electrical superwising lisence test?
What's the best way to find out more about the capabilities of QVCS?
If we buy crush sand for 3200/ Brass and cement for Rs350 /Bag and flyash 1200 / tonne....and my production is 230 Bricks per bag than how much cost is required for 1 flyash brick?
• Brief me about yourself? • What are your day to day job roles /responsibilities? • What is the through put of 3560 POE switch? • What is POE switch? • How will you configure VLAN in a new switch? • What is NAT? • Different types of NAT? • Difference between NAT & PAT? • Explain with diagram how you can access a PC on internet; will NAT come into picture, how? • How many physical ports are there in PIX 515E? Are they Ethernet of gigabyte? • What is difference between ASA5510 & ASA5550?How many ports are there • Explain any client network topology? • How will you configure a new firewall, parameters for configuration? • What is HSRP? • If a link is down what status will be the interface be in? • How good are you in SWITCHING ,rate yourself between 1 to 5 • What is VLAN • Avaya IP Phone, separate required? • Configuration for DATA and VOICE VLAN? • What is VTP? • Modes of VTP • Can we have more than 2 VTP servers in a single VTP domain? • What is STP? • How STP works? • How is Root Bridge elected? • Which priority is considered, highest or lowest? • Difference between STP & RSTP? • Modes of STP? • By default which mode of STP is there? • By default which mode of VTP is there? • In firewall which security level is what? • What is DMZ? • What is ether channel?
1. Give me an example of something you tried at work but did not work out so you had to go at things another way. can somebody give a real time example
How to start water tube steam boiler
