prg code function documentor in HMG

General Help regarding HMG, Compilation, Linking, Samples

Moderator: Rathinagiri

User avatar
Anand
Posts: 430
Joined: Tue May 24, 2016 4:36 pm
DBs Used: DBF
Has thanked: 128 times
Been thanked: 60 times

prg code function documentor in HMG

Post by Anand » Mon Dec 02, 2019 12:00 pm

Well in Clipper we had 'Click!' and in Foxbase 'FoxDoc', which created text files with cross reference of all the functions / procedures in all the prgs in the project/lnk/rmk file.

Do we have similar in HMG ?

I need to weed out many prgs whose functions are not called any more in my huge application, but can not do it manually.

Regards,

Anand
Image

User avatar
serge_girard
Posts: 2377
Joined: Sun Nov 25, 2012 2:44 pm
DBs Used: 1 MySQL - MariaDB
2 DBF
Location: Belgium
Has thanked: 629 times
Been thanked: 126 times
Contact:

Post by serge_girard » Mon Dec 02, 2019 12:27 pm

Would love to have this also!

Serge

Red2
Posts: 53
Joined: Sat May 18, 2019 2:11 pm
DBs Used: DBF, FoxPro, Visual FoxPro
Location: United States (East Coast)
Has thanked: 13 times
Been thanked: 2 times

Post by Red2 » Mon Dec 02, 2019 4:35 pm

This would certainly be useful to me as well. I'd make use of such a utility.

User avatar
AUGE_OHR
Posts: 319
Joined: Sun Aug 25, 2019 3:12 pm
DBs Used: DBF, PostgreSQL, MySQL, SQLite
Location: Hamburg, Germany
Has thanked: 34 times
Been thanked: 41 times

Post by AUGE_OHR » Mon Dec 02, 2019 5:13 pm

hi,

i have the Source of CLICK and made a Version for Xbase++

but CLICK only support Cl*pper "Keyword" and Syntax so it does not work on OOP Code.
also MACRO need "help". you need to insert "Comment" for Macro to get it work.

i never have test those Tool with xCommand Syntax. not sure if they understand this Type of Code.

User avatar
Anand
Posts: 430
Joined: Tue May 24, 2016 4:36 pm
DBs Used: DBF
Has thanked: 128 times
Been thanked: 60 times

Post by Anand » Mon Dec 02, 2019 5:31 pm

I too had the source of Click from Oasis of that time (some 15 years ago), but do not know where (even) it is on my hdd/cd etc.
The latest net search shows, http://www.the-oasis.net/donate.php.

Anyway, am interested in HMG version, even cross referencing normal functions/procedures. No need of complex macro things.

Regards,

Anand
Image

User avatar
AUGE_OHR
Posts: 319
Joined: Sun Aug 25, 2019 3:12 pm
DBs Used: DBF, PostgreSQL, MySQL, SQLite
Location: Hamburg, Germany
Has thanked: 34 times
Been thanked: 41 times

Post by AUGE_OHR » Tue Dec 03, 2019 2:22 am

hi,

hm ... they want to register now ..
but it is still Open Source so i can upload it, or :?:
click203.zip
Original Cl*pper Source
(513.79 KiB) Downloaded 25 times
original CLICK include some *.OBJ and *.C but they are simple.

---

have just run my Xbase++ CLICK Version on my HMG Email Project.

as i expect it fail with #xCommand Syntax ... and did not know FMG files.
but not all Syntax fail

this Syntax fail

Code: Select all

    DEFINE WINDOW <WindowName> 
            ROW <nRow>         
            COL <nCol>          
            WIDTH <nWindth>    
            HEIGHT <nHeight> 
while this work with CLICK

Code: Select all

    DEFINE WINDOW <WindowName> ; 
            AT <nRow> ,<nCol>  ; 
            WIDTH <nWindth>    ;
            HEIGHT <nHeight>   ;
it is the ";" which make the Difference for CLICK

---

neverless new PRG are create so i want to see if it still run.
when compile i got a Error

Code: Select all

   oEMail:SetBody( hb_StrToUTF8( cBody ) + e "\r\n" )
did someone "see" the Problem :roll:
while i have work on it i know how it look before

Code: Select all

    oEMail:SetBody( hb_StrToUTF8( cBody ) + e"\r\n" )
so that you must be CAREFULL when use new "generated" Code.
if compile find a Error it is easy to fix it but what if "logic" is change somewhere :!:

Tiger
Posts: 49
Joined: Mon Aug 31, 2015 11:28 am
Location: Taipei
Has thanked: 10 times
Been thanked: 10 times

