DOS accounting system to TWeb

Re: DOS accounting system to TWeb

Postby Otto » Tue Apr 09, 2019 10:25 pm

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
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 5994
Joined: Fri Oct 07, 2005 7:07 pm

Re: DOS accounting system to TWeb

Postby hua » Wed Apr 10, 2019 2:38 am

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.12
BCC5.82/BCC7.3
xHarbour/Harbour
hua
 
Posts: 1034
Joined: Fri Oct 28, 2005 2:27 am

Re: DOS accounting system to TWeb

Postby Otto » Wed Apr 10, 2019 9:58 am

Hello Hua,
thank you for your kind words.

Code: Select all  Expand view
//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
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 5994
Joined: Fri Oct 07, 2005 7:07 pm

Re: DOS accounting system to TWeb

Postby MauroArevalo » Wed Apr 10, 2019 11:09 pm

Otto:

Congratulations, I'm following you, thank you for sharing your results.
Edgar Mauricio Arévalo Mogollón.
Bogotá DC. Colombia
FWH FTDN, xHarbour 1.2.1, Pelles C, Fivedit, Visual Studio Code, Borland 7.30, Mysql, Dbfs
http://www.hymplus.com http://www.hymlyma.com
Tratando de retomar la programación....
User avatar
MauroArevalo
 
Posts: 105
Joined: Thu Jan 19, 2006 11:47 pm
Location: Bogota DC. Colombia

Re: DOS accounting system to TWeb

Postby Otto » Thu Apr 11, 2019 7:03 pm

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
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 5994
Joined: Fri Oct 07, 2005 7:07 pm

Re: DOS accounting system to TWeb

Postby TimStone » Fri Apr 12, 2019 4:32 pm

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
http://www.autoshopwriter.com
timstone@masterlinksoftware.com
Using: FWH 23.10 with Harbour 3.2.0 / Microsoft Visual Studio Community 2022-24 32/64 bit
User avatar
TimStone
 
Posts: 2897
Joined: Fri Oct 07, 2005 1:45 pm
Location: Trabuco Canyon, CA USA

Re: DOS accounting system to TWeb

Postby Marc Vanzegbroeck » Fri Apr 12, 2019 5:07 pm

Regards,
Marc

FWH32+xHarbour | FWH64+Harbour | BCC | DBF | ADO+MySQL | ADO+MariaDB | ADO+SQLite
Marc Vanzegbroeck
 
Posts: 1157
Joined: Mon Oct 17, 2005 5:41 am
Location: Belgium

Re: DOS accounting system to TWeb

Postby Otto » Sat Apr 13, 2019 8:19 pm

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
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 5994
Joined: Fri Oct 07, 2005 7:07 pm

Re: DOS accounting system to TWeb

Postby Otto » Thu Apr 18, 2019 11:49 am

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
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 5994
Joined: Fri Oct 07, 2005 7:07 pm

Re: DOS accounting system to TWeb

Postby Otto » Wed Apr 24, 2019 8:36 am

https://winhotel.space/tweb.examples/web/invoice/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
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 5994
Joined: Fri Oct 07, 2005 7:07 pm

Re: DOS accounting system to TWeb

Postby Otto » Thu May 09, 2019 2:45 pm

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/web/accounting/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  Expand view
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/web/accounting/main.php
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 5994
Joined: Fri Oct 07, 2005 7:07 pm

Re: DOS accounting system to TWeb

Postby Otto » Fri May 10, 2019 5:07 pm

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/web/accounting/main.php

Best regards
Otto
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 5994
Joined: Fri Oct 07, 2005 7:07 pm

Re: DOS accounting system to TWeb

Postby Otto » Thu May 30, 2019 6:19 pm

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
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 5994
Joined: Fri Oct 07, 2005 7:07 pm

Re: DOS accounting system to TWeb

Postby Otto » Sat Sep 12, 2020 6:28 pm

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
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 5994
Joined: Fri Oct 07, 2005 7:07 pm

Re: DOS accounting system to TWeb

Postby Otto » Sat Sep 12, 2020 6:36 pm

... 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
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 5994
Joined: Fri Oct 07, 2005 7:07 pm

PreviousNext

Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 8 guests