DOS accounting system to TWeb

User avatar
Otto
Posts: 4470
Joined: Fri Oct 07, 2005 7:07 pm
Contact:

Re: DOS accounting system to TWeb

Post by Otto »

Hello Carlos,
thank you for your advice and posting your screen shot.
In this case starting with TWeb my callenge is to program a clone of my DOS program.
The start screen is ready.
Best regards
Otto

Image
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org

********************************************************************
hua
Posts: 861
Joined: Fri Oct 28, 2005 2:27 am

Re: DOS accounting system to TWeb

Post by hua »

Thank you for sharing with us your step by step progress Otto. Am looking forward to learn from your experience
FWH 11.08/FWH 19.03
xHarbour 1.2.1 (Rev 6406) + BCC
Harbour 3.1 (Rev 17062) + BCC
Harbour 3.2.0dev (r1904111533) + BCC
User avatar
Otto
Posts: 4470
Joined: Fri Oct 07, 2005 7:07 pm
Contact:

Re: DOS accounting system to TWeb

Post by Otto »

Hello Hua,
thank you for your kind words.

Code: Select all

//DOS CLIPPER
box(22,5,24,75,"",atoattr(farb[5]))
aprint(23,12,padr("             "+chr(24)+"/"+chr(25)+" = Auswahl  "+;
                chr(27)+chr(196)+chr(217)+ " = Entscheidung ", 57),atoattr(farb[5]))

//TWEB  
$oGroup = new TGroup( $oWnd, 'mygroup' , 415, 10,'' );  
$oGroup->SetRight( 10 );        
$oGroup->SetBottom( 10 );       

    
$oBtn = new TButton( $oGroup, 'mybutton' , 6, 10,  '↑', 'dummy()', 22,25 );    
$oBtn = new TButton( $oGroup, 'mybutton' , 6, 40,  '↓', 'dummy()', 22,25 );    
$oBtn = new TButton( $oGroup, 'mybutton' , 6,620 , '↵', 'dummy()', 20,25 );
 
Now I will try to open and close "WINDOWS" like I had in my DOS APP. ENTER / ESC to navigate.
Best regards
Otto


Image
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org

********************************************************************
User avatar
MauroArevalo
Posts: 98
Joined: Thu Jan 19, 2006 11:47 pm
Location: Bogota DC. Colombia
Contact:

Re: DOS accounting system to TWeb

Post by MauroArevalo »

Otto:

Congratulations, I'm following you, thank you for sharing your results.
Edgar Mauricio Arévalo Mogollón.
Bogotá DC. Colombia
FWH 19.06 xHarbour 1.2.1, Pelles C, Fivedit, Borland 7.30
http://www.hymplus.com
Tratando de retomar la programación....
User avatar
Otto
Posts: 4470
Joined: Fri Oct 07, 2005 7:07 pm
Contact:

Re: DOS accounting system to TWeb

Post by Otto »

Hello Mauro,
I am glad you like it and hope you join development.

I will publish a download and test link.
Now I have keyboard and mouse navigation ( DOS style ) ready.
Best regards
Otto
Image
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org

********************************************************************
User avatar
TimStone
Posts: 2536
Joined: Fri Oct 07, 2005 1:45 pm
Location: Trabuco Canyon, CA USA
Contact:

Re: DOS accounting system to TWeb

Post by TimStone »

Otto,

It's nice work. Where do we find tWeb ? I could consider exploring that in the coming months.

I would like to share one thought, however, about the whole idea of duplicating a DOS based system. When I moved from DOS to Windows programming in 1999, many of my clients were resisting the new look of the interface. However, once they actually experienced how much easier it is to have Windows in charge, and how you can do so many different operations from one window, they fell in love with the time savings. Yes, there was a period of adjustment, but it didn't last long and none of them are unhappy.

One thing I learned is that people who use tools ( like computers ) don't often like change. However, they do like saving time, and especially with computers, saving keystrokes.

Tim
Tim Stone
http://www.MasterLinkSoftware.com
timstone@masterlinksoftware.com
Using: FWH 19.06 with Harbour 3.2.0 / Microsoft Visual Studio Community 2019
Marc Vanzegbroeck
Posts: 1102
Joined: Mon Oct 17, 2005 5:41 am
Location: Belgium
Contact:

Re: DOS accounting system to TWeb

Post by Marc Vanzegbroeck »

Regards,
Marc

FWH32+xHarbour | FWH64+Harbour | BCC | DBF | ADO+MySQL | ADO+MariaDB | ADO+SQLite
User avatar
Otto
Posts: 4470
Joined: Fri Oct 07, 2005 7:07 pm
Contact:

Re: DOS accounting system to TWeb

Post by Otto »

Test link: https://winhotel.space/tweb.fibu/test_folder_grid.php


