Insert customer field in OneCode ACS in Presort

I am mailing a Full Service mailing using the IMB barcode with the endorsement ELECTRONIC SERVICE REQUESTED (used to be Change Service Requested). Is there a way to use a customer supplied field (PID for personal identfication number - 9 digits) instead of a serial number? The PID is a unique 9 digit number. If so, where do I use the PID field in the Presort job file? The customer will use this field during the ACS process. The mailing is a Standard Mail Automation Letter mailing. Please let me know.

If the PID is unique per record, you can map it in your Presort DEF file with PW.IMB_Serial = [PID field].

Similar Messages

Extending the Search Object of a BOL Entity with custom fields

Hi All,
I have to enhance the structure of the BOL search object 'BuilHeaderSearch' with custom fields!.
i went to the transaction genil_bol_browser and find out the structure of the object as, 'CRMST_HEADER_SEARCH_BUIL'
how can i insert custom fields into this structure, so that i can display these custom fields at the Front end ( Web IC ).
Thanks in advance,
sudeep v d.

Hi Sudeep!
First of all it should be mentioned that: it is NOT possible to change list of <b>SEARCH</b> criteria in IC!
So, in other words, you can search BP ONLY by params listed in native structure 'CRMST_HEADER_SEARCH_BUIL'.
BUT: You can <b>FILTER</b> search results!
For example: you get the list of BP with MC_NAME1 (lastname) search criteria (only by SAP class!)and THEN you can filter (delete from list) by YOUR criteria (in your class!).
Is it clear?
So how to add your own criteria?
1. Transaction GENIL_MODEL_BROWSER - Model Browser forGen.IL Applications
2. Component Set - ALL
3. Search Objects -> BuilHeaderSearch -> Attribute Structure ->CRMST_HEADER_SEARCH_BUIL (Dbl Click)
4. Append Structure (or F5)
5. Name the new sub-structure and provide all new fields
So now you can use this new fields in IC Z-classes.
I had the same task and nobody in SDN could help - so I had bought new SAP_book: <a href="http://www.sappress.com/product.cfm?account=&product=H1909">mySAP CRM Interaction Center</a> because in Contents there were:
<b>"Extending the Business Partner Search in IC WebClient by New Search Fields"</b>.
So in fact it is not truth: it is not possible to <i>extend search</i>. You can only filter results!
<b>BUT</b>!
It is not the end of my post! I hope that SAP people will see this post. I found a BUG in SAP classes and methods: it is not possible to navigate to first position in collection wraper!
exactly:
lr_current ?= entity_col->if_bol_bo_col~get_first( ).
doesn't work.
So position of cursor puts on second record in structure!
In other words it is not possible to filter the first record in search result! And so new search is not efficient
I think that is is bug and wait for comments of SAP.
<b>Reward points if it helps.</b>
Regards,
Alexander

"The selected cells are read-only" error on Custom Field when trying to insert in Datasheet mode

I have a custom field that works completely fine. Yesterday our QA team found out that when trying to insert in Datasheet format, the error "The selected cells are read-only" was thrown. Any ideas? I tried passing the following property to my fldtypes_field.xml file:
    <Field Name="ReadOnly">FALSE</Field>
No luck.Victor Palma

Unfortunately it did not work. I also developed the code and access the field and checked its property called "ReadOnlyField" which is already set to false.
Below is the xml that i am using. Can you please share the xml that you had used?
<?xml version="1.0" encoding="utf-8"?>
<FieldTypes>
  <FieldType>
   <Field Name="TypeName">MyCustomField</Field>
   <Field Name="ParentType">Text</Field>
   <Field Name="TypeDisplayName"> My Custom Field</Field>
   <Field Name="TypeShortDescription"> My Custom Field</Field>
   <Field Name="AllowBaseTypeRendering">True</Field>
   <Field Name="ReadOnlyField">False</Field>
   <Field Name="UserCreatable">TRUE</Field>
   <Field Name="ShowInListCreate">TRUE</Field>
   <Field Name="ShowInSurveyCreate">TRUE</Field>
   <Field Name="ShowInDocumentLibraryCreate">TRUE</Field>
   <Field Name="ShowInColumnTemplateCreate">TRUE</Field>
   <Field Name="FieldTypeClass">My Assembly Information goes here</Field>
  </FieldType>
