how to avoid duplicate voucher number entry in journal excel import

Discussion in 'Free Source Codes' started by Kiran Bedi, May 31, 2021.

    
  1. Kiran Bedi

    Kiran Bedi New Member


    [Report: journalkbMasterExcelImport_report]
    Form:journalkbMasterExcelImport_form
    Full Screen : Yes

    [Form:journalkbMasterExcelImport_form]

    Part:journalkbMasterExcelImport_part

    Height:30% page
    Width :50% page

    On:Form Accept:Yes:Call:journalkbMasterExcelImport_function
    ;On:Form Accept:Yes:Call:journalotMasterExcelImport_function

    [Part:journalkb MasterExcelImport_part]
    Line : journalkbMasterExcelImport_TittleLine,journalkbMasterExcelImport_PathLine,journalkbMasterExcelImport_SheetLine

    [Line:journalkbMasterExcelImport_TittleLine]

    Field :journalkbMasterExcelImport_TittleLineField
    Space Bottom : 2
    Space Top : 1

    [Field:journalkbMasterExcelImport_TittleLineField]

    Space Left : 30
    Align : Centre
    Case : Title Case
    Style : Large Bold
    Border : Thin Bottom
    Skip : Yes
    Fixed : Yes
    Set as : "journal Excel Import Report"

    [Line:journalkbMasterExcelImport_PathLine]

    Field : journalkbMasterExcelImport_PathLocationNameField,journalkbMasterExcelImport_PathName
    Space Top : 1
    Space Bottom : 1

    [Field:journalkbMasterExcelImport_PathLocationNameField]

    Use : Long Prompt
    Set as : "Path Name"
    Space Left : 2

    [Field:journalkbMasterExcelImport_PathName]

    Use : Name Field
    Width : 30% Page
    Set as : ##journalkbMasterExcelImport_PathName
    Modifies : journalkbMasterExcelImport_PathName :Yes
    Validate : $$StringWordEx:$$Value:".":Last In ("xls","xlsx")
    Max : @@MaxNarrWidth

    [Line:journalkbMasterExcelImport_SheetLine]

    Field : journalkbMasterExcelImport_SheetNameField,journalkbMasterExcelImport_SheetName
    Space Bottom : 1

    [Field:journalkbMasterExcelImport_SheetNameField]

    Use : Long Prompt
    Set as : "Sheet Name"
    Space Left : 2

    [Field:journalkbMasterExcelImport_SheetName]

    Use : namefield

    Width : 30% Page
    Set as : ##journalkbMasterExcelImport_SheetName
    Modifies : journalkbMasterExcelImport_SheetName : Yes

    [Variable:journalkbMasterExcelImport_PathName]

    Type : String
    Default : ""
    Persistent : Yes

    [Variable:journalkbMasterExcelImport_SheetName]

    Type : String
    Default : ""
    Persistent : Yes

    [System:variable]

    journalkbMasterExcelImport_PathName : ""
    journalkbMasterExcelImport_SheetName : ""

    [Variable:journalkbMasterExcelImport_Var]



    Variable : Si_no : String
    Variable : costcenter : String
    Variable : voucherdate : String
    Variable : Dr : String
    Variable : Dr_new : String
    Variable : Cr : String
    Variable : Cr_new : String
    Variable : legervalue : String
    Variable : narration : String


    [Function : journalkbMasterExcelImport_function]

    Variable : Si_no_F : String
    Variable : costcenter_F : String
    Variable : voucherdate_F : String
    Variable : Dr_F : String
    Variable : Dr_new_F : String
    Variable : Cr_F : String
    Variable : Cr_new_F : String
    Variable : legervalue_F : String
    Variable : narration_F : String






    Variable : RowCount : Number : 2
    Variable : RowCounter : Number
    Variable : TotalRowCounter : Number

    Variable : journalkbMasterExcelImport_Stored_File : String
    Variable : journalkbMasterPathName : String
    Variable : journalkbMasterExcelImport_PathName : String


    List Variable : journalkbMasterExcelImport_Var
    ;100:Msg Box:aaa:bbb
    ;100:Msg Box:##si_no_F : ##legervalue_F
    200 : Set : journalkbMasterPathName : #journalkbMasterExcelImport_PathName
    210 : Set Log On
    220 : OPEN FILE : ##journalkbMasterPathName : Excel : READ
    230 : Set : RowCount : 2
    240 : Set Active Sheet : #journalkbMasterExcelImport_SheetName
    250 : WHILE: NOT $$IsEmpty:($$FileReadCell:##Rowcount:1)

    260 : LIST ADD EX : journalkbMasterExcelImport_Var



    280 : Set : journalkbMasterExcelImport_Var[$$LOOPINDEX]. Si_no :($$FileReadCell:##RowCount:1)
    290 : Set : journalkbMasterExcelImport_Var[$$LOOPINDEX]. costcenter :($$FileReadCell:##RowCount:2)
    300 : Set : journalkbMasterExcelImport_Var[$$LOOPINDEX]. voucherdate :($$FileReadCell:##RowCount:3)
    301 : Set : journalkbMasterExcelImport_Var[$$LOOPINDEX]. Dr :($$FileReadCell:##RowCount:4)
    302 : Set : journalkbMasterExcelImport_Var[$$LOOPINDEX]. Dr_new :($$FileReadCell:##RowCount:5)
    304 : Set : journalkbMasterExcelImport_Var[$$LOOPINDEX]. Cr :($$FileReadCell:##RowCount:6)
    305 : Set : journalkbMasterExcelImport_Var[$$LOOPINDEX]. Cr_new :($$FileReadCell:##RowCount:7)
    306 : Set : journalkbMasterExcelImport_Var[$$LOOPINDEX]. legervalue :($$FileReadCell:##RowCount:8)
    307 : Set : journalkbMasterExcelImport_Var[$$LOOPINDEX]. narration :($$FileReadCell:##RowCount:9)





    400 : Increment : RowCount
    410 : End While
    420 : Close File
    430 : Set File Log Off

    450 : Set : RowCounter : 1


    460 : Set : TotalRowCounter : $$NumItems:journalkbMasterExcelImport_SubCollection

    470 : Set : journalkbMasterExcelImport_Stored_File : $$LocaleString:"journalkbMasterxlimport.xml"
    475 : Delete File :##journalkbMasterExcelImport_Stored_File
    490 : Set File Log On
    500 : OPEN FILE : ##journalkbMasterExcelImport_Stored_File : Text : Write






    510 : Write File Line : "<ENVELOPE>"
    520 : Write File Line : "<HEADER>"
    530 : Write File Line : "<TALLYREQUEST>Import Data</TALLYREQUEST>"
    540 : Write File Line : "</HEADER>"
    550 : Write File Line : " <BODY>"
    560 : Write File Line : "<IMPORTDATA>"
    570 : Write File Line : "<REQUESTDESC>"
    580 : Write File Line : "<REPORTNAME>Vouchers</REPORTNAME>"
    590 : Write File Line : "<STATICVARIABLES>"
    600 : Write File Line : "<SVCURRENTCOMPANY>"+##SvCurrentCompany+"</SVCURRENTCOMPANY>"
    610 : Write File Line : "</STATICVARIABLES>"
    620 : Write File Line : "</REQUESTDESC>"
    630 : Write File Line : "<REQUESTDATA>"


    ;631:Msg Box:aaa:bbb
    635 : Walk Collection :journalkbMasterExcelImport_SubCollection

    ;636:Msg Box:ccc:ddd



    700 : Set : Si_no_F : $$String:$Si_no_1
    702 : Set : costcenter_F : $$String:$costcenter_1
    704 : Set : voucherdate_F : $$String:$voucherdate_1
    706 : Set : Dr_F : $$String:$Dr_1
    707 : Set : Dr_new_F : $$String:$Dr_new_1
    708 : Set : Cr_F : $$String:$Cr_1
    710 : Set : Cr_new_F : $$String:$Cr_new_1
    712 : Set : legervalue_F : $$String:$legervalue_1
    714 : Set : narration_F : $$String:$narration_1




    ;1200:Msg Box:date:##voucherdate_F


    1300:Write File Line :" <TALLYMESSAGE xmlns:UDF='TallyUDF'>"
    ;1300a:Msg Box:"info" :"error"
    ; 1310:Write File Line :" <VOUCHER VCHTYPE='Journal' ACTION='Create' OBJVIEW='Accounting Voucher View'>"
    Variables:VoucherNoVar,VoucherTypVar:String
    Variables:VoucherNoVar11:Number
    1301:Set:VoucherNoVar11:($$CollectionFieldByKey:$VoucherNumber:($$String:##Si_no_F+$$String:"Journal"):CheckVoucherAvailabilities)
    ;1302:Msg Box:##Si_no_F+"Journal":##VoucherNoVar11
    1303 : if:##VoucherNoVar11!=##Si_no_F



    ;1305:if:##VoucherNoVar11:##Si_no_F





    ;1304 : Write File Line:"<VOUCHER DATE='"+$$LocaleString:##voucherdate_F+"' TAGNAME='MASTERID' TAGVALUE='"+$$LocaleString:##VoucherNoVar11+"' TAGNAME='Voucher Number' TAGVALUE='"+$$LocaleString:##Si_no_F+"' VCHTYPE='Journal' ACTION='Alter' OBJVIEW='Accounting Voucher View'>"

    ;1305 : Else

    1306: Write File Line:"<VOUCHER VCHTYPE='Journal' ACTION='Create' OBJVIEW='Accounting Voucher View'>"
    ;1307:Msg Box:"Info2":##VoucherNoVar11
    ;1308: End If


    ;1309:Msg Box:BB:##voucherdate_F


    1320:Write File Line :" <OLDAUDITENTRYIDS.LIST TYPE='Number'> "
    1330:Write File Line :" <OLDAUDITENTRYIDS>-1</OLDAUDITENTRYIDS> "
    1340:Write File Line :" </OLDAUDITENTRYIDS.LIST> "
    1350:Write File Line :" <DATE>"+##voucherdate_F +"</DATE> "
    ;1360:Write File Line :" <GUID>e852c491-e9a8-48a2-b9bc-4663f5eb359f-00000001</GUID> "
    1370:Write File Line :" <NARRATION>"+##narration_F+"</NARRATION> "
    1380:Write File Line :" <PARTYLEDGERNAME>"+$$StringFindAndReplace:##Dr_F:"&#13;&#10;":""+"</PARTYLEDGERNAME> "
    1390:Write File Line :" <VOUCHERTYPENAME>Journal</VOUCHERTYPENAME> "
    ;1390a: If &#13;&#10;
    1400:Write File Line :" <VOUCHERNUMBER>"+##Si_no_F +"</VOUCHERNUMBER> "
    1410:Write File Line :" <CSTFORMISSUETYPE/> "
    1420:Write File Line :" <CSTFORMRECVTYPE/> "
    1430:Write File Line :" <FBTPAYMENTTYPE>Default</FBTPAYMENTTYPE> "
    1440:Write File Line :" <PERSISTEDVIEW>Accounting Voucher View</PERSISTEDVIEW> "
    1450:Write File Line :" <VCHGSTCLASS/> "
    1460:Write File Line :" <COSTCENTRENAME>"+##costcenter_F +"</COSTCENTRENAME> "
    1470:Write File Line :" <DIFFACTUALQTY>No</DIFFACTUALQTY> "
    1480:Write File Line :" <ISMSTFROMSYNC>No</ISMSTFROMSYNC> "
    1490:Write File Line :" <ASORIGINAL>No</ASORIGINAL> "
    1500:Write File Line :" <AUDITED>No</AUDITED> "
    1510:Write File Line :" <FORJOBCOSTING>No</FORJOBCOSTING> "
    1520:Write File Line :" <ISOPTIONAL>No</ISOPTIONAL> "
    1530:Write File Line :" <EFFECTIVEDATE>"+##voucherdate_F +"</EFFECTIVEDATE> "




    1540:Write File Line :" <USEFOREXCISE>No</USEFOREXCISE> "
    1550:Write File Line :" <ISFORJOBWORKIN>No</ISFORJOBWORKIN> "
    1560:Write File Line :" <ALLOWCONSUMPTION>No</ALLOWCONSUMPTION> "
    1570:Write File Line :" <USEFORINTEREST>No</USEFORINTEREST> "
    1580:Write File Line :" <USEFORGAINLOSS>No</USEFORGAINLOSS> "
    1590:Write File Line :" <USEFORGODOWNTRANSFER>No</USEFORGODOWNTRANSFER> "
    1600:Write File Line :" <USEFORCOMPOUND>No</USEFORCOMPOUND> "
    1610:Write File Line :" <USEFORSERVICETAX>No</USEFORSERVICETAX> "
    1620:Write File Line :" <ISDELETED>No</ISDELETED> "
    1630:Write File Line :" <ISONHOLD>No</ISONHOLD> "
    1640:Write File Line :" <ISBOENOTAPPLICABLE>No</ISBOENOTAPPLICABLE> "
    1650:Write File Line :" <ISEXCISEVOUCHER>No</ISEXCISEVOUCHER> "
    1660:Write File Line :" <EXCISETAXOVERRIDE>No</EXCISETAXOVERRIDE> "
    1670:Write File Line :" <USEFORTAXUNITTRANSFER>No</USEFORTAXUNITTRANSFER> "
    1680:Write File Line :" <IGNOREPOSVALIDATION>No</IGNOREPOSVALIDATION> "
    1690:Write File Line :" <EXCISEOPENING>No</EXCISEOPENING> "
    1700:Write File Line :" <USEFORFINALPRODUCTION>No</USEFORFINALPRODUCTION> "
    1710:Write File Line :" <ISTDSOVERRIDDEN>No</ISTDSOVERRIDDEN> "
    1720:Write File Line :" <ISTCSOVERRIDDEN>No</ISTCSOVERRIDDEN> "
    1730:Write File Line :" <ISTDSTCSCASHVCH>No</ISTDSTCSCASHVCH> "
    1740:Write File Line :" <INCLUDEADVPYMTVCH>No</INCLUDEADVPYMTVCH> "
    1750:Write File Line :" <ISSUBWORKSCONTRACT>No</ISSUBWORKSCONTRACT> "
    1760:Write File Line :" <ISVATOVERRIDDEN>No</ISVATOVERRIDDEN> "
    1770:Write File Line :" <IGNOREORIGVCHDATE>No</IGNOREORIGVCHDATE> "
    1780:Write File Line :" <ISVATPAIDATCUSTOMS>No</ISVATPAIDATCUSTOMS> "
    1790:Write File Line :" <ISDECLAREDTOCUSTOMS>No</ISDECLAREDTOCUSTOMS> "
    1800:Write File Line :" <ISSERVICETAXOVERRIDDEN>No</ISSERVICETAXOVERRIDDEN> "
    1810:Write File Line :" <ISISDVOUCHER>No</ISISDVOUCHER> "
    1820:Write File Line :" <ISEXCISEOVERRIDDEN>No</ISEXCISEOVERRIDDEN> "
    1830:Write File Line :" <ISEXCISESUPPLYVCH>No</ISEXCISESUPPLYVCH> "
    1840:Write File Line :" <ISGSTOVERRIDDEN>No</ISGSTOVERRIDDEN> "
    1850:Write File Line :" <GSTNOTEXPORTED>No</GSTNOTEXPORTED> "
    1860:Write File Line :" <IGNOREGSTINVALIDATION>No</IGNOREGSTINVALIDATION> "
    1870:Write File Line :" <ISGSTREFUND>No</ISGSTREFUND> "
    1880:Write File Line :" <ISGSTSECSEVENAPPLICABLE>No</ISGSTSECSEVENAPPLICABLE> "
    1890:Write File Line :" <ISVATPRINCIPALACCOUNT>No</ISVATPRINCIPALACCOUNT> "
    1900:Write File Line :" <ISSHIPPINGWITHINSTATE>No</ISSHIPPINGWITHINSTATE> "
    1910:Write File Line :" <ISOVERSEASTOURISTTRANS>No</ISOVERSEASTOURISTTRANS> "
    1920:Write File Line :" <ISDESIGNATEDZONEPARTY>No</ISDESIGNATEDZONEPARTY> "
    1930:Write File Line :" <ISCANCELLED>No</ISCANCELLED> "
    1940:Write File Line :" <HASCASHFLOW>No</HASCASHFLOW> "
    1950:Write File Line :" <ISPOSTDATED>No</ISPOSTDATED> "
    1960:Write File Line :" <USETRACKINGNUMBER>No</USETRACKINGNUMBER> "
    1970:Write File Line :" <ISINVOICE>No</ISINVOICE> "
    1980:Write File Line :" <MFGJOURNAL>No</MFGJOURNAL> "
    1990:Write File Line :" <HASDISCOUNTS>No</HASDISCOUNTS> "
    2000:Write File Line :" <ASPAYSLIP>No</ASPAYSLIP> "
    2010:Write File Line :" <ISCOSTCENTRE>Yes</ISCOSTCENTRE> "
    2020:Write File Line :" <ISSTXNONREALIZEDVCH>No</ISSTXNONREALIZEDVCH> "
    2030:Write File Line :" <ISEXCISEMANUFACTURERON>No</ISEXCISEMANUFACTURERON> "
    2040:Write File Line :" <ISBLANKCHEQUE>No</ISBLANKCHEQUE> "
    2050:Write File Line :" <ISVOID>No</ISVOID> "
    2060:Write File Line :" <ORDERLINESTATUS>No</ORDERLINESTATUS> "
    2070:Write File Line :" <VATISAGNSTCANCSALES>No</VATISAGNSTCANCSALES> "
    2080:Write File Line :" <VATISPURCEXEMPTED>No</VATISPURCEXEMPTED> "
    2090:Write File Line :" <ISVATRESTAXINVOICE>No</ISVATRESTAXINVOICE> "
    2100:Write File Line :" <VATISASSESABLECALCVCH>No</VATISASSESABLECALCVCH> "
    2110:Write File Line :" <ISVATDUTYPAID>Yes</ISVATDUTYPAID> "
    2120:Write File Line :" <ISDELIVERYSAMEASCONSIGNEE>No</ISDELIVERYSAMEASCONSIGNEE> "
    2130:Write File Line :" <ISDISPATCHSAMEASCONSIGNOR>No</ISDISPATCHSAMEASCONSIGNOR> "
    2140:Write File Line :" <CHANGEVCHMODE>No</CHANGEVCHMODE> "
    2150:Write File Line :" <ALTERID> 1</ALTERID> "
    2160:Write File Line :" <MASTERID> 1</MASTERID> "
    2170:Write File Line :" <VOUCHERKEY>190206921670664</VOUCHERKEY> "
    2180:Write File Line :" <ALLLEDGERENTRIES.LIST> "
    2190:Write File Line :" <OLDAUDITENTRYIDS.LIST TYPE='Number'> "
    2200:Write File Line :" <OLDAUDITENTRYIDS>-1</OLDAUDITENTRYIDS> "
    2210:Write File Line :" </OLDAUDITENTRYIDS.LIST> "
    2220:Write File Line :" <NARRATION> </NARRATION> "
    2230:Write File Line :" <LEDGERNAME>"+$$StringFindAndReplace:##Dr_F:"&#13;&#10;":""+"</LEDGERNAME> "
    2240:Write File Line :" <GSTCLASS/> "
    2250:Write File Line :" <ISDEEMEDPOSITIVE>Yes</ISDEEMEDPOSITIVE> "
    2260:Write File Line :" <LEDGERFROMITEM>No</LEDGERFROMITEM> "
    2270:Write File Line :" <REMOVEZEROENTRIES>No</REMOVEZEROENTRIES> "
    2280:Write File Line :" <ISPARTYLEDGER>Yes</ISPARTYLEDGER> "
    2290:Write File Line :" <ISLASTDEEMEDPOSITIVE>Yes</ISLASTDEEMEDPOSITIVE> "
    2300:Write File Line :" <ISCAPVATTAXALTERED>No</ISCAPVATTAXALTERED> "
    2310:Write File Line :" <ISCAPVATNOTCLAIMED>No</ISCAPVATNOTCLAIMED> "
    2320:Write File Line :" <AMOUNT>-"+##legervalue_F+"</AMOUNT> "
    2330:Write File Line :" <VATEXPAMOUNT>-"+##legervalue_F+"</VATEXPAMOUNT> "
    2340:Write File Line :" <SERVICETAXDETAILS.LIST> </SERVICETAXDETAILS.LIST> "
    2350:Write File Line :" <BANKALLOCATIONS.LIST> </BANKALLOCATIONS.LIST> "
    2360:Write File Line :" <BILLALLOCATIONS.LIST> "
    2370:Write File Line :" <NAME>"+$$StringFindAndReplace:##CR_F:"&#13;&#10;":""+"</NAME> "
    2380:Write File Line :" <BILLTYPE>New Ref</BILLTYPE> "
    2390:Write File Line :" <TDSDEDUCTEEISSPECIALRATE>No</TDSDEDUCTEEISSPECIALRATE> "
    2400:Write File Line :" <AMOUNT>-"+##legervalue_F+"</AMOUNT> "
    2410:Write File Line :" <INTERESTCOLLECTION.LIST> </INTERESTCOLLECTION.LIST> "
    2420:Write File Line :" <STBILLCATEGORIES.LIST> </STBILLCATEGORIES.LIST> "
    2430:Write File Line :" </BILLALLOCATIONS.LIST> "
    2440:Write File Line :" </ALLLEDGERENTRIES.LIST> "
    2450:Write File Line :" <ALLLEDGERENTRIES.LIST> "
    2460:Write File Line :" <OLDAUDITENTRYIDS.LIST TYPE='Number'> "
    2470:Write File Line :" <OLDAUDITENTRYIDS>-1</OLDAUDITENTRYIDS> "
    2480:Write File Line :" </OLDAUDITENTRYIDS.LIST> "
    2490:Write File Line :" <NARRATION>"+##narration_F+"</NARRATION> "
    2500:Write File Line :" <LEDGERNAME>"+$$StringFindAndReplace:##CR_F:"&#13;&#10;":""+"</LEDGERNAME> "
    2510:Write File Line :" <GSTCLASS/> "
    2520:Write File Line :" <ISDEEMEDPOSITIVE>No</ISDEEMEDPOSITIVE> "
    2530:Write File Line :" <LEDGERFROMITEM>No</LEDGERFROMITEM> "
    2540:Write File Line :" <REMOVEZEROENTRIES>No</REMOVEZEROENTRIES> "
    2550:Write File Line :" <ISPARTYLEDGER>Yes</ISPARTYLEDGER> "
    2560:Write File Line :" <ISLASTDEEMEDPOSITIVE>No</ISLASTDEEMEDPOSITIVE> "
    2570:Write File Line :" <ISCAPVATTAXALTERED>No</ISCAPVATTAXALTERED> "
    2580:Write File Line :" <ISCAPVATNOTCLAIMED>No</ISCAPVATNOTCLAIMED> "
    2590:Write File Line :" <AMOUNT>"+##legervalue_F+"</AMOUNT> "
    2600:Write File Line :" <VATEXPAMOUNT>"+##legervalue_F+"</VATEXPAMOUNT> "
    2610:Write File Line :" <BILLALLOCATIONS.LIST> "
    2620:Write File Line :" <NAME>"+##Cr_new_F+"</NAME> "
    2630:Write File Line :" <BILLTYPE>New Ref</BILLTYPE> "
    2640:Write File Line :" <TDSDEDUCTEEISSPECIALRATE>No</TDSDEDUCTEEISSPECIALRATE> "
    2650:Write File Line :" <AMOUNT>"+##legervalue_F+"</AMOUNT> "
    2660:Write File Line :" </BILLALLOCATIONS.LIST> "
    2670:Write File Line :" </ALLLEDGERENTRIES.LIST> "
    2680:Write File Line :" </VOUCHER> "

    2682:End If
    ;2685:Msg Box:CCC:##legervalue_F
    2690:Write File Line :" </TALLYMESSAGE>"



    2811 : Increment : RowCounter
    2812 : End Walk

    2812a:if:##VoucherNoVar11=##Si_no_F
    2812b:Msg Box:"Yes":already exists
    2812c:Else
    2812d:Msg Box:"No":"does not exists"

    2820 : Write File Line : " </REQUESTDATA> "
    2830 : Write File Line : " </IMPORTDATA> "
    2840 : Write File Line : " </BODY> "
    2850 : Write File Line : "</ENVELOPE> "




    6997 : Close Target File
    6998 : Set File Log Off
    7000 : Refresh Data
    7010 : TriggerKey : Ctrl + A
    ; 7015 : Msg Box:AAA : ##legervalue_F
    7020 : Set : SVIsManualImport : No
    7030 : Set : ImportFile :mad:@journalkbMasterExcelImport_Stored_File1
    7050 : Import : vouchers
    7051 : Set : ImportVoucher:"Tally (XML) Format"



    7940: If: $$LastResult = "yes"
    7950: Msg Box: Success : Import Successfully
    7960: Else
    7970: Msg Box: Error : File Not Import
    7980: End If



    [System:Formulae]

    journalkbMasterExcelImport_Stored_File1 : @@journalkbMasterExcelImport_Stock_Main1+"\"+##journalkbMasterExcelImport_Stored_File
    journalkbMasterExcelImport_Stock_Main1 : $$SysInfo:ApplicationPath



    [Collection:journalkbMasterExcelImport_MainCollection]

    Data Source : Variable : journalkbMasterExcelImport_Var


    [Collection:journalkbMasterExcelImport_SubCollection]

    Source Collection : journalkbMasterExcelImport_MainCollection

    Compute : Si_no_1 : $$String:$Si_no
    Compute : costcenter_1 : $$String:$costcenter
    Compute : voucherdate_1 : $$String:$voucherdate
    Compute : Dr_1 : $$String:$Dr
    Compute : Dr_new_1 : $$String:$Dr_new
    Compute : Cr_1 : $$String:$Cr
    Compute : Cr_new_1 : $$String:$Cr_new
    Compute : legervalue_1 : $$String:$legervalue
    Compute : narration_1 : $$String:$narration

    [Collection:CheckVoucherAvailabilities]

    Parm Var:SVFROMDATE : Date:"01-04-2021";@@DSPFROMDate
    Parm Var:SVTODATE : Date:"01-04-2022"; @@DSPToDate;"01-01-2050";

    Type:Vouchers

    Native Method:VoucherNumber,VoucherTypeName,MasterID
    Aggr Method:LastVoucherNumber1 : Last : $VoucherNumber
    Search Key:$VoucherNumber+"Journal"
     


Share This Page