intellisense custom script

Hi friends
i've following intellisense script .
when i type rk then it turns to "&& Rajani on 10/01/05". It saving lot of
time for me when i write comments.
*************
LPARAMETER oFoxCode

Local lcRetval, lcCase,lccentury
lccentury="SET CENTURY "+set('CENTURY ')
SET CENTURY OFF

oFoxcode.valuetype = 'V' && we want to return a value
lcCase = oFoxCode.Case

If empty(alltrim(lcCase))
lcCase = oFoxCode.DefaultCase && if not take default foxpro case
endif
lcRetval = '&' + '&' +'~' +' Rajani on ' + dtoc(date())

&lccentury && reset century
Return lcRetval
*********

abv code works beautifully without any problem.
i am wondering if it is possible when i type my keyword(i.e. rk) on new line
i want
**Rajani on 10/01/05

if it is on a existing line then "&& Rajani on 10/01/05".

any ideas on this will be great.
Thanks
--
cheers

Jack
Mon Jan 10 00:29:03 CST 2005

I guess the below would be a simple solution for u,
(instead of condering it as a new line, i'd say if you typed "rk" right in
the very begining of the line)

What u need to check is, if there is any text in the current line before
your TYPED KEYWORD.

I.e. if you've typed "rk" in a new line, then the contents of
oFoxCode.FullLine == "rf",
else there would be some text in front of the "rf"

Soltion,
If oFoxCode.FullLine == "fk"
*This is a new line
ELSE
*An Existing line
ENDIF

"rajani" <rajani@discussions.microsoft.com> wrote in message
news:B6A249FC-3BF6-4129-A645-CB778ED42A38@microsoft.com...
> Hi friends
> i've following intellisense script .
> when i type rk then it turns to "&& Rajani on 10/01/05". It saving lot of
> time for me when i write comments.
> *************
> LPARAMETER oFoxCode
>
> Local lcRetval, lcCase,lccentury
> lccentury="SET CENTURY "+set('CENTURY ')
> SET CENTURY OFF
>
> oFoxcode.valuetype = 'V' && we want to return a value
> lcCase = oFoxCode.Case
>
> If empty(alltrim(lcCase))
> lcCase = oFoxCode.DefaultCase && if not take default foxpro case
> endif
> lcRetval = '&' + '&' +'~' +' Rajani on ' + dtoc(date())
>
> &lccentury && reset century
> Return lcRetval
> *********
>
> abv code works beautifully without any problem.
> i am wondering if it is possible when i type my keyword(i.e. rk) on new
line
> i want
> **Rajani on 10/01/05
>
> if it is on a existing line then "&& Rajani on 10/01/05".
>
> any ideas on this will be great.
> Thanks
> --
> cheers

rajani
Mon Jan 10 14:35:04 CST 2005

Jack u r Genious
That worked beautifully :-)
Thank you very much

"Jack" wrote:

> I guess the below would be a simple solution for u,
> (instead of condering it as a new line, i'd say if you typed "rk" right in
> the very begining of the line)
>
> What u need to check is, if there is any text in the current line before
> your TYPED KEYWORD.
>
> I.e. if you've typed "rk" in a new line, then the contents of
> oFoxCode.FullLine == "rf",
> else there would be some text in front of the "rf"
>
> Soltion,
> If oFoxCode.FullLine == "fk"
> *This is a new line
> ELSE
> *An Existing line
> ENDIF
>
> "rajani" <rajani@discussions.microsoft.com> wrote in message
> news:B6A249FC-3BF6-4129-A645-CB778ED42A38@microsoft.com...
> > Hi friends
> > i've following intellisense script .
> > when i type rk then it turns to "&& Rajani on 10/01/05". It saving lot of
> > time for me when i write comments.
> > *************
> > LPARAMETER oFoxCode
> >
> > Local lcRetval, lcCase,lccentury
> > lccentury="SET CENTURY "+set('CENTURY ')
> > SET CENTURY OFF
> >
> > oFoxcode.valuetype = 'V' && we want to return a value
> > lcCase = oFoxCode.Case
> >
> > If empty(alltrim(lcCase))
> > lcCase = oFoxCode.DefaultCase && if not take default foxpro case
> > endif
> > lcRetval = '&' + '&' +'~' +' Rajani on ' + dtoc(date())
> >
> > &lccentury && reset century
> > Return lcRetval
> > *********
> >
> > abv code works beautifully without any problem.
> > i am wondering if it is possible when i type my keyword(i.e. rk) on new
> line
> > i want
> > **Rajani on 10/01/05
> >
> > if it is on a existing line then "&& Rajani on 10/01/05".
> >
> > any ideas on this will be great.
> > Thanks
> > --
> > cheers
>
>
>