MVSFORUMS.com

Kolusu,
Thanks.

I need to create a view joining tableA, Tableb, TableC and TableD. If there is alreay an exising ViewX joining tableA and TableB, I can create a view joining ViewX, TableC and TableD. Will the perfor ...

Thank you all.

CZerfas and dbzTHEdinosauer,

It is for an actual program. I will use with the 2 cursors approach and static sql. Thanks.

Kolusu,

It is a small integer.

I want to order by DESC or ASC depending the value of a Flag:

If Flag = '1'B then
EXEC SQL DECLARE CURTMP CURSOR FOR
SELECT COL1
FROM TABLE
WHERE COL2 = :VALUE2
ORDER BY ...

Create a table with the state_code and state_name and join this table with your table.

Mickeyd,

LNGMSG is on the 2nd line of )BODY. It is the 2nd "Z" variables:

)BDOY
$Z+ @Z +

)INIT
.ZVARS = '(ZCmd LngMsg Var1 Var2 Amount)'

Mickeyd,

I added LMSG(LNGMSG) to )BODY and output field LNGMSG and it still display long message below the error data.

)PANEL KEYLIST(KLIST,APP1)
)ATTR DEFAULT(%+!)
...

asr2,

I added .CURSOR = FLD3 to )INIT, )REINIT and )PROC section and none of them works.

Mickeyd,

)PANEL KEYLIST(KLIST,APP1)
)ATTR DEFAULT(%+!)
+ TYPE(TEXT) INTENS(LOW) PAD(' ') JUST(ASIS) SKIP(ON)
~ TYPE(TEXT&# ...

Kolusu,

I looked into all the System variables, espeically those associate with Table display service, and didn't see any for long message placement. I also try adding LMSG(field name) in )BODY se ...

I inputed errorneous data in one of the )MODEL field. When I press PF1 to look at the long message, it is displayed below the error data, covering the input data on the next row. I want to relocated ...

On the ISPF panel, I defined 5 fields: ZCMD, FLD1, FLD2, FLD3, FLD4. FLD1 to FLD4 are within the )MODEL, and ZCMD is required for table display.

address 'ISPEXEC' "TBDISPL TABLE1 PANEL(PA ...

asr2,

The *REXX code does the trick. Thanks. The manual mentioned numeric comparison only works on whole number (character comparison for decimal).