Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]

Groups > comp.databases.filemaker > #1377 > unrolled thread

FMPro 9 script won't work in FMPro 12

Back to article view | Back to comp.databases.filemaker

Contents

  FMPro 9 script won't work in FMPro 12 Bob M. <email55@domain.com> - 2013-09-18 10:04 -0700
    Re: FMPro 9 script won't work in FMPro 12 John Hanson <crayz9000@gmail.com> - 2013-09-18 11:02 -0700
    Re: FMPro 9 script won't work in FMPro 12 Howard Schlossberg <howard@nospam.fmprosolutions.com> - 2013-09-18 21:07 -0700
      Re: FMPro 9 script won't work in FMPro 12 Bob M. <email@domain.com> - 2013-09-26 15:12 -0700
        Re: FMPro 9 script won't work in FMPro 12 Howard - FM Pro Solutions <fmprosolutions@gmail.com> - 2013-09-26 20:27 -0700
          Re: FMPro 9 script won't work in FMPro 12 Bob Meador <email@domain.com> - 2014-01-24 10:34 -0700

#1377 — FMPro 9 script won't work in FMPro 12

[Multipart message — attachments visible in raw view] — view raw

I have an Auto-enter calculation in a field named Comments.

The ojective is to create a timestamp list of notes that I add from 
time to time with the latest note being on top.

Here is the Calculation I was using in 9 that doesn't work in 12:

Let(
[
_Notes = Comments;
_Prompt = " " ;
_Char = "• " ;
_Divider  = TextColor 
("¶––––––––––––––––––––––––––––––––––––––––––––––----–––––––––––––-----–––¶" 
; RGB (150 ; 150 ; 150));
_Tag = TextStyleAdd ( TextColor ( Get( CurrentTimeStamp ) & ¶ ; RGB ( 
150 ; 150 ; 150 ) ) ; Bold );
_Editing = Left( _Notes; Length( _Prompt )) = _Prompt or Left ( _Notes 
; Length( _Char ) ) = _Char

];
If( _Editing; _Notes;
_Char &  _Tag & _Notes & _Divider  & Middle ( $$NoteLog ; Length( 
_Prompt) ; 1000000 )) 

)

The data should look like this:

• 7/27/2009 1:29:45 PM
Left message for re: Battery Needing service
––––––––––––––––––––––––––––––––––––––––––––––----–––––––––––––-----–––
• 11/15/2007 11:22:13 AM
Talked with Stephanie about door bell. Jim will be out to switch door 
bells tomorrow at 9:00 to 11:00 am.

Can anyone help me with why this doesn't work in FMPro 12?

TIA,

Bob

[toc] | [next] | [standalone]

#1378

On Wednesday, September 18, 2013 10:04:47 AM UTC-7, Bob M. wrote:
> I have an Auto-enter calculation in a field named Comments.
> 
> The ojective is to create a timestamp list of notes that I add from time to time with the latest note being on top.
> 
> Here is the Calculation I was using in 9 that doesn't work in 12:
> 
> Let(
> 
> [
> 
> _Notes = Comments;
> 
> _Prompt = " " ;
> 
> _Char = "� " ;
> 
> _Divider  = TextColor ("�����������������������������������������������----�������������-----��Ц" ; RGB (150 ; 150 ; 150));
> 
> _Tag = TextStyleAdd ( TextColor ( Get( CurrentTimeStamp ) & � ; RGB ( 150 ; 150 ; 150 ) ) ; Bold );
> 
> _Editing = Left( _Notes; Length( _Prompt )) = _Prompt or Left ( _Notes ; Length( _Char ) ) = _Char
> 
> ];
> 
> If( _Editing; _Notes;
> 
> _Char &  _Tag & _Notes & _Divider  & Middle ( $$NoteLog ; Length( _Prompt) ; 1000000 )) 
> 
> )
> 
> Can anyone help me with why this doesn't work in FMPro 12?
> 

Unfortunately it appears that your client mangled whatever it was you were trying to paste in.

Is there any particular reason why you went for this approach rather than simply adding, say, a "Notes" table to your database, linking it to the table you want to add notes to, and setting a descending sort on it based on the created timestamp? You would still have to script the new note creation process, probably using global fields for the actual data entry, but the amount of logic required would be minimal.

[toc] | [prev] | [next] | [standalone]

#1380

On 9/18/2013 10:04 AM, Bob M. wrote:
> Here is the Calculation I was using in 9 that doesn't work in 12:
>
> Let(
>
> [
>
> _Notes = Comments;
> _Prompt = " " ;
> _Char = "• " ;
> _Divider= TextColor ("¶––––––––––––––––––––––––––––––––––––––––––––––----–––––––––––––-----–––¶"
>    ; RGB (150 ; 150 ; 150));
> _Tag = TextStyleAdd ( TextColor ( Get( CurrentTimeStamp ) & ¶ ; RGB (150 ; 150 ; 150 ) ) ; Bold );
> _Editing = Left( _Notes; Length( _Prompt )) = _Prompt or Left ( _Notes ; Length( _Char ) ) = _Char
>
> ];
>
> If( _Editing; _Notes;
> _Char &_Tag & _Notes & _Divider& Middle ( $$NoteLog ; Length( _Prompt) ; 1000000 ))
> )


You showed what the data is supposed to look like, but what DOES happen 
in 12?  There is nothing in your calc that I'm seeing that wouldn't work 
in 12.

Howard

[toc] | [prev] | [next] | [standalone]

#1391

On 2013-09-19 04:07:09 +0000, Howard Schlossberg said:

