Author |
Message |
Topic: Wait in COBOL |
Mickeyd
Replies: 15
Views: 36304
|
Forum: Application Programming Posted: Fri Jan 29, 2016 12:19 pm Subject: Wait in COBOL |
Kolusu, this is a big no at my data center, its handled through the job scheduler
where if a resource is being used by another job it waits to submit this job |
Topic: Wait in COBOL |
Mickeyd
Replies: 15
Views: 36304
|
Forum: Application Programming Posted: Fri Jan 29, 2016 10:04 am Subject: Wait in COBOL |
first question why are you trying to do this?? you may get fired from your job if they find out your holding up a resource in a batch job |
Topic: Arrays in DB2 Stored Procedure |
Mickeyd
Replies: 3
Views: 5060
|
Forum: Database Posted: Thu Oct 22, 2015 8:49 am Subject: Arrays in DB2 Stored Procedure |
the mainframe will not THROW errors or anything else. |
Topic: Diff between CALL and SELECT |
Mickeyd
Replies: 12
Views: 15956
|
Forum: TSO and ISPF Posted: Fri Apr 13, 2012 5:24 pm Subject: Diff between CALL and SELECT |
This is what you select command should look like,
"SELECT PGM(ISRSUPC) PARM(SRCHCMP,ANYC,FINDALL)" |
Topic: Location of Long message of TBDISPL |
Mickeyd
Replies: 12
Views: 14583
|
Forum: TSO and ISPF Posted: Fri Nov 18, 2011 2:45 pm Subject: Location of Long message of TBDISPL |
I would also remove the Z for the command and for the long message and use
ZCMD and LNGMSG. also remove the ZCmd LngMsg for the ZVARS. |
Topic: Location of Long message of TBDISPL |
Mickeyd
Replies: 12
Views: 14583
|
Forum: TSO and ISPF Posted: Fri Nov 18, 2011 2:41 pm Subject: Location of Long message of TBDISPL |
and with the + sign following your message is on 6 characters long. Your command is only 1 character. Also change your LSMG(lngmsg) to SMSG(lngmsg)
correct your @z + to the correct length.. and s ... |
Topic: How to position cursor after scrolling |
Mickeyd
Replies: 3
Views: 3941
|
Forum: TSO and ISPF Posted: Thu Nov 17, 2011 5:28 pm Subject: How to position cursor after scrolling |
as you can see I have used the cursor option in the Rexx and as you can see by the panel fields how the cursor is placed to the correct field..
The first Z variable is for the SELECT field..
& ... |
Topic: Location of Long message of TBDISPL |
Mickeyd
Replies: 12
Views: 14583
|
Forum: TSO and ISPF Posted: Thu Nov 17, 2011 5:22 pm Subject: Location of Long message of TBDISPL |
you did not place the LNGMSG in the panel, which means you did not even look
at the panel body I included or you would have seen {SMSG on the 3rd line. |
Topic: Location of Long message of TBDISPL |
Mickeyd
Replies: 12
Views: 14583
|
Forum: TSO and ISPF Posted: Tue Nov 15, 2011 1:30 pm Subject: Location of Long message of TBDISPL |
you can do the following in the panel to reloacte any message (Short or Long)
)BODY WINDOW(80,24) EXPAND(\\) SMSG(SMSGS) LMSG(LMSGS)
)BODY EXPAND( ... |
Topic: Location of Long message of TBDISPL |
Mickeyd
Replies: 12
Views: 14583
|
Forum: TSO and ISPF Posted: Tue Nov 15, 2011 1:29 pm Subject: Location of Long message of TBDISPL |
you can do the following in the panel to reloacte any message (Short or Long)
{ TYPE(OUTPUT) INTENS(HIGH) SKIP(ON) COLOR(PINK)
)BODY WINDOW(80,24 ... |
Topic: Location of Long message of TBDISPL |
Mickeyd
Replies: 12
Views: 14583
|
Forum: TSO and ISPF Posted: Mon Nov 14, 2011 5:48 pm Subject: Location of Long message of TBDISPL |
Show me your panel, and how did you set the zdtmsg in your rexx..?? |
Topic: How to run external routine dynamically in REXX |
Mickeyd
Replies: 9
Views: 8145
|
Forum: TSO and ISPF Posted: Fri Feb 01, 2008 3:16 pm Subject: How to run external routine dynamically in REXX |
DSN = 'abcdef.abc.PS5106.UBE.U.A11208.B122'
PGM = SUBSTR(DSN,12,06)||'SW'
PGM "'"DSN"'"
EXIT 0 |
Topic: Need 2 restrict user from logging multiple times |
Mickeyd
Replies: 4
Views: 2692
|
Forum: CICS and Middleware Posted: Wed Jan 09, 2008 5:51 pm Subject: Need 2 restrict user from logging multiple times |
You could issue a INQUIRE TERMINAL command. loop thru looking for the USERID
and the Transaction id. If you do not found a match then continue with you program otherwise display a message and termina ... |
Topic: Receive Protected field values |
Mickeyd
Replies: 4
Views: 2716
|
Forum: CICS and Middleware Posted: Fri Jul 20, 2007 1:00 pm Subject: Receive Protected field values |
Are you doing a send map with ERASE or DATAONLY.??? |
Topic: Date to Integer |
Mickeyd
Replies: 8
Views: 4119
|
Forum: Application Programming Posted: Fri Jul 20, 2007 12:56 pm Subject: Date to Integer |
If both dates are in the form yyyymmdd then just substract the 2 dates. |
|