</FieldTypes>

Custom field's text not getting displayed in standard report

Hi All,
I have a requirement like this .
There is a Custom field which we have added in a standard FICO report ie S_PL0_86000030 ( G/L Account - Balances ).
The custom field is added through a report painter , while seeing the config of report painter the custom field is showing the selection text , but when we run this transaction S_PL0_86000030 , the technical name of that field appears in the selection screen .
For example if the field is ' matnr' then we give the text as 'Material Number' . Then in the screen this field is getting displayed as Matnr instead of Material Number.
Please suggest me on this.
Thanks,
Sumit

In transaction GRR2
Insert->
selection parameters ->
take the variable type as >Tesxt varaible for selection parameter
chosse >material no.
hope ths helps
Bhanu

SRM 7 - How to make a custom field dynamically retrieved trigger a refresh?

Hi all,
we're working on a brand new installation of SRM 7.
For contracts and purchase order, we created an enhancement on the webdynpro that manages header document data; in such view, custom fields are obtained dynamically and populate a Transparent container; by code, some tray group visually all the custom fields related to a specific section.
Now, the task is quite general; some of these "dynamically retrieved" fields should refresh, when populated, the view.
That is to say, in our context, that some custom field should automatically trigger the WDDOMODIFYVIEW method (which has been extended via overriding with an enhancement) when a value is inserted.
This would be a simple task if the field is explictly visible in the layout screen, since I could easily associate an event to the field itself.
But, since these custom field are automatically extracted in the WDDOMODIFYVIEW method, we don't know how to manage these field's behavior, e.g. after an input value has been inserted.
Each dynamic custom field is a type ref to cl_wd_uielement; we wonder if we have a way to associate an event (e.g., onEnter) to such an element.
Thanks in advance for any suggestion or help you will give us
EDIT: I guess this could not be the best section for such a kind of question ... I'd gently ask moderators eventually to move the thread to the Webdynpro section, if necessary. Thanks in advance.
Edited by: Matteo Montalto on Oct 7, 2010 6:01 PM

Closed. I opened a thread on this topic in a more convenient section of SDN forums (Specifically, web dynpro abap). Thanks anyway:)

Add ECC Custom Fields in CRM Web UI ERP Order item

hi all,
i have to Add ECC Custom Fields in CRM Web UI ERP Order item .
I have :
- add the field on Web UI Screen.
- add the field on structure TDS_item_COMV and TDS_item_COMC in ecc
- insert record for field on LORD_MAPPING table
- implemented badi BADI_LORD_DO_PA BADI_LORD_GET_INPUT_MODE.
- implemented method GET_I_S_STRUCT on crm with :
CASE COMPONENT.
    WHEN 'ZZSPOND'.
      RV_DISABLED = ABAP_False.
endcase.
- on method do_prepare_output i have change value of fields with code :
lr_loop = typed_context->erpadmini->collection_wrapper->get_first( ).
WHILE lr_loop IS BOUND.
posnr = lr_loop->get_property_as_string( iv_attr_name = 'POSNR' ).
Does the current item has to be set for "Sponda Idraulica"?
READ TABLE Z5CL_GSA_TOOL0001=>GT_ITEMS_SPOND INTO ls_spond
                              WITH KEY posnr = posnr.
IF sy-subrc = 0.
lr_loop->set_property_as_string( iv_attr_name = 'ZZSPOND' iv_value = 'X' ).
DATA : V_X TYPE STRING.
V_X = lr_loop->get_property_as_string( iv_attr_name = 'ZZSPOND' ).
ENDIF.
lr_loop = typed_context->erpadmini->collection_wrapper->get_next( ).
ENDWHILE.
I can't change the field value because it is "not changeble" .
Can you help me ?
Thanks in advance.