Hello,
Navigation is ready.
You can navigate with the scroll keys select with ENTER key and go back with ESC key.
I inserted for submenus screen shots from the DOS program. For cloning this seems a good solution.
Please look how speedy the APP works.
Now I re-program the screens and function.
Best regards
Otto


Image
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org

********************************************************************
User avatar
Otto
Posts: 4470
Joined: Fri Oct 07, 2005 7:07 pm
Contact:

Re: DOS accounting system to TWeb

Post by Otto »

Hello,
I wish you all a happy Easter.
After Easter I will continue to work on my project and will post my questions again.
All the best
Otto
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org

********************************************************************
User avatar
Otto
Posts: 4470
Joined: Fri Oct 07, 2005 7:07 pm
Contact:

Re: DOS accounting system to TWeb

Post by Otto »

https://winhotel.space/tweb.examples/we ... e/main.php

Hello,
I am a bit further with my DOS-like navigation.
You can navigate to a menu entry with scroll buttons, select with ENTER and back with ESC button.

Here you can already test:

Módulos -> Tablas / Tables
-> Fibu
There are dummy screens here.

Stammdatenwartung works already.
With ENTER you select and then you can get off with ESC again.

Best regards
Otto


Image
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org

********************************************************************
User avatar
Otto
Posts: 4470
Joined: Fri Oct 07, 2005 7:07 pm
Contact:

Re: DOS accounting system to TWeb

Post by Otto »

Hello,
I would like to give you an update about the status of the development.
I could realize all what I wanted with TWeb so fare.
I have completely the same navigation like we had in our DOS program and this is for selling an update to our existing customers very important.
My windows version flopped.

https://my3zinnen.com/tweb.myexamples/w ... g/main.php

You can try following menu point which are ready:
try using ENTER and ESC - at the moment we are working on F2/F3 new/edit keys.
Anzeige + Druckprogramme opens a submenu
Stammdatenwartung opens a new window with a grid

Data is coming from SQL. For uploading and converting the dbf files to the server we use following Fivewin function:

Code: Select all

function f_op()

  local cTable := "op"

   oCn   := maria_Connect( cServer,  "fibu", "user", "pw" )
   IF oCn == nil
      ? "Connect fail"
      RETURN NIL
   ENDIF
  

   IF oCn:TableExists( cTable )
      oCn:DropTable( cTable )
   ENDIF

        //This opens the dbf file, creates a table with the same structure and copies the data. By default, it creates the table with the same name as the dbf. If we want a different table name, we can give that as the second paramter.

    oCn:ImportFromDBF( "c:\TWeb\fibu dbf files\OP.DBF" )
      


   oCn:Close()

close
return nil
//-----------------------------------
 
Best regards
Otto
Anzeige + Druckprogramme opens a submenu
Stammdatenwartung opens a new window with a grid

https://my3zinnen.com/tweb.myexamples/w ... g/main.php
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org

********************************************************************
User avatar
Otto
Posts: 4470
Joined: Fri Oct 07, 2005 7:07 pm
Contact:

Re: DOS accounting system to TWeb

Post by Otto »

Hello,

now you can navigate from grid with "F2" key and open an input form.
From menu
<Stammdatenwartung> then the grid is opened
F2 is same as new button

https://my3zinnen.com/tweb.myexamples/w ... g/main.php

Best regards
Otto
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org

********************************************************************
User avatar
Otto
Posts: 4470
Joined: Fri Oct 07, 2005 7:07 pm
Contact:

Re: DOS accounting system to TWeb

Post by Otto »

Hello,
I would like to post a new link for a test.
Many functions are ready.

https://my3zinnen.com/tweb.myexamples/w ... g/main.php

Best regards
Otto
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org

********************************************************************
User avatar
Otto
Posts: 4470
Joined: Fri Oct 07, 2005 7:07 pm
Contact:

Re: DOS accounting system to TWeb

Post by Otto »

Hello,

In the meantime I have switched to mod harbour. TWeb is ready for mod harbour.

I take my existing desktop program and make some changes there.

Changes in source code - Fivewin local server calls fibu.exe if there is a request.

Requests are handled with the help of files. If there is a new request file in the directory, the exe is started.

If the fibu.exe is started with a parameter, then the function which creates the reports is called directly.

There are only very few changes in the source code necessary.


Code from 1995 rock-solid proved over the years creates the web report with very few changes.

No testing is needed. WOW.


The PDF printer driver converts the report to PDF files, which you view in mod harbour over the internet.

Antonio, thank you so much for mod harbour.

Have a nice Sunday
Otto


Image

Image

Image
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org

********************************************************************
User avatar
Otto
Posts: 4470
Joined: Fri Oct 07, 2005 7:07 pm
Contact:

Re: DOS accounting system to TWeb

Post by Otto »

... with only these little changes my reports are now internet reports.

Best regards,
Otto


Image

Setup PDF driver

Image
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org

********************************************************************
Post Reply