> On 9/18/2013 10:04 AM, Bob M. wrote:
>> Here is the Calculation I was using in 9 that doesn't work in 12:
>> 
>> Let(
>> 
>> [
>> 
>> _Notes = Comments;
>> _Prompt = " " ;
>> _Char = "• " ;
>> _Divider= TextColor 
>> ("¶––––––––––––––––––––––––––––––––––––––––––––––----–––––––––––––-----–––¶" 
>> 
>> ; RGB (150 ; 150 ; 150));
>> _Tag = TextStyleAdd ( TextColor ( Get( CurrentTimeStamp ) & ¶ ; RGB 
>> (150 ; 150 ; 150 ) ) ; Bold );
>> _Editing = Left( _Notes; Length( _Prompt )) = _Prompt or Left ( _Notes 
>> ; Length( _Char ) ) = _Char
>> 
>> ];
>> 
>> If( _Editing; _Notes;
>> _Char &_Tag & _Notes & _Divider& Middle ( $$NoteLog ; Length( _Prompt) 
>> ; 1000000 ))
>> )
> 
> 
> You showed what the data is supposed to look like, but what DOES happen 
> in 12?  There is nothing in your calc that I'm seeing that wouldn't 
> work in 12.
> 
> Howard

Howard,

The data isn't selected and then copied when entering the field so I 
can't just click in the field, then add new notes and have the previous 
data appended when I leave the field. It used to work this way.

[toc] | [prev] | [next] | [standalone]

#1392

On Thursday, September 26, 2013 3:12:48 PM UTC-7, Bob M. wrote:
> On 2013-09-19 04:07:09 +0000, Howard Schlossberg said:
> > On 9/18/2013 10:04 AM, Bob M. wrote:

> >> Here is the Calculation I was using in 9 that doesn't work in 12:
> >> 
> >> Let(
> >> 
> >> [
> >> 
> >> _Notes = Comments;
> >> _Prompt = " " ;
> >> _Char = "• " ;
> >> _Divider= TextColor 

> >> ("¶––––––––––––––––––––––––––––––––––––––––––––––----–––––––––––––-----–––¶" 
> >> 
> >> ; RGB (150 ; 150 ; 150));
> >> _Tag = TextStyleAdd ( TextColor ( Get( CurrentTimeStamp ) & ¶ ; RGB 
> >> (150 ; 150 ; 150 ) ) ; Bold );
> >> _Editing = Left( _Notes; Length( _Prompt )) = _Prompt or Left ( _Notes 
> >> ; Length( _Char ) ) = _Char
> >> 
> >> ];
> >> 
> >> If( _Editing; _Notes;
> >> _Char &_Tag & _Notes & _Divider& Middle ( $$NoteLog ; Length( _Prompt) 
> >> ; 1000000 ))
> >> )
> > 
> > 
> > You showed what the data is supposed to look like, but what DOES happen 
> > in 12?  There is nothing in your calc that I'm seeing that wouldn't 
> > work in 12.
> > 
> > Howard
> 
> Howard,
> 
> The data isn't selected and then copied when entering the field so I 
> can't just click in the field, then add new notes and have the previous 
> data appended when I leave the field. It used to work this way.

It works for me if I click into the field and start typing at the beginning of the field.  But it seems maybe that's not how you are trying to do it.

Your calc has a global variable ($$NoteLog) that isn't getting set here.  So do you have a script trigger or something else that is setting $$NoteLog upon entering the field?

[toc] | [prev] | [next] | [standalone]

#1670

On 2013-09-27 03:27:58 +0000, Howard - FM Pro Solutions said:

> On Thursday, September 26, 2013 3:12:48 PM UTC-7, Bob M. wrote:
>> On 2013-09-19 04:07:09 +0000, Howard Schlossberg said:
>>> On 9/18/2013 10:04 AM, Bob M. wrote:
> 
>>>> Here is the Calculation I was using in 9 that doesn't work in 12:
>>>> 
>>>> Let(
>>>> 
>>>> [
>>>> 
>>>> _Notes = Comments;
>>>> _Prompt = " " ;
>>>> _Char = "• " ;
>>>> _Divider= TextColor
>>>> ("¶––––––––––––––––––––––––––––––––––––––––––––––----–––––––––––––-----–––¶"> 
>>>> >>> >> ; RGB (150 ; 150 ; 150));
>>>> _Tag = TextStyleAdd ( TextColor ( Get( CurrentTimeStamp ) & ¶ ; RGB> >> 
>>>> (150 ; 150 ; 150 ) ) ; Bold );
>>>> _Editing = Left( _Notes; Length( _Prompt )) = _Prompt or Left ( _Notes> 
>>>> >> ; Length( _Char ) ) = _Char
>>>> 
>>>> ];
>>>> 
>>>> If( _Editing; _Notes;
>>>> _Char &_Tag & _Notes & _Divider& Middle ( $$NoteLog ; Length( _Prompt)> 
>>>> >> ; 1000000 ))
>>>> )
>>> 
>>> 
>>> You showed what the data is supposed to look like, but what DOES 
>>> happen> > in 12?  There is nothing in your calc that I'm seeing that 
>>> wouldn't> > work in 12.
>>> 
>>> Howard
>> 
>> Howard,
>> 
>> The data isn't selected and then copied when entering the field so I> 
>> can't just click in the field, then add new notes and have the 
>> previous> data appended when I leave the field. It used to work this 
>> way.
> 
> It works for me if I click into the field and start typing at the 
> beginning of the field.  But it seems maybe that's not how you are 
> trying to do it.
> 
> Your calc has a global variable ($$NoteLog) that isn't getting set 
> here.  So do you have a script trigger or something else that is 
> setting $$NoteLog upon entering the field?

Howard,

I was looking at this thread and it seems my email thanking you for 
your efforts back in September didn't get posted. Sorry about the 
delay, but i appreciate your help. It works now.

[toc] | [prev] | [standalone]

Back to top | Article view | comp.databases.filemaker

csiph-web