Hi Celi,
I have created some fields at header level of ERP Order, and the user is available to change them, replicating the information to SAP ECC (using interface LORD II).
All sales item information is treated using RFC ERP_LORD_GET_ITEM_MULTI, available in SAP ECC.
Please check the following point:
If those structures below were expanded with your custom fields:
SAP CRM:
CRMST_L2_ITEM_COMV
CRMST_L2_ITEM_COMC
CRMTT_ADMINI_ERPIL
CRMTT_ADMINI_I_ERPIL
SAP ECC:
TDS_RFC_ITEM_COMV
TDS_RFC_ITEM_COMC
Please check if for your scenario is necessary to implement the enhancement BADI_LORD_DO_PAI method ADD_SUPPLY_LIST. The code below works for header level.
DATA: ls_supply TYPE tds_field_supply.
IF iv_object_id EQ 'HEAD'.
    IF iv_module EQ 'VBAK_BEARBEITEN'.
      ls_supply-field = 'ZZCCINS'.
      APPEND ls_supply TO ct_supply.
      ls_supply-field = 'ZZCCNUM'.
      APPEND ls_supply TO ct_supply.
      ls_supply-field = 'ZZCCNAME'.
      APPEND ls_supply TO ct_supply.
      ls_supply-field = 'ZZAUNUM'.
      APPEND ls_supply TO ct_supply.
    ENDIF.
ENDIF.
I hope it helps!
Kind Regards!

Error in adding custom fields to mm01/mm02/mm03 trx

Hello People,
To add my custom fields in the basic view tab of MM01 transaction, i have performed the following steps:-
1. Inserted the append structure in MARA table with the required fields.
2. Copied function group 'MGD1' to 'ZMGD1' and then set the layout of screen '0001' as per my requirement.
3. Then i made changes in spro as
SPRO->Logistics-General->Material Master->Configuring the material master->define structure of data screens for each screen sequence and inserted my program name( of function group 'ZMGD1') and screen number(0001) in 21(Std ind.(short) tab pages)->7(Basic Data 1)->8(sequence).
Now, if i click on SPRO option (view data screen), then i can see my fields added in basic data view...
but when i execute 'MM01/MM02/MM03' trx there my added fields do not appear....
Does anyone know where i am missing out??
Please suggest...
Thanks in advance..
Rgds,
Abhi

Here are some notes I have from when I recently added a new screen/subscreen to Material Master transactions. Hopefully this information will help you.
This guide should be used in conjunction with OSS note 44410 and IMG notes Logistics->Logistics Material Master->Material->Configure Customized Material Master.
Online Maintenance.
1. Add fields to append structure ZAEMARA.
Use data dictionary maintenance u2013 SE11
2. Generate table MARA.
3. Add fields to view MARU and generate.
Use data dictionary maintenance u2013 SE11.
4. Create new sub-screen or add new fields to screen SAPLYMM1 9001.
Use Screen Painter u2013 SE51.
Change flow logic to add fields to field: statement and to add any validation required. Generate screen.
If this is the first time additional data has been added to material master it will be necessary to create a new function group and associated programs. See Configure Customised Material Master paragraph Requirements.
5. If new sub-screen, add to Customer main screen.
Transaction OMT3.
Double click on u2018Std industry sequenceu2019.
Choose customer screen and Details.
Change the first occurrence of 0001 (blank screen) to new screen number.
Save.
Back arrow.
Click on Transport button and choose required transport.
6. To include in 'Copy with Reference' processing - MM01, add new MARA fields to table T130F. (in each client)
Use Transaction SM31. (make a copy of another ZZ field by typing over existing name).
Add to transport manually:- R3TR TABU T130F + individual keys
7. Test Material create, change, display.

BP Custom Field replication - CRM to ECC