Post by Tiger » Tue Dec 03, 2019 6:01 am


User avatar
Anand
Posts: 430
Joined: Tue May 24, 2016 4:36 pm
DBs Used: DBF
Has thanked: 128 times
Been thanked: 60 times

Post by Anand » Tue Dec 03, 2019 9:55 am

Thanks Tiger. Looks like latest version (3.01), but still clipper (console) code. Running it in its folder, does not complete the process.
Anyway thanks for the source code.

We have to check how make it in hmg, or maybe keep in harbour but get the required results.

Regards,

Anand
Image

User avatar
AUGE_OHR
Posts: 319
Joined: Sun Aug 25, 2019 3:12 pm
DBs Used: DBF, PostgreSQL, MySQL, SQLite
Location: Hamburg, Germany
Has thanked: 34 times
Been thanked: 41 times

Post by AUGE_OHR » Tue Dec 03, 2019 7:11 pm

Tiger wrote:
Tue Dec 03, 2019 6:01 am
How about this ...
http://hmgforum.com/viewtopic.php?f=10& ... ENT#p38629
have compile Click_3.01_HMG.rar without Error but nothing happens after start.
i look into Taskmanager and it show Click.exe but it was "inactive" :o

---

the is a file clickstart.prg which is not in Original
//Startup menu to debug click.prg failure on startup

****************************************************************************
FUNCTION ClickStart()
****************************************************************************
LOCAL nstart := 3

@ nstart ++, 2 SAY "Clickstart.prg added to permit debug program selection before start of"
@ nstart ++, 2 SAY "click.prg. The error messages from a runtime exit are less than optimal"
@ nstart ++, 2 SAY "while a line-by-line execution is helpful."
//altd()
//wait
Click()
RETURN nstart
do i have to include the function or not :?:

User avatar
AUGE_OHR
Posts: 319
Joined: Sun Aug 25, 2019 3:12 pm
DBs Used: DBF, PostgreSQL, MySQL, SQLite
Location: Hamburg, Germany
Has thanked: 34 times
Been thanked: 41 times

Post by AUGE_OHR » Tue Dec 03, 2019 11:49 pm

hi,

Question : why i have to include this line to get Console Output with "pure" Cl*pper Source :?:

Code: Select all

   REQUEST HB_GT_WIN_DEFAULT           // Console
that why i can't "see" Sample from Click_3.01_HMG.rar
---

but the is a other Question with Click_3.01_HMG.rar : there are a lot of Code change :!:

this is CLICK.PRG from Click_3.01_HMG.rar vs. Original Cl*pper Version compare with WinDiff as Grafic
HMG_CLICK_Diff.JPG
HMG_CLICK_Diff.JPG (50.16 KiB) Viewed 182 times
this is my Xbase Code
XB_CLICK_Diff.JPG
XB_CLICK_Diff.JPG (22.01 KiB) Viewed 182 times
i wonder why make so many Change while it are only FT_ Function which are not include in Source.

FT_ Function are from Nanforum LIB and there was also the Source.
NFSRC305.ZIP
(302.73 KiB) Downloaded 19 times
but those ASM and C Source are for Cl*pper and we need Windows Function for

Code: Select all

FUNCTION ISDIR(cIn)
FUNCTION FT_MKDIR(cdir)
FUNCTION FT_ORIGIN()
FUNCTION FT_DEFAULT(cIn)

FUNCTION TabSpStrip( cString )
FUNCTION TabStrip( cString )
so have a look at my __HARBOUR__ translation in this Modul to replace those missing Function
hb_XBASE_Click.ZIP
(1.2 KiB) Downloaded 18 times
---

now i can compile/link and start App ... but it hang ... :evil:

Code: Select all

INCOLOR := setcolor( MAINCOLOR )
@ TL - 2 + BOXHIGH, 33 - ( len( YES_PRMPT ) / 2 ) prompt YES_PRMPT
@ TL - 2 + BOXHIGH, 46 - ( len( NO_PRMPT ) / 2 ) prompt NO_PRMPT

menu to VERI
it is just a MENU TO but i "see" no PROMPT :?:
CLICK_MENU_TO.jpg
CLICK_MENU_TO.jpg (128.52 KiB) Viewed 182 times
also no Variable in Debugger :shock: ... hm ...

p.s. i recommend for CLICK.INI use RUNMODE=S87 and NOT 5.x
p.s.p.s. who have a list of "Keyword" for harbour/HMG to include

Post Reply