prg code function documentor in HMG

General Help regarding HMG, Compilation, Linking, Samples

Moderator: Rathinagiri

Post Reply
User avatar
Anand
Posts: 520
Joined: Tue May 24, 2016 4:36 pm
DBs Used: DBF
Has thanked: 219 times
Been thanked: 80 times

prg code function documentor in HMG

Post by Anand »

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: 2633
Joined: Sun Nov 25, 2012 2:44 pm
DBs Used: 1 MySQL - MariaDB
2 DBF
Location: Belgium
Has thanked: 910 times
Been thanked: 164 times
Contact:

Post by serge_girard »

Would love to have this also!

Serge

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

Post by Red2 »

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

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

Post by AUGE_OHR »

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.
have fun
Jimmy

User avatar
Anand
Posts: 520
Joined: Tue May 24, 2016 4:36 pm
DBs Used: DBF
Has thanked: 219 times
Been thanked: 80 times

Post by Anand »

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: 1148
Joined: Sun Aug 25, 2019 3:12 pm
DBs Used: DBF, PostgreSQL, MySQL, SQLite
Location: Hamburg, Germany
Has thanked: 212 times
Been thanked: 310 times

Post by AUGE_OHR »

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 168 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 :!:
have fun
Jimmy

Tiger
Posts: 68
Joined: Mon Aug 31, 2015 11:28 am
Location: Taipei
Has thanked: 16 times
Been thanked: 27 times

Post by Tiger »


User avatar
Anand
Posts: 520
Joined: Tue May 24, 2016 4:36 pm
DBs Used: DBF
Has thanked: 219 times
Been thanked: 80 times

Post by Anand »

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: 1148
Joined: Sun Aug 25, 2019 3:12 pm
DBs Used: DBF, PostgreSQL, MySQL, SQLite
Location: Hamburg, Germany
Has thanked: 212 times
Been thanked: 310 times

Post by AUGE_OHR »

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 :?:
have fun
Jimmy

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

Post by AUGE_OHR »

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 3074 times
this is my Xbase Code
XB_CLICK_Diff.JPG
XB_CLICK_Diff.JPG (22.01 KiB) Viewed 3074 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 155 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 140 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 3074 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
have fun
Jimmy

Post Reply