Hello Developers,
I have added custom fields to the CRM BUT000 (Business Partner) table, using AET. Now, I need to replicate these custom fiields to ECC. We have configured, and are successfully replicating the standard BP fields from CRM to ECC. However, the new AET custom fields are not replicating.
Can you please help me by identifying BADIs, Enhancements, or User Exits where I can insert the required code in order to accomplish this custom field replication, on both the CRM and ECC sides of this replication? Is there a document that describes what is required?
We are running ECC 6.0, and CRM 7.0.
Thanks for your help!
Duane

Hi Brian,
Thanks for your help. I have resolved this, and the information that you provided was helpfutul.
I had to create a function module in ECC, modeled after the SAP provided sample FM SAMPLE_INTERFACE_DE_BALE. In addition to this, I had to configure entries in the standard SAP tables TBE24 and TBE34 (event DE_BALE), so that my new function module would be called.
Duane.

How do you get the custom fields added to a address book to show up on Pages 09 when merging fields?

I created some custom fields in the address book and want to get them merged into a Pages 09 document. When using the merge fields feature in Pages, only the standard fields are displayed. I am looking for a way to have the custom fields from the address book inserted into the document.

I believe you will find them if you go to table - unhide all columns. When you drag and drop card(s) into pages, it automatically shows default fields. The others are there but hidden. I hope this works for you!

Inserting a field at a bookmark location.

I'd like to be able to programmatically insert a signature field into a pdf that has been created via an MS Excel macro that accesses MS Word. Everything works great so so far, including being able to insert the signature field.
However, the location (vertical) of the signature field may change from pdf to pdf so I thought I might be able to insert that field at the location of a bookmark that has been created in MS Work and successfully transferred to the pdf. But, it seems bookmarks don't have location attributes so I can "locate" the bookmark.
And the addField method seems to only want the four points of a rectangle in order to insert the field.
Having written all that, can anyone suggest how I might achieve my goal of inserting a field at a location that may change?
Thank you.

As you've noticed, bookmarks and fields do not operate in the same way.
What you can do, though, is write a script that will add a signature field
to each page a bookmark is pointing to (at a pre-defined location, such as
one of the corners). This can be achieved using a custom script.

Can't insert custom HTML or change social widgets to update Phone layout

MUSE 2014.2.1.10, CL 787362 on Windows 8.1 i7 processor 24 GB RAM
Anytime I try to insert custom HTML in the phone layout pages I get a window that says webpage could not be found in a window that is too wide for the screen size and can't be re-sized!!!
I am adding scripts, inline css and custom form code. Need to republish changes and can't on mobile layout. Its local code but I get The webpage cannot be found error!!! It also does this with the built in social widgets.... The code is there in the page on export but you can't preview and since I can't resize the box to 380px wide ( it jumps back open) it throws off my layout when export page.   This is not just custom HTML but upon changing or adding any of the built in social widgets such as Google maps, Facebook or other social media. Forms, buttons, menus and compositions no problems... they work just as they normally would.
Preview mode just gives me the whole page as blank when I try to preview the page in Muse. HELP I need to update the address and the form to match the desktop site but the error is persistent! and undo does not revert it back to previous content I just get the webpage cannot be found box even on undo!!!!

