I am testing LiveCode 5.5 on Mac OS 10.7.4 and am experimenting some problems with a simple project.
Scripts have been pasted from SC 4.63 into the buttons of the LiveCode stack and modified to match LiveCode syntax. Obviously, the translation is not perfect…
One card, with 2 fields containing accounting data, 2 buttons (Import and Convert). The purpose is to convert a file to match the requirements of my accountant.
The first field (ListeFournisseurs) contains the list of the providers names and codes:
The second field (ListeOperations) is populated by data using the first button, Import, which works fine. I cannot post a sample of this data here, as it is confidential.
Here is the script of the Convert button, which is supposed to replace some char strings by the provider name when its code is detected at the beginning of a line (in this line and the following lines) :
Code: Select all
on mouseUp global gFichier lock screen put the text of fld "ListeOperations" into tListe repeat with i = 1 to the number of lines in tListe if char 2 to 3 of line i of tListe = "08" then put char 2 to 9 of line i of tListe into tCode find word tCode in fld "ListeFournisseurs" put the foundLine into tLigne select before fld "ListeFournisseurs" if tLigne is not empty then do "put item 2 of" && tLigne && "into tFournisseur" if length (tFournisseur) > 20 then put char 1 to 20 of tFournisseur into tFournisseur else repeat while length (tFournisseur) < 20 put space after tFournisseur end repeat end if put char 22 to 41 of line i of tListe into tLibelle put tFournisseur into char 22 to 41 of line i of tListe put tFournisseur into char 117 to 136 of line i of tListe put " " into char 137 to 146 of line i of tListe repeat while (i < the num of lines of tListe) and (char 2 to 3 of line i+1 of tListe <> "08") add 1 to i if char 22 to 41 of line i of tListe = tLibelle then put tFournisseur into char 22 to 41 of line i of tListe put tFournisseur into char 117 to 136 of line i of tListe put " " into char 137 to 146 of line i of tListe end if end repeat end if end if end repeat set the text of fld "ListeOperations" to tListe unlock screen end mouseUp
If I put a breakpoint at the line "if char 2 to 3 of line i of tListe = "08" then" and if I use the Continue button of the script editor each time there is a break, the script performs correctly. So, I am not able to debug it, as it always performs correctly in debug mode.