Script Duplicate footer

Hi,
I am facing an issue in scripts.IN script there are 20 lines of space for main window and 10 lines of space for footer window.
if main window fills totally i,e if there is no gap i.e if 20 lines fillled in the last page of the output i am getting output as one more blank page at the end.if main window fills 19 or less then i am not getting any unwanted page in the output.How can i avoid this duplicate page.Can anyone kindly help me in this matter.Appriciate your guidence in this regard.Thankd in advance.
Regards
Abhis.

Hi Abshek,
most probably you are creating one extra blank line, possibly designed in the text element you trigger.
Switch on SAPscript debugger and follow the output step by step starting in line 19 of main window. You will see when (and why) the new page is created.
Regards,
Clemens

Similar Messages

How to create a box in sap script n footer

Hi,
I am working on a Sap Script in which i have to display a box having the decision of crt profile and i don't know how to display it. It is clear that it is to be displayed in the footer of it and the code for that decision is coming from the program.
plzz provide me guidelines as how to solve this problem.

To draw a box, try this syntax.
/: BOX [XPOS] [YPOS] [WIDTH] [HEIGHT] [FRAME] [INTENSITY]
/: POSITION [XORIGIN] [YORIGIN] [WINDOW] [PAGE]
/: SIZE [WIDTH] [HEIGHT] [WINDOW] [PAGE]
example:
/: BOX FRAME 10 TW XPOS '11.21' MM YPOS '14.18' MM INTENSITY 100.
/: POSITION XORIGIN '11.21' MM YORIGIN '5.13' MM.
/: SIZE HEIGHT '120' MM WIDTH '90' MM.
Regards,
Joan

Urgent Help, Scripting duplicate page

This is my XML structure:
<courses>
<course>
<name></name>
<title></title>
<sectionname></sectionname>
</course>
</courses
In my Indesign template, I have 1 page with a main placeholder for the course. I have another placeholder on the side of the page that I use for the section (vertical text).
In my JS script, I count the number of XML records and duplicate the page (templateDoc.pages.item(i).duplicate(); etc). So if there is 25 XMl records, there needs to be 25 pages.
The problem is that after duplicating the pages....the SectionName tag in the InDesign template is under the first course node and not the correct one. All of the xml records have a section name node but all of those have been moved into the first course node in the indesign template (under the structures). Everything else is correctly imported. I'm thinking it has to do something with SectionName tag being in a seperate placeholder from the main Course placeholder.
Does anyone know how to fix this issue?

Hi,
I also tried using separate placeholders for course and sectionname tags and got the same result i.e sectionnames move under the first course tag. Using same placeholders for course tag and sectionname tag however solves the problem.The tags appear correctly in structure after duplication.
-Pooja

InDesign CS4 Server Scripting duplicate()

