nav[aria-label="Primary Navigation"] { padding: 0; & ul { list-style: none; width: 100%; display: flex; flex-direction: row; justify-content: start; align-items: start; gap: 30px; padding: 0; & li { margin: 0; } & ul li { list-style: none; } } }

ArcPad Adding Fields together

JamesOwens

I have 2 fields: Pole_Ft_CATV_1 and Pole_In_CATV_1 - I need to add these 2 together (they are feet and then inches so it would be i.e. "12'10"". I then need to add the two fields Pole_Ft_Power_1 and Pole_In_Power_1. (Same situation)
I finally need to subtract the results of the CATV_1 addition from the results of the Power_1 addition and have that result be written into the field called Pole_Separation_1.

So it would be sum of (Pole_Ft_Power_1 + Pole_In_Power_1) - sum of ( Pole_Ft_CATV_1 + Pole_In_CATV_1) = Pole_Separation_1.

I am new to this so please excuse the crudeness.

Thanks

Encontre mais publicações marcadas com

Accepted answers

All comments

TimHopper

You need to set them as integers.

Application.Map.Layers(yourPoleLayer).Forms("EDITFORM").Pages("PAGE1").Controls("txtPole_Separation_1").Value = (int(Pole_Ft_Power_1) + int(Pole_In_Power_1)) - (int(Pole_Ft_CATV_1) + int(Pole_In_CATV_1))

That should work.

JamesOwens

Okay, the subtraction works but the adding is just concatenating (sp?) the values together instead of adding together. What is the function symbol to add fields together?

JamesOwens

Not sure but..

The control name should be between double quotes.

...Controls("txtPole_In_CATV_1").Value

Maybe this will help?

It works! OMG! Details are killers.... Thank you!

TimHopper

Not sure but..

The control name should be between double quotes.

...Controls("txtPole_In_CATV_1").Value

Maybe this will help?

JamesOwens

[INDENT][/INDENT]Still isnt working. Tried changing every variable. Frustrating....

JamesOwens

Hi James,

I am going to make the assumption that all of these fields are on the same page within the form. If not please let me know.

there are two things we need to do:
1. write the calculation so that it reads the correct fields and
2. use a button or have something execute the calculation.

Firstly, if all of the inputs are on one page then that makes things a little easier. If you add a button to the same page and call it btnCalculate, go to the events of the button and where it says OnClick - write: Call myCalculation(). So when you click the button it will look for the routine we are about to write. Press Ok to everything so you are interacting with the Layer Definition of the feature. Click on the scripting button to load a new script window.

Now If you have vbScript as your default language the window should have Option Explicit written at Line 1.

Under that write: sub myCalculation()

So taking your formula: (Pole_Ft_Power_1 + Pole_In_Power_1) - sum of ( Pole_Ft_CATV_1 + Pole_In_CATV_1) = Pole_Separation_1 the script could look something like this:

I hope this helps.

Thank you!

AyanPalit_0-1747845771952.png

GarethWalters

Hi James,

I am going to make the assumption that all of these fields are on the same page within the form. If not please let me know.

there are two things we need to do:
1. write the calculation so that it reads the correct fields and
2. use a button or have something execute the calculation.

Firstly, if all of the inputs are on one page then that makes things a little easier. If you add a button to the same page and call it btnCalculate, go to the events of the button and where it says OnClick - write: Call myCalculation(). So when you click the button it will look for the routine we are about to write. Press Ok to everything so you are interacting with the Layer Definition of the feature. Click on the scripting button to load a new script window.

Now If you have vbScript as your default language the window should have Option Explicit written at Line 1.

Under that write: sub myCalculation()

So taking your formula: (Pole_Ft_Power_1 + Pole_In_Power_1) - sum of ( Pole_Ft_CATV_1 + Pole_In_CATV_1) = Pole_Separation_1 the script could look something like this:

sub myCalculation()
'Initiate some objects to store the measurements in
dim Pole_Ft_Power_1, Pole_In_Power_1, Pole_Ft_CATV_1, Pole_In_CATV_1, Pole_Separation_1
'This long path is how you read values from a form. There are shorter methods you can write but this hopefully explains itself.
Pole_Ft_Power_1 = Application.Map.Layers("yourPoleLayer").Forms("EDITFORM").Pages("PAGE1").Controls(txtPole_Ft_Power_1).Value
Pole_In_Power_1 = Application.Map.Layers("yourPoleLayer").Forms("EDITFORM").Pages("PAGE1").Controls(txtPole_In_Power_1).Value
Pole_Ft_CATV_1 = Application.Map.Layers("yourPoleLayer").Forms("EDITFORM").Pages("PAGE1").Controls(txtPole_Ft_CATV_1).Value
Pole_In_CATV_1 = Application.Map.Layers("yourPoleLayer").Forms("EDITFORM").Pages("PAGE1").Controls(txtPole_In_CATV_1).Value

'This line now sets the calculation to another text box that is on your form.
Application.Map.Layers(yourPoleLayer).Forms("EDITFORM").Pages("PAGE1").Controls(txtPole_Separation_1).Value = (Pole_Ft_Power_1 + Pole_In_Power_1) - ( Pole_Ft_CATV_1 + Pole_In_CATV_1)
end sub

I hope this helps.

Participe da Conversa

Membros conectados podem postar, seguir atualizações e mais. Novo aqui? Registre uma conta gratuita.

Links Rápidos

Community Help
Find useful guides, FAQs, and documents to help you navigate and make the most of Esri Community.