ADDRESS BOOK-FIND GSTIN,MOB,PHONE,ADDRESS,LED CONTACT WITH SINGLE CLICK

Discussion in 'Free Source Codes' started by sattam, Jul 25, 2020.

    
  1. sandeep76out

    sandeep76out New Member


    Dear Sir
    thank you for sharing _/\_
     


  2. jpsofttechnologies

    jpsofttechnologies New Member


    Dear Sir..
    Thank you so much..
     



  3. Sattam Ji

    Your code is not working in Prime. Please update.
     


  4. sattam

    sattam Active Member


    No error in my System Untitled.png
     


  5. udaya

    udaya Active Member


    Superb Sattam Ji..... What a Create idea and finishing !!!!!!!!!!! :):):):):):):)
     
    panam likes this.


  6. sattam

    sattam Active Member


    Just replace this button as tally prime has button F1 as help button

    ;;========================== Group Filter ======================
    [Button:SKCGroupFilter]
    Key : Alt+F1
    Action : Execute : SKCGroupFilter
    Title : Group
     



  7. Sattam ji

    Still not working after replacing the same. As I click on report exception error comes.
     


  8. Mukesh1001

    Mukesh1001 New Member


    small change
    [#Menu: Gateway of Tally]

    Add : Item : Address Book : Display : AddressBookFD

    [Report:AddressBookFD]
    Form : AddressBookFD
    Set : SKCPrtyName : ""
    Set : SKCGroupName : ""
    Set : SKCStateName : ""
    Set : SKCPinName : ""
    Set : SKCPhoneName : ""
    Set : SKCADHARName : ""
    Set : SKCFSSIName : ""
    Set : SKCgstinName : ""
    Set : SKCcontactName : ""


    Variable : SV Print Orientation : String

    [Form:AddressBookFD]

    Parts : DSp Company Name, DSP Company Address
    Part : SKCHeader,SKCDetails
    Background : @@SV_UNGREEN;;Light Autumn Green;"Light Orange";;"pink";MasterLedgerClr
    Buttons : PrintButton, ExportButton, UploadButton, MailButton
    Button : BlankButton,SKCGroupFilter,SKCLedgFilter,Second Blank Button,SKCStateFilter,SKCPinFilter,SKCPhoneFilter,SKCgstinFilter,SKCContactFilter,SKCADHARFilter ;;,SKCFSSIFilter
    Bottom Button : SKCF12Config
    Bottom ToolBar Button : SKCAlterBtn,SKCCreateBtn,BottomToolBarBtn8, BottomToolBarBtn9, BottomToolBarBtn10,BottomToolBarBtn11, BottomToolBarBtn12
    Space Top : If $$InPrintMode Then 0.5 Else 0 inches
    Width : 100% Screen
    Space Left : 1 mm
    Space Right : 1 mm
    Set Always : SV Print Orientation : "Landscape"
    Local : Part : DSP Company Address : invisible : Yes

    [Key: SKCAlterBtn]
    Key : Enter
    Title : $$LocaleString:"Alter"
    Type : BottomToolBarBtn2
    Action : Alter Object

    [Key: SKCCreateBtn]
    Key : ALT+C
    Title : $$LocaleString:"Create Led."
    Type : BottomToolBarBtn3
    Action : Create : Ledger

    [Part:SKCHeader]
    Line : SKCHeader
    Space Bottom : 2 mm
    Horizontal Align : Center

    [Line:SKCHeader]
    Field : Simple Field
    Local : Field : Simple Field : Set as : "Address Book"
    Local : Field : Simple Field : Style : Large Bold
    Local : Field : Simple Field : Cells : 15 ;;13
    Local : Field : Simple Field : Full Width: Yes
    Local : Field : Simple Field : Align : Center
    Local : Field : Simple Field :color:DarkBlue16Bit
    [Part:SKCDetails]
    Line : SKCDetailsHead,SKCDetails
    Repeat : SKCDetails:SKCCollectionSKC
    Scroll : Vertical;Both;
    Common Border : Yes

    [Line:SKCDetailsHead]
    Use : SKCDetails
    Border : Column Titles
    Local : Field : Default : Style : Small Bold
    Local : Field : Default : Align : Center
    Local : Field : Default : Delete : Border
    Local : Field : SKCSno : Set as : "S.no"
    Local : Field : SKCName : Set as : "Ledger Name"
    Local : Field : SKCAddress : Set as : "Address"
    Local : Field : SKCContact : Set as : "Contact"
    Local : Field : SKCPhone : Set as : "Phone"

    ;; Local : Field : SKCADHAR : Info : $$LocaleString:"Aadhaar number:"
    Local : Field : SKCADHAR : Set as : "Aadhar No"
    LOCAL : FIELD : SKCFSSI : SET AS : "FSSI NO."

    Local : Field : SKCMobile : Set as : "Mobile"
    Local : Field : SKCFax : Set as : "Fax"
    Local : Field : SKCState : Set as : "State"
    Local : Field : SKCPin : Set as : "Pincode"
    Local : Field : SKCEmail : Set as : "Email"
    Local : Field : SKCPan : Set as : "GSTIN/PAN"
    Local : Field : SKCPan : color : "DarkBlue16Bit"
    Local : Field : SKCTIN : Set as : "PAN/IT"
    Local : Field : SKCCST : Set as : "CST No."
    Local : Field : SKCOpening : Info : "Opening Bal."
    Local : Field : SKCClosing : Info : "Closing Bal."

    [Line:SKCDetails]
    Fields : SKCSno,SKCName,SKCAddress,SKCPin,SKCState,SKCContact,SKCMobile,SKCPhone,SKCADHAR,SKCFSSI,SKCPan,SKCEmail,SKCOpening,SKCClosing
    Right Field :SKCTIN,SKCCST,SKCFax,
    Repeat : SKCClosing

    Option : AlterOnEnter
    Border : Thin Left Right Bottom
    Space Bottom : 1 mm
    Space Top : 1 mm

    [Field:SKCDefault]
    ;Line : 0
    Border : Thin Left
    Style : Tiny Bold
    color : DarkBlue16Bit ;;Blue;Maroon;
    [Field:SKCSno]
    Use : SKCDefault
    Alter : Ledger
    Set as : $$Line
    Width : 1.5 cm
    Align : Center

    [Field:SKCName]
    Use : SKCDefault
    ;; Set as : $Name++ $$NewLine +"**"+$Parent;+")"
    Set as : $Name ;;++ $$NewLine +"**"+$Parent;+")"
    Width : 30 ;;@@NameWidth ;;
    Tooltip : "Opening Balance : "+$$String:$OpeningBalance
    Quick Search : Yes
    Line :0

    [Field:SKCAddress]
    Use : SKCDefault
    Set as : $$FullList:Address:$Address ;;+", "+$LedStateName +", "+$PinCode
    Invisible: Not $SKCF12Address:Company:##SVCurrentCompany
    Width : 30
    ;Style : Tiny
    Line : 0
    Scroll : Yes

    [Field:SKCContact]
    Use : SKCDefault
    Width : 10
    Set as : $LedgerContact
    Invisible: Not $SKCF12Contact:Company:##SVCurrentCompany
    Scroll : Yes

    [Field:SKCPhone]
    Use : SKCDefault

    Width : 10
    Set as : $LedgerPhone ;;If ($$IsEmpty:$LedgerPhone) then "Not Available" else $LedgerPhone
    ;; Set as : If ($$IsEmpty:$LedgerPhone) then "Not Available" else $LedgerPhone
    Invisible: Not $SKCF12Phone:Company:##SVCurrentCompany
    Color:if $$Value="Not Available" then "Red" else "DarkBlue16Bit"
    Scroll : Yes

    [Field:SKCADHAR]
    Use : ADHAR FIELD
    Set as : $LedgerAdhar
    Width : 10
    Set as :$LedgerAadhar ;; If ($$IsEmpty:$LedgerAadhar) then "Not Available" else $LedgerAadhar ;;Adhnum ;;$LedgerAadharNo -ok ;;
    Invisible: Not $SKCF12Aadhar:Company:##SVCurrentCompany
    Color:if $$Value="Not Available" then "Red" else "DarkBlue16Bit"
    Scroll : Yes

    [Field:SKCFSSI]


    USE : SHORT NAME FIELD
    USE :CMP FSSI NUMBER
    Set as : $LedgerFSSI ;;If ($$IsEmpty:$LedgerFSSI) then "Not Available" else $LedgerFSSI
    Width : 10
    Invisible: Not $SKCF12FSSI:Company:##SVCurrentCompany
    Scroll : Yes



    [Field:SKCMobile]
    Use : SKCPhone
    Width : 10
    Set as : $LedgerMobile ;;If ($$IsEmpty:$LedgerMobile) then "Not Available" else $LedgerMobile
    Invisible: Not $SKCF12Mobile:Company:##SVCurrentCompany
    Color:if $$Value="Not Available" then "Red" else "DarkBlue16Bit"
    Scroll : Yes

    [Field:SKCFax]
    Use : SKCPhone
    Set as : $LedgerFax
    Invisible: Not $SKCF12FaxFlag:Company:##SVCurrentCompany; Not ##SKCF12Fax
    Scroll : Yes

    [Field:SKCState]
    Use : SKCDefault
    Width : 10
    Set as : If $$IsEmpty:$PinCode then $LedStateName else $LedStateName ++$$NewLine +"("+$PinCode+")"
    Invisible: Not $SKCF12State:Company:##SVCurrentCompany
    Line :2
    Scroll : Yes

    [Field:SKCPin]
    Use : SKCDefault
    Width : 12
    Invisible: Not $SKCF12Pin:Company:##SVCurrentCompany
    Set as : $Pincode
    Align : Center
    Scroll : Yes

    [Field:SKCPan]
    Use : SKCPhone
    Set as : if ($$IsEmpty:$PARTYGSTIN AND NOT $$IsEmpty:$IncomeTaxNumber) then $IncomeTaxNumber ++ $$NewLine +"("+$GSTRegistrationType+")" else If ($$IsEmpty:$IncomeTaxNumber AND NOT $$IsEmpty:$PARTYGSTIN) then $PARTYGSTIN ++ $$NewLine +"("+$GSTRegistrationType+")" else + if($$IsEmpty:$PARTYGSTIN AND $$IsEmpty:$IncomeTaxNumber) then "Both Not Available" ++ $$NewLine +"("+$GSTRegistrationType+")" else if (NOT $$IsEmpty:$PARTYGSTIN AND NOT $$IsEmpty:$IncomeTaxNumber) then $PARTYGSTIN ++ $$NewLine +"("+$GSTRegistrationType+")" else ""

    Align : Center
    Invisible: Not $SKCF12Pan:Company:##SVCurrentCompany
    Color :if $$Value CONTAINS "Not Available" then "Red" else "green"
    Color :if $$Value CONTAINS "Not Available" then "Red" else "Maroon"
    Width :24 ; @@AmountWidth ;@@NameWidth ;;24
    Line :2
    Scroll : Yes

    [Field:SKCTIN]
    Use : SKCPhone
    Set as : $IncomeTaxNumber;$SalesTaxNumber
    Align : Center
    Invisible: Not $SKCF12Tin:Company:##SVCurrentCompany
    Scroll : Yes

    [Field:SKCCST]
    Use : SKCPhone
    Set as : $InterStateSTNumber
    Align : Center
    Invisible: Not $SKCF12CST:Company:##SVCurrentCompany
    Scroll : Yes

    [Field:SKCEmail]
    Invisible: Not $SKCF12EMail:Company:##SVCurrentCompany
    Use : SKCDefault
    Width : 25
    Set as : if Not $$IsEmpty:$Email AND Not $$IsEmpty:$EmailCC Then $Email+","+$EmailCC Else+
    if Not $$IsEmpty:$Email Then $Email Else $EmailCC
    Scroll : Yes

    [Field:SKCOpening]
    Use : Amount Field
    Format : "DrCr"
    Set as : $OpeningBalance
    Border : Thin Left
    ;Line : 0
    Invisible : Not $SKCF12Opening:Company:##SVCurrentCompany
    Style : Tiny Bold
    color : Red ;;DarkBlue16Bit;;Blue;Maroon;
    Scroll : Yes

    [Field:SKCClosing]
    Use : SKCOpening
    Set as : $ClosingBalance
    Invisible : Not $SKCF12Closing:Company:##SVCurrentCompany
    Scroll : Yes


    ;=========================================================================
    ;============================== Filter ===================================
    [Button:SKCLedgFilter] ;;========================== Ledger Filter ======================
    Key : F2
    Action : Execute : SKCLedgFilter
    Title : Ledger

    [Report:SKCLedgFilter]
    Form : SKCLedgFilter
    Set : SKCPrtyName : ""
    Set : SKCGroupName : ""
    Set : SKCStateName : ""
    Set : SKCPinName : ""
    Set : SKCPhoneName : ""
    Set : SKCgstinName : ""
    Set : SKCcontactName: ""
    ;; Set : SKCADHARName : ""
    ;; Set : SKCFSSIName : ""
    ;; Set : SKCAddressName : ""

    [Form:SKCLedgFilter]
    Part : SKCLedgFilter
    No Confirmation : Yes

    [Part:SKCLedgFilter]
    Line : SKCLedgFilter

    [Line:SKCLedgFilter]
    Field : Medium Prompt,SKCLedgFilter
    Local : Field : Medium Prompt : Set as : "Select Ledger : "

    [Field:SKCLedgFilter]
    Table : LedgerFilter,EndOfList
    ShowTable : Always
    Use : Name Field
    Width : 20
    Border : Thin Box
    Variable : SKCPrtyName
    Modifies : SKCPrtyName

    [Variable:SKCPrtyName]
    Type : String

    [Button:SKCGroupFilter] ;;============ Group Filter ========
    Key : F1
    Action : Execute : SKCGroupFilter
    Title : Group

    [Report:SKCGroupFilter]
    Form : SKCGroupFilter
    Set : SKCPrtyName : ""
    Set : SKCAddressName : ""
    Set : SKCGroupName : ""
    Set : SKCStateName : ""
    Set : SKCPinName : ""
    Set : SKCPhoneName : ""
    Set : SKCADHARName : ""
    Set : SKCFSSIName: ""
    Set : SKCgstinName : ""
    Set : SKCcontactName: ""


    [Form:SKCGroupFilter]
    Part : SKCGroupFilter
    No Confirmation : Yes

    [Part:SKCGroupFilter]
    Line : SKCGroupFilter

    [Line:SKCGroupFilter]
    Field : Medium Prompt,SKCGroupFilter
    Local : Field : Medium Prompt : Set as : "Select Group : "


    [Field:SKCGroupFilter]
    Table : SKCGroupFilter,EndOfList
    ShowTable : Always
    Use : Name Field
    Width : 20
    Border : Thin Box
    Variable : SKCGroupName
    Modifies : SKCGroupName

    [Variable:SKCGroupName]
    Type : String

    [Button:SKCStateFilter] ;;================= Address Filter =======
    Key : F3
    Action : Execute : SKCStateFilter
    Title : Address

    [Report:SKCStateFilter]
    Form : SKCStateFilter
    Set : SKCPrtyName : ""
    Set : SKCAddressName : ""
    Set : SKCGroupName : ""
    Set : SKCStateName : ""
    Set : SKCPinName : ""
    Set : SKCPhoneName : ""
    Set : SKCADHARName : ""
    Set : SKCFSSIName: ""
    Set : SKCgstinName : ""
    Set : SKCcontactName: ""


    [Variable:SKCAddressName]
    Type : String

    [Form:SKCStateFilter]
    Part : SKCStateFilter
    No Confirmation : Yes

    [Part:SKCStateFilter]
    Line : SKCStateFilter

    [Line:SKCStateFilter]
    Field : Medium Prompt,SKCStateFilter
    Local : Field : Medium Prompt : Set as : "Select Address : "

    [Field:SKCStateFilter]
    Table : SKCStateFilter,EndOfList
    ShowTable : Always
    Use : Name Field
    Width : 20
    Border : Thin Box
    Variable : SKCStateName
    Modifies : SKCStateName

    [Variable:SKCStateName]
    Type : String

    [Button:SKCPinFilter] ;;=============== Mobile Filter ==============
    Key : F4
    Action : Execute : SKCPinFilter
    Title : Led Mobile

    [Report:SKCPinFilter]
    Form : SKCPinFilter
    Set : SKCPrtyName : ""
    Set : SKCGroupName : ""
    Set : SKCStateName : ""
    Set : SKCPinName : ""
    Set : SKCPhoneName : ""
    Set : SKCADHARName : ""
    Set : SKCFSSIName : ""
    Set : SKCgstinName : ""
    Set : SKCcontactName: ""



    [Form:SKCPinFilter]
    Part : SKCPinFilter
    No Confirmation : Yes

    [Part:SKCPinFilter]
    Line : SKCPinFilter

    [Line:SKCPinFilter]
    Field : Medium Prompt,SKCPinFilter
    Local : Field : Medium Prompt : Set as : "Select Mobile No : "

    [Field:SKCPinFilter]
    Table : SKCPinFilter,EndOfList
    ShowTable : Always
    Use : Name Field
    Width : 20
    Border : Thin Box
    Variable : SKCPinName
    Modifies : SKCPinName

    [Variable:SKCPinName]
    Type : String

    [Button:SKCPhoneFilter] ;;=============== Phone Filter =============
    Key : F5
    Action : Execute : SKCPhoneFilter
    Title : Led Phone

    [Report:SKCPhoneFilter]
    Form : SKCPhoneFilter
    Set : SKCPrtyName : ""
    Set : SKCGroupName : ""
    Set : SKCStateName : ""
    Set : SKCPinName : ""
    Set : SKCPhoneName : ""
    Set : SKCgstinName : ""
    Set : SKCcontactName: ""
    Set : SKCADHARName : ""
    Set : SKCFSSIName: ""

    [Form:SKCPhoneFilter]
    Part : SKCPhoneFilter
    No Confirmation : Yes

    [Part:SKCPhoneFilter]
    Line : SKCPhoneFilter

    [Line:SKCPhoneFilter]
    Field : Medium Prompt,SKCPhoneFilter
    Local : Field : Medium Prompt : Set as : "Select Phone No : "

    [Field:SKCPhoneFilter]
    Table : SKCPhoneFilter,EndOfList
    ShowTable : Always
    Use : Name Field
    Width : 20
    Border : Thin Box
    Variable : SKCPhoneName
    Modifies : SKCPhoneName

    [Variable:SKCPhoneName]
    Type : String

    [Button:SKCgstinFilter] ;;========================== GSTIN Filter ======================
    Key : F6
    Action : Execute :SKCgstinFilter
    Title : GSTIN/PAN

    [Report:SKCgstinFilter]
    Form : SKCgstinFilter
    Set : SKCPrtyName : ""
    Set : SKCGroupName : ""
    Set : SKCStateName : ""
    Set : SKCPinName : ""
    Set : SKCPhoneName : ""
    Set : SKCADHARName : ""
    Set : SKCgstinName : ""
    Set : SKCcontactName: ""
    Set : SKCFSSIName: ""


    [Form:SKCgstinFilter]
    Part : SKCgstinFilter
    No Confirmation : Yes

    [Part:SKCgstinFilter]
    Line : SKCgstinFilter

    [Line:SKCgstinFilter]
    Field : Medium Prompt,SKCgstinFilter
    Local : Field : Medium Prompt : Set as : "Select GSTIN/PAN : "

    [Field:SKCgstinFilter]
    Table : SKCgstinFilter,EndOfList
    ShowTable : Always
    Use : Name Field
    Width : 20
    Border : Thin Box
    Variable : SKCgstinName
    Modifies : SKCgstinName

    [Variable:SKCgstinName]
    Type : String


    [Button:SKCContactFilter] ;;========================== CONTACT Filter ======================
    Key : F7
    Action : Execute :SKCContactFilter
    Title : Contact Person

    [Report:SKCContactFilter]
    Form : SKCContactFilter
    Set : SKCPrtyName : ""
    Set : SKCGroupName : ""
    Set : SKCStateName : ""
    Set : SKCPinName : ""
    Set : SKCPhoneName : ""
    Set : SKCgstinName : ""
    Set : SKCcontactName: ""
    Set : SKCADHARName : ""

    [Form:SKCContactFilter]
    Part : SKCContactFilter
    No Confirmation : Yes

    [Part:SKCContactFilter]
    Line : SKCContactFilter

    [Line:SKCContactFilter]
    Field : Medium Prompt,SKCContactFilter
    Local : Field : Medium Prompt : Set as : "Select Contact Person : "

    [Field:SKCContactFilter]
    Table : SKCContactFilter,EndOfList
    ShowTable : Always
    Use : Name Field
    Width : 20
    Border : Thin Box
    Variable : SKCcontactName
    Modifies : SKCcontactName

    [Variable:SKCcontactName]
    Type : String

    [Button:SKCADHARFilter] ;;========================== Aadhar Filter ======================
    Key : F8
    Action : Execute : SKCADHARFilter
    Title : Aadhar No.

    [Report:SKCADHARFilter]
    Form : SKCADHARFilter
    Set : SKCPrtyName : ""
    Set : SKCGroupName : ""
    Set : SKCStateName : ""
    Set : SKCPinName : ""
    Set : SKCPhoneName : ""
    Set : SKCADHARName : ""
    Set : SKCgstinName : ""
    Set : SKCcontactName: ""
    Set : SKCFSSIName: ""


    [Form:SKCADHARFilter]
    Part : SKCADHARFilter
    No Confirmation : Yes

    [Part:SKCADHARFilter]
    Line : SKCADHARFilter

    [Line:SKCADHARFilter]
    Field : Medium Prompt,SKCADHARFilter
    ;;Local : Field : Medium Prompt : Set as : "Select Aadhar No : "
    Local : Field : Medium Prompt : Set as : "Select Aadhar Person : "

    [Field:SKCADHARFilter]
    Table : SKCADHARFilter,EndOfList
    ShowTable : Always
    Use : Name Field
    Width : 20
    Border : Thin Box
    Variable : SKCADHARName
    Modifies : SKCADHARName

    [Variable:SKCADHARName]
    Type : String

    ;;[Button:SKCFSSIFilter] ;;========================== SKCFSSINO Filter == add ====================
    ;; Key : F9
    ;; Action : Execute : SKCFSSIFilter
    ;; Title : FSSI Person

    ;;[Report:SKCFSSIFilter]
    ;; Form : SKCFSSIFilter
    ;; Set : SKCPrtyName : ""
    ;; Set : SKCGroupName : ""
    ;; Set : SKCStateName : ""
    ;; Set : SKCPinName : ""
    ;; Set : SKCPhoneName : ""
    ;; Set : SKCgstinName : ""
    ;; Set : SKCcontactName: ""
    ;; Set : SKCADHARName : ""
    ;; Set : SKCFSSIName : ""

    ;;[Form:SKCFSSIFilter]
    ;; Part : SKCFSSIFilter
    ;; No Confirmation : Yes

    ;;[Part:SKCFSSIFilter]
    ;; Line : SKCFSSIFilter

    ;;[Line:SKCFSSIFilter]
    ;; Field : Medium Prompt,SKCFSSIFilter
    ;; Local : Field : Medium Prompt : Set as : "Select FSSI No : "

    ;;[Field:SKCFSSIFilter]
    ;; Table : SKCFSSIFilter,EndOfList
    ;; ShowTable : Always
    ;; Use : Name Field
    ;; Width : 20
    ;; Border : Thin Box
    ;; Variable : SKCFSSIName
    ;; Modifies : SKCFSSIName

    [Variable:SKCFSSIName]
    Type : String



    ;===================================== F12 Configuration ==============================================

    [Button:SKCF12Config] ;;========================== Address Filter ======================
    Key : F12
    Action : Alter : SKCF12Config
    Title : Configure

    [Report:SKCF12Config]
    Object : Company
    Form : SKCF12Config

    [Form:SKCF12Config]
    Top Part: SKCF12Title
    Part : SKCF12Config
    Background : @@SV_CMPCONFIG
    Full Width : No
    No Confirmation : Yes
    Space Bottom : 3 mm
    Space Left : 4 mm
    Space Right : 4 mm
    Space Top : 3 mm

    [Part:SKCF12Title]
    Horizontal Align : Center
    Line : SKCF12Title

    [Line:SKCF12Title]
    Field : Simple Field
    Space Bottom : 3 mm
    Local : Field : Simple Field : Info : "Address Book Configuration"
    Local : Field : Simple Field : Align : Center
    Local : Field : Simple Field : Style : Normal Bold
    Local : Field : Simple Field : Border : Thin Bottom

    [Part:SKCF12Config]
    Line : SKCF12Address,SKCF12Contact,SKCF12Mobile,SKCF12Phone,SKCF12Email,SKCF12Aadhar,SKCF12FSSI,+
    SKCF12State,SKCF12Pan,SKCF12Opening,SKCF12Closing,SKCF12Fax,SKCF12Tin,SKCF12CST,SKCF12Pin

    [Line:SKCF12Fax]
    Field : Medium Prompt,SKCF12Fax
    Local : Field : Medium Prompt : Set as : "Show Fax : "
    Space Bottom : 1 mm

    [Field:SKCF12Fax]
    Use : Logical Field
    Set as : $$Value
    Storage : SKCF12FaxFlag

    [Line:SKCF12Address]
    Field : Medium Prompt,SKCF12Address
    Local : Field : Medium Prompt : Set as : "Show Address : "
    Space Bottom : 1 mm

    [Field:SKCF12Address]
    Use : Logical Field
    Set as : $$Value
    Storage : SKCF12Address

    [Line:SKCF12Contact]
    Field : Medium Prompt,SKCF12Contact
    Local : Field : Medium Prompt : Set as : "Show Contact : "
    Space Bottom : 1 mm

    [Field:SKCF12Contact]
    Use : Logical Field
    Set as : $$Value
    Storage : SKCF12Contact

    [Line:SKCF12Aadhar]
    Field : Medium Prompt,SKCF12Aadhar
    Local : Field : Medium Prompt : Set as : "Show Aadhar : "
    Space Bottom : 1 mm

    [Field:SKCF12Aadhar]
    Use : Logical Field
    Set as : $$Value
    Storage : SKCF12Aadhar

    [Line:SKCF12FSSI]
    Field : Medium Prompt,SKCF12FSSI
    Local : Field : Medium Prompt : Set as : "Show FSSI : "
    Space Bottom : 1 mm

    [Field:SKCF12FSSI]
    Use : Logical Field
    Set as : $$Value
    Storage : SKCF12FSSI

    [Line:SKCF12Mobile]
    Field : Medium Prompt,SKCF12Mobile
    Local : Field : Medium Prompt : Set as : "Show Mobile : "
    Space Bottom : 1 mm

    [Field:SKCF12Mobile]
    Use : Logical Field
    Set as : $$Value
    Storage : SKCF12Mobile

    [Line:SKCF12Phone]
    Field : Medium Prompt,SKCF12Phone
    Local : Field : Medium Prompt : Set as : "Show Phone : "
    Space Bottom : 1 mm

    [Field:SKCF12Phone]
    Use : Logical Field
    Set as : $$Value
    Storage : SKCF12Phone

    [Line:SKCF12Email]
    Field : Medium Prompt,SKCF12Email
    Local : Field : Medium Prompt : Set as : "Show EMail : "
    Space Bottom : 1 mm

    [Field:SKCF12Email]
    Use : Logical Field
    Set as : $$Value
    Storage : SKCF12Email

    [Line:SKCF12State]
    Field : Medium Prompt,SKCF12State
    Local : Field : Medium Prompt : Set as : "Show State : "
    Space Bottom : 1 mm

    [Field:SKCF12State]
    Use : Logical Field
    Set as : $$Value
    Storage : SKCF12State

    [Line:SKCF12Pin]
    Field : Medium Prompt,SKCF12Pin
    Local : Field : Medium Prompt : Set as : "Show Pincode : "
    Space Bottom : 1 mm

    [Field:SKCF12Pin]
    Use : Logical Field
    Set as : $$Value
    Storage : SKCF12Pin

    [Line:SKCF12Pan]
    Field : Medium Prompt,SKCF12Pan
    Local : Field : Medium Prompt : Set as : "Show GSTIN : "
    Space Bottom : 1 mm

    [Field:SKCF12Pan]
    Use : Logical Field
    Set as : $$Value
    Storage : SKCF12Pan

    [Line:SKCF12Tin]
    Field : Medium Prompt,SKCF12Tin
    Local : Field : Medium Prompt : Set as : "Show PAN/IT : "
    Space Bottom : 1 mm

    [Field:SKCF12Tin]
    Use : Logical Field
    Set as : $$Value
    Storage : SKCF12Tin

    [Line:SKCF12CST]
    Field : Medium Prompt,SKCF12CST
    Local : Field : Medium Prompt : Set as : "Show CST No. : "
    Space Bottom : 1 mm

    [Field:SKCF12CST]
    Use : Logical Field
    Set as : $$Value
    Storage : SKCF12CST

    [Line:SKCF12Opening]
    Field : Medium Prompt,SKCF12Opening
    Local : Field : Medium Prompt : Set as : "Show Opening Bal. : "
    Space Bottom : 1 mm

    [Field:SKCF12Opening]
    Use : Logical Field
    Set as : $$Value
    Storage : SKCF12Opening

    [Line:SKCF12Closing]
    Field : Medium Prompt,SKCF12Closing
    Local : Field : Medium Prompt : Set as : "Show Closing Bal. : "
    Space Bottom : 1 mm

    [Field:SKCF12Closing]
    Use : Logical Field
    Set as : $$Value
    Storage : SKCF12Closing




    ;================================================================================================
    ;===================================== Collections =================================================

    [System:UDF]

    SKCF12FaxFlag : Logical : 5821
    SKCF12Contact : Logical : 5822
    SKCF12Mobile : Logical : 5823
    SKCF12Phone : Logical : 5824
    SKCF12Email : Logical : 5825
    SKCF12State : Logical : 5826
    SKCF12Pin : Logical : 5827
    SKCF12Pan : Logical : 5828
    SKCF12Tin : Logical : 5829
    SKCF12CST : Logical : 5830
    SKCF12Opening : Logical : 5831
    SKCF12Closing : Logical : 5832
    SKCF12Aadhar : Logical : 5833
    SKCF12FSSI : Logical : 5834
    SKCF12Address : Logical : 5835

    [Collection:SKCCollectionSKC]
    Type : Ledger
    ;; Fetch : Name,Parent,Address,LedgerContact,LedgerMobile,LedgerPhone,LedgerAadhar,LedgerFSSI,LedStateName,Pincode,Email,OpeningBalance,ClosingBalance
    Fetch : Name,Parent,Address,LedgerContact,LedgerPhone,LedgerMobile,LedStateName,Pincode,Email,OpeningBalance,ClosingBalance
    Filter : SKCCrDrOnly,SKCFilter
    Belongs To : Yes

    [Collection:LedgerFilter]
    Title : "List of Ledgers"
    Type : Ledger
    Belongs to : Yes
    Fetch : Name
    Format : $Name,25
    Filter : SKCCrDrOnly,SKCFilter

    [Collection:SKCGroupFilter]
    Title : "List of Groups"
    Type : Ledger
    Belongs To : Yes
    Fetch : Parent
    Format : $Parent,25
    Filter : SKCCrDrOnly

    [Collection:SKCStateFilter]
    Title : "List of Address"
    Type : Ledger
    Belongs To : Yes
    Fetch : LedStateName,Address
    Format : ($$FullList:Address:$Address),60;$LedStateName,25
    Filter : SKCCrDrOnly

    [Collection:SKCPinFilter]
    Title : "List of Mobile Nos"
    Type : Ledger
    Belongs To : Yes
    Fetch : LedgerMobile ;PinCode
    Format : $LedgerMobile ,30
    Filter : SKCCrDrOnly

    [Collection:SKCPhoneFilter]
    Title : "List of Phone Nos"
    Type : Ledger
    Belongs To : Yes
    Fetch : LedgerPhone ;PinCode
    Format : $LedgerPhone ,30
    Filter : SKCCrDrOnly

    [Collection:SKCgstinFilter]
    Title : "List of GSTIN"
    Type : Ledger
    Belongs To : Yes
    Fetch : PARTYGSTIN,IncomeTaxNumber
    Fetch : PinCode
    Format : $IncomeTaxNumber ,20
    Format : $PARTYGSTIN ,30
    Format : $PinCode ,10
    Filter : SKCCrDrOnly

    [Collection:SKCContactFilter]
    Title : "List of Contact Person"
    Type : Ledger
    Belongs To : Yes
    Fetch : LedgerContact
    Format : $LedgerContact,30
    Filter : SKCCrDrOnly


    ;;[Collection:SKCFSSIFilter]
    ;; Title : "List of SKCFSSI Person"
    ;; Type : Ledger
    ;; Belongs To : Yes
    ;; Fetch : LedgerFSSI
    ;; Format : $LedgerFSSI ,30
    ;; Filter : SKCCrDrOnly

    [Collection:SKCADHARFilter]
    Title : "List of Aadhar Person"
    Type : Ledger
    Belongs To : Yes
    Fetch : LedgerAadhar
    Format : $LedgerAadhar ,30
    Filter : SKCCrDrOnly

    [System:Variable]
    SKCPrtyName : ""
    SKCGroupName : ""
    SKCStateName : ""
    SKCPinName : ""
    SKCPhoneName : ""
    SKCgstinName : ""
    SKCcontactName : ""
    SKCFSSIName : ""
    SKCAddressName : ""
    SKCADHARName : ""

    [System:Formula]

    SKCCrDrOnly : $$IsBelongsTo:$$GroupSundryDebtors OR $$IsBelongsTo:$$GroupSundryCreditors
    SKCFilter : $Name=@@SKCNameFilter AND $Parent=@@SKCGroupFilter AND ($$FullList:Address:$Address)CONTAINS @@SKCStateFill AND $LedgerMobile=@@SKCPinFilter AND $LedgerPhone=@@SKCPhoneFilter AND $LedgerContact=@@SKCcontactFilter AND ($IncomeTaxNumber CONTAINS @@SKCgstinFilter) OR ($IncomeTaxNumber CONTAINS @@SKCgstinFilter) ;;($PARTYGSTIN CONTAINS @@SKCgstinFilter))
    SKCNameFilter : if ##SKCPrtyName="" OR $$IsEndOfList:##SKCPrtyName then $Name Else ##SKCPrtyName
    ;; SKCAddressFilter : if ##SKCAddressName="" OR $$IsEndOfList:##SKCAddressName then $Name Else ##SKCAddressName
    SKCGroupFilter : if ##SKCGroupName="" OR $$IsEndOfList:##SKCGroupName then $Parent Else ##SKCGroupName
    SKCStateFill : if ##SKCStateName="" OR $$IsEmpty:##SKCStateName then $Address Else ##SKCStateName
    SKCPinFilter : if ##SKCPinName="" OR $$IsEmpty:##SKCPinName then $LedgerMobile Else ##SKCPinName
    SKCPhoneFilter : if ##SKCPhoneName="" OR $$IsEmpty:##SKCPhoneName then $LedgerPhone Else ##SKCPhoneName
    ;; SKCADHARFilter : if ##SKCADHARName="" OR $$IsEmpty:##SKCADHARName then $LedgerAadhar Else ##SKCADHARName
    ;; SKCFSSIFilter : if ##SKCFSSIName="" OR $$IsEmpty:##SKCFSSIName then $LedgerFSSI Else ##SKCFSSIName
    SKCgstinFilter : if ##SKCgstinName="" OR $$IsEmpty:##SKCgstinName then $IncomeTaxNumber Else ##SKCgstinName
    SKCcontactFilter: if ##SKCcontactName="" OR $$IsEmpty:##SKCcontactName then $LedgerContact Else ##SKCcontactName
    ;; IsDebtorCreditor : $$IsBelongsTo:$$GroupSundryDebtors OR $$IsBelongsTo:$$GroupSundryCreditors OR $$IsBelongsTo:$$GroupBranches
     

    Attached Files:

    Last edited: Nov 28, 2020



  9. @Mukesh1001


    Thanks for sharing but your file is giving error "bad formula"
     




  10. Please help in running this tdl in prime.
     


  11. Sanjay Manna

    Sanjay Manna Member


    actually show error but upload is successfully
     


  12. Mukesh Garg

    Mukesh Garg Member


    CODE FOR FETCH ADDRESS IN MULTIPLE LINES PLZ HELP
     


  13. Mithilesh

    Mithilesh New Member


    Sir,
    I am getting the below error after using your code.
     

    Attached Files:



  14. Mukesh Garg

    Mukesh Garg Member


     


  15. sattam

    sattam Active Member


    Add this at part level
    Scroll : Both
     


  16. sattam

    sattam Active Member


    Please Unload all Tdl and Load only this tdl then try and revert me back
     


  17. Mukesh Garg

    Mukesh Garg Member


    plz share part level of day book
     


  18. sattam

    sattam Active Member


    Please keep searching and trying so you can improve your knowledge in tdl
     
    Mukesh Garg likes this.


  19. Mukesh Garg

    Mukesh Garg Member


    not find plz help
     


  20. naren1234

    naren1234 Member


    When trying to add more fields from F12 option, I got error in Tally prime showing Memory Access Violation - Software exception c0000005 [​IMG]

    Also, how can we populate the details for Multiple-addresses of a Ledger in this Address Book?
     
    Last edited: Apr 12, 2022


  21. naren1234

    naren1234 Member


    Here is the error screenshot
    SKCAddrBookFullDetails_Memory-Error.JPG
     


  22. naren1234

    naren1234 Member


    same error on another pc
     


  23. sattam

    sattam Active Member


    Here is Modified code for Tally Prime
    Also added features that you will see this Address Book in Go To feature of Tally Prime

    Please Unload the old code and load this Modified code.
    Enjoy.

    Code:
    
    [#Menu: Gateway of Tally]
    
    Add : Item : Address Book          : Display    : AddressBookFD
    
    [#Table: GT CommonReports]
       
        Add    : Object    :Sat Party Address Book
    
    [Object    : Sat Party Address Book]
    
        Use                : Go To Report Obj
    
        Action    : Goto Action        : Display Current Report
        Action    : Display Action    : Display Current Report
        Name            : $$LocaleString:"Party Address Book"
        Current Report    : AddressBookFD
       
    [Report:AddressBookFD]
        Form    : AddressBookFD
        Variables : SV CurrentCompany
        Set        : SKCPrtyName        : ""
        Set        : SKCGroupName        : ""
        Set        : SKCAddrsName        : ""
        Set        : SKCPinName        : ""
        Set        : SKCPhoneName        : ""
        Set        : SKCgstinName        : ""
        Set        : SKCcontactName    : ""
        Set        : SKCStateName        : ""
       
    [Form:AddressBookFD]
       
        Use                : Common Hidden Keys       
        Parts           : DSp Company Name, DSP Company Address   
        Part            : SKCHeader,SKCDetails
        Button            : Change Company,BlankButton,SKCGroupFilter,SKCLedgFilter,SKCStateFilter,SKCAddrsFilter,SKCPinFilter,SKCPhoneFilter,SKCgstinFilter,SKCContactFilter
        Bottom Button    : SKCF12Config
        Space Top       : If $$InPrintMode Then 0.5 Else 0 inches
        Width            : 100% Screen
        Space Left        : 1 mm
        Space Right        : 1 mm
        Local             : Line     : Default     : Space Bottom:0.3
        Local            : Field    : Default:Local:Style:Default:Font:"Courier New"
       
    [Key: SKCAlterBtn]
        Key         : Enter
        Title       : $$LocaleString:"Alter"
        Type        : BottomToolBarBtn2
        Action      : Alter Object
       
    [Key: SKCCreateBtn]
        Key         : ALT+C
        Title       : $$LocaleString:"Create Led."
        Type        : BottomToolBarBtn3
        Action      : Create    : Ledger
       
    [Part:SKCHeader]
        Line    : SKCHeader
        Space Bottom        : 2 mm
        Horizontal Align    : Center
       
    [Line:SKCHeader]
        Field    : Simple Field
        Local    : Field    : Simple Field    : Set as    : "Address Book"
        Local    : Field    : Simple Field    : Style        : Large Bold   
        Local    : Field    : Simple Field    : Cells        : 13
        Local    : Field    : Simple Field    : Full Width: Yes
        Local    : Field    : Simple Field    : Align        : Center
        Local    : Field    : Simple Field    :color:DarkBlue16Bit
    [Part:SKCDetails]
        Line    : SKCDetailsHead,SKCDetails
        Repeat    : SKCDetails:SKCCollectionSKC
        Scroll    : Vertical
        Common Border    : Yes
    
    [Line:SKCDetailsHead]
        Use        : SKCDetails
        Border    : Column Titles
       
        Local    : Field    : Default        : Style        : Normal Bold
        Local    : Field    : Default        : Align        : Center
        Local    : Field    : Default        : Delete    : Border
        Local    : Field    : SKCSno        : Set as    : "Sno"
        Local    : Field    : SKCName        : Set as    : "Ledger Name"
        Local    : Field    : SKCAddress    : Set as    : "Address"
        Local    : Field    : SKCContact    : Set as    : "Contact"
        Local    : Field    : SKCPhone        : Set as    : "Phone"
        Local    : Field    : SKCMobile        : Set as    : "Mobile"
        Local    : Field    : SKCFax        : Set as    : "Fax"
        Local    : Field    : SKCState        : Set as    : "State"
        Local    : Field    : SKCPin        : Set as    : "Pincode"
        Local    : Field    : SKCEmail        : Set as    : "Email"
        Local    : Field    : SKCPan        : Set as    : "GSTIN/PAN"
        Local    : Field    : SKCPan        : color        : "DarkBlue16Bit"
        Local    : Field    : SKCTIN        : Set as    : "PAN/IT"
        Local    : Field    : SKCCST        : Set as    : "CST No."
        Local    : Field    : SKCOpening    : Info        : "Opening Bal."
        Local    : Field    : SKCClosing    : Info        : "Closing Bal."
    
    [Line:SKCDetails]
        Fields        : SKCSno,SKCName,SKCAddress,SKCPan,SKCContact,SKCPhone,SKCEmail,SKCState,SKCOpening,SKCClosing
        ;Right Field        :SKCMobile,SKCTIN,SKCCST,SKCPin,SKCFax,
        ;Repeat : SKCOpening
        Option    : AlterOnEnter
        Border    : Thin Left Right Bottom
        Space Bottom    : 1 mm
        Space Top    : 1 mm   
        Local    : Field    : Default        : Style        : Tiny Bold
        Local   : Field : Default : Local:STYLE:DEFAULT:Height:7.5
    
    [Field:SKCDefault]
        ;Line    : 0
        Border    : Thin Left
        Style    : Tiny Bold
        color    : DarkBlue16Bit
    [Field:SKCSno]
        Use    : SKCDefault
        Alter    : Ledger
        Set as    : $$Line
        Width    : 1.5 cm
        Align    : Center
       
    [Field:SKCName]
        Use    : SKCDefault
        Set as    : $Name++ $$NewLine +"**"+$Parent;+")"
        Width    : 28
        Tooltip    : "Opening Balance : "+$$String:$OpeningBalance
        Quick Search    : Yes
        Line    :0
       
    [Field:SKCAddress]
        Use    : SKCDefault
        Set as  : $$FullList:Address:$Address
        Width    : 40   
        Line    : 0
       
    [Field:SKCContact]
        Use    : SKCDefault
        Width    : 28
        Set as    : If NOT $$IsEmpty:$LedgerMobile then $LedgerContact++ $$NewLine +"(Mob- "+$LedgerMobile+")" else if ($$IsEmpty:$LedgerMobile AND $$IsEmpty:$LedgerPhone) then $LedgerContact else $LedgerContact++ $$NewLine +"(Ph - "+$LedgerPhone+")"
        Line    :0
        Invisible: Not $SKCF12Contact:Company:##SVCurrentCompany
       
    [Field:SKCPhone]
        Use    : SKCDefault
        Width    : 14
        Set as    : If ($$IsEmpty:$LedgerPhone) then "Not Available" else $LedgerPhone
        Invisible: Not $SKCF12Phone:Company:##SVCurrentCompany
        Color:if $$Value="Not Available" then "Red" else "DarkBlue16Bit"
       
    [Field:SKCMobile]
        Use        : SKCPhone
        Width    : 14
        Set as    : If ($$IsEmpty:$LedgerMobile) then "Not Available" else $LedgerMobile
        Invisible: Not $SKCF12Mobile:Company:##SVCurrentCompany
        Color:if $$Value="Not Available" then "Red" else "DarkBlue16Bit"
       
    [Field:SKCFax]
        Use        : SKCPhone
        Set as    : $LedgerFax
        Invisible: Not $SKCF12FaxFlag:Company:##SVCurrentCompany
       
    [Field:SKCState]
        Use    : SKCDefault
        Width    : 15
        Set as    : If $$IsEmpty:$PinCode then $LedStateName else $LedStateName ++$$NewLine +"("+$PinCode+")"
        Invisible: Not $SKCF12State:Company:##SVCurrentCompany
        Line    :2
       
    [Field:SKCPin]
        Use        : SKCDefault
        Width    : 12
        Invisible: Not $SKCF12Pin:Company:##SVCurrentCompany
        Set as    : $Pincode
        Align    : Center
       
    [Field:SKCPan]
       
        Use    : SKCDefault
        Set as : If @@NoGSTNoPAN Then @@NoGSTnPANMess Else If @@NoGST Then @@GSTNotExists Else @@GSTExists       
        Align    : Center
        Invisible: Not $SKCF12Pan:Company:##SVCurrentCompany
        Color    :if $$Value CONTAINS "Both Not Available" then "Red" else  "Dark Red"
        Width    : 22
        Line    :0       
       
    [Field:SKCTIN]
        Use        : SKCPhone
        Set as    : $IncomeTaxNumber
        Align    : Center
        Invisible: Not $SKCF12Tin:Company:##SVCurrentCompany
       
    [Field:SKCCST]
        Use        : SKCPhone
        Set as    : $InterStateSTNumber
        Align    : Center
        Invisible: Not $SKCF12CST:Company:##SVCurrentCompany
       
    [Field:SKCEmail]
        Invisible: Not $SKCF12EMail:Company:##SVCurrentCompany
        Use        : SKCDefault
        Width    : 25
        Set as    : if Not $$IsEmpty:$Email AND Not $$IsEmpty:$EmailCC Then $Email+","+$EmailCC Else+
                    if Not $$IsEmpty:$Email Then $Email Else $EmailCC
                   
    [Field:SKCOpening]
        Use    : Amount Field
        Format    : "DrCr"
        Set as    : $OpeningBalance
        Border    : Thin Left
        Invisible    : Not $SKCF12Opening:Company:##SVCurrentCompany
        Style    : Tiny Bold
        color    : Red
       
    [Field:SKCClosing]
        Use    : SKCOpening
        Set as    : $ClosingBalance
        Invisible    : Not $SKCF12Closing:Company:##SVCurrentCompany
                   
    ;=========================================================================
    ;============================== Filter ===================================
    [Button:SKCLedgFilter] ;;========================== Ledger Filter ======================
        Key        : F2
        Action    : Execute : SKCLedgFilter
        Title    : Ledger
       
    [Report:SKCLedgFilter]
        Form    : SKCLedgFilter
        Set        : SKCPrtyName        : ""
        Set        : SKCGroupName        : ""
        Set        : SKCAddrsName        : ""
        Set        : SKCPinName        : ""
        Set        : SKCPhoneName        : ""
        Set        : SKCgstinName        : ""
        Set        : SKCcontactName    : ""
        Set        : SKCStateName        : ""
       
    [Form:SKCLedgFilter]
        Part    : SKCLedgFilter
        No Confirmation    : Yes
    
    [Part:SKCLedgFilter]
        Line    : SKCLedgFilter
    
    [Line:SKCLedgFilter]
        Field    : Medium Prompt,SKCLedgFilter
        Local    : Field    : Medium Prompt    : Set as    : "Select Ledger : "
       
    [Field:SKCLedgFilter]
        Table        : LedgerFilter,EndOfList
        ShowTable    : Always
        Use        : Name Field
        Width        : 20
        Border        : Thin Box
        Variable    : SKCPrtyName
        Modifies    : SKCPrtyName
       
    [Variable:SKCPrtyName]
        Type    : String
       
    [Button:SKCGroupFilter] ;;========================== Group Filter ======================
        Key        : Alt+F1
        Action    : Execute : SKCGroupFilter
        Title    : Group
       
    [Report:SKCGroupFilter]
        Form    : SKCGroupFilter
        Set        : SKCPrtyName        : ""
        Set        : SKCGroupName        : ""
        Set        : SKCAddrsName        : ""
        Set        : SKCPinName        : ""
        Set        : SKCPhoneName        : ""
        Set        : SKCgstinName        : ""
        Set        : SKCcontactName    : ""
        Set        : SKCStateName        : ""
       
    [Form:SKCGroupFilter]
        Part    : SKCGroupFilter
        No Confirmation    : Yes
    
    [Part:SKCGroupFilter]
        Line    : SKCGroupFilter
    
    [Line:SKCGroupFilter]
        Field    : Medium Prompt,SKCGroupFilter
        Local    : Field    : Medium Prompt    : Set as    : "Select Group : "
       
    [Field:SKCGroupFilter]
        Table        : SKCGroupFilter,EndOfList
        ShowTable    : Always
        Use        : Name Field
        Width        : 20
        Border        : Thin Box
        Variable    : SKCGroupName
        Modifies    : SKCGroupName
       
    [Variable:SKCGroupName]
        Type    : String
       
    [Button:SKCAddrsFilter] ;;========================== Address Filter ======================
        Key        : F9
        Action    : Execute : SKCAddrsFilter
        Title    : Address
       
    [Report:SKCAddrsFilter]
        Form    : SKCAddrsFilter
        Set        : SKCPrtyName        : ""
        Set        : SKCGroupName        : ""
        Set        : SKCAddrsName        : ""
        Set        : SKCPinName        : ""
        Set        : SKCPhoneName        : ""
        Set        : SKCgstinName        : ""
        Set        : SKCcontactName    : ""
        Set        : SKCStateName        : ""
       
    [Form:SKCAddrsFilter]
        Part    : SKCAddrsFilter
        No Confirmation    : Yes
    
    [Part:SKCAddrsFilter]
        Line    : SKCAddrsFilter
    
    [Line:SKCAddrsFilter]
        Field    : Medium Prompt,SKCAddrsFilter
        Local    : Field    : Medium Prompt    : Set as    : "Select Address : "
       
    [Field:SKCAddrsFilter]
        Table        : SKCAddrsFilter,EndOfList
        ShowTable    : Always
        Use        : Name Field
        Width        : 20
        Border        : Thin Box
        Variable    : SKCAddrsName
        Modifies    : SKCAddrsName
       
    [Variable:SKCAddrsName]
        Type    : String
       
    [Button:SKCPinFilter] ;;========================== Mobile Filter ======================
        Key        : F4
        Action    : Execute : SKCPinFilter
        Title    : Led Mobile
       
    [Report:SKCPinFilter]
        Form    : SKCPinFilter
        Set        : SKCPrtyName        : ""
        Set        : SKCGroupName        : ""
        Set        : SKCAddrsName        : ""
        Set        : SKCPinName        : ""
        Set        : SKCPhoneName        : ""
        Set        : SKCgstinName        : ""
        Set        : SKCcontactName    : ""
        Set        : SKCStateName        : ""
       
    [Form:SKCPinFilter]
        Part    : SKCPinFilter
        No Confirmation    : Yes
    
    [Part:SKCPinFilter]
        Line    : SKCPinFilter
    
    [Line:SKCPinFilter]
        Field    : Medium Prompt,SKCPinFilter
        Local    : Field    : Medium Prompt    : Set as    : "Select Mobile No : "
       
    [Field:SKCPinFilter]
        Table        : SKCPinFilter,EndOfList
        ShowTable    : Always
        Use        : Name Field
        Width        : 20
        Border        : Thin Box
        Variable    : SKCPinName
        Modifies    : SKCPinName
       
    [Variable:SKCPinName]
        Type    : String
    
    [Button:SKCPhoneFilter] ;;========================== Phone Filter ======================
        Key        : F5
        Action    : Execute : SKCPhoneFilter
        Title    : Led Phone
       
    [Report:SKCPhoneFilter]
        Form    : SKCPhoneFilter
        Set        : SKCPrtyName        : ""
        Set        : SKCGroupName        : ""
        Set        : SKCAddrsName        : ""
        Set        : SKCPinName        : ""
        Set        : SKCPhoneName        : ""
        Set        : SKCgstinName        : ""
        Set        : SKCcontactName    : ""
        Set        : SKCStateName        : ""
    
    [Form:SKCPhoneFilter]
        Part    : SKCPhoneFilter
        No Confirmation    : Yes
    
    [Part:SKCPhoneFilter]
        Line    : SKCPhoneFilter
    
    [Line:SKCPhoneFilter]
        Field    : Medium Prompt,SKCPhoneFilter
        Local    : Field    : Medium Prompt    : Set as    : "Select Phone No : "
       
    [Field:SKCPhoneFilter]
        Table        : SKCPhoneFilter,EndOfList
        ShowTable    : Always
        Use        : Name Field
        Width        : 20
        Border        : Thin Box
        Variable    : SKCPhoneName
        Modifies    : SKCPhoneName
       
    [Variable:SKCPhoneName]
        Type    : String
    
    [Button:SKCgstinFilter] ;;========================== GSTIN Filter ======================
        Key        : F6
        Action    : Execute :SKCgstinFilter
        Title    : GSTIN/PAN
       
    [Report:SKCgstinFilter]
        Form    : SKCgstinFilter
        Set        : SKCPrtyName        : ""
        Set        : SKCGroupName        : ""
        Set        : SKCAddrsName        : ""
        Set        : SKCPinName        : ""
        Set        : SKCPhoneName        : ""
        Set        : SKCgstinName        : ""
        Set        : SKCcontactName    : ""
        Set        : SKCStateName        : ""
    
    [Form:SKCgstinFilter]
        Part    : SKCgstinFilter
        No Confirmation    : Yes
    
    [Part:SKCgstinFilter]
        Line    : SKCgstinFilter
    
    [Line:SKCgstinFilter]
        Field    : Medium Prompt,SKCgstinFilter
        Local    : Field    : Medium Prompt    : Set as    : "Select GSTIN/PAN : "
       
    [Field:SKCgstinFilter]
        Table        : SKCgstinFilter,EndOfList
        ShowTable    : Always
        Use        : Name Field
        Width        : 20
        Border        : Thin Box
        Variable    : SKCgstinName
        Modifies    : SKCgstinName
       
    [Variable:SKCgstinName]
        Type    : String
    
    
    [Button:SKCContactFilter] ;;========================== CONTACT Filter ======================
        Key        : F7
        Action    : Execute :SKCContactFilter
        Title    : Contact Person
       
    [Report:SKCContactFilter]
        Form    : SKCContactFilter
        Set        : SKCPrtyName        : ""
        Set        : SKCGroupName        : ""
        Set        : SKCAddrsName        : ""
        Set        : SKCPinName        : ""
        Set        : SKCPhoneName        : ""
        Set        : SKCgstinName        : ""
        Set        : SKCcontactName    : ""
        Set        : SKCStateName        : ""
    
    [Form:SKCContactFilter]
        Part    : SKCContactFilter
        No Confirmation    : Yes
    
    [Part:SKCContactFilter]
        Line    : SKCContactFilter
    
    [Line:SKCContactFilter]
        Field    : Medium Prompt,SKCContactFilter
        Local    : Field    : Medium Prompt    : Set as    : "Select Contact Person : "
       
    [Field:SKCContactFilter]
        Table        : SKCContactFilter,EndOfList
        ShowTable    : Always
        Use        : Name Field
        Width        : 20
        Border        : Thin Box
        Variable    : SKCcontactName
        Modifies    : SKCcontactName
       
    [Variable:SKCcontactName]
        Type    : String
    
    [Button:SKCStateFilter] ;;========================== STATE Filter ======================
        Key        : F8
        Action    : Execute :SKCStateFilter
        Title    : State
       
    [Report:SKCStateFilter]
        Form    : SKCStateFilter
        Set        : SKCPrtyName        : ""
        Set        : SKCGroupName        : ""
        Set        : SKCAddrsName        : ""
        Set        : SKCPinName        : ""
        Set        : SKCPhoneName        : ""
        Set        : SKCgstinName        : ""
        Set        : SKCcontactName    : ""
        Set        : SKCStateName        : ""
    
    [Form:SKCStateFilter]
        Part    : SKCStateFilter
        No Confirmation    : Yes
    
    [Part:SKCStateFilter]
        Line    : SKCStateFilter
    
    [Line:SKCStateFilter]
        Field    : Medium Prompt,SKCStateFilter
        Local    : Field    : Medium Prompt    : Set as    : "Select State : "
       
    [Field:SKCStateFilter]
        Table        : SKCStateFilter,EndOfList
        ShowTable    : Always
        Use        : Name Field
        Width        : 20
        Border        : Thin Box
        Variable    : SKCStateName
        Modifies    : SKCStateName
       
    [Variable:SKCStateName]
        Type    : String
       
    
    ;================================================================================================
    ;===================================== F12 Configuration ==============================================
    
    [Button:SKCF12Config] ;;========================== Address Filter ======================
        Key        : F12
        Action    : Alter : SKCF12Config
        Title    : Configure
       
    [Report:SKCF12Config]
        Object    : Company
        Form    : SKCF12Config
       
    [Form:SKCF12Config]
        Top Part: SKCF12Title
        Part    : SKCF12Config
        Background        : @@SV_CMPCONFIG
        Full Width        : No
        No Confirmation    : Yes
        Space Bottom    : 3 mm
        Space Left        : 4 mm
        Space Right        : 4 mm
        Space Top        : 3 mm
       
    [Part:SKCF12Title]
        Horizontal Align    : Center
        Line                : SKCF12Title
       
    [Line:SKCF12Title]
        Field    : Simple Field
        Space Bottom    : 3 mm
        Local    : Field    : Simple Field    : Info        : "Address Book Configuration"
        Local    : Field    : Simple Field    : Align        : Center
        Local    : Field    : Simple Field    : Style        : Normal Bold
        Local    : Field    : Simple Field    : Border    : Thin Bottom
    
    [Part:SKCF12Config]
        Line    : SKCF12Contact,SKCF12Phone,SKCF12Email,+
                    SKCF12State,SKCF12Pan,SKCF12Opening,SKCF12Closing;SKCF12Mobile,SKCF12Fax,SKCF12Tin,SKCF12CST,SKCF12Pin,   
    
    [Line:SKCF12Fax]
        Field    : Medium Prompt,SKCF12Fax
        Local    : Field    : Medium Prompt    : Set as    : "Show Fax : "
        Space Bottom    : 1 mm
       
    [Field:SKCF12Fax]
        Use        : Logical Field   
        Set as    : $$Value
        Storage    : SKCF12FaxFlag
       
    [Line:SKCF12Contact]
        Field    : Medium Prompt,SKCF12Contact
        Local    : Field    : Medium Prompt    : Set as    : "Show Contact : "
        Space Bottom    : 1 mm
       
    [Field:SKCF12Contact]
        Use        : Logical Field   
        Set as    : $$Value
        Storage : SKCF12Contact
       
    [Line:SKCF12Mobile]
        Field    : Medium Prompt,SKCF12Mobile
        Local    : Field    : Medium Prompt    : Set as    : "Show Mobile : "
        Space Bottom    : 1 mm
       
    [Field:SKCF12Mobile]
        Use        : Logical Field   
        Set as    : $$Value
        Storage    : SKCF12Mobile
       
    [Line:SKCF12Phone]
        Field    : Medium Prompt,SKCF12Phone
        Local    : Field    : Medium Prompt    : Set as    : "Show Phone : "
        Space Bottom    : 1 mm
       
    [Field:SKCF12Phone]
        Use        : Logical Field   
        Set as    : $$Value
        Storage : SKCF12Phone
       
    [Line:SKCF12Email]
        Field    : Medium Prompt,SKCF12Email
        Local    : Field    : Medium Prompt    : Set as    : "Show EMail : "
        Space Bottom    : 1 mm
       
    [Field:SKCF12Email]
        Use        : Logical Field   
        Set as    : $$Value
        Storage : SKCF12Email
       
    [Line:SKCF12State]
        Field    : Medium Prompt,SKCF12State
        Local    : Field    : Medium Prompt    : Set as    : "Show State : "
        Space Bottom    : 1 mm
       
    [Field:SKCF12State]
        Use        : Logical Field   
        Set as    : $$Value
        Storage : SKCF12State
       
    [Line:SKCF12Pin]
        Field    : Medium Prompt,SKCF12Pin
        Local    : Field    : Medium Prompt    : Set as    : "Show Pincode : "
        Space Bottom    : 1 mm
       
    [Field:SKCF12Pin]
        Use        : Logical Field   
        Set as    : $$Value
        Storage : SKCF12Pin
       
    [Line:SKCF12Pan]
        Field    : Medium Prompt,SKCF12Pan
        Local    : Field    : Medium Prompt    : Set as    : "Show GSTIN : "
        Space Bottom    : 1 mm
       
    [Field:SKCF12Pan]
        Use        : Logical Field   
        Set as    : $$Value
        Storage : SKCF12Pan
       
    [Line:SKCF12Tin]
        Field    : Medium Prompt,SKCF12Tin
        Local    : Field    : Medium Prompt    : Set as    : "Show PAN/IT : "
        Space Bottom    : 1 mm
       
    [Field:SKCF12Tin]
        Use        : Logical Field   
        Set as    : $$Value
        Storage : SKCF12Tin
    
    [Line:SKCF12CST]
        Field    : Medium Prompt,SKCF12CST
        Local    : Field    : Medium Prompt    : Set as    : "Show CST No. : "
        Space Bottom    : 1 mm
       
    [Field:SKCF12CST]
        Use        : Logical Field   
        Set as    : $$Value
        Storage : SKCF12CST
       
    [Line:SKCF12Opening]
        Field    : Medium Prompt,SKCF12Opening
        Local    : Field    : Medium Prompt    : Set as    : "Show Opening Bal. : "
        Space Bottom    : 1 mm
       
    [Field:SKCF12Opening]
        Use        : Logical Field   
        Set as    : $$Value
        Storage : SKCF12Opening
       
    [Line:SKCF12Closing]
        Field    : Medium Prompt,SKCF12Closing
        Local    : Field    : Medium Prompt    : Set as    : "Show Closing Bal. : "
        Space Bottom    : 1 mm
       
    [Field:SKCF12Closing]
        Use        : Logical Field   
        Set as    : $$Value
        Storage : SKCF12Closing
    ;================================================================================================
    ;===================================== Collections =================================================
    
    [System:UDF]
        SKCF12FaxFlag    : Logical    : 5821
        SKCF12Contact    : Logical    : 5822
        SKCF12Mobile    : Logical    : 5823
        SKCF12Phone        : Logical    : 5824
        SKCF12Email        : Logical    : 5825
        SKCF12State        : Logical    : 5826
        SKCF12Pin        : Logical    : 5827
        SKCF12Pan        : Logical    : 5828
        SKCF12Tin        : Logical    : 5829
        SKCF12CST        : Logical    : 5830
        SKCF12Opening    : Logical    : 5831
        SKCF12Closing    : Logical    : 5832
    
    [Collection:SKCCollectionSKC]
        Type        : Ledger
        Fetch        : Name,Parent,Address,LedgerContact,LedgerPhone,LedgerMobile,LedStateName,Pincode,Email,OpeningBalance,ClosingBalance
        Filter        : SKCCrDrOnly,SKCFilter
        Belongs To    : Yes
       
    [Collection:LedgerFilter]
        Title        : "List of Ledgers"
        Type         : Ledger
        Belongs to    : Yes   
        Fetch          : Name
        Format        : $Name,25
        Filter        : SKCCrDrOnly,SKCFilter
       
    [Collection:SKCGroupFilter]
        Title        : "List of Groups"
        Type        : Ledger
        Belongs To    : Yes
        Fetch        : Parent
        Format        : $Parent,25
        Filter        : SKCCrDrOnly
       
    [Collection:SKCAddrsFilter]
        Title        : "List of Address"
        Type        : Ledger
        Belongs To    : Yes
        Fetch        : LedStateName,Address
        Format        : ($$FullList:Address:$Address),60
        Filter        : SKCCrDrOnly
    
    [Collection:SKCStateFilter]
        Title        : "List of States"
        Type        : Ledger
        Belongs To    : Yes
        Fetch        : LedStateName
        Format        : $LedStateName,25
        Filter        : SKCCrDrOnly
       
    [Collection:SKCPinFilter]
        Title        : "List of Mobile Nos"
        Type        : Ledger
        Belongs To    : Yes
        Fetch        : LedgerMobile
        Format        : $LedgerMobile ,30
        Filter        : SKCCrDrOnly
    
    [Collection:SKCPhoneFilter]
        Title        : "List of Phone Nos"
        Type        : Ledger
        Belongs To    : Yes
        Fetch        : LedgerPhone
        Format        : $LedgerPhone ,30
        Filter        : SKCCrDrOnly
    
    [Collection:SKCgstinFilter]
        Title        : "List of GSTIN/PAN"
        Type        : Ledger
        Belongs To    : Yes
        Fetch        : PARTYGSTIN,IncomeTaxNumber
        Fetch        : PinCode
        Format        : $IncomeTaxNumber ,20
        Format        : $PARTYGSTIN ,30
        Format        : $PinCode ,10
        Filter        : SKCCrDrOnly
        Sort        : @@Default:$PARTYGSTIN
    
    [Collection:SKCContactFilter]
        Title        : "List of Contact Person"
        Type        : Ledger
        Belongs To    : Yes
        Fetch        : LedgerContact
        Format        : $LedgerContact,30
        Filter        : SKCCrDrOnly
       
    [System:Variable]
        SKCPrtyName        : ""
        SKCGroupName    : ""
        SKCAddrsName    : ""
        SKCPinName        : ""
        SKCPhoneName    : ""
        SKCgstinName    : ""
        SKCcontactName    : ""
        SKCStateName    : ""
    
    [System:Formula]
        SKCCrDrOnly        : $$IsBelongsTo:$$GroupSundryDebtors OR $$IsBelongsTo:$$GroupSundryCreditors
        SKCFilter        : $Name=@@SKCNameFilter AND $Parent=@@SKCGroupFilter AND ($$FullList:Address:$Address)CONTAINS @@SKCStateFill AND $LedgerMobile=@@SKCPinFilter AND $LedgerPhone=@@SKCPhoneFilter AND (($PARTYGSTIN CONTAINS @@SKCgstinFilter) OR ($IncomeTaxNumber CONTAINS @@SKCgstinFilter))  AND $LedgerContact=@@SKCcontactFilter AND $LedStateName=@@SKCStateFilter
        SKCNameFilter    : if ##SKCPrtyName="" OR $$IsEndOfList:##SKCPrtyName then $Name Else ##SKCPrtyName
        SKCGroupFilter    : if ##SKCGroupName="" OR $$IsEndOfList:##SKCGroupName then $Parent Else ##SKCGroupName
        SKCStateFill    : if ##SKCAddrsName="" OR $$IsEmpty:##SKCAddrsName then $Address Else ##SKCAddrsName
        SKCPinFilter    : if ##SKCPinName="" OR $$IsEmpty:##SKCPinName then $LedgerMobile Else ##SKCPinName
        SKCPhoneFilter    : if ##SKCPhoneName="" OR $$IsEmpty:##SKCPhoneName then $LedgerPhone Else ##SKCPhoneName
        SKCgstinFilter    : if ##SKCgstinName="" OR $$IsEmpty:##SKCgstinName then $IncomeTaxNumber Else ##SKCgstinName
        SKCcontactFilter: if ##SKCcontactName="" OR $$IsEmpty:##SKCcontactName then $LedgerContact Else ##SKCcontactName
        SKCStateFilter    : if ##SKCStateName="" OR $$IsEmpty:##SKCStateName then $LedStateName Else ##SKCStateName
       
    [System : Formula]
    
    GSTExists : ($PARTYGSTIN + $$NewLine + " ( " + $GSTRegistrationType + " )")
    GSTNotExists : ($IncomeTaxNumber + $$NewLine + "(GSTIN Not Available)")
    NoGSTnPANMess : "(GST and PAN" + $$NewLine + "Both Not Available)"
    NoGST : $$IsEmpty:$PARTYGSTIN
    NoGSTNoPAN : $$IsEmpty:$PARTYGSTIN AND $$IsEmpty:$IncomeTaxNumber
    
    
    
    
     

    Attached Files:



  24. sattam

    sattam Active Member


    Code Modified
     



  25. Thanks
     


Share This Page