Hi,
Just wondering anyone would be able to help me with this.
I am having problem with using duplicate() in a InDesign CS4 Server Javascript. It locks the InDesign instance while running the script and we have to unlock it by restarting the Server. Below is the offended script. Do anyone have any idea what is causing this? My head hurts...
var inlines = myDocument.stories.everyItem().pageItems.everyItem().getElements();
myDocument.viewPreferences.horizontalMeasurementUnits = MeasurementUnits.millimeters;
myDocument.viewPreferences.verticalMeasurementUnits = MeasurementUnits.millimeters;
myDocument.viewPreferences.rulerOrigin = RulerOrigin.pageOrigin;
var myPage = myDocument.pages.item(0);
var myX = myPage.marginPreferences.left;
var myY = myPage.marginPreferences.top;
if(inlines.length==1){
inlines[0].duplicate([myX+37.75,myY+9.5]);
I have tried removed the x and y coordinates and run the script again with only duplicate(); it is still breaking the server. Can anyone help???? Hellllpppppp....
Cheers

That looks correct - InDesignServer is up & running, waiting for commands, or a control-c to quit.
InDesignServer.com is a shell app which launches InDesignServer.exe, so having both processes active is correct.
Once you have successfully serialized (as it appears you have), you should be able to restart either via the Windows service or at the command line without the '-serialnumber' parameter.
-Brendan O'Shea
InDesignServer Engineering

SAP script include footer

HI!
Is it possible to include a footer in SAP script (NOT smart form!) and if it is, how?
I need this because all forms must have the same footer, and when something changes in the company, you have to change all forms. In this case i would change only include.
Best regards,
Egi

Hi EGi,
You use the same standard text in all forms.
So whenver there is a change you just change in the standard text and since the same is used in all forms it will reflect in all forms.
So only once you have to change no need to change all forms.
regards,
Guru

Quotation item text how to call in sap script in footer

hi,
Please help me, i have been trying hard for this and also searches sdn for relevant posts but could not find any, I thank all people who can help me with some information on this.
Regards,
prashant

hi
I created driver program in se38 that is correct or not
*& Report ZP_QTEXT3
REPORT ZP_QTEXT3.
DECLARION OF TABLES ******
TABLES : VBAP,STXL.
*stxh, stxl, stxb - trans tables for text
*ttxit - text on text-ids
*ttxot - Short texts on text objects
*Transaction MD63
FORM TEXT1 TABLES IN_TAB STRUCTURE ITCSY
                  OUT_TAB STRUCTURE ITCSY.
     DATA : TDOBJECT1 LIKE STXL-TDOBJECT,
              TDNAME1 LIKE STXL-TDNAME,
              TDID1 LIKE STXL-TDID,
              TDSPRAS1 LIKE STXL-TDSPRAS.
*DATA : TDOBJECT1(10).
       TDNAME(70),
       TDID(4),
       TDSPRAS(1).
READ TABLE IN_TAB WITH KEY 'STXL-TDNAME1'.
TDNAME1 = IN_TAB-VALUE.
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
    INPUT         = TDNAME1
IMPORTING
   OUTPUT        = TDNAME1.
SELECT SINGLE * FROM STXL WHERE = VBDPA-TDNAME1."MARA-MATNR."'000000000020000179' .
TDOBJECT1 = VBDPA-TDOBJECT1.
TDID1 = VBDPA-TDID1.
TDSPRAS1 = VBDPA-TDSPRAS1.
MOVE TDOBJECT TO TDOBJECT1.
READ TABLE OUT_TAB WITH KEY 'ATDOBJECT1'.
IF SY-SUBRC = 0.
    OUT_TAB-VALUE = TDOBJECT1.
    MODIFY OUT_TAB INDEX SY-TABIX.
ENDIF.
MOVE TDID TO TDID1.
READ TABLE OUT_TAB WITH KEY 'ATDID1'.
IF SY-SUBRC = 0.
    OUT_TAB-VALUE = TDID1.
    MODIFY OUT_TAB INDEX SY-TABIX.
ENDIF.
MOVE SPRAS TO SPRAS1.
READ TABLE OUT_TAB WITH KEY 'ASPRAS1'.
IF SY-SUBRC = 0.
    OUT_TAB-VALUE = SPRAS1.
    MODIFY OUT_TAB INDEX SY-TABIX.
ENDIF.
DATA : TNAME LIKE THEAD-TDNAME.
DATA : W_STXL TYPE STXL.
*SELECT-OPTIONS: S_VBELN for VBAP-VBELN,
*S_POSNR FOR VBAP-POSNR.
DATA: BEGIN OF HTEXT.
INCLUDE STRUCTURE THEAD.
DATA: END OF HTEXT.
DATA: BEGIN OF LTEXT OCCURS 50.
INCLUDE STRUCTURE TLINE.
DATA: END OF LTEXT.
DATA: BEGIN OF DTEXT OCCURS 50.
DATA: VBELN LIKE VBAP-VBELN,
      POSNR LIKE VBAP-POSNR.
INCLUDE STRUCTURE TLINE.
DATA: END OF DTEXT.
PERFORM BODY_DISPLAY.
SELECT * FROM VBAP WHERE VBELN IN S_VBELN.
SELECT * FROM VBAP WHERE POSNR IN S_POSNR.
ENDSELECT.
ENDSELECT.
*MOVE VBAP-VBELN TO TNAME.
*MOVE VBAP-POSNR TO TNAME.
*&      Form BODY_DISPLAY
      text
--> p1        text
<-- p2        text
FORM BODY_DISPLAY .
PACKING DETQAILS TEXT ********
CONCATENATE VBAP-VBELN VBAP-POSNR INTO TNAME.
SELECT SINGLE * FROM STXL INTO W_STXL
               WHERE TDNAME = TNAME AND TDID = '0011' .
CALL FUNCTION 'READ_TEXT'
EXPORTING
CLIENT = SY-MANDT
ID = W_STXL-TDID
LANGUAGE = W_STXL-TDSPRAS
NAME = TNAME
OBJECT = W_STXL-TDOBJECT
ARCHIVE_HANDLE = 0
IMPORTING
HEADER = HTEXT
TABLES
LINES = LTEXT .
LOOP AT LTEXT.
IF LTEXT-TDLINE NE ' '.
MOVE LTEXT-TDLINE TO DTEXT-TDLINE.
APPEND DTEXT.
ENDIF.
ENDLOOP.
CLEAR : TNAME, HTEXT.
REFRESH : LTEXT.
LOOP AT DTEXT.
WRITE:/ DTEXT-TDLINE.
ENDLOOP.
ULINE.
SEA FRIEGHT CHARGE TEXT **********
SELECT * FROM VBAP WHERE VBELN IN S_VBELN.
SELECT * FROM VBAP WHERE POSNR IN S_POSNR.
ENDSELECT.
ENDSELECT.
CONCATENATE VBAP-VBELN VBAP-POSNR INTO TNAME.
SELECT SINGLE * FROM STXL INTO W_STXL
               WHERE TDNAME = TNAME AND TDID = '0012'.
CALL FUNCTION 'READ_TEXT'
EXPORTING
CLIENT = SY-MANDT
ID = W_STXL-TDID
LANGUAGE = W_STXL-TDSPRAS
NAME = TNAME
OBJECT = W_STXL-TDOBJECT
ARCHIVE_HANDLE = 0
IMPORTING
HEADER = HTEXT
TABLES
LINES = LTEXT .
LOOP AT LTEXT.
IF LTEXT-TDLINE NE ' '.
MOVE : LTEXT-TDLINE TO DTEXT-TDLINE.
APPEND DTEXT.
ENDIF.
ENDLOOP.
CLEAR : TNAME, HTEXT.
REFRESH : LTEXT.
LOOP AT DTEXT.
WRITE:/ DTEXT-TDLINE.
ENDLOOP.
CLEAR : TNAME, HTEXT,DTEXT.
REFRESH : LTEXT.
ULINE.
LEAGALISATION FEES *********
SELECT * FROM VBAP WHERE VBELN IN S_VBELN.
SELECT * FROM VBAP WHERE POSNR IN S_POSNR.
ENDSELECT.
ENDSELECT.
CONCATENATE VBAP-VBELN VBAP-POSNR INTO TNAME.
SELECT SINGLE * FROM STXL INTO W_STXL
               WHERE TDNAME = TNAME AND TDID = '0013'.
CALL FUNCTION 'READ_TEXT'
EXPORTING
CLIENT = SY-MANDT
ID = W_STXL-TDID
LANGUAGE = W_STXL-TDSPRAS
NAME = TNAME
OBJECT = W_STXL-TDOBJECT
ARCHIVE_HANDLE = 0
IMPORTING
HEADER = HTEXT
TABLES
LINES = LTEXT .
LOOP AT LTEXT.
IF LTEXT-TDLINE NE ' '.
MOVE : LTEXT-TDLINE TO DTEXT-TDLINE.
APPEND DTEXT.
ENDIF.
ENDLOOP.
LOOP AT DTEXT.
WRITE:/ DTEXT-TDLINE.
ENDLOOP.
ULINE.
SEA FREIGHT CHARGES *************
SELECT * FROM VBAP WHERE VBELN IN S_VBELN.
SELECT * FROM VBAP WHERE POSNR IN S_POSNR.
ENDSELECT.
ENDSELECT.
CONCATENATE VBAP-VBELN VBAP-POSNR INTO TNAME.
SELECT SINGLE * FROM STXL INTO W_STXL
               WHERE TDNAME = TNAME AND TDID = '0014'.
CALL FUNCTION 'READ_TEXT'
EXPORTING
CLIENT = SY-MANDT
ID = W_STXL-TDID
LANGUAGE = W_STXL-TDSPRAS
NAME = TNAME
OBJECT = W_STXL-TDOBJECT
ARCHIVE_HANDLE = 0
IMPORTING
HEADER = HTEXT
TABLES
LINES = LTEXT .
LOOP AT LTEXT.
IF LTEXT-TDLINE NE ' '.
MOVE : LTEXT-TDLINE TO DTEXT-TDLINE.
APPEND DTEXT.
ENDIF.
ENDLOOP.
LOOP AT DTEXT.
WRITE:/ DTEXT-TDLINE.
ENDLOOP.
ULINE.
AIR FREIGHT CHARGES **********
SELECT * FROM VBAP WHERE VBELN IN S_VBELN.
SELECT * FROM VBAP WHERE POSNR IN S_POSNR.
ENDSELECT.
ENDSELECT.
CONCATENATE VBAP-VBELN VBAP-POSNR INTO TNAME.
SELECT SINGLE * FROM STXL INTO W_STXL
               WHERE TDNAME = TNAME AND TDID = '0015'.
CALL FUNCTION 'READ_TEXT'
EXPORTING
CLIENT = SY-MANDT
ID = W_STXL-TDID
LANGUAGE = W_STXL-TDSPRAS
NAME = TNAME
OBJECT = W_STXL-TDOBJECT
ARCHIVE_HANDLE = 0
IMPORTING
HEADER = HTEXT
TABLES
LINES = LTEXT .
LOOP AT LTEXT.
IF LTEXT-TDLINE NE ' '.
MOVE : LTEXT-TDLINE TO DTEXT-TDLINE.
APPEND DTEXT.
ENDIF.
ENDLOOP.
LOOP AT DTEXT.
WRITE:/ DTEXT-TDLINE.
ENDLOOP.
ULINE.
COURIER CHARGE **************
SELECT * FROM VBAP WHERE VBELN IN S_VBELN.
SELECT * FROM VBAP WHERE POSNR IN S_POSNR.
ENDSELECT.
ENDSELECT.
CONCATENATE VBAP-VBELN VBAP-POSNR INTO TNAME.
SELECT SINGLE * FROM STXL INTO W_STXL
               WHERE TDNAME = TNAME AND TDID = '0016'.
CALL FUNCTION 'READ_TEXT'
EXPORTING
CLIENT = SY-MANDT
ID = W_STXL-TDID
LANGUAGE = W_STXL-TDSPRAS
NAME = TNAME
OBJECT = W_STXL-TDOBJECT
ARCHIVE_HANDLE = 0
IMPORTING
HEADER = HTEXT
TABLES
LINES = LTEXT .
LOOP AT LTEXT.
IF LTEXT-TDLINE NE ' '.
MOVE : LTEXT-TDLINE TO DTEXT-TDLINE.
APPEND DTEXT.
ENDIF.
ENDLOOP.
LOOP AT DTEXT.
WRITE:/ DTEXT-TDLINE.
ENDLOOP.
ULINE.
INSURANCE CHARGES **********
SELECT * FROM VBAP WHERE VBELN IN S_VBELN.
SELECT * FROM VBAP WHERE POSNR IN S_POSNR.
ENDSELECT.
ENDSELECT.
CONCATENATE VBAP-VBELN VBAP-POSNR INTO TNAME.
SELECT SINGLE * FROM STXL INTO W_STXL
               WHERE TDNAME = TNAME AND TDID = '0017'.
CALL FUNCTION 'READ_TEXT'
EXPORTING
CLIENT = SY-MANDT
ID = W_STXL-TDID
LANGUAGE = W_STXL-TDSPRAS
NAME = TNAME
OBJECT = W_STXL-TDOBJECT
ARCHIVE_HANDLE = 0
IMPORTING
HEADER = HTEXT
TABLES
LINES = LTEXT .
LOOP AT LTEXT.
IF LTEXT-TDLINE NE ' '.
MOVE : LTEXT-TDLINE TO DTEXT-TDLINE.
APPEND DTEXT.
ENDIF.
ENDLOOP.
LOOP AT DTEXT.
WRITE:/ DTEXT-TDLINE.
ENDLOOP.
ULINE.
HANDLING CHARGES **********
SELECT * FROM VBAP WHERE VBELN IN S_VBELN.
SELECT * FROM VBAP WHERE POSNR IN S_POSNR.
ENDSELECT.
ENDSELECT.
CONCATENATE VBAP-VBELN VBAP-POSNR INTO TNAME.
SELECT SINGLE * FROM STXL INTO W_STXL
               WHERE TDNAME = TNAME AND TDID = '0018'.
CALL FUNCTION 'READ_TEXT'
EXPORTING
CLIENT = SY-MANDT
ID = W_STXL-TDID
LANGUAGE = W_STXL-TDSPRAS
NAME = TNAME
OBJECT = W_STXL-TDOBJECT
ARCHIVE_HANDLE = 0
IMPORTING
HEADER = HTEXT
TABLES
LINES = LTEXT .
LOOP AT LTEXT.
IF LTEXT-TDLINE NE ' '.
MOVE : LTEXT-TDLINE TO DTEXT-TDLINE.
APPEND DTEXT.
ENDIF.
ENDLOOP.
LOOP AT DTEXT.
WRITE:/ DTEXT-TDLINE.
ENDLOOP.
ULINE.
ENDFORM.                    " BODY_DISPLAY
best regards,
prashant

Script: Does sheet exist? If not, duplicate generic client & rename

In my continuing education of Applescript, I've run across the following gap in my knowledge.
I'm in a "tell Numbers" block. I've opened up my Numbers file (Clients.numbers). There will be about 60 sheets there, almost all of which (exceptions are a Master sheet with summaries and a Generic client sheet) relate to specific clients. These sheets are named with the client's name: i.e. "JetsonGeorge", "FlintstoneFred", etc. Each sheet has several tables: personal data, visit dates, billing data, etc.
The script has a list of client names (clients I've seen today, via iCal). I want the script to see if there is a sheet for each client. For those clients who don't have a sheet yet, duplicate the sheet called Generic and rename the duplicate to the client name.
I know how to do this for files in Finder. But I've been unable to find anything in the Numbers dictionary (or here searching on "script duplicate sheet") to make this happen within a Numbers file.
I appreciate any information you can offer.
Vince

Here is a variant of the posted script.
This one use a modified version of the duplicateSheet handler.
It assumes that it may create new sheets without modifying the default contents.
Working this way fasten seriously the job because what is time consuming is not the duplicate task by itself but
the selection of the sheet to replicate.
This new version selects the master sheet when it duplicate it for the first time in a loop.
For the other replicate tasks, it will not re-select the master but it will replicate the last replicate .
As such a replicate is identical to the master one, the result will be the same but it will be very faster.
--[SCRIPT duplicatesheet3]
Enregistrer le script en tant que Script : duplicate_sheet.scpt
déplacer le fichier ainsi créé dans le dossier
<VolumeDeDémarrage>:Users:<votreCompte>:Library:Scripts:Applications:Numbers:
Il vous faudra peut-être créer le dossier Numbers et peut-être même le dossier Applications.
Ouvrir le document Perfect_Kradebook
aller au menu Scripts , choisir Numbers puis choisir "duplicate_sheet"
--=====
L'aide du Finder explique:
L'Utilitaire AppleScript permet d'activer le Menu des scripts :
Ouvrez l'Utilitaire AppleScript situé dans le dossier Applications/AppleScript.
Cochez la case "Afficher le menu des scripts dans la barre de menus".
--=====
Save the script as a Script: duplicate_sheet.scpt
Move the newly created file into the folder:
<startup Volume>:Users:<yourAccount>:Library:Scripts:Applications:Numbers:
Maybe you would have to create the folder Numbers and even the folder Applications by yourself.
Open the Perfect_Kradebook document
go to the Scripts Menu, choose Numbers, then choose "duplicate_sheet"
--=====
The Finder's Help explains:
To make the Script menu appear:
Open the AppleScript utility located in Applications/AppleScript.
Select the "Show Script Menu in menu bar" checkbox.
--=====
Yvan KOENIG (VALLAURIS, France)
2010/05/08
2010/06/28
--=====
Some global constants
property the_students : {"George", "John", "Paul", "Ringo"}
property master_Sheet : "master"
property tMasterTable1 : "tableau 1"
property tMasterTable2 : "tableau 2"
property tMasterTable3 : "tableau 3"
property sKradebook : "Kradebook"
property tKradebook : "Kradebook"
property tCaution : "CAUTION"
property sReport : "Report"
property tReport1 : "report 1"
property tReport2 : "report 2"
property tReport3 : "report 3"
property columnOfIDs : 2 (* vas 6 to grab the students ID *)
--=====
property mesFeuilles : {}
Three properties required by the handler duplicateSheet
property listeObjets : {}
property lesFeuilles : {}
property targetSheetRow : missing value
rule the behaviour of the handler duplicateSheet
--=====
on run
my activateGUIscripting()
my nettoie()
tell application "Numbers"
set dName to name of document 1
tell document dName to set my mesFeuilles to name of sheets
end tell -- Numbers
set missing to {}
if master_Sheet is not in my mesFeuilles then copy master_Sheet to end of missing
if sKradebook is not in my mesFeuilles then copy sKradebook to end of missing
if sReport is not in my mesFeuilles then copy sReport to end of missing
if missing is not {} then
if (count of missing) > 1 then
if my parleAnglais() then
error "The sheets “" & my recolle(missing, " and ") & "” are unavailable in the document “" & dName & "” !"
else
error "Les feuilles “" & my recolle(missing, " et ") & "” n’existent pas dans le document “" & dName & "” !"
end if
else
if my parleAnglais() then
error "The sheet “" & item 1 of missing & "” is unavailable in the document “" & dName & "” !"
else
error "La feuille “" & item 1 of missing & "” n’existe pas dans le document “" & dName & "” !"
end if
end if -- count…
end if -- missing…
tell application "Numbers" to tell document dName
set tables1 to name of tables of sheet master_Sheet
set tables2 to name of tables of sheet sKradebook
--set tables3 to name of tables of sheet sReport
end tell
set missing to {}
if tMasterTable1 is not in tables1 then copy tMasterTable1 to end of missing
if tMasterTable2 is not in tables1 then copy tMasterTable2 to end of missing
if tMasterTable3 is not in tables1 then copy tMasterTable3 to end of missing
if tKradebook is not in tables2 then copy tKradebook to end of missing
if tCaution is not in tables2 then copy tCaution to end of missing
--if tReport1 is not in tables3 then copy tReport1 to end of missing
--if tReport2 is not in tables3 then copy tReport2 to end of missing
--if tReport3 is not in tables3 then copy tReport3 to end of missing
if missing is not {} then
if (count of missing) > 1 then
if my parleAnglais() then
error "The tables “" & my recolle(missing, " and ") & "” are unavailable in the document “" & dName & "” !"
else
error "Les tables “" & my recolle(missing, " et ") & "” n’existent pas dans le document “" & dName & "” !"
end if
else
if my parleAnglais() then
error "The table “" & item 1 of missing & "” is unavailable in the document “" & dName & "” !"
else
error "La table “" & item 1 of missing & "” n’existe pas dans le document “" & dName & "” !"
end if
end if -- count…
end if -- missing…
tell application "Numbers" to tell document dName
Grabs the list of students IDs
With the property setting, here we don't use the IDs but the Last Names
tell sheet sKradebook
tell table tKradebook to set IDs to items 6 thru -2 of (get value of cells of column columnOfIDs)
end tell
set report to ""
set nbIDS to count of IDs
set replicates to {}
repeat with anID in IDs
set anID to anID as text
set match to 0
repeat with j from 1 to nbIDS
if (item j of IDs) as text is anID then set match to match + 1
end repeat
if match > 1 then copy anID to end of replicates
end repeat
if replicates is not {} then
set report to report & my recolle(replicates, ", ")
if my parleAnglais() then
set report to report & " are replicates in " & tKradebook
else
set report to report & " doublonnent dans " & tKradebook
end if -- parleAnglais
end if -- replicates…
if report is not "" then error report
end tell -- Numbers
* Here we are ready to enter the main loop
set targetSheetRow to missing value
repeat with studentID in IDs
if studentID as text is not in my mesFeuilles then (*
Duplicate the master sheet *)
my duplicateSheet_v3(dName, master_Sheet, studentID as text)
delay 0.1
end if
end repeat -- for next student
my nettoie()
end run
--=====
on nettoie()
set my mesFeuilles to {}
set my listeObjets to {}
set my lesFeuilles to {}
set targetSheetRow to missing value
end nettoie
--=====
on decoupe(t, d)
local oTIDs, l
set oTIDs to AppleScript's text item delimiters
set AppleScript's text item delimiters to d
set l to text items of t
set AppleScript's text item delimiters to oTIDs
return l
end decoupe
--=====
on recolle(l, d)
local oTIDs, l
set oTIDs to AppleScript's text item delimiters
set AppleScript's text item delimiters to d
set t to l as text
set AppleScript's text item delimiters to oTIDs
return t
end recolle
--=====
on parleAnglais()
local z
try
tell application "Numbers" to set z to localized string "Cancel"
on error
set z to "Cancel"
end try
return (z is not "Annuler")
end parleAnglais
--=====
on activateGUIscripting()
tell application "System Events"
if not (UI elements enabled) then set (UI elements enabled) to true (* to be sure than GUI scripting will be active *)
end tell
end activateGUIscripting
--=====
==== Uses GUIscripting ====
This handler may be used to 'type' text, invisible characters if the third parameter is an empty string.
It may be used to 'type' keyboard shortcuts if the third parameter describe the required modifier keys.
on raccourci(a, t, d)
local k
tell application a to activate
tell application "System Events" to tell application process a
set frontmost to true
try
t * 1
if d is "" then
key code t
else if d is "c" then
key code t using {command down}
else if d is "a" then
key code t using {option down}
else if d is "k" then
key code t using {control down}
else if d is "s" then
key code t using {shift down}
else if d is in {"ac", "ca"} then
key code t using {command down, option down}
else if d is in {"as", "sa"} then
key code t using {shift down, option down}
else if d is in {"sc", "cs"} then
key code t using {command down, shift down}
else if d is in {"kc", "ck"} then
key code t using {command down, control down}
else if d is in {"ks", "sk"} then
key code t using {shift down, control down}
else if (d contains "c") and (d contains "s") and d contains "k" then
key code t using {command down, shift down, control down}
else if (d contains "c") and (d contains "s") and d contains "a" then
key code t using {command down, shift down, option down}
end if
on error
repeat with k in t
if d is "" then
keystroke (k as text)
else if d is "c" then
keystroke (k as text) using {command down}
else if d is "a" then
keystroke k using {option down}
else if d is "k" then
keystroke (k as text) using {control down}
else if d is "s" then
keystroke k using {shift down}
else if d is in {"ac", "ca"} then
keystroke (k as text) using {command down, option down}
else if d is in {"as", "sa"} then
keystroke (k as text) using {shift down, option down}
else if d is in {"sc", "cs"} then
keystroke (k as text) using {command down, shift down}
else if d is in {"kc", "ck"} then
keystroke (k as text) using {command down, control down}
else if d is in {"ks", "sk"} then
keystroke (k as text) using {shift down, control down}
else if (d contains "c") and (d contains "s") and d contains "k" then
keystroke (k as text) using {command down, shift down, control down}
else if (d contains "c") and (d contains "s") and d contains "a" then
keystroke (k as text) using {command down, shift down, option down}
end if
end repeat
end try
end tell
end raccourci
--=====
CAUTION, this handler requires three properties :
property listeObjets : {}
property lesFeuilles : {}
property targetSheetRow : missing value
on duplicateSheet_v3(theDoc, theSheet, newName)
most of this handler is from Nigel Garvey
local maybe
try
tell application "Numbers"
activate
set theDoc to name of document theDoc (* useful if the passed value is a number. Checks also that we passed the name of an open doc *)
end tell -- Numbers
on error
if my parleAnglais() then
error "The spreadsheet “" & theDoc & "” is not open !"
else
error "Le tableur « " & theDoc & " » n’est pas ouvert ! "
end if -- my parleAnglais
end try
if targetSheetRow is missing value then
This piece of code is time consuming so, when there is nothing to change in the new sheet,
we may drop it when it was already called with the same settings.
The code will no longer duplicate the master sheet one but the newly created one.
As this one is a clone of the master, the result will be the same but it will be really faster.
try
tell application "Numbers" to tell document theDoc
set theSheet to name of sheet theSheet (* useful if the passed value is a number. If we passed a string, checks that the sheet theSheet is available *)
end tell -- Numbers
on error
if my parleAnglais() then
error "The sheet “" & theSheet & "” is unavailable in the spreadsheet “" & theDoc & "” !"
else
error "La feuille « " & theSheet & " » n’existe pas dans le tableur « " & theDoc & " » ! "
end if -- my parleAnglais
end try
set maybe to 5 > (system attribute "sys2")
tell application "System Events" to tell application process "Numbers"
tell outline 1 of scroll area 1 of splitter group 1 of splitter group 1 of window theDoc
if maybe then (* macOS X 10.4.x
'(value of attributes contains 0)': '(value of attribute "AXDisclosureLevel" is 0)' sometimes works in Tiger, sometimes not.
The only possible instances of 0 amongst the attributes are the disclosure level of a sheet row and the index of the first row, which represents a sheet anyway.
Another possibility is '(value of attribute -1 is 0)', which makes me uneasy. *)
set targetSheetRow to first row where ((value of attributes contains 0) and (value of first static text is theSheet))
else (* macOS X 10.5.x or higher *)
set targetSheetRow to first row where ((value of attribute "AXDisclosureLevel" is 0) and ((groups is {}) and (value of first static text is theSheet)) or (value of first group's first static text is theSheet))
end if -- maybe…
tell targetSheetRow to set {value of attribute "AXSelected", value of attribute "AXDisclosing"} to {true, true}
-- Focus the "Sheets" column ('outline 1 …') AFTER the target row is selected.
set value of attribute "AXFocused" to true
delay 0.1
set maybe to (get value of attribute "AXPosition" of targetSheetRow)
Sometimes, the sheet's thumbnail is selected (with the yellow border) and the duplicate instruction behave correctly
but sometimes the yellow border doesn't surface and the duplicate code fails (issue a bell)
end tell -- outline…
end tell -- System Events
end if -- targetSheetRow…
tell application "Numbers" to tell document theDoc
set my listeObjets to name of sheets
end tell -- Numbers
my raccourci("Numbers", "d", "c") (* duplicate , must be here for Snow Leopard !!!! *)
tell application "Numbers" to tell document theDoc
repeat
set my lesFeuilles to name of sheets
if my lesFeuilles is not my listeObjets then exit repeat
delay 0.1
end repeat
repeat with i in my lesFeuilles
if i is not in my listeObjets then (*
Here i is the name of the newly created sheet *)
set name of sheet i to newName
exit repeat
end if -- i is not…
end repeat
end tell -- document thedoc…
end duplicateSheet_v3
--=====
--[/SCRIPT]
Yvan KOENIG (VALLAURIS, France) mercredi 30 juin 2010 12:48:47

Text display issue in SAP script

Hi All,
I have developed a sap script (Invoice) which is having a Footer window.
The footer window should display page number and some text (address of company). The address data is stored in an internal table and the same will be made to display in sap script.
Now my problem is the address data is displaying correctly in the second page. But no data is getting displayed in the first page. If the Invoice is of single page, the address data in Footer window is getting printed properly.
The problem occurs only, when the invoice is of multiple pages....
What might be the problem in this regard...??????
Please help me, as this bug need to be fixed as early as possible....
Regards
Pavan

The size of MAIN and FOOTER window are not getting truncated. Both window have designed properly.
In the first page, the footer window will display Page No data and the address data will be invisible. In debig mode, i can see the value of address will be passed to text symbols of sap script.
There are no conditions set in the sap script for Footer window.
one more observation is that after execution (at print preview screen), if i go back and again click for print preview, the address data is getting printed in the first page...!!!
Regards
Pavan

Duplicates song in Itune

hi everyone, i have duplicated my entiere library (songs)in Itunes and i would like to know the best way to delete all duplicates
thanks for any help

thanks a lot for taking the time
i have downloaded 2 files duplicates and DeDuper
i double click or right click to open and all i get is notepad that i cannot run it look like this
==========
' Duplicates
' ==========
' Version 1.0.0.2 - December 6th 2012
' Copyright © Steve MacGuire 2011-2012
' http://samsoft.org.uk/iTunes/Duplicates.vbs
' Please visit http://samsoft.org.uk/iTunes/scripts.asp for updates
' =======
' Licence
' =======
' This program is free software: you can redistribute it and/or modify it under the terms
' of the GNU General Public License as published by the Free Software Foundation, either
' version 3 of the License, or (at your option) any later version.
' This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY;
' without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
' See the GNU General Public License for more details.
' Please visit http://www.gnu.org/licenses/gpl-3.0-standalone.html to view the GNU GPLv3 licence.
' ===========
' Description
' ===========
' Creates a playlist listing all duplicate tracks from the selected tracks or playlist
' Written in response to the removal of Show Duplicates/Exact Duplicates in iTunes 11
' Related scripts: Duplicates, DuplicateSong&Artist, ExactDuplicates
' =========
' ChangeLog
' =========
' Version 1.0.0.1 - Initial version

Script to split threaded story but keep hyperlink destinations?

I have a series of long CS6 documents in a book with stories running through many frames. These stories have many text anchors acting as hyperlink destinations within (and across) the files.
Each story needs to be split into separate frames.*
The script SplitStory.jsx does exactly this, but in the process it breaks my hyperlinks to destinations anchored in the text of the story being split.
The problem seems to be that a hyperlink destination does not "carry" the correct information when duplicated, and the script duplicates each frame before removing it.
A manual solution
I have found a manual way of producing the desired result:
Unlink the last frame in the thread,
Cut (not copy) the overmatter from the penultimate frame,
Paste into what was the last frame (which is now a standalone frame).
Repeat recursively until the entire story is reduced to standalone frames.
This seems crying out for a scripting solution: it may even be relatively simple? But I cannot find anything suitable and my javascript is not good enough to write one from scratch.
Could anyone offer any suggestions?
* As an aside, I need to split the stories into separate frames so that all the text on a given page gets extracted to a text file together. Otherwise all the text in the main text thread gets extracted and then our software "mops up" display quotes, etc. This is not acceptable in my scenario.

It seems that Rorohiko's plug-in TextStitch will automatically de-thread linked frames whilst preserving the destinations.
I Rorohiko

How to duplicate a document?

Hi guys,
I need to run a script that performs some modifications to the file, and in order to do that I would like to be working on a temp file.
process:
- run the script
- script duplicates file
- script runs on duplicated file
- close/dump duplicate file
I need help with the duplication process, i've done it before in a PSD script but the API seems to be different for Illustrator.
here's an AI example taken from "AI CS4 scripting reference"
// Duplicates any selected items from
// the active document into a new document.
var newItem;
var docSelected = app.activeDocument.selection;
if ( docSelected.length > 0 ) {
     // Create a new document and move the selected items to it.
     var newDoc = app.documents.add();
     if ( docSelected.length > 0 ) {
          for ( i = 0; i < docSelected.length; i++ ) {
               docSelected[i].selected = false;
               newItem = docSelected[i].duplicate( newDoc, ElementPlacement.PLACEATEND );
     else {
          docSelected.selected = false;
          newItem = docSelected.parent.duplicate( newDoc,ElementPlacement.PLACEATEND );
else {
     alert( "Please select one or more art objects" );
Now although this can be tweaked to duplicate all layers, wether selected or not, it doesn't maintain the layers.
So it duplicates all pageItems into one single layer.
How can i duplicate the entire Document as is with same layers and pageItems structure?
thanks

You would have to use recursion in that case.
Here is a short (and incomplete) example of how to iterate through all the pageItems in all the layers. Be careful with recursion, because you could run out of memory if your document is enormous. I've put in a counter that limits the recursive steps to 5,000, but you can experiment.
var doc = app.activeDocument;
var docLayers = doc.layers;
var maxSteps = 5000;
var stepsSoFar = 0;
function walkLayers(aLayerArray) {
    if (stepsSoFar < maxSteps) {
        stepsSoFar++;
        for (var i=0; i<aLayerArray.length; i++) {
            // create an object representing a layer state
            var aLayer = aLayerArray[i];
                // do something with aLayer
            for (var j=0; j <aLayer.pageItems.length; j++ ) {
                var pItem = aLayer.pageItems[j];
                // do something with pItem
            // if this layer has layers of its own, iterate through those
            if (aLayer.layers.length > 0) {
                walkLayers(aLayer.layers);
walkLayers(docLayers);

Can I repeat the navegation bar at the bottom of a page?

Hello,
Some webpages I am writing are fairly long. I would like to repeat the navegation bar at the bottom of the page, so that the reader does not have to go to the top of the page to navegate through the pages of my website.
Thank you!

Allanfrance,
I played around with the script a bit more and couple potential problems came up with the script:
1) Race condition, that is when the nav bar is not completely loaded and the script duplicates it, therefore the bottom nav bar will not be created.
2) Both nav bars may not render correctly when you use decorated themes, themes with fancy background ie: Darkroom, Layered paper etc...
So this is an improved script, please use this instead of the previous one:
<script type='text/javascript'>
function bottomNavbar()
bottomNav = parent.document.createElement('div');
bottomNav.innerHTML = parent.document.getElementById('nav_layer').innerHTML;
bottomNav.removeChild(bottomNav.childNodes[1]);
bottomNav.removeChild(bottomNav.childNodes[2]);
parent.document.getElementById('body_layer').appendChild(bottomNav);
if (window.addEventListener) {
window.addEventListener("load",setTimeout("bottomNavbar()", 500),false);
} else if (window.attachEvent) {
window.attachEvent("onload",setTimeout("bottomNavbar()", 500));
} else {
window.onload = function() {bottomNavbar();}
</script>

Firefox 17 on Windows 7 prints blank pages after printing selection

I need to be able to highlight text on a webpage and print only that text using the print selection inside the file/print tab. However, instead, I am getting only that highlighted text AND then blank pages (with headers and footers) keep printing (how many pages that print depends on the actual size of the webpage).
I have Windows 7, 32bit and Firefox 17. I updated Firefox this morning and restarted but the problem still exists. I did not have this problem when I had Windows XP.
The print selection works properly in IE9.

Firefox's Print Selection feature has always left much to be desired...
What I get is blank pages ''before'' the selection but not after. You get blank pages for the entire document? That's especially unhelpful.
I am aware of two ''workarounds''. Each isolates the selection by itself so you can print it normally, i.e., without choosing Print Selection.
'''[https://addons.mozilla.org/en-US/firefox/addon/nuke-anything-enhanced/ Nuke Anything Enhanced]'''
After installing this add-on, when you have a selection and right-click it, you can choose "Remove everything else" to isolate the text for printing. Note that you need to reload the page to see the rest of the content again.
'''Bookmarklet'''
Before learning about the above, I wrote a small script to isolate the selection for printing. I wouldn't use it if you are filling in a form, making a purchase, etc., since the script duplicates part of the page and this may break the form. On the other hand, at least there is some level of undo without reloading the page.
If you want to try it, here are the steps:
(1) Select and copy the following line of script (it's all one long line):
javascript:var sel=window.getSelection(); if(!sel.isCollapsed){var rng=sel.getRangeAt(0); if(!rng.collapsed){var docfrag=rng.cloneContents(); if(!document.getElementById("divHideMe")){var rng2=document.createRange(); rng2.selectNodeContents(document.body); var myContainer=document.createElement("DIV"); rng2.surroundContents(myContainer); myContainer.setAttribute("id","divHideMe"); rng2.detach();} myContainer.style.display="none"; if(document.getElementById("printFrag")){var myFrag=document.getElementById("printFrag"); while(myFrag.firstChild) {myFrag.removeChild(myFrag.firstChild);} myFrag.style.display="block";}else{var myFrag=document.createElement("DIV"); myFrag.setAttribute("id","printFrag"); document.body.appendChild(myFrag);} myFrag.appendChild(docfrag); rng.detach(); var myP=document.createElement("P"); myFrag.appendChild(myP); myP.setAttribute("id","killBtn"); var myBtn=document.createElement("INPUT"); myP.appendChild(myBtn); myBtn.setAttribute("type","button"); myBtn.setAttribute("value","Return to Page"); myBtn.setAttribute("onclick","document.getElementById('divHideMe').style.display='block'; document.getElementById('printFrag').style.display='none';"); myStyle=document.createElement("STYLE"); myFrag.appendChild(myStyle); myStyle.setAttribute("type","text/css"); myStyle.setAttribute("media","print"); myStyle.innerHTML="#killBtn{display:none}";}} void 0;
(2) Right-click the Bookmarks Toolbar and choose New Bookmark. (If you do not ordinarily display the Bookmarks Toolbar, you can add it to the menu instead. Whatever will be convenient.)
(3) Click in Location and paste the script.
(4) Click in Name and name it whatever you like (I call it Crop4Print) and then click Add.
Now after selecting text, click the bookmarklet button to hide the rest of the page.

Help - Difficulties with transate()

Hi, I am having some weird difficulties with the translate method. I am trying to reposition one of layers by using X and Y values from a CSV file. I tried to access the variables various ways. One was using part[5], (with 'part' as the variable'). Then tried setting variables for each value (as shown below). The dubber doesn't report any errors. The weird thing about it is that the code is supposedly executed, but the translate function is somehow 'ignored'. When I stop the script, I can see that it exists in the history panel. I get no errors during run time either. Can someone please help. I have no idea what is going on with this strange problem.
Also: I am working two documents. In my script I have it open an image that has a dpi of 266. The script duplicates the single layer of that file into a 72 dpi document and repositions the layer according to the x and y values defined in my CSV file. I tried setting both to 72 dpi, however nothing different happens. The only time something changes is if I put a constant number for x and y. By doing that, it doesn't even move to the spot it is suppose to. It repositions, but it is placed so far off the canvas.
//Duplicate unprocessed mugshot in its proper layer level, all-in-one step
app.documents[2].layers[0].duplicate(documents[1].layerSets[0].layerSets[part[3]].layerSet s[part[4]].artLayers[0], ElementPlacement.PLACEAFTER);
//Close unprocessed mugshot after duplicating
app.documents[2].close();
//Resize mugshot layer using a percentage
app.documents[1].layerSets[0].layerSets[part[3]].layerSets[part[4]].artLayers[1].resize(70 .7, 70.7, AnchorPosition.MIDDLECENTER);
//Reposition the image according to x and y values defined in CSV file
var x = part[5];
var y = part[6];
app.preferences.rulerUnits = Units.PIXELS;
app.documents[1].layerSets[0].layerSets[part[3]].layerSets[part[4]].artLayers[1].translate (x, y);
//Create mask clipping from mugshot layer
var desc3 = new ActionDescriptor();
var ref2 = new ActionReference();
ref2.putEnumerated( charIDToTypeID('Lyr '), charIDToTypeID('Ordn'), charIDToTypeID('Trgt') );
desc3.putReference( charIDToTypeID('null'), ref2 );
executeAction( charIDToTypeID('GrpL'), desc3, DialogModes.NO );

I've reworked your code a bit to use intermediate variables. This makes it
easier to read (for me, at least) and also perform better.
The translate() function is really a 'moveRelative' not a 'moveAbsolute'
function. The x and y parameters are deltas from the layers current location, so
that has to be taken into account as I've done below. BTW, I may have the terms
reversed where I compute x and y. I normally make an ActionManager-type call to
Transform to do the resize and move in one step.
-X
var doc1 = app.documents[1]
var doc2 = app.documents[2];
var ls0 = doc1.layerSets[0];
var ls3 = ls0.layerSets[part[3]];
var ls4 = ls3.layerSets[part[4]];
//Duplicate unprocessed mugshot in its proper layer level, all-in-one step
doc2.layers[0].duplicate(ls4.artLayers[0], ElementPlacement.PLACEAFTER);
//Close unprocessed mugshot after duplicating
doc2.close();
var layer = ls4.artLayers[1];
//Resize mugshot layer using a percentage
layer.resize(70.7, 70.7, AnchorPosition.MIDDLECENTER);
var bnds = layer.bounds;
//Reposition the image according to x and y values defined in CSV file
var x = part[5] - bnds[0].value;
var y = part[6] - bnds[1].value;
app.preferences.rulerUnits = Units.PIXELS;
layer.translate (x, y);
//Create mask clipping from mugshot layer
var desc3 = new ActionDescriptor();
var ref2 = new ActionReference();
ref2.putEnumerated( charIDToTypeID('Lyr '), charIDToTypeID('Ordn'),
charIDToTypeID('Trgt') );
desc3.putReference( charIDToTypeID('null'), ref2 );
executeAction( charIDToTypeID('GrpL'), desc3, DialogModes.NO );

Automatic row fetch based on a select list

db11gxe , apex 4.0 , firefox 24 ,
hi all ,
i want to do automatic row fetch when the value of a select list changes ?
but first i should ofcourse create a tabular form to fetch the data into it , but what i want is ,if i fetch 2 rows then the report contains only two rows , if i fetch 3 , the report contains only 3
, if i fetch nothing , the report has nothing ?
thanks

Assuming all your page items are on separate rows, under your Page Attributes Header and Footer section, add the below function under Header Text:
<script>
function f_toggleNM() {
   // if P2_ATTACHMENT_TYPE value is D, then show row holding P2_CUSTOM_NAME and P2_CUSTOM_MSG. Else hide them
   $f_Show_On_Value_Item_Row('P2_ATTACHMENT_TYPE', [ 'P2_CUSTOM_NAME', 'P2_CUSTOM_MSG' ], 'C');
   // if P2_ATTACHMENT_TYPE value is C, then show row holding P2_DEFAULT_NAME and P2_DEFAULT_MSG. Else hide them
   $f_Show_On_Value_Item_Row('P2_ATTACHMENT_TYPE', [ 'P2_DEFAULT_NAME', 'P2_DEFAULT_MSG' ], 'D');
</script>Under Footer Text, add the below:
<script>
f_toggleNM();
</script>And on the P2_ATTACHMENT_TYPE item, Element tab, HTML Form Element Attributes, add below:
onchange="f_toggleNM();"Hope this helps. Thanks!
JMcG

Script Duplicate footer

Similar Messages

Maybe you are looking for