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!

  • Congratulations Mike Lewis 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: *

  1. alphonsus

    Function to extract characters from a column value?

    Hi, did you take a look at the Sql REPLACE function? Good luck, Alphonsus.
  2. alphonsus

    db2 linux odbc startup problem

    Hi Gareth, try using a higher port number (above 1024) and be sure that nobody's using it (50000/50001 are the default for DB2/Linux). Ex: db2cxxxx 50000/tcp # Connection port for DB2 db2ixxxx 50001/tct # Interrupt port for DB2 HTH, Alphonsus.
  3. alphonsus

    Migrate a table from Foxpro 2.6 to DB2

    Hi Lucian, I don't know anything about FoxPro, but I think it shouldn't be hard to generate a plain text file with delimiters. If you can do this it would be easy to import it to DB2, using Import or Load. HTH, Alphonsus. P.S. Talking about V6 on a Linux box.
  4. alphonsus

    Error in inserting line

    Hi all, we're using Delphi 5.0 and DB2 6.1 (Linux) connected through ODBC. We have a Form with a DBMemo that maps into a varchar(3000) field. Everything works fine as long as you type something in this field. If it's blank it gives back the message below. General SQL error. [IBM][CLI...
  5. alphonsus

    Quarter Date Format -Urgent

    Try something like this (use your date separator): select quarter(date('01/'||month_no||'/'||year_no)), year_no, sum(amount) from t1 a, t2 b where a.calendar_id = b.calendar_id group by quarter(date('01/'||month_no||'/'||year_no)), year_no HTH, Alphonsus.
  6. alphonsus

    Readin a DFM file

    Hi all, we need to write a procedure that reads a DFM file and assigns the Form defined in it to program variable, so that we can add Components to it (won't be visual). This program should not rely on any of IDE's feature. Any help will be welcomed. Thanks, Alphonsus.
  7. alphonsus

    Hi all, let's say I have

    Yes Raz, this is what I need. Is it possible to pass parameters??? Thanks a lot, Alphonsus.
  8. alphonsus

    how do i make scrolling text?

    This is just an idea to help you. Change the sleep time and the size you want to print each time (nSize) to get the efects you want. If it needs to run forever create a different thread. var sAux: String; nLength: Integer; nSize: Integer; nPos: integer; bLeave: Boolean; begin...
  9. alphonsus

    Hi all, let's say I have

    Hi all, let's say I have a Form with an Edit box and some public methods. The user will type the name of the method in the Edit box and the program will execute it. In other words: in Runtime I need to execute a method having only it's name as a String. Any help??? Thanks...
  10. alphonsus

    DEADLOCK OR TIMEOUT?

    Hello, maybe this can help: while your application is hanging, issue the command at the OS prompt (open another session) &quot;db2 get snapshot for locks on <YourDb>&quot; and look for an Application with Lock-wait status. If you're using the correct monitor it should say who is holding...
  11. alphonsus

    TQuery memory access violation

    Just to make a test: pass &quot;nil&quot; when creating the Query. It may be that the component you're passing as the owner is being destoyed somewhere else in the program so destroying its children also. Hope it helps, Alphonsus.
  12. alphonsus

    Globally Clear Multiple Edit Boxes

    You can use Form's Components property as bellow: procedure TForm1.ClearEdit; var j: Integer; nComp : Integer; begin nComp := ComponentCount -1; if nComp >= 0 then begin for j := 0 to nComp do begin if Components[j] is TEdit then begin...
  13. alphonsus

    Oracle to DB2 conversion...

    Try this select a.col_x from outtable a left outer join intable b on a.col_y = b.col_y where a.col_n = 'xxxx' Regards, Alphonsus.
  14. alphonsus

    Edit Input to Edit Box

    Or you can try this: procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if not ((Key >= #48) and (Key <= #57)) then begin Key := #0; end; end; HTH, Alphonsus.
  15. alphonsus

    Hierarchical queries

    Hi William, download one of the Cookbooks that exists in this site and take a look in the Chapter &quot;Recursive SQL&quot; http://ourworld.compuserve.com/homepages/Graeme_Birchall/HTM_COOK.HTM Regards, Alphonsus.
  16. alphonsus

    All forms in an application

    Have you tried the Screen.Forms ? Alphonsus.

Part and Inventory Search

Back
Top