Search results for query: *

Hi again! In my case the the help panel UP/DOWN scroling is performed by LEFT and RIGHT commands. I found a workaround for this issue: http://www.mainframesupport.dk/tips/tip1148.html BR

thread277-1740310 I discovered that keys PF10 and PF11 take the function of UP and DOWN scroll. Typing 'keys' in command line the table shows that PF10 and PF11 are responsible for RIGHT and LEFT scroll. Does anyone have any idea where the problem lies? BR Jaka p.s. When I test the...

Hi, I'm using extended CONSOLE (EMCS) to send commands. I would like to suppress the responses written to SDSF LOG. Anyone? Here is the code: /*REXX*/ USR=USERID() CMD="D A,L"...

Thank you guys for your interst and pointing me in the right direction! It is working by using this code )INIT &ZSCROLLD = CSR BRj

Hi community, I'm trying to figure out how to retain CSR scroll value after scroll command on a panel table. Declaring INIT) section with .zamt=CSR only works for first scroll afterwards the .zamt becomes blank and starts to scroll with PAGE amount. Declaring REINIT section with .zamt=CSR does...

Hi community, I created a help panel containing AREA section. I tested the panel with Dialog test and everything worked OK. When this panel gets oppened as .help panel via PF01 in another panel I get a variety of responses: using in Dialog test as a help panel to another panel: scroll does...

Sorry for the delay! CONTROL DISPLAY SAVE, and a CONTROL DISPLAY RESTORE combo yields the same result br jaka

The previous post contains wrong info! xyz has no table only )attr )body )init )reinit and )proc mycmd processes parameters, allocates resources, calls a pgm, frees resources and exits mycmd is called from the )proc section of xyz.(re)display of xyz after the )proc (as mentioned within the...

xyz has no table only )attr )body )init )reinit and )proc mycmd processes parameters, allocates resources, calls a pgm, frees resources and exits. not a single ISPF call is made. mycmd is called from the )proc section of xyz (re)display of xyz after the )proc (as mentioned within the )proc a...

Hi! I bring up a panel with: &zsel="PANEL(xyz) NEWAPPL PASSLIB" Using xyz I collect some parameters and do: &zsel="CMD(%mycmd &parm...)" After mycmd completes the xyz panel is )INIT-ialized. How can I make it to )REINIT-ialize? BR Jaka

I found a way of doing this by allocating PDS and then reading the directory (1st 256B). To bypass allocating I would need to locate the PDS via mcat, ucat and vtoc.

I would like to write a program that behaves like REXX external function SYSDSN. In order to call SYSDSN from assembler we need to create a TSO environment. Inefficient in my opinion.

Hi! Does anybody have SYSDSN source code or know the principle it operates upon? Best regards

I hope it works! iterate trough stack and find a match ex. for number 1 la r4,1 la r5,stack2 la r6,0 la r7,stack1 sr r5,r7 lr r7,r5 la r5,stack2 loop c r4,0(r6,r5) be tost3 la r6,1(r6) b loop tost3 la...

Thanks rexxhead that fixed it!!! Best regards, Jaka

Thank you for your help. I will test your solution in the future because I don't understand it at the moment. BR Jaka

I tried &zamt='csr' and there is no difference.

Hello! I can't get the table scroll amount working. Here is the panel def: )Attr ! TYPE(OUTPUT) COLOR(TURQ) % TYPE(TEXT) INTENS(HIGH) COLOR(YELLOW) _ TYPE(INPUT) INTENS(HIGH) CAPS(ON) )Body...

One more thing: ztdtop also works but it receives a value only after a scroll command was issued. Thank you for your help guys!

I could not get iROW=ztdtop working. But this works: -added keys param: "TBCREATE TAB1 KEYS(rownum) NAMES(linet) NOWRITE REPLACE" -get crp: "TBGET TAB1 POSITION(row)" -and: "TBSKIP TAB1 NUMBER("row")" BR Jaka