Search results

  1. M

    Data type conversion: handle - inte - handle

    Or convert it to STRING then to WIDGET-HANDLE. Like this: variablename = WIDGET-HANDLE(STRING(table.fieldname))
  2. M

    Pointer to Pointer passing to an api.

    Chris, if you want more information about using Windows API from Progress you can use this site - http://www.global-shared.com/api/
  3. M

    Pointer to Pointer passing to an api.

    Hi Chris, what I did was that I stored a copy of the required parameter somewhere where I can get a pointer to it (memptr), then I stored the pointer somewhere where I can get a pointer to it, made it a null terminated list and passed the second pointer to the function - pointer to list of...
  4. M

    Pointer to Pointer passing to an api.

    No, because when the parameter is character or it's an output paramater Progress automatically passes pointer to the variable instead of the variable itself.
  5. M

    Pointer to Pointer passing to an api.

    Hi Chris, something like this should do the trick: DEF VAR vRESULT AS CHAR. DEF VAR vLENGTH AS INT. DEF VAR vPROG AS CHAR. DEF VAR vPARAM1 AS CHAR. DEF VAR vPARAM AS MEMPTR. DEF VAR vTEMP AS MEMPTR. ASSIGN vRESULT = FILL(" ",256) vPROG = FILL(" ",256). PROCEDURE SSubmitJobA...
  6. M

    Progress clients with non-Progress DB

    Let's say we have an application written in Progress v8. The idea is to replace the Progress DB server with non-Progress DB (preferably freeware) to lower the cost of the product for smaller companies (and to continue using Progress clients). Is this even possible? And if yes what changes...
  7. M

    Changing BGColor of Browse Calc field

    More simple solution is to define the calculated field like this: field1 + field2 @ Variable Then you can set the bgcolor like this: Variable:BGCOLOR IN BROWSE br-Table = 15.
  8. M

    Problem with loading delta.df via a program

    Another possibility could be to take the source code of loaddf.r, modify if so it wouldn't display alert-box on error and use the modified version instead.
  9. M

    Problem with loading delta.df via a program

    Hi Marco, Try running loaddf.r from a window which contains a message-area and make sure the SESSION:APPL-ALERT-BOXES is set to FALSE. It could write the message into the message area instead of to alert-box.
  10. M

    Browse Columns

    Emma you could also use this in row-display - ASSIGN variablename:BGCOLOR IN BROWSE {&BROWSE-NAME} = color ... . for each variable you're displaying in the browse.
  11. M

    Setting attribs of Files in Progress

    You can use these external procedures: &SCOPED-DEFINE FILE_ATTRIBUTE_READONLY 1 &SCOPED-DEFINE FILE_ATTRIBUTE_HIDDEN 2 &SCOPED-DEFINE FILE_ATTRIBUTE_SYSTEM 4 &SCOPED-DEFINE FILE_ATTRIBUTE_DIRECTORY 16 &SCOPED-DEFINE FILE_ATTRIBUTE_ARCHIVE 32 &SCOPED-DEFINE FILE_ATTRIBUTE_NORMAL 128...
  12. M

    Existing Unique Index Warning

    Try adding these statements: RELEASE TestTable NO-ERROR. IF ERROR-STATUS:ERROR THEN UNDO Load-Block, NEXT Load-Block. before the END. statement in previous algorithm.
  13. M

    Inputting a full line (without knowing how many fields)

    def var cLine as char. input from "file.ext". import unformatted cLine. input close.
  14. M

    Progress dlc directory from registry

    Hi J, I think you're looking for something like this: DEFINE VARIABLE cDLC AS CHARACTER NO-UNDO. GET-KEY-VALUE SECTION "Startup" KEY "DLC" VALUE cDLC. IF cDLC = ? THEN GET-KEY-VALUE SECTION "WinChar Startup" KEY "DLC" VALUE cDLC. IF SUBSTRING(cDLC, LENGTH(cDLC), 1) = "/" OR...
  15. M

    break by 'character field'

    Kenneth, I'm quite sure. I can run this too: DEFINE TEMP-TABLE tt FIELD cField AS CHAR. CREATE tt. tt.cField = "a". CREATE tt. tt.cField = "b". FOR EACH tt BREAK BY SUBSTRING(tt.cField,1,197) BY SUBSTRING(tt.cField,198): DISPLAY tt.cField. END. But when I run this: DEFINE...
  16. M

    Number of records in table

    Hi J, you can try this, but I don't know if it's faster (test yourself). DEFINE QUERY qTemp FOR {table-name} FIELDS. OPEN QUERY qTemp PRESELECT EACH {table-name} NO-LOCK. iCount = NUM-RESULTS("qTemp"). CLOSE QUERY qTemp. DISPLAY iCount.
  17. M

    using functions within an open query where clause

    Hi, the reason is quite simple: 1) the function gets called before the open query statement and only the result is used in it 2) in your program the buffer t-Trx is empty but progress doesn't raise an error and returns no values in the query
  18. M

    break by 'character field'

    Hi Kenneth. No it doesn't work if length(fieldname)>=197.
  19. M

    number of connected users

    So I enabled the VST's and it's working now. Thanks guys. Just two questions though: What's the difference between active and current connections (or more precisely which one is which)? and How does batch connections count to it (is it contained in one of the former or is it counted separately)?
  20. M

    Error 1077 ???

    Hi, we have Progress 8.3C (the DB version is 8.3B (i think)) running on Win2K. The problem is when I try to run "_mprshut.exe -pf pffile" it writes: INTERNAL ERROR: pnmsgbuf chain in inconsistent state SYSTEM ERROR: Attempt to free buffer type 2. (1077) Apart from this the DB seems to work...
Top