[Search for users]
[Overall Top Noters]
[List of all Conferences]
[Download this site]
| Title: | ALL-IN-1 (tm) Support Conference |
| Notice: | Please spell ALL-IN-1 correctly - all CAPITALS! |
| Moderator: | IOSG::PYE CE |
|
| Created: | Fri Jul 01 1994 |
| Last Modified: | Fri Jun 06 1997 |
| Last Successful Update: | Fri Jun 06 1997 |
| Number of topics: | 2716 |
| Total number of notes: | 12169 |
2498.0. "stack dump on customized mapping policy" by VMSNET::R_HARRIS () Mon Feb 03 1997 21:18
Hello,
Can someone help me with this Mapping policy. My customer is getting a
stack dump when adding users to x.500.
Attached is the Log file and Mapping script.
Thanks in advance for your help.
Randy
P.S. ALL-in-1 v3.2, MTA v2.0, DSA v3.0, and UNIX v3.2D
================================================
DKB200:[ALLIN1.LOG]X500_MAP_TEST_POLICY_PEFFLEBL.LOG
$! SYS$MANAGER:SYLOGIN.COM
$! (System-wide login procedure)
$!
$! Modification history --> Other entries are at the end...
$!
$! Date Who Comments
$! ----------- ---------------- ----------------------------------------
$! 27 May 96 Eric L. East Added Ref to USER-LOGIN-HISTORY.DAT
$! 25 Nov 96 Eric L. East Added Ref to FIND-IDENTIFIER.COM (.05s)
$! 13 Dec 96 Eric L. East Added Ref to DECWindows Login Code
$! 17 Dec 96 Eric L. East Added "EXIT" if DECWindows
$!
2-FEB-1997 20:31:34
Submitted by MANAGER on 2-FEB-1997 20:31:34.60
%EMD-I-AFISSET, Forwarding messages to Brian Peffley
X.500 Mapping Policy Test Report
--------------------------------
X.500 Mapping Script : SYS$ALLIN1:[ALLIN1.SITE.DEV_SHARE]SM$X500_MAP_TEST_POLICY.SCP;5
User : PEFFLEBL
Date : 02-Feb-1997 08:31pm
20:31:38 - User: PEFFLEBL
Mapping X.500 attributes using X.500 mapping script,
SYS$ALLIN1:[ALLIN1.SITE.DEV_SHARE]SM$X500_MAP_TEST_POLICY.SCP;5
%SYSTEM-F-ACCVIO, access violation, reason mask=04, virtual address=00000FCC, PC=0023DFD8, PS=0000001B
Improperly handled condition, image exit forced.
Signal arguments: Number = 00000005
Name = 0000000C
00000004
00000FCC
0023DFD8
0000001B
Register dump:
R0 = 00000000000014C9 R1 = 0000000000000000 R2 = 00000000000F9E80
R3 = 000000000000003C R4 = 0000000000000FC8 R5 = 00000000001628D0
R6 = 0000000000000001 R7 = 000000000017698C R8 = 0000000000176980
R9 = FFFFFFFFFFFFFFFF R10 = 000000000016F354 R11 = 0000000000000001
R12 = 00000000011FA34A R13 = 00000000000F8550 R14 = 00000000011FA34A
R15 = 000000000010C301 R16 = 00000000008D4118 R17 = 000000007EE4EBE8
R18 = 000000000000000F R19 = 00000000010E0000 R20 = 0000000000000000
R21 = 0000000000000001 R22 = 00000000012CCD60 R23 = 0000000000007088
R24 = 00000000008C63E9 R25 = 0000000000000002 R26 = 000000000023DFD0
R27 = 0000000000109DA0 R28 = FFFFFFFF80461914 R29 = 000000007EE4EC30
SP = 000000007EE4EC30 PC = 000000000023DFD8 PS = 300000000000001B
%DCL-W-SKPDAT, image data (records not beginning with "$") ignored
A fatal error has occurred in the command procedure.....
%EMD-I-AFISSET, Forwarding messages to Brian Peffley
%EMD-I-USESEND, Send this message when you are ready
%EMD-I-MESSENT, The message has been sent
%EMD-I-PUTINWB, 1 message placed in your Wastebasket
ALLIN1 job terminated at 2-FEB-1997 20:31:50.08
Accounting information:
Buffered I/O count: 633 Peak working set size: 16176
Direct I/O count: 566 Peak page file size: 82368
Page faults: 1855 Mounted volumes: 0
Charged CPU time: 0 00:00:04.55 Elapsed time: 0 00:00:15.78
$ dir oa$site_dev_share:SM$X500_MAP_TEST_POLICY.SCP;5
Directory SYS$ALLIN1:[ALLIN1.SITE.DEV_SHARE]
SM$X500_MAP_TEST_POLICY.SCP;5
Total of 1 file.
set_trace log,all
! A1_ORGPERSON X.500 Mapping Policy Script V3.2-013
! (See end of file for details)
!-----------------------------------------------------------------------------
!
.LABEL faster
!
.IF #X500MAP_MODE NES "EXPORT" THEN .GOTO import_mode
!
GET #X500MAP_ATT_VALUE = ""
GET #X500MAP_STATUS = 1
!+
! Jump table - one for each attribute type - that is not mapped directly
! from a Profile field.
!-
.IF #X500MAP_ATT_NAME EQS "objectClass" THEN .GOTO ex_objectClass
.IF #X500MAP_ATT_NAME EQS "commonName" THEN .GOTO ex_commonName
.IF #X500MAP_ATT_NAME EQS "countryName" THEN .GOTO ex_countryName
.IF #X500MAP_ATT_NAME EQS "mhs-or-addresses" THEN .GOTO ex_mhs_or_addresses
.IF #X500MAP_ATT_NAME EQS "decMRAddress" THEN .GOTO ex_decMRAddress
.IF #X500MAP_ATT_NAME EQS "decAltMRAddress" THEN .GOTO ex_decAltMRAddress
.IF #X500MAP_ATT_NAME EQS "postalAddress" THEN .GOTO ex_postalAddress
.IF #X500MAP_ATT_NAME EQS "rfc822Mailbox" THEN .GOTO ex_rfc822Mailbox
.IF #X500MAP_ATT_NAME EQS "dec-mts-talk-other-CCITT-domain" -
THEN .GOTO ex_talkotherdomain
.IF #X500MAP_ATT_NAME EQS "decDDSModificationTimestamp" -
THEN .GOTO ex_decDDSModTStamp
.IF #X500MAP_ATT_NAME EQS "preferredDeliveryMethod" -
THEN .GOTO ex_prefDelMethod
!
.GOTO att_error
!+
! Attribute mapping sections
!-
!
.LABEL ex_rfc822Mailbox
GET #RFCNAME = PROFIL.%OPEN[#X500MAP_KEY]
!
.IF .SURNAME1_PR NES ""
.THEN
GET #RCFNAME = .SURNAME1_PR
.ELSE
GET #RFCNAME = .SURNAME1
.END_IF
!
.IF #RFCNAME NES ""
.THEN
.IF .FORENAME1_PR NES ""
.THEN
GET #RFCNAME = .FORENAME1_PR "." #RFCNAME
.ELSE
.IF .FORENAME1 NES "" THEN GET #RFCNAME = .FORENAME1 "." #RFCNAME
.ENDIF
!
GET #X500MAP_ATT_VALUE = #RFCNAME "@wl.wpafb.af.mil"
.END_IF
GET #RFCNAME = .%CLOSE
.EXIT
!
.LABEL ex_commonName
! Multi-valued attribute - check qualifier
! 'rdn' use FULNAM if non-null, else if SURNAME1 non-null use
! FORENAME1, SURNAME1 concatenation
! '2' if FULNAM is non-null and if SURNAME1 is non-null use
! FORENAME1, SURNAME1 concatenation, but only if it doesn't
! match FULNAM [ match being X.500 case ignore match ! ]
!
GET #X500MAP_STATUS = 0
GET #FULNAM_CN = PROFIL.%OPEN[#X500MAP_KEY] .FULNAM
.IF .SURNAME1 EQS ""
.THEN
GET #SURNAME_CN = ""
.ELSE
.IF .FORENAME1 EQS ""
.THEN
GET #SURNAME_CN = .SURNAME1
.ELSE
GET #PARTIAL_OR = "G=" .FORENAME1 ";S=" .SURNAME1 ";"
OR_GET_INFO_CUST( #PARTIAL_OR, #SURNAME_CN, "", 1, "PN" )
.END_IF
!
.IF #FULNAM_CN NES ""
.THEN
!
GET #TEMP1 = FN$UPPER( FN$COMPRESS( #FULNAM_CN ) )
GET #TEMP2 = FN$UPPER( FN$COMPRESS( #SURNAME_CN ) )
!
.IF #TEMP1 EQS #TEMP2 THEN GET #SURNAME_CN = ""
.END_IF
!
.END_IF
!
.IF #X500MAP_ATT_QUAL EQS "rdn"
.THEN
.IF #FULNAM_CN NES ""
.THEN
GET #X500MAP_ATT_VALUE = #FULNAM_CN
.ELSE
GET #X500MAP_ATT_VALUE = #SURNAME_CN
.END_IF
GET #X500MAP_STATUS = 1
.END_IF
!
.IF #X500MAP_ATT_QUAL EQS "2"
.THEN
.IF #FULNAM_CN NES ""
.THEN
GET #X500MAP_ATT_VALUE = #SURNAME_CN
.ELSE
GET #X500MAP_ATT_VALUE = ""
.END_IF
GET #X500MAP_STATUS = 1
.END_IF
GET #FULNAM = .%CLOSE
.EXIT
!
.LABEL ex_objectClass
! Object Class is multi-valued - the qualifier is the value
.IF #X500MAP_ATT_QUAL NES "mhs-user"
.THEN
GET #X500MAP_ATT_VALUE = #X500MAP_ATT_QUAL
.ELSE
!+
! Add mhs-user object class only if an mhs-or-addresses value is defined
!-
GET #X500MAP_ATT_VALUE = #X500MAP_MHS_USER_OC
.END_IF
.EXIT
!
.LABEL ex_countryName
!+
! Default RDN value to ALL-IN-1 default value if Profile field is empty
!-
GET #X500MAP_ATT_VALUE = PROFIL.COUNTRY_ID[#X500MAP_KEY]
.IF ( #X500MAP_ATT_VALUE EQS "" ) AND ( #X500MAP_ATT_QUAL EQS "rdn" )
.THEN
GET #X500MAP_ATT_VALUE = OA$X400_COUNTRY
.END_IF
.EXIT
!
.LABEL ex_mhs_or_addresses
!+
! Only defined if system is configured to use X.400 ( directly or indirectly
! via XMR Message Router gateway
!-
.IF #X500MAP_A1_X400_CONFIG NE 0
.THEN
GET #X500MAP_ATT_VALUE = #X500MAP_DECMAIL_ORADDR
.END_IF
.EXIT
!
.LABEL ex_decMRAddress
.IF OA$MTI_MR_ROUTE NES ""
.THEN
!+
! Make value then 'normalise' it for storing in X.500. The normalisation
! ensures that the ALL-IN-1 mail code can find the MR address when
! searching the Directory
!-
GET #X500MAP_ATT_VALUE = #X500MAP_KEY OA$MTI_MR_ROUTE
OR_CHECK_ADDRESS( #X500MAP_ATT_VALUE, #X500MAP_ATT_VALUE )
.END_IF
.EXIT
!
.LABEL ex_decAltMRAddress
!+
! Generate multiple values using special tagged symbol, which uses the
! settings of SYS$MR_ALT_ADDRESSES, SYS$MR_NODES, OA$DDS_AREA_ROUTE,
! OA$MTI_AREA, OA$MTI_MR_NODE and OA$PRIMARY_NODE to determine the
! values.
!-
GET #X500MAP_ATT_VALUE = #X500MAP_ALT_MR_ADDRESSES
.EXIT
!
.LABEL ex_talkotherdomain
GET #X500MAP_ATT_VALUE = 1
.EXIT
!
.LABEL ex_decDDSModTStamp
! to stop XDDS updating X.500 entry from DDS entry
GET #X500MAP_ATT_VALUE = ""
.EXIT
!
.LABEL ex_prefDelMethod
!+
! Integer list representing - mhs-delivery, any-delivery-method
!-
TLV_ADD( #X500MAP_ATT_VALUE, 1, "1" )
TLV_ADD( #X500MAP_ATT_VALUE, 1, "0" )
.EXIT
!
.LABEL ex_postalAddress
!+
! Value is a string list which is input to X500$ dataset as a TLV value
!-
GET #X500MAP_STATUS = #TOO_LONG = 0
GET #ADDRLINE = PROFIL.%OPEN[#X500MAP_KEY]
!+
! now loop through adding fields to the TLV
!-
GET #X500MAP_ATT_VALUE = ""
GET #IND = 1
.WHILE #IND LE 6
!
GET OA$FUNCTION = "GET #ADDRLINE = FN$COMPRESS(.ADDR" #IND ")"
!
.IF #ADDRLINE NES ""
.THEN
!+
! Add the string to the TLV format attribute value - check not too long
!-
TLV_ADD( #X500MAP_ATT_VALUE, 1, #ADDRLINE )
!
.IF FN$LENGTH(#ADDRLINE) GT 30 THEN GET #TOO_LONG = 1
.END_IF
! ..and the next one please
INCREMENT(#IND)
.END_WHILE
!
.IF #TOO_LONG EQ 0
.THEN
GET #X500MAP_STATUS = 1
.ELSE
GET #X500MAP_STATUS = 3
GET #X500MAP_MESSAGE = -
"One or more of the address lines is longer than 30 characters"
.END_IF
GET #ADDRLINE = .%CLOSE
.EXIT
!
!-----------------------------------------------------------------------------
!
! Following section for IMPORT from X.500 to Profile
!
.LABEL import_mode
!
.IF #X500MAP_MODE NES "IMPORT" THEN .GOTO mode_error
! IMPORT mode not yet supported
GET #X500MAP_STATUS = 3
GET #X500MAP_MESSAGE = "IMPORT from X.500 not yet supported"
.EXIT
!
!-----------------------------------------------------------------------------
!
! Error handling
!
.LABEL mode_error
GET #X500MAP_STATUS = 3
GET #X500MAP_MESSAGE = "Unexpected #X500MAP_MODE value"
.EXIT
.LABEL att_error
GET #X500MAP_STATUS = 3
GET #X500MAP_MESSAGE = "Unexpected attribute name or qualifier"
.EXIT
!
!-----------------------------------------------------------------------------
!
! %%%%% START ATTRIBUTES %%%%%
!
! # Must define the Directory Name first - a sequence of RDNs
!
! MANDATORY RDN countryName RDN
! MANDATORY RDN organizationName .COMPANY
! RDN organizationalUnitName .ORGUNIT1
! MANDATORY RDN ORADDRESS commonName rdn #leaf RDN
!
! # now define the set of attributes and their values
!
! MANDATORY objectClass person
! rfc822Mailbox
! objectClass organizationalPerson
! objectClass decMailUser
! objectClass mhs-user
! commonName 2
! ORADDRESS givenName .FORENAME1
! ORADDRESS givenName .FORENAME1_PR
! givenName .FORENAME2
! givenName .FORENAME3
! givenName .FORENAME4
! givenName .FORENAME5
! MANDATORY ORADDRESS surname .SURNAME1
! ORADDRESS surname .SURNAME1_PR
! surname .SURNAME2
! surname .SURNAME3
! initials .INITIALS1
! initials .INITIALS1_PR
! initials .INITIALS2
! initials .INITIALS3
! initials .INITIALS4
! initials .INITIALS5
! generationalQualifier .GENERATION
! generationalQualifier .GENERATION_PR
! ORADDRESS1 organizationalUnitName .ORGUNIT1
! ORADDRESS1 organizationalUnitName .ORGUNIT1%PRN # map Printable
! ORADDRESS2 organizationalUnitName .ORGUNIT2
! ORADDRESS2 organizationalUnitName .ORGUNIT2%PRN # map Printable
! ORADDRESS3 organizationalUnitName .ORGUNIT3
! ORADDRESS3 organizationalUnitName .ORGUNIT3%PRN # map Printable
! ORADDRESS4 organizationalUnitName .ORGUNIT4
! ORADDRESS4 organizationalUnitName .ORGUNIT4%PRN # map Printable
! organizationalUnitName .DEPART
! ORADDRESS organizationName .COMPANY
! ORADDRESS organizationName .COMPANY%PRN # map Printable
! ORADDRESS countryName .COUNTRY_ID
! ORADDRESS dec-mts-admd-name .ADMD
! ORADDRESS dec-mts-prmd-name .PRMD
! mhs-or-addresses # auto-generated
! decMRAddress # uses OA$MTI_MR_ROUTE
! decAltMRAddress # auto-generated
! dec-mts-talk-other-CCITT-domain # always TRUE
! decDDSModificationTimestamp # always NULL
! telephoneNumber .PHONE
! localityName .LOCATION
! postalAddress # uses ADDR1-6
! postalCode .ZIPCOD
! preferredDeliveryMethod # fixed value
! title .TITLE
!
! %%%%% END ATTRIBUTES %%%%%
!
!-----------------------------------------------------------------------------
!
! Copyright ) Digital Equipment Corporation, 1995. All Rights Reserved.
!
! Restricted Rights: Use, duplication, or disclosure by the U.S. Government is
! subject to restrictions as set forth in subparagraph (C)(1)(ii) of DFARS
! 252.227-7013, or in FAR 52.227-14 Alt. III, as applicable. Unpublished rights
! reserved under applicable copyright laws.
!
! This software is proprietary to and embodies the confidential technology of
! Digital Equipment Corporation. Possession, use, or copying of this software
! and media is authorized only pursuant to a valid written license from Digital
! or an authorized sublicensor.
!
!------------------------------------------------------------------------------
!
! NOTE: there are several alternative ALL-IN-1 defined X.500 mapping policies
! which can be used as a basis for a customised mapping policy.
! Prior to customising this script you should investigate these
! alternatives to determine whether or not this policy is the best
! template for your customisation.
!
! The following ALL-IN-1 defined mapping policies are available:
! A1_ORGPERSON, A1_ORGP_OUS, A1_ORGP_DEPT, A1_ORGP_LOC
!
! Customising this script:-
!
! a) the customised script should be given a name of
! SM$X500_MAP_<policy>.SCP where <policy> is the name of the X.500
! mapping policy (max 12 characters) that is referenced in the
! Profile X.500 mapping policy field. The policy name should not
! start with 'A1_' since that is the prefix for ALL-IN-1 defined mapping
! policies.
! b) The following X.500 attributes are controlled by ALL-IN-1 and if any
! values are defined by the script they will be ignored.
! decALL-IN-1UserName, decALL-IN-1UAName, decMailDestination,
! decPreferredMailAddress, decX400Redirect, decMailNonDeliver
! c) If the decDDSModificationTimeStamp XDDS attribute is mapped to a null
! value then XDDS will no longer treat the DDS entry as the master and
! will update the DDS entry from the X.500 entry - the latter is now the
! master.
! d) If using MAILbus 400 as the MTS the following attributes are
! required in order to configure the MTS Routing Trees.
! mhs-or-addresses, and those of the following attributes whose values
! are used to completed the mhs-or-addresses attribute value.
! countryName, dec-mts-admd-name, dec-mts-prmd-name, givenName, surname,
! initials, commonName, generationalQualifier, organizationName,
! OrganizationalUnitName, decNumericUserId, decX400DDA
! e) The following symbols can be used in x500-mapping-scripts. They should
! be treated as READ-ONLY.
!
! #X500MAP_A1_CONFIG: the X.400 configuration of the ALL-IN-1 system
! as defined by the attributes of the ALL-IN-1 User Agent entry.
! Values: 0 if X.400 not in use (X.500 + Message Router), 1 if X.400
! installed but still using Message Router (with access to/from X.400
! via XMR), 2 if using X.400 directly.
!
! #X500MAP_MR_GW_NAME: the X.500 Directory Name of the XMR Gateway
! entry being used by this system.
!
! #X500MAP_SMTP_GW_NAME: the X.500 Directory Name of the SMTP Gateway
! entry being used by this system.
!
! #X500MAP_DECMAIL_ORADDR: replaced by the Mnemonic O/R Address formed
! from the attribute values flagged as O/R Address attribute values
! in the attribute list of the X.500 mapping script being used.
!
! *NOTE* - it is recommended that the Profile fields that are accessible
! via the User Setup Parameters, Set Personal Details (US SPD)
! menu option are not used to populate attributes that form the
! user's O/R Address. This prevents the user unknowingly
! altering his O/R Address, which would cause message
! non-delivery for all messages addressed using the user's
! previous, well published, O/R Address.
!
! #X500MAP_DECMAIL_NUM_ORADDR: replaced by the Numeric O/R Address formed
! from the attribute values flagged as O/R Address attribute values
! in the attribute list of the X.500 mapping script being used.
!
! #X500MAP_MHS_USER_OC: replaced by either an empty value or, if an
! mhs-or-addresses attribute value has been defined, the Object
! identifier of the mhs-user auxiliary object class
!
! #X500MAP_ALT_MR_ADDRESSES: replaced by multiple Message Router
! addresses based on the values of the SYS$MR_ALT_ADDRESSES and
! SYS$MR_NODES symbols. If SYS$MR_ALT_ADDRESSES is defined as 1 no values
! are defined. If it is 2 then values are defined based on the nodes
! listed in SYS$MR_NODES prefixed by the account name. If it is 3
! values are defined as for 2 plus additional values prefixed by the
! users FULNAM field. The following symbols and logicals are used in the
! algorithm for generation of the variants of MR addresses -
! OA$DDS_AREA_ROUTE, OA$MTI_AREA, OA$PRIMARY_NODE.
! See documentation for further details.
!
!------------------------------------------------------------------------------
!
! X500MAP_A1_ORGPERSON.SCP
!
! Purpose:
!
! This script defines the default A1_ORGPERSON X.500 mapping policy.
! The DN and set of attributes are listed in the comment section enclosed
! between the '%%%%% ATTRIBUTES %%%%%' markers at the top of the script.
! The syntax of these lines is defined below :
!
! [<man-flag>] [<rdn-flag>] [<ora-flag>] <att-name> [<qual>] [<comment>]
!
! where :-
! <man-flag> is the word 'MANDATORY' or 'M' and is used to
! flag that the attribute must have at least one
! value. If used on an RDN mapping it indicates
! that the RDN must be present in the DN.
! <rdn-flag> is the word 'RDN' or the character '/' and
! flags that the attribute is used for naming
! the entry.
! <ora-flag> is one of the words 'ORADDRESS','ORADDRESS1',
! 'ORADDRESS2','ORADDRESS3','ORADDRESS4','O','O1',
! 'O2','O3', or 'O4'. It is used to indicate that
! the attribute value mapped, if not null, should
! be used when generating the value of the symbols
! #X500MAP_DECMAIL_ORADDR and
! #X500MAP_DECMAIL_NUM_ORADDR. The flag can be
! used on the last of the RDN mappings.
! The 'ORADDRESS' or 'O' flag are only valid for
! use with the following X.500 attributes:
! countryName, dec-mts-admd-name,dec-mts-prmd-name,
! organizationName,commonName,surname,givenName,
! initials,generationalQualifier, and
! decNumericUserId.
! The ORADDRESS1,..ORADDRESS4,O1,..O4 flags are
! only valid for use with the organizationalUnitName
! X.500 attribute. The ORADDRESS1 and O1 flags
! indicate that the value mapped to the
! X.500 attribute is used to complete the OU1
! component of the O/R Address. The other flags
! are used to complete the OU2,OU3 and OU4 terms
! in a similar manner.
! <att-name> is the name of an attribute as recognised by the
! X500$ dataset
! <qual> is used to qualify which attribute mapping is
! required. Typically simply a number, though any
! simple text string can be used. ( a-z, A-Z, 0-9,
! underscore and hyphen are valid characters )
! OR
! is the name of a Profile field, prefixed with a
! full stop, if the value of the attribute is
! mapped directly from the Profile field.
! eg .SURNAME1
! If the Profile field name is suffixed with the
! qualifier '%PRN' then the Printable equivalent
! of the Profile field is returned as the attribute
! value. This is obtained by using the Profile
! field to lookup the printable alternative in
! the data file OA$X500_PRN.DAT. Which is managed
! via the MGT MXD MPV menu option.
! <comment> any text string starting with a hash (#) character
!
! Each line must be a script file comment. A blank line ( one with just the
! comment character '!' ) is ignored. Otherwise the line must contain the
! <attribute-name>, all other tokens are optional.
! The list of attributes must commence with those attributes used to name
! the entry; those marked with <rdn-flag>. There must be at least one RDN.
! The order of RDN attributes defines the order of the RDNs within
! the entry's DN. Attributes can also be flagged as mandatory forcing an
! error if the x500-mapping does not define a value for the attribute.
! Multiple values of an attribute are defined by repeating the attribute
! within the list and using a qualifier to distinguish which value is
! being mapped.
!
! The script is called repeatedly once for each attribute mapping line
! listed at the head of the file, unless the attribute qualifier identifies
! the Profile field that maps the value of the attribute. In this case the
! script is not invoked, the Directory Information tools set the value
! directly from the Profile field.
!
! Parameters:
!
! #X500MAP_KEY (Input) - the primary key (account name) of
! Profile record currently being mapped
! #X500MAP_MODE (Input) - One of the values IMPORT or EXPORT
! [Initially only EXPORT is supported
! indicating export to X.500 ]
! #X500MAP_ATT_NAME (Input) - holds the name of the attribute to
! be mapped
! #X500MAP_ATT_QUAL (Input) - holds the qualifier used to distinguish
! the attribute value to be mapped
! #X500MAP_ATT_VALUE (Input) - When #X500MAP_MODE is IMPORT, holds
! the attribute value as read from
! the Directory.
! (Output) - When #X500MAP_MODE is EXPORT, used to
! return the attribute value
! ( the value is in the format used by
! the X500$ dataset for the attribute's
! syntax. )
! #X500MAP_STATUS (Output) - Indicates success or otherwise of the
! mapping. An ERROR is logged and will
! stop IMPORT/EXPORT of data, a WARINING
! is logged but the IMPORT/EXPORT
! continues.
! 1 = SUCCESS
! 2 = WARNING
! 3 = ERROR
! #X500MAP_MESSAGE (Output) - Used, when #X500MAP_STATUS indicates
! a warning or error, to return a message
! that details the problem.
| T.R | Title | User | Personal
Name | Date | Lines |
|---|
| 2498.1 | Just in case this is significant.... | IOSG::PYE | Graham - ALL-IN-1 Sorcerer's Apprentice | Tue Feb 04 1997 07:42 | 3 |
| Note that this is the customer who I spoke to at DECUS, who has a
*VERRRRRRY* long set of names, e.g. the DN of the AUAE won't fit in the
80 character field in A1CONFIG.
|
| 2498.2 | Where's the customisation? | IOSG::WRENI | | Tue Feb 04 1997 09:08 | 21 |
| Hi,
After a quick eyeball of the listing of the customised mapping policy
the only customisation I can see is the "set_trace all,log" line at the
very start.
Do they get an accvio if this line is removed?
Do they get an accvio if for a test of one of the default mapping
policies? eg A1_ORGPERSON
You can trace the test mapping policy script by setting the PST symbol
#smxd_dimc_debug to 2 prior to submitting the job. This produces a
_very_ large script trace file A1TRACE.LOG in the manager's account.
(more precisely the account under which the background job is run)
Remember to reset #smxd_dimc_debug back to 0 afterwards otherwise
you'll generate large log files for each test.
Ian
|
| 2498.3 | A small amount more info... | IOSG::PYE | Graham - ALL-IN-1 Sorcerer's Apprentice | Tue Feb 04 1997 10:04 | 28 |
| I've just had mail directly from the customer, which adds a few more
snippets of information. I've asked him to only deal with the CSC!
He says that the customisation is to add support for populating the
rfc822Mailbox fiedl, as described in the planning guide Pp B11 and B12.
He says that this change produces the ACCVIO.
He also sent me a bit of trace log:
![IO] Getting next record from TXT$TXL_DO, Text starts "GET #RFCNAME = "
![SCRIPT] SYS$ALLIN1:[ALLIN1.SITE.DEV_SHARE]SM$X500_MAP_TEST_POLICY.SCP;6 Line 5
! 4: GET #RFCNAME = .FORENAME1 "." #RFCNAME
![FUNC] Function: GET, Cmd line: #RFCNAME = .FORENAME1 "." #RFCNAME
![IO] Getting field FORENAME1 from PROFIL, Value: Brian
![SYMBOL] Symbol: #RFCNAME = .FORENAME1 "." #RFCNAME, Value: Brian.Peffley
![IO] Getting next record from TXT$TXL_DO, Text starts ".ENDIF"
!
![SCRIPT] Closing Script SYS$ALLIN1:[ALLIN1.SITE.DEV_SHARE]SM$X500_MAP_TEST_POLI
! CY.SCP;6
![SCRIPT] Function nesting level: 0. Script context follows:
![SCRIPT] Line SCRIPT Script
!
![SCRIPT] Line DO Script
![SCRIPT] 467 SM_X500_DI_TOOLS
!
![IO] Closing TXT$TXL_DO, File: SYS$ALLIN1:[ALLIN1.SITE.DEV_SHARE]SM$X500_MA
! P_TEST_POLICY.SCP;6
![FLOW] Undisplaying all workspaces
|
| 2498.4 | .ENDIF instead of .END_IF | IOSG::WRENI | | Tue Feb 04 1997 11:18 | 8 |
|
Having the extra snippets helped a good deal....
In the section of script added for the rfc822mailbox attribute there's
an '.ENDIF' instead of an '.END_IF'. Why that causes an ACCVIO I don't
know, but the trace snippet shows that's where it's bombing out.
Ian
|