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 Shaun E 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. mjcmkrsr

    List Out Missing Numbers of a Number Range

    I understand, but I nowhere found this kind "mistrust" - neither in the "Hacker's Guide" nor in Tamar's many papers on SQL. May be she could chime in for further input. TIA MarK
  2. mjcmkrsr

    List Out Missing Numbers of a Number Range

    Hi Chriss, Could you please explain. TIA MarK
  3. mjcmkrsr

    List Out Missing Numbers of a Number Range

    Hi Chriss, Thanks. Works now. Best with SET DELETED ON - otherwise you see the records marked for deletion ;) MarK
  4. mjcmkrsr

    List Out Missing Numbers of a Number Range

    Hi Chriss, I tested your code. Unfortunately it has one flaw and one misspelling If you insert this line you'll have 0 as missing value - which does not make sense Should read = Seek(Gaps.iGapStart, ...) Below your code with my suggestions Create Cursor Gaps (iGapStart I, iGapEnd I)...
  5. mjcmkrsr

    List Out Missing Numbers of a Number Range

    Hi, Yes, now it works - even in VFP9 ;) MarK
  6. mjcmkrsr

    List Out Missing Numbers of a Number Range

    Hi mmerlinn, I tested your code. Unfortunately I found one little flaw: the results show that there are dupes, but do NOT show how many times the same value is present in the table hth MarK
  7. mjcmkrsr

    List Out Missing Numbers of a Number Range

    Hi, Just for fun : sketch of code to show the correct values, the missing values and duplicate values in a given range. *!* good values, missing values and duplicates PUBLIC goFormSales goFormSales=NEWOBJECT("clsForm") goFormSales.Show Read Events Close all Clear All RETURN...
  8. mjcmkrsr

    List Out Missing Numbers of a Number Range

    Hi Yes - ALL values in the chosen range. In your case laAllValues[1] = 15 and laAllValues[2] = 1 hth MarK
  9. mjcmkrsr

    List Out Missing Numbers of a Number Range

    Hi, Please find below a sketch of code. Feel free to adapt to your needs. LOCAL ARRAY laAllValues[1] CREATE CURSOR csrValues (iValue I) FOR i = 1 TO 25 INSERT INTO csrValues VALUES (INT(RAND() * 50)) ENDFOR SELECT MAX(iValue), MIN(iValue) FROM csrValues INTO ARRAY laAllValues CREATE...
  10. mjcmkrsr

    Variables: NULL vs RELEASE

    Please do also have a look at https://www.tek-tips.com/threads/null-or-null.1828940/ hth MarK
  11. mjcmkrsr

    Visual foxpro matrix framework

    Hi, Please have a look at https://www.tek-tips.com/threads/need-expert-level-promatrix-help.1824078/ hth MarK
  12. mjcmkrsr

    SQL Command to Show Monthly Sales Including Months with Zero Sales

    Hi, ... and my 2c &&& ldDate any local date variable &&& the functions: d to show that it is a DATE - First Day of Month - Last Day of Month dFDofMonth = ldDate - DAY(ldDate) + 1 dLDofMonth = GoMonth(ldDate,1) - Day(GoMonth(ldDate,1)) MarK
  13. mjcmkrsr

    SQL Command to Show Monthly Sales Including Months with Zero Sales

    Hi, ... and my contribution PUBLIC goFormSales goFormSales=NEWOBJECT("clsForm") goFormSales.Show Read Events Close all Clear All RETURN ************************************************** DEFINE CLASS clsForm AS form AutoCenter = .T. Caption = "Grid with calculated columns"...
  14. mjcmkrsr

    Reading MySQL 8 encoded data into VFP9

    Hi Gguerra, A little demo how you may handle memo fields in an editbox on a form, an editbox in a grid and as MEMO field in a grid. PUBLIC go_Form go_Form = CREATEOBJECT("clsForm") go_Form.Visible = .T. go_Form.Show READ Events CLOSE ALL CLEAR ALL RETURN ********* DEFINE CLASS clsForm...
  15. mjcmkrsr

    Persistent error in storing JPG in general field VFP 9.0: OLE error code 0x80040011: Not able to convert object.

    ... Thanks Chriss. I don't have anything to add to your explanations and couldn't have done it better. No, this was demo code for pictures in a grid - nothing more and nothing less. Adding pictures to a form or report is straightforward - see adapted code below. Public goForm goForm =...
  16. mjcmkrsr

    Persistent error in storing JPG in general field VFP 9.0: OLE error code 0x80040011: Not able to convert object.

    ... and some demo code (pictures in a grid) to illustrate Chriss's advice Public oForm oForm = Createobject('myForm') oForm.Show() READ EVENTS CLOSE ALL CLEAR ALL ********** DEFINE Class myForm As Form Height = 360 Width = 840 MinWidth = This.Width MaxWidth = This.Width Add...
  17. mjcmkrsr

    What is the correct or best approach in editing a table?

    Hi Doug, You'll need this unique record identifier at the latest asa your table is part of an updatable view Your're right - the RECNO() order won't change but the RECNO() WILL change, and you won't be able to find the formerly associated record hth MarK
  18. mjcmkrsr

    What is the correct or best approach in editing a table?

    ... and to illustrate Chriss's explanations - post above paragraph 2 - please see demo code below. SET DELETED ON CLOSE ALL &&& Create cursor with names CREATE CURSOR curNames (cPKey C(4), cName C(10)) INSERT INTO curNames VALUES ( "1000","Joe") INSERT INTO curNames VALUES ( "1001","Sam")...
  19. mjcmkrsr

    What is the correct or best approach in editing a table?

    Hi Mandy, Maybe REPLACE won't work either if you cannot determine the reason why UPDATE sometimes works and sometimes not hth MarK
  20. mjcmkrsr

    What is the correct or best approach in editing a table?

    Hi Mandy, If you occasionally have to update the transaction table you could use a filtered browse e.g. use transaction table browse for transactionid = "0001" and do the required updates or replace in transaction all amounts with 890 for amount = 340 and transactioncode = "0001" or...

Part and Inventory Search

Back
Top