Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations Chriss Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: tcurrier
  • Content: Threads
  • Order by date
  1. tcurrier

    Concatenate to ISPLLIB ?

    In a Rexx exec, I am trying to concatenate 2 private libraries to ISPLLIB as follows: ADDRESS TSO "ALLOC FI(MYLIB1) SHR DA('H2501S.T.DYNAMIC.LIBZ00')" IF RC = 0 THEN CONCAT ISPLLIB MYLIB1 ADDRESS TSO "ALLOC FI(MYLIB2) SHR DA('H2501S.T.DYNAMIC.LIBZ01')" IF RC = 0...
  2. tcurrier

    capture terminal displays from Rexx / External Program call

    I have a Rexx exec that calls a program (actually I think it might be an assembler program, it's vendor supplied). When it runs, there are displays from the program that show up on the screen that I would like to capture to a dataset. I've tried allocating SYSPRINT, SYSOUT, TERMINAL, etc...
  3. tcurrier

    passing parm with '/' to COBOL pgm - error

    I'm not sure which forum this belongs in, but here goes anyway : I am trying to pass a parm to a program via a Rexx exec using LINKPGM : EPAPARM = "/ADFPTVWUMAH5" ADDRESS LINKPGM 'EPA ' EPAPARM I am getting a return code -2 on the ADDRESS LINKPGM command. So, I created another dummy...
  4. tcurrier

    calling LMDINIT from Rexx ?

    I know I'm probably missing something basic here, but I am trying to write a Rexx exec to check if a dataset is migrated, using LMDINIT. I'm getting RC -3 on the 'lmdinit' and 'lmdlist' commands. Thanks for any info... //TSOBATCH EXEC PGM=IKJEFT01,PARM='%MIGDSNS' //SYSTSIN...
  5. tcurrier

    Why do these strings compare ?

    Can anyone tell me why this expression turns out 'true' ? str1 = '1234567891' str2 = '1234567890' if str1 = str2 then say "they're equal" else say "they're not equal" If I compare 2 strings with lengths between 1 and 9, and the last...
  6. tcurrier

    HILITE REXX not working ?

    Does anyone know why, when I type HILITE REXX on the command line, I get a message 'INVALID TERMINAL' ? A co-worker has the same settings as I do, and it works fine for him. Thanks for any help...
  7. tcurrier

    ISREDIT - position cursor on command line

    Can anyone tell me what ISREDIT command can I use to position the cursor at the beginning of the command line ? I tried: "ISREDIT CURSOR = 0 0" but that doesn't work.... Thanks for any help...
  8. tcurrier

    Continue a line in QMF ?

    Is there a way to continue a line in QMF ? I need to concatenate a few fields and they all won't fit on one line: field1 || field2 || field3 || ... etc.. Thanks for any help ....
  9. tcurrier

    QMF - 'Group By' with substringed column

    Is there a way to do a 'Group by' on a substringed column ? SELECT SUBSTR(MY_FIELD,1,4), COUNT(*) FROM MYDATABASE.MYTABLE WHERE STATE = '20' AND STATUS = '1' GROUP BY (MY_FIELD,1,4) <--- ????? Thanks for any help !
  10. tcurrier

    Suppressing 'dataset deleted' message

    This isn't really a Rexx question, but in my Rexx exec I have the following: ADDRESS TSO "DELETE '"||MY.DATASET||"'" Is there any way to prevent the 'deleted' message from appearing on the screen ? IDC0550I ENTRY (A) MY.DATASET DELETED If not, is there another way to delete a dataset that...
  11. tcurrier

    Rexx / ISREDIT Macro - Insert new line

    I need to write an ISREDIT macro to insert a new line at the bottom of a file.. Can anyone help with this ? Thanks...
  12. tcurrier

    Open Lotus Notes Database View from VB

    I have a Visual Basic program from which I'd like to set up a command button, that when clicked, will bring up a Lotus Notes Database view. The database apparently opens, but I'm unable to bring up the 'VIEW'. Can anyone help me out with what I'm missing here? Thanks! Here is the code...
  13. tcurrier

    Connecting to Lotus Notes Database View from VB

    I have a Visual Basic program from which I'd like to set up a command button, that when clicked, will bring up a Lotus Notes Database view. The database apparently opens, but I'm unable to bring up the 'VIEW'. Thanks for any help ! Here is the code: Public Sub openupdb() Dim notesdb As...
  14. tcurrier

    Object Variable or with Block Variable Not Set

    I'm having trouble with one particular user's machine, where my application gets a RUN TIME ERROR '91' - 'OBJECT VARIALBE OR WITH BLOCK VARIABLE NOT SET'.<br> <br> Does anyone have any information on this error? On the Microsoft Web site it says that the error may occur during the Package and...

Part and Inventory Search

Back
Top