The SECOND picture in my previous post IS THE PREVIEW... NOTHING appears when I try to view the page in phone view!!!!
HERE IS THE CODE!!!!!
<style type="text/css">
input[type="text"]
color: #323232;
border: 1px solid #E0E0E0;
margin: 5px;
fieldset {
border:1px solid #E0E0E0;
padding:10px;
width: 350px;
legend {
padding:10 px 10 px;
border: none;
color:323232;
margin:10px;
textarea
width: 328px;
min-height: 14px;
border-width: 1px;
border-style: solid;
border-color: #E0E0E0;
padding: 6px;
color: #323232;
line-height: 14px;
margin: 10px;
button[type="submit"]
text-indent:0;
border:1px solid #E0E0E0;
display:inline-block;
background-color:white;
color:#323232;
font: Arial, sans-serif;
font-size:12px;
font-weight:bold;
font-style:normal;
height:25px;
line-height:25px;
width:125px;
text-align:center;
margin-top:5px;
button[type="submit"]:hover {
              color:#679E11;
button[type="submit"]:active {
position:relative;
top:1px;
label.label-top {
display: block;
margin-top:5px;
</style>
<form name="emailForm" id="emailForm" onsubmit="return validateform();" action="contact-us.asp" method="post">
<fieldset>
<legend>E-Mail</legend>
<div>
<label class="label-top" for="name">
Enter your Name:
</label>
<input type="text" name="name" id="name" size="30" class="inputbox" value="" />
</div>
<div>
<label class="label-top" for="mail">
E-mail address:
</label>
<input type="text" id="mail" name="mail" size="30" value="" class="inputbox" maxlength="100" />
</div>
<div>
<label class="label-top" for="subject">
Message Subject:
</label>
<input type="text" name="subject" id="subject" size="30" class="inputbox" value="" />
</div>
<div>
<label class="label-top" for="text">
Enter your Message:
</label>
<textarea cols="50" rows="10" name="text" id="text" class="inputbox required"></textarea>
</div>
<div>
<input type="checkbox" name="email_copy" id="email_copy" value="1" />
<label for="email_copy">
E-mail a copy of this message to your own address. </label>
</div>
<div>
<button class="button validate" type="submit">Send</button>
</div>
</fieldset>
</form>
<script type="text/javascript">
function validateform()
var emailRegEx = /^[A-Z0-9._%+-]+@[A-Z0-9.-]+\.[A-Z]{2,4}$/i;
    if (document.emailForm.name.value == '') {
        alert('Name is required');
return false;
    else if (document.emailForm.mail.value==''){
        alert('Address cannot be blank');
return false;
   else if (document.emailForm.mail.value.search(emailRegEx) == -1) {
          alert("Please enter a valid email address.");
     return false;
    else if (document.emailForm.text.value==''){
        alert('Message field cannot be blank');
return false;
else
      alert('Thank you for contacting Argus Talent.');
return true;
</script>

Export Project Tasks to Excel using VBA by Custom Field

Question referring to the link:
http://social.technet.microsoft.com/Forums/projectserver/en-US/9c46458c-893f-41ba-bd46-bdb59c533f4a/export-project-tasks-to-excel-using-vba-by-custom-field?forum=project2010custprog
Help needed. I have inserted my question at this address for Andrew or anybody else to reply. Hope to hear from you.
Regards,
Chuck

Thank you Andrew for getting back to me and I have found somewhere on the net the following macro that would do the job for the version 2007. Here is a copy for those that may need it.
Option Explicit
Sub CreateMenus()
Dim cbrMain As CommandBar
Dim ctlMain As CommandBarControl
Dim ctlOLExport1 As CommandBarControl
Dim ctlOLExport2 As CommandBarControl
Dim ctlOLExport3 As CommandBarControl
Set cbrMain = Application.CommandBars.ActiveMenuBar
Set ctlMain = cbrMain.Controls.Add(Type:=msoControlPopup, Temporary:=True)
ctlMain.Caption = "Export to Outlook"
Set ctlOLExport1 = ctlMain.CommandBar.Controls.Add(Type:=msoControlButton)
With ctlOLExport1
.Caption = "Selection to Outlook tasks"
.OnAction = "Macro """ & "Export_Selection_To_OL_Tasks"""
End With
Set ctlOLExport2 = ctlMain.CommandBar.Controls.Add(Type:=msoControlButton)
With ctlOLExport2
.Caption = "Selection to Outlook appointments"
.OnAction = "Macro """ & "Export_Selection_To_OL_Appointments"""
End With
Set ctlOLExport3 = ctlMain.CommandBar.Controls.Add(Type:=msoControlButton)
With ctlOLExport3
.Caption = "Selection to Outlook notes"
.OnAction = "Macro """ & "Export_Selection_To_OL_Notes"""
End With
End Sub
Cheers!
Chuck

CSAP_BOM_ITEM_MAINTAIN - Problems while clearing custom fields

Hi, I try to modify some bom items, it works fine so far, but I get into trouble when trying to update previosly filled fields with empty ones.
First, I check my structure and insert a 'delete field character' into initial fields:
LOOP AT fieldcat INTO wa_fieldcat.
        IF wa_fieldcat-fieldname EQ 'FLDELETE'.
          CONTINUE.
        ENDIF.
        ASSIGN COMPONENT wa_fieldcat-fieldname OF STRUCTURE bomline TO <field>.
        IF sy-subrc IS INITIAL.
          IF <field> IS INITIAL OR <field> EQ space.
            <field> = '!'.
          ENDIF.
        ELSE.
          MESSAGE 'Error while looping thru bomline structure to update fields' TYPE 'E'.
        ENDIF.
     ENDLOOP.
Then, I use CSAP_BOM_ITEM_MAINTAIN to update bom
CALL FUNCTION 'CSAP_BOM_ITEM_MAINTAIN'
    EXPORTING
      i_stpo                   = bomline
*         FL_DEP_ALE_CONFORM       = ' '
    IMPORTING
      o_stpo                   = bomline_out
      fl_warning               = warning
*       TABLES
*         T_DEP_DATA               =
*         T_DEP_DESCR              =
*         T_DEP_ORDER              =
*         T_DEP_SOURCE             =
*         T_DEP_DOC                =
    EXCEPTIONS
      error                    = 1
      OTHERS                   = 2
So, this works out fine, but not for my custom fields in the stpo_api02's .INCLUDE structure. While the standard fields are deleted when I fill them with '!', the custom ones just contain '!' afterwards.
When I dont put '!' into my custom fields and make them initial prior invoking CSAP_BOM_ITEM_MAINTAIN, their contents stay untouched.
However, real updates, where field contents are changed to some value but initial work flawlessly, on both, the stock and my custom fields.
Any Idea on this?

Hi,
Can you try to read the BOM items before changes and use the same structure in change BAPI by modifying the structure with only the changes. I guess this will support the clearing of the custom fields.
With Regards,
Rajesh V.

Required a customer field(located in the profitability segment box) as mand

our client is requested that the customer field (located in the Profitability Segment box) be a mandatory field for GL accounts which are getting posted directly from FI. This field is needed so that proper reporting can be generated for bad debt and product liability claims. Currently this field is not a mandatory when making journal entries, so there were some postings happened with out customer field. Due to this we are unable to extract exact values in CO-PA reports . Please can some one help me on this and explain the process and settings for this??
Thanks in advance.
Regards,
Venkat

Hi Eli,
I have posted note to SAP and i got the below reply from them.
Get this functionality you should change
the coding of form DERIVE_CRITERIA_EXTENDED from include RKEVRK2L after
uninstallation of note 115500(in case you have installed) like this:
Im Dialogfall (Kontierungspopup) Verprobung ob für Feld
Mußeingabe erforderlich (Merkmalsgruppe!)
(nicht f. Faktura, da dort keine Fehlermeldung moeglich)
if ( xt_criteria-field is initial
BEGIN OF DELETION *****
and xt_criteria-status eq '2'
and not is_status_flags-dialog is initial ) .
perform send_message using 'KE' 'E' '494'
END OF DELETION *****
BEGIN OF INSERTION *****
and xt_criteria-status eq '2' ) .
data: l_mtyp type c.
if not IS_STATUS_FLAGS-DIALOG is initial.
l_mtyp = 'E'.
else.
l_mtyp = 'W'.
endif.
perform send_message using 'KE' l_mtyp '494'
END OF INSERTION *****
xt_criteria-fieldname
is_cobl-vorgn
i_char_group
endif.
Afterwards you have to run function module RKE_GENERATE_INTERFACE_ACT
for your operating concern to update the generated program RK2LXXXX.
Thanks & Regards,
Venkat

VBA - Setting Custom Fields For Sub-Projects Using a Master File

Hello,
I was wondering if anyone had any experience or could provide some help with a Macro to set the Custom Fields in Sub-Project Files directly from the Macro. I had this macro working in the past with Project 2007, but it has been a couple years and I am struggling
to resolve an error. I am currently running Project 2010 with SP2. I intend to use this Macro in our Server 2010 environment, however at this time, I'm testing locally on my desktop.
Scenario.
I have a Master File with 2 sub-project (Project A, and Project B) inserted. While working in the Master File, I create a custom field title "TEAM Lookup". While in the Master File and without having to individually go and open, edit, save, and
close each sub-project, push the custom field down to the project files.
ERROR: Currently, the Macro will run and I can step through the lines of code until line 12 where I'm asking Project to use the organizer to shift the newly created custom field from the Master File to a sub-project. The line appears to
populate correctly, but instead of continuing through the loop, an error is caught (ID - 1101 - "The File (Master File) was not found")
Any ideas or suggestions would be greatly appreciated. Thanks
Sample Code
1. Sub CopyCustomFieldToSubprojects()
2. Dim MASTER, custfield, contin, AllDone
3. Dim SubProj As Subproject
4. Alerts False
5. MASTER = ActiveProject.Name
6. Application.EnableCancelKey = pjInterrupt
7. custfield = CustomFieldGetName(ActiveCell.FieldID) & ActiveCell.FieldName
8. On Error GoTo errhand
9. contin = MsgBox("This macro will copy the field " & "(" & custfield & ")" & " (the currently selected field) to all subprojects in this consolidated schedule." & vbCrLf & vbCrLf & "Be
patient, it may take more than 70 seconds to run. You will be notified when it's done. Continue?", vbOKCancel)
10.    If contin = vbCancel Then GoTo done
11.    For Each SubProj In ActiveProject.Subprojects
12.    OrganizerMoveItem Type:=pjFields, FileName:=MASTER, ToFileName:=SubProj.SourceProject.Name, Name:=custfield
13.    Next SubProj
14.     AllDone = MsgBox("The " & custfield & " field has been copied to all subprojects.", vbOKOnly)
15. GoTo done
16. errhand:
17. ret = err.Description
18. ret1 = err.Number
19. done:
20. End Sub

SGBlaine,
Project VBA can get rather fussy about some things so you just have to find out what it wants and then adjust your code accordingly. The following will work:
Note the tweaks to the custfield variable and to the MASTER and source project names. Also when working with strings in VBA it is a good idea to eliminate at least one little gotcha, the need for exact capitalization. Therefore I always add the Option Compare
Text statement. In your macro it won't make any difference since you do not directly create a string value, but it's good practice to have the option.
Option Compare Text
Sub CopyCustomFieldToSubprojects()
Dim MASTER, custfield, contin, AllDone
Dim SubProj As Subproject
Alerts False
MASTER = ActiveProject.FullName 'FullName includes the path, now it can find it
Application.EnableCancelKey = pjInterrupt
custfield = CustomFieldGetName(ActiveCell.FieldID) & " (" & ActiveCell.FieldName & ")"
'strings are very fussy, it has to be exact
On Error GoTo errhand
contin = MsgBox("This macro will copy the field " & "(" & custfield & ")" & " (the currently selected field) to all subprojects in this consolidated schedule." & vbCrLf & vbCrLf & "Be
patient, it may take more than 70 seconds to run. You will be notified when it's done. Continue?", vbOKCancel)
If contin = vbCancel Then GoTo done
For Each SubProj In ActiveProject.Subprojects
OrganizerMoveItem Type:=pjFields, FileName:=MASTER, ToFileName:=SubProj.SourceProject.FullName, Name:=custfield
Next SubProj
AllDone = MsgBox("The " & custfield & " field has been copied to all subprojects.", vbOKOnly)
GoTo done
errhand:
ret = Err.Description
ret1 = Err.Number
done:
End Sub
John

Insert customer field in OneCode ACS in Presort

Similar Messages

Maybe you are looking for