How to add phone # to invoice?

[jayonefoods]

Hello
I'm new here! Glad to find SBT user's forum!!

I'm trying to add arcustXX.phone and arcustXX.faxno to invoice under the Bill To address.
When I open "Customize Forms" and the invoice form,

I see
mcompany
maddr1
maddr2
maddr3
maddr4

variables which probably return arcustXX.address1, arcustXX.address2, arcustXX.city, arcustXX.state,arcustXX.zip
but I cannot find any other variable which return phone and faxno.
How can I add these values to the invoice form?
Please give me any tips!
Thanks in advance!

 

[jayonefoods]

nevermind
I searched the old threads and found out
I can just call the value by a_arcust->phone, a_arcust->faxno
and It works very well!

 

[titoneon]

Hello Jay,
Let me see if i understood correctly, you want to add to the invoice form your company phone # and the fax# ?

1-go to your folder PRO50\AR
2- from the vfp 5.0 command window type "modi comm arpstm" (you can only do this if you have the source code and if you have the vfp 5.0 or 6.0 application)
3- if you have the above mentioned and you know some programming you can add the lines below inside the arpstm.prg, by opening the VFP APPLICATION
GO TO THE COMMAND WINDOW ANDA TYPE W/O THE QUOTES "MODI COMM ARPSTM", THEN LOOK FOR THE FIRST LINE, THAT YOU SEE IN THE CODE BELOW SHOWN AND THEN ONLY ADD
THE LINES THAT HAVE THE "&&" , THE LINES ABOVE THE "&&" IT IS JUST FOR YOUR REFERENCE TO FIND WHERE TO ADD THOSE LINES THAT HAVE THE "&&"

IF NOT EOF("a_arcust")
    *-- Initialize array variables for bill-to address
    la_baddr[1] = a_arcust->company
    la_baddr[2] = a_arcust->address1
    la_baddr[3] = a_arcust->address2
    la_baddr[4] = ALLTRIM(a_arcust->city) + ", " + ALLTRIM(a_arcust->state) + ;
                  " " + TRIM(a_arcust->zip)                 

    la_baddr[5] = a_arcust->country
    la_phone   = SUBSTR(a_arcust->phone,1,20) && added by ep to print phone# 
    la_fax   = substr(a_arcust->faxno,1,20)   && added by ep to print FAX # 
    la_cont   = substr(a_arcust->contact,1,20)  && added by ep to print CONTAC

Also you will need to go and open "AR" and select the company number, then select mantain, Customize forms, select the form that you want to customize
i meant the one you want to add the phone# and fax# and add into the form some textboxes and the variable names as la_phone as something like this below

** so select from the report control tools once you have opened the form you want to customize and select the field option, then  double click the rectangle and  under expression insert de code below, do the same for the la_fax and for the la_cont, in case you want your invoice to have a name under Contact
IIF(NOT EMPTY(la_phone),"Telephone: " + la_phone, "")
IIF(NOT EMPTY(la_fax),"FaxNo: " + la_fax, "")
IIF(NOT EMPTY(la_cont),"Contact:: " + la_cont, "")

Once you have dome all of the above save your report by pressing Ctrl+W IF YOU DON'T KNOW HOW TO DO ALL THESE, THEN CALL SOMEONE WHO KNOWS VFP AND TELL TO DO IT FOR YOU, HOPE THIS HELP