Thanks!

> Chip,
> Here's a method I picked up a while ago. Looks like Vincent wrote it:
> If (False)
> Method_RetokenizeAllCode
> 
> // Adapted from a NUG thread in September of 2015.
> // From: Vincent de Lachaux<[email protected]>
> // Date: Wednesday, September 23, 2015
> // Subject: Re-Tokenize Methods Procedurally
> // To: 4D iNug Technical<[email protected]>
> 
> // Notes: If a method is being edited, this routine can't retokenize it.
> // Errors from this are suppressed in this implementation. -- DPA
> End if
> 
> C_BOOLEAN($1;$confirm_first)
> 
> $confirm_first:=True
> If (Count parameters>=1)
> $confirm_first:=$1
> End if
> 
> C_BOOLEAN($continue)
> $continue:=True
> 
> If (Is compiled mode)
> Method_AlertIfRunningCompiled("Method retokenization does not work in
> compiled mode.")
> $continue:=False
> End if
> 
> OK:=0
> If ($continue & $confirm_first)
> C_TEXT($message)
> $message:=""
> $message:=$message+"Please make a backup of the structure if you haven't
> already."+Char(Carriage return)+Char(Carriage return)
> $message:=$message+"Close any methods currently open in the Design
> environment before proceeding."+Char(Carriage return)+Char(Carriage return)
> $message:=$message+"Retokenize all methods now?"
> 
> CONFIRM($message)
> $continue:=OK=1
> End if
> 
> If ($continue)
> C_TEXT($icon_path)
> C_LONGINT($progress_id)
> C_BOOLEAN($enable_close)
> $icon_path:=Resources_GetImageFilePath("Process_Code_Large.png")
> $enable_close:=True
> $progress_id:=Progress_Open("Retokenizing all
> code";$icon_path;$enable_close)
> 
> ARRAY TEXT($method_paths_at;0)
> METHOD GET PATHS(Path all objects;$method_paths_at;*)
> 
> C_LONGINT($paths_count)
> C_LONGINT($path_index)
> $paths_count:=Size of array($method_paths_at)
> For ($path_index;1;$paths_count)
> C_TEXT($method_path)
> $method_path:=$method_paths_at{$path_index}
> 
> Progress_Update($progress_id;$method_path;$path_index/$paths_count)
> 
> C_TEXT($method_text)
> METHOD GET CODE($method_path;$method_text;*)
> METHOD SET CODE($method_path;$method_text;*)
> End for
> 
> Progress_Close($progress_id)
> End if
> 
> 
> On Mon, Apr 30, 2018 at 1:42 PM Chip Scheide via 4D_Tech <
> [email protected]> wrote:
> 
>> Other then opening each method individually, is there a way to
>> re-tokenize the entire database?
>> 
>> I replaced a bunch of IP 'Konstnats' with xlif defined constants and in
>> some instances the new xliv constants did not tokenize so I get
>> execution errors.
>> 
>> THanks
>> 
>> ---------------
>> Gas is for washing parts
>> Alcohol is for drinkin'
>> Nitromethane is for racing
>> **********************************************************************
>> 4D Internet Users Group (4D iNUG)
>> FAQ:  http://lists.4d.com/faqnug.html
>> Archive:  http://lists.4d.com/archives.html
>> Options: https://lists.4d.com/mailman/options/4d_tech
>> Unsub:  mailto:[email protected]
>> **********************************************************************
> 
------------
Hell is other people 
     Jean-Paul Sartre
**********************************************************************
4D Internet Users Group (4D iNUG)
FAQ:  http://lists.4d.com/faqnug.html
Archive:  http://lists.4d.com/archives.html
Options: https://lists.4d.com/mailman/options/4d_tech
Unsub:  mailto:[email protected]
**********************************************************************

Reply via email to