FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index mod_harbour TEXT INTO and PARAMS
Posts: 6983
Joined: Fri Oct 07, 2005 07:07 PM
TEXT INTO and PARAMS
Posted: Thu Dec 17, 2020 06:03 PM

Dear Antonio,
how can i insert into a
TEXT INTO cHeader
block additional PARAMS?
I mean like TEMPLATE PARAMS hHash_DBF .

Best regards,
Otto

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: TEXT INTO and PARAMS
Posted: Fri Dec 18, 2020 10:57 AM

Dear Otto,

mod_harbour defines these pp rules:

__pp_addRule( hPP, "#xcommand TEXT <into:TO,INTO> <v> => #pragma __cstream|<v>:=%s" )
__pp_addRule( hPP, "#xcommand TEXT <into:TO,INTO> <v> ADDITIVE => #pragma __cstream|<v>+=%s" )

and

__pp_addRule( hPP, "#xcommand TEMPLATE [ USING <x> ] [ PARAMS [<v1>] [,<vn>] ] => " + ;
'#pragma __cstream | AP_RPuts( InlinePrg( %s, [@<x>] [,<(v1)>][+","+<(vn)>] [, @<v1>][, @<vn>] ) )' )

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: TEXT INTO and PARAMS
Posted: Fri Dec 18, 2020 11:03 AM

You may try this:

__pp_addRule( hPP, "#xcommand TEXT <into:TO,INTO> <v> [ PARAMS [<v1>] [,<vn>] ] =>

pragma __cstream|<v>:=InlinePrg( %s, [@<x>] [,<(v1)>][+","+<(vn)>] [, @<v1>][, @<vn>] )" )

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion