;; PRODUCT: <Enter the product name>
;; PRODUCT-ID: 41b792af-aae9-4b29-963f-74c03d97410c
;; AUTHOR: Shweta Computers
[System: UDF]
    MyDBSalesman: Aggregate: 2
    SalesmanName: String:    1000
    Commission: Number: 1001
[#Part: CMP AccFeat Left]
    Add: Line: CMP EnableSalesmanTable
[Line: CMP EnableSalesmanTable]
    Field: Medium Prompt, CMP EnableSalesmanTable
    Local: Field: Medium Prompt: Info: "Enable Salesman ? "
    Invisible: NOT $$MODAdvInventory or NOT $IsInvoicingOn
    Space Top: 1
[Field: CMP EnableSalesmanTable]
    Use: Logical Field
    Storage: EnableSalesman
    Set as: If $$IsEmpty:$$Value then "No" else $$Value
    Sub Form: CMP SalesmanReport: $$Value = "Yes"
[System: UDF]
    EnableSalesman: Logical: 1000
[Report: CMP SalesmanReport]
    Form: CMP SalesmanForm
[Form: CMP SalesmanForm]
    Part: CMP Salesman PartTitle, CMP Salesman PartDetails
    Background: White, Petal Pink
[Part: CMP Salesman PartTitle]
    Line: CMP Salesman LineTitle
[Line: CMP   Salesman LineTitle]
    Field:   Long Prompt
    Local:   Field: Long Prompt: Style: Small Bold
    Local:   Field: Long Prompt: Info: "Salesman / Commission"
[Part: CMP Salesman PartDetails]
    Line: CMP Salesman LineDetails
    Repeat: CMP Salesman LineDetails: MyDBSalesman
    BreakOn: $$IsEmpty:$SalesmanName
    Height: 6
    Scroll: Vertical
    CommonBorder: Yes
[Line: CMP Salesman LineDetails]
    Field: CMP Salesman NameField,CMP Salesman CommissionField
[Field: CMP Salesman NameField]
    Use: Short Name Field
    Storage: SalesmanName
    Border: Thin Left
[Field: CMP Salesman CommissionField]
    Use: Number Field
    Storage: Commission
    Border: Thin Left
[Collection: MySalesmanCollection]
    Type: MyDBSalesman: Company
    Childof: ##SVCurrentCompany
    Format: $SalesmanName,10
    Title: Salesman
[#Part: EI BaseInfo]
    Option: EI Salesman: $$IsSales:##SVVoucherType
[!Part: EI Salesman]
    Add: Line: EI lnSalesman
[Line: EI lnSalesman]
    Fields: Short Prompt, fldSalesman
    Local: Field: Short Prompt: Info: 'Salesman Name: '
[Field: fldSalesman]
    Use: Short Name Field
    Storage: EI SalesmanName
    Width: 20
    Table: MySalesmanCollection
    ShowTable: Always
[System: UDF]
    EI SalesmanName: String: 1100