//Party[@id=//Relation[child::RelationRoleCode[@tc='37']]/@RelatedObjectID]/Producer/CarrierAppointment/CompanyProducerID
Holding[main]/Policy/KeyedValue/KeyValue
substring(//OLifE/Party[@id=//OLifE/Relation[RelationRoleCode/@tc=8]/@RelatedObjectID]/Person/FirstName, 1, 30)
//OLifE/Party[@id=//OLifE/Relation[RelationRoleCode/@tc=8]/@RelatedObjectID]/Person/BirthDate
//OLifE/Holding[main]/Policy/KeyedValue[KeyName = 'SponsorName']/KeyValue
####
#!/usr/opt/perl5/bin/perl
use XML::Parser;
my $parser = new XML::Parser ();
$parser->setHandlers (
Start => \&Start_handler,
End => \&End_handler,
Default => \&Default_handler
);
my $filename = shift;
die "Can't find '$filename': $!\n" unless -f $filename;
$parser->parsefile ($filename);
### HANDLERS ###
sub Start_handler {
my $p = shift;
my $el = shift;
print "START: <$el>\n";
while (my $key = shift) {
my $val = shift;
print " $key = $val\n";
}
print "\n";
}
###
sub End_handler {
my ($p,$el) = @_;
print "END: $el>\n";
}
###
sub Default_handler {
my ($p,$str) = @_;
# print " default handler found '$str'\n";
}
####
userID
NONE
!password
Something Technologies
FireMeNow
ccb03d81-7772-4cae-bbf6-436cda593b31
New Business Submission for a
2015-09-10
11:45:29.1882187-06:00
Policy
USD (United States Dollar)
Variable Annuity
243958e8-f013-4a9b-a8de-996c5f5c93ed
Initial payment - This is the
Retirement
AccountType
Individual
CheckIndicator
No
1035ExchangeIncluded
No
SponsorName
InsCompany
Policy
USD (United States Dollar)
79899.00
0.00
OldProductType
401K
Organization
InsCompany
Person
TheFirstName
TheLastName
459JQ
Person
123-45-6789
User
Test
1966-01-22
OLI_ADTYPE_PRIMARY
OLI_USA_VA
United States of America
ForeignAddressInd
no
ForeignCitizenInd
yes
Holding
Holding
OLI_REL_REPLACEDBY
Holding
OLI_PARTY
OLI_REL_PRIMAGENT
Holding
OLI_PARTY
OLI_REL_OWNER
OLI_PARTY
OLI_FORMINSTANCE
OLI_REL_FORMFOR
APP
2015-09-10
OLI_LU_BASICATTMNTTY_TEXT
APP
OLI_INLINE
2.6.0.361