Page 1 of 11

prg code function documentor in HMG

Posted: Mon Dec 02, 2019 12:00 pm
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

Re: prg code function documentor in HMG

Posted: Mon Dec 02, 2019 12:27 pm
by serge_girard
Would love to have this also!

Serge

Re: prg code function documentor in HMG

Posted: Mon Dec 02, 2019 4:35 pm
by Red2
This would certainly be useful to me as well. I'd make use of such a utility.

Re: prg code function documentor in HMG

Posted: Mon Dec 02, 2019 5:13 pm
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.

Re: prg code function documentor in HMG

Posted: Mon Dec 02, 2019 5:31 pm
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

Re: prg code function documentor in HMG

Posted: Tue Dec 03, 2019 2:22 am
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 1353 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 :!:

Re: prg code function documentor in HMG

Posted: Tue Dec 03, 2019 6:01 am
by Tiger

Re: prg code function documentor in HMG

Posted: Tue Dec 03, 2019 9:55 am
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

Re: prg code function documentor in HMG

Posted: Tue Dec 03, 2019 7:11 pm
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 :?:

Re: prg code function documentor in HMG

Posted: Tue Dec 03, 2019 11:49 pm
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 83956 times
this is my Xbase Code
XB_CLICK_Diff.JPG
XB_CLICK_Diff.JPG (22.01 KiB) Viewed 83956 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 1397 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 1406 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 83956 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