ࡱ> TRoot Entry n=rV@Contents$nDatabase (TLV)8Contents SS 1292l$U  !"#%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJK`WYZ[\]^_abcdefgXRoot EntryP?@ABCDEFGHIJKLMNOPQRSContents SS 1282l$SummaryInformation(_Oh+'Oh+'0u    $08@Hh27@CE@pU) @H<  NetFareValueCode   =<  CurrencyCode   :<  ExchangeRate 2<  NetFare *<  PstOnCommission "<  VatOnCommission <  CommissionAmount <  GrossAmount  <  Penalty <  Tax4 <  Tax3 <  Tax2 <  Tax1 <  LowFare <  ReferenceFare <  SellingFare <  PublishedFare <  RateCode   <  SecondaryProductCode <  PrimaryProductCode <  ReportDate  <  IataNumber   <  ExchangedFor  3 z2<  Exchange y<  E-Ticket x<  TicketNumber   k <  ValidatingCarrier   h<  Description   J<  InvoiceDate  B<  BookingDate  :<  BranchNumber 8<  InvoiceNumber   0<  DepartmentCode   & <  ClientName   <  ClientNumber   < *     ClientNumber  . CreditCardNumber   Description   InvoiceDate   InvoiceNumber  < PostingMonth  ! Reference   ReportDate    TicketNumber  9 TransactionNumber/  PDBJET.DLL Vendors  Vendors 9  vendors.mdb ! Admin + ProductCode <  Notes   <  Branches   {<  AddedBy   x<  LanguagePreference v<  MarkPayables t<  PSTexempt s<  VATexempt r<  Balance j<  CommissionPercentage b<  LastActivityDate  Z<  FirstActivityDate  R<  TaxID2   B<  TaxID1   2<  CommissionClient   *<  ExpenseAccount   "<  OSAgent !<  Preferred  <  VendorType   <  SortKey    <  EmailAddress   <  PhoneNumberFax   <  Extension3   <  Extension2   <  Extension1   <  PhoneNumber3   <  PhoneNumber2   <  PhoneNumber1   {<  PhoneDescription3   q <  PhoneDescription2   g <  PhoneDescription1   ] <  AddressForLetters [<  IncludeCountry Z<  Country   <<  ZipCode   <  State   <  City   <  Address2   <  Address1   <  Contact   <  VendorName   j<  VendorNumber   d<  Email  e d< *     SortKey   VendorNumber/  PDBJET.DLL ProductCodes  ProductCodes I9  agency.mdb ! Admin   Itinerary H<  RateCode   :<  TicketFormat   - <  Controlled ,<  ExpenseAccount   $<  IncomeAccount   <  PayableAccount   <  ReceivableAccount   <  Description    <  ProductCode < *     ProductCode/   Sales  BranchNumber Branches eq Sales  BookingAgentNumber Agents eq Sales  VendorNumber Vendors eq Sales  SecondaryProductCode ProductCodes eq6 ZC 6d"6^"&  &6  &6RDReportDefinition UnPrinter FontManagerTypeFaceArial  LogicalFont    Times New Roman    RDPaigeManagerRDFieldManager RDDatabaseFieldDefinition AgencyName 3Branches.AgencyNameSecondaryProductCodeSales.SecondaryProductCode Description ProductCodes.DescriptionBookingAgentNumber Sales.BookingAgentNumber AgentName Agents.AgentName GrossAmountSales.GrossAmount ExchangeRateSales.ExchangeRateCommissionAmountSales.CommissionAmount PublishedFareSales.PublishedFare SellingFareSales.SellingFare InvoiceDate Sales.InvoiceDateTransactionTypeSales.TransactionType BranchNumberBranches.BranchNumberRDFormulaFieldDefinition AGENTSORT {Sales.BookingAgentNumber}$ From Date Numbervar mo := tonumber({?From Date}[1 to 2]); Numbervar dy := tonumber({?From Date}[ 4to 5]); Numbervar yr := tonumber({?From Date}[7 to 10]); date(yr,mo,dy)RDPromptingVarFieldDefinition From Date From Date - i.e. MM/DD/YYYY $To Date Numbervar mo:= tonumber({?To Date}[1 to 2]); Numbervar dy:= tonumber({?To Date}[4 to 5]); Numbervar yr:= tonumber({?To Date}[7 to 10]); date(yr,mo,dy)'To Date To Date - i.e. MM/DD/YYYY $timeCurrentDateTime$ PageNumber "Page "+ToText (PageNumber,0)RDSpecialVarFieldDefinition$Group #2 Order8if IsNull ({Sales.SecondaryProductCode}) then 2 else 2$Group #1 Order(if IsNull ({@AGENTSORT}) then 2 else 2%$SALES_If {Sales.SellingFare} <> 0 then Round({Sales.SellingFare} * {Sales.ExchangeRate}, 2) else 0 $ SALESCOMMIf {Sales.CommissionAmount} <> 0 THEN Round(({Sales.CommissionAmount}-({Sales.PublishedFare}-{Sales.SellingFare})) * {Sales.ExchangeRate}, 2) else 0 $GROSSINSiIf {ProductCodes.Description} like "INSURANCE" THEN Round({Sales.GrossAmount} * {Sales.ExchangeRate}, 2)$INSCOMMIf {ProductCodes.Description} like "INSURANCE" THEN Round(({Sales.CommissionAmount}-({Sales.PublishedFare}-{Sales.SellingFare})) * {Sales.ExchangeRate}, 2) $BKGSALESBIf NOT({ProductCodes.Description} like "INSURANCE") THEN 1 ELSE 0$BKGINS 0 then (Sum ({@BKGINS}, {@AGENTSORT})*1.6/Sum ({@CNTBKG}, {@AGENTSORT}))*100RDSummaryFieldDefinitionRDGroupAreaPairRDArea;RDGroupHeaderSection= RDFieldObjectRDSectionContainerRef?<RDGuidelineConnectionRDVerticalGuidelineRDHorizontalRulerDefinition GFIy,DJDJDJDJDJDJFIDQFIW DSDSDSDSDSDSDSDSDSFID]D]D]D]D]D]D]FIDeDeDeFID%DiDiFI DlDlDlDlDlDlFIN*DsDsDs< DGDGDGDGDGEDGDGDGDGDG RDReportObjectFormatRDAdornmentType RDFontColourArial" RDFieldFormat ,.$ ,.$-- AM PM:: <$New_Page_After{?NEW AGENT PAGE} = "Y"'NEW AGENT PAGE New Page for Each Agent N;RDGroupFooterSection~RDVerticalRulerDefinitionRDHorizontalGuidelinexDDDDDDD@BxZ8;1Arial" ,.$ ,.$-- AM PM:: @Bxa8;2Arial" ,.$ ,.$-- AM PM::  RDLineObjectB<}O=,y,@B>xg7Arial" ,.$ ,.%-- AM PM:: @Bv"xj$ AGTSALETOSALElIf Sum ({@SALES}, {@AGENTSORT}) <>0 then (Sum ({@GROSSINS}, {@AGENTSORT})/Sum ({@SALES}, {@AGENTSORT}))*1008;3Arial" ,.$ ,.%-- AM PM:: @B'xu$ AGTREVTOREVtIf Sum ({@SALESCOMM}, {@AGENTSORT}) <> 0 then (Sum ({@INSCOMM}, {@AGENTSORT})/Sum ({@SALESCOMM}, {@AGENTSORT}))*1008;4Arial" ,.$ ,.%-- AM PM::  RDTextObjectB<x~ RDParagraph RDTextElementArial"TOTALS@BA xpu9Arial" ,.$ ,.$-- AM PM:: %;OthersOthersRDGroupNameFieldDefinition 0$CNTBKGIf {Sales.SecondaryProductCode} <> {?Service Fee Product Code} then If {Sales.SellingFare} > 0 then 1 else if {Sales.SellingFare} < 0 then -1'Service Fee Product CodeREnter Service Fee Product Code (this will exclude Service Fee details from report) 8;6$RPTCLOSINGRATIODIf Sum ({@CNTBKG})<>0 then(Sum ({@BKGINS})*1.6/Sum ({@CNTBKG}))*1008RDReportAreaPair<RDReportHeaderSectionm@B $ZNp,Arial" ,.$ ,.$// AM PM:: <RDReportFooterSectionDDDDDDD@BA ruArial" ,.$ ,.$-- AM PM:: @B'v$ RPTREVTOREVHIf Sum ({@SALESCOMM}) <> 0 then Sum ({@INSCOMM})/Sum ({@SALESCOMM})*1008284Arial" ,.$ ,.%-- AM PM:: @Bv"k$ RPTSALETOSALECIf Sum ({@SALES}) <> 0 then (Sum ({@GROSSINS})/Sum ({@SALES}))*1008183Arial" ,.$ ,.%-- AM PM:: @BfArial" ,.$ ,.%-- AM PM:: €B<|'ǀɀArial" AGENCY TOTALS@B[Arial" ,.$ ,.$-- AM PM:: @BbArial" ,.$ ,.$-- AM PM:: B<P=,y,X86$ PDBGKRATIOIf Sum ({@CNTBKG}, {@AGENTSORT}) <> 0 then (Sum ({@CNTBKG}, {Sales.SecondaryProductCode})/Sum ({@CNTBKG}, {@AGENTSORT}))*100 else 0$ PDSALESRATIOzIf Sum ({@SALES}, {@AGENTSORT}) <> 0 then (Sum ({@SALES}, {Sales.SecondaryProductCode})/Sum ({@SALES}, {@AGENTSORT}))*100$ pdrevratioIf Sum ({@SALESCOMM}, {@AGENTSORT}) <> 0 then (Sum ({@SALESCOMM}, {Sales.SecondaryProductCode})/Sum ({@SALESCOMM}, {@AGENTSORT}))*100 else 0 .- - - - - - -  -  --- 8:<6>7<69~;ZD<D<D<D<D<:@B:<Z{R=rArial" ,.$ ,.$-- AM PM:: @B:Z>Y5Arial" ,.$ ,.$-- AM PM:: @B:WZW?`7862Arial" ,.$ ,.$-- AM PM:: @B:.ZA^866Arial" ,.$ ,.$-- AM PM:: @B: Zq@86Arial" ,.$ ,.$-- AM PM:: 6OthersOthersҀ /1RY&`9c(*' Branch NumberEnter Branch NumberY@$Record_Selection{Sales.TransactionType} in [0.00, 2.00, 3.00] and {Sales.InvoiceDate} IN {@From Date} TO {@To Date} and {Branches.BranchNumber} = {?Branch Number} "!&)#d$Group_Selection$ Record_Search$ Group_SearchhhRDPageAreaPair<jRDPageHeaderSectionkP n&DoDoDoDoDoDoDom€Bm<wK=,ǀwɀ{Arial"Reporting Period RDFieldElement{Arial"& ,.$ ,.$ ,  AM PM:: ɀ{Arial" to ~{Arial") ,.$ ,.$ ,  AM PM:: €Bm<IxL=,JǀɀArial",RBC TRAVEL INSURANCE - AGENT ANALYSIS REPORT@Bmo+Arial" ,.$ ,.$ /AMPM:: @Bm<YyM=,Arial" ,.$ ,.$-- AM PM:: €Bm<&zpǀɀArial"Product Description€Bm# &qmǀɀArial"# OF ǀɀArial" Bookings €Bm&XsǀɀArial"TOTAL ǀɀArial"Sales €Bm&thǀɀArial" Closing ǀɀArial"RATIO €Bm &uǀɀArial" Gross Sales ǀɀArial"RATIO €BmW&Tr^7ǀɀArial"TOTAL ǀɀArial" Commission €Bm&&vtGǀɀArial" Revenue ǀɀArial"RATIO €Bm<ǀɀArial"Printed€BmP d> ǀɀArial"Contents SS 1282l$SummaryInformation(_Oh+'Oh+'0u    $08@Hh27@CE@pU) @H ǀɀArial"