| Last Revised: 09/08/07 |
CDS468 is a T type external routine that is used to maintain a telephone number, a telephone extension, and a type of phone, when there are separate fields in the record for each of these components.
CALL "CDS468", S039$, REC$, X100$
The telephone number can be any size. 12 digits is normal for domestic phone numbers, and 21 for foreign numbers. See CDS268 for additional information about the telephone number.
The extension is optional, and only is entered if present within REC$ using the same prefix as PHONE. For example, if
S039.FLDNAM$="TOPHONE" then if REC.TOEXT$ exists, the extension will be entered and stored there.
Like the extension, the type is stored in field TYPE, or TOTYPE,
FROMTYPE, etc. The list of valid types is hard-coded into the program. Please notify Excellware if you require an additional phone type.
| Type | Description |
|---|---|
| blank | none |
| F | Fax |
| A | Alt |
| H | Home |
| W | Work |
| D | Day |
| N | Nite |
| C | Car |
| S | Cell |
| M | Modem |
| P | Page |
The PHONE, EXT, and TYPE may be repeating fields. The EXT does not have to repeat as high as PHONE and TYPE.
Use CDS469 to convert the PHONE, EXT, and TYPE fields to display/report format.
The example below uses uses CDS469 for maintaining the four contact telephone numbers. The template fields in the record include:
PHONE[4]:C(21)
TYPE[4]:C(1)
EXT:C(5)
Refer to CDS039 for the structure of S039$.
REC$ contains the record to be maintained. Refer to
CDX100 for the structure of X100$.
An example to maintain a contact telephone#, extension, and type, has template fields:
CONPHONE:C(21)
CONTYPE:C(1)
CONEXT:C(5)