;Dear admin/experts. this is pos invoice customisation in which qty/pcs formula is not working, kindly suggest the solution. ;screen [#Line : EI Column One] ;; Title Line1 Add : Right Fields: Before : VCH QtyTitle : VCS SI Piece Title Add : Right Fields: Before : VCS SI Piece Title : VCS SI Piece Title1 Add : Right Fields: After : VCH QtyTitle : k1 title [#Line : EI Column Two] ;; Title Line2 Add : Right Fields: Before : VCH ActualQtyTitle : VCS SI Piece Title Local : Field : VCS SI Piece Title : Set As : "" Add : Right Fields: Before : VCS SI Piece Title : VCS SI Piece Title1 Local : Field : VCS SI Piece Title1 : Set As : "" Add : Right Fields: After : VCS SI Piece Title : k1 title Local : Field : VCS SI Piece Title1 : Set As : "" [Field : VCS SI Piece Title] Use : Name Field Width : 6 Skip : Yes Set As : "Pcs" [Field : VCS SI Piece Title1] Use : Name Field Width : 6 Skip : Yes Set As : "mts" [Field : k1 Title] Use : Name Field Width : 6 Skip : Yes Set As : "qty/pcs" [#Line : EI Inv Info] ;; Inventory Repeat Line - - With out Class Add : Right Fields: Before : VCH ActualQty : VCS SI Piece Add : Right Fields: Before : VCS SI Piece : VCS SI Piece1 Add : Right Fields: after : VCH BilledQty: k1 [#Line : CI Inv Info] ;; Inventory Repeat Line - - With Class Add : Right Fields: Before : VCH ActualQty : VCS SI Piece Add : Right Fields: Before : VCS SI Piece : VCS SI Piece1 Add : Right Fields: after : VCH BilledQty: k1 [Field : VCS SI Piece] Use : Number Field Storage : VCS SI Piece Width : 6 Format : "No Zero" [Field : VCS SI Piece1] Use : Number Field Storage : VCS SI Piece1 Width : 6 Format : "No Zero" [Field : k1] Use : Number Field Storage : k1 Width : 6 Format : "No Zero" [#Part: EI InvInfo] ;; Part Where Inventory ENtries are repeating - With out Class Total : VCS SI Piece Total : VCS SI Piece1 [#Part: CI InvInfo] ;; Part Where Inventory ENtries are repeating - Class Mode Total : VCS SI Piece Total : VCS SI Piece1 [#Form : Export Invoice] Local : Line : VCH NarrPrompt : Add : Right Fields : Before : EI QtyTotal : VCS SI Piece Total Local : Line : VCH NarrPrompt : Add : Right Fields : Before : VCS SI Piece Total : VCS SI Piece Total1 ;;---------- [#Line: VCH POS InvoiceTotal] add : right field : at beginning : VCS SI Piece Total1,VCS SI Piece Total [Field : VCS SI Piece Total] Use : Number Field Set As : $$Total:VCSSIPiece Width : 6 Border : Totals Skip : Yes [Field : VCS SI Piece Total1] Use : Number Field Set As : $$Total:VCSSIPiece1 Width : 6 Border : Totals Skip : Yes [System : UDF] VCS SI Piece : Number : 5000 VCS SI Piece1 : Number : 5001 k1 : Number : 5002 ;; Print [#Field: VCH POSBilledQty] Set as: $$asqty@newqtyformula [system :formula] newqtyformula : #VCSSIPiece* #VCSSIPiece1 [#Field: k1] Set as: $$asqty@newqtyformula1 [system :formula] newqtyformula1 : VCH BilledQty * #VCSSIPiece1 ;print [#Form: POS Invoice Print] delete : part : POS AccInfo delete art: POS DescExplosion delete art: POS DescExplosion delete art: POS VATExtract delete : Part: POS TAXExtract delete art: POS Narration delete art: POS Declaration Switch : VoucherExport : ExportVoucher : ##SVExport Option : POS Quick Mode1 : $$InPixelMode AND NOT ##SVExport Option : POS InPixel1 : Not $$InPixelMode AND NOT ##SVExport FetchObject : Stock Item: @@InvEntryList : IsBatchWiseOn, AdditionalUnits,PartNo, HasMfgDate,IsPerishableOn Page Break : GI ClPgBrk, GI OpPgBrk Space Bottom: 0 Space Left : 0 inch Space Right : 0 Space Top : 0 [!Form: POS Quick Mode1] ;delete : part : POS AccInfo Part : POS Invoice Top, POS Invoice Details bottom part OS AccInfo1 Width : 95% Page Set Always : SV POSMode : Yes Space Top : 0.65 inch Space Right : 0 Space Left : 0 Space Bottom: 0. 50 inch Local : Part : Default : Float : no Empty : $IsDeleted [!Form: POS InPixel1] Part : POS Invoice Top, POS Invoice Details Width : 100% Page Local : Style : Default : Height : @@SmallSize Set Always : SV POSMode : Yes Space Top : 0.75 inch Space Right : 0 Space Left : 0 Space Bottom: 0.75 inch Local : Part : Default : Float : yes Empty : $IsDeleted [Part: GI ClPgBrk] Lines : GI ClPgBrk [Line: GI ClPgBrk] Fields : Simple Field Local: Field: Simple Field : Set As : "Continued..." Local: Field: Simple Field : FullWidth : Yes Local: Field: Simple Field : Align : Right delete :Border : Full Thin Top [Part: GI OpPgBrk] Parts : POS Invoice Top, POS Invoice Details,POS InvInfo Vertical : Yes [#Part: POS Invoice Top] delete arts : POS CmpTaxNumber delete arts : POS CompanyDetails delete arts : POS InvoiceTitle [#Part: POS Invoice Details] delete arts : POS AccInfo delete arts: POS DrLedgers [#Part: POS BillDetails] delete : line : POS BillDate delete : line : POS BillDetails Line : POS BillDetail, POS BillDetail1 Local : Field : Default : Style : Normal Option : POS PartyName : ##ICFGDefaultDet delete :Border : Thin Bottom ;[ Line: POS BillDetail ] ; right Fields : Short Prompt, POS BillNumber ; Local : Field : Short Prompt : Set As : $$LocaleString:" " ; Local : Field : Short Prompt : Width : 30% Page [ Line: POS BillDetail ] Fields: short prompt ,POS BillNumber1 Local : Field : short prompt : Set As : $$LocaleString:" " ;Local: Field: short prompt : FullWidth : Yes Local: Field: short prompt : width : 12 cms Local: Field: short prompt : Align : Right space bottom : 0.4 [Field: POS BillNumber1] Use : Name Field Set As : $VoucherNumber align : right [ Line: POS BillDetail1 ] Fields: short prompt ,POS BillDate1 Local : Field : short prompt : Set As : $$LocaleString:" " Local: Field: short prompt : FullWidth : Yes space bottom : 0.7 [Field: POS BillDate1] Use : ShortDateField Set As : $Date Align : right [#Part: POS InvInfo] delete :Line : POS InvColTitleOne delete : Line : POS InvColTitleTwo delete : Line OS InvDetails delete : line : POS SubTotal delete :Border : Thin Bottom : NOT ##SAWithBatches Line : POS InvColTitleOne1 line : POS InvDetail line : pos subtotal1 Repeat : POS InvDetail : Inventory Entries Scrolled : Vertical Total : POS InvQty, POS InvAmount [ Line: POS InvColTitleOne1 ] Fields : POS SLNoTitle, POS DescTitle Right Fields: POS QtyTitle,POS RateTitle, POS InvAmountTitle delete :Border : Thin Bottom : NOT ##SAWithBatches Local : Field : POS SLNoTitle : Set As : "" Local : Field : POS DescTitle : Set As : "" Local : Field : POS QtyTitle : Set As : "" Local : Field : POS RateTitle : Set As : "" Local : Field : POS InvAmountTitle : Set As : "" Add : Right Fields: Before : POS QtyTitle : pos SI Piece Title Add : Right Fields: Before : pos SI Piece Title : pos SI Piece Title1 local :Field : POS QtyTitle : Width: 6% page local :Field : POS QtyTitle : align: left ;Space Bottom: 1.0 [Field : pos SI Piece Title ] Use : Name Field Width :6 Skip : Yes Set As : "Pcs" Align: Right [Field : pos SI Piece Title1] Use : Name Field Width : 6 Skip : Yes Set As : "Mts" Align: Left [Line: POS InvDetail] Fields : POS SLNo ,POS InvDesc Right Fields: POS InvQty, POS InvRate, POS InvAmount1 , POS InvFreeItem Explode : POS BatchDetails : @@HasBatchWise AND NOT $$IsEmpty:$StockItemName AND ##SAWithBatches Explode : POS InvDiscount : NOT $$IsEmpty:$Discount AND NOT $$IsEmpty:$StockItemName Explode : POS InvMRP : NOT $$IsEmpty:$MRPRate AND NOT $$IsEmpty:$StockItemName AND ##SAWithMRPMarginal Explode : POS InvFreeSample : $ActualQty > $BilledQty AND NOT $$IsEmpty:$StockItemName Explode : POS DescExplosion : NOT $$IsEmpty:$StockItemName AND @@InvWithAddl AND NOT $$IsEmpty:$BasicUserDescription AND ##SATraderAddlDesc NextPage : NOT $$DoExplosionsFit OR + (($$LineNumber = $$LastLineNumber) AND $$IsLastOfSet) Add : Right Field : Before : POS InvQty : VCS SI Piece Print Add : Right Field : Before : VCS SI Piece Print : VCS SI Piece Print1 Local : field OS InvRate : align : center [#Field: POS InvQty] Use : Qty Primary Field Set As : If $$IsEmpty:$BilledQty then $ActualQty Else $BilledQty Width : 8% Page Format : "NoComma, No Zero, No Symbol" Style : Normal Inactive : $$IsEmpty:$StockItemName OR $$IsSysName:$StockItemName Option : POS InvQtyWithSlNo : ##SAPOSSerialNo align : center [ Field: POS InvAmount1] Use : Amount Forex Field Set As : @ItemValue Width : 15% Page Style : Normal ItemValue : If $$IsRemoteCompany Then $Amount Else if (@@NoBaseUnits OR $$IsEmpty:$BilledQty) then $$Value else ($Rate * $BilledQty) Discount : ($Rate * $BilledQty) * $Discount / 100 Align : Right Inactive : $$IsEmpty:$StockItemName OR $$IsSysName:$StockItemName Invisible : $$IsEmpty:$Amount Format : "NoComma" [#Field: POS InvFreeItem] Width : 27% Page Style : Normal Set As : "free" ItemValue : if (@@NoBaseUnits OR $$IsEmpty:$BilledQty) then $$Value else ($Rate * $BilledQty) Invisible : NOT $$IsEmpty:$Amount Align : Right [Line: POS SubTotal1] Right Fields : POS SubTotal1 [Field : POS SubTotal1] Use : Amount Forex Field Set as : $$CollAmtTotal:InventoryEntries:$Amount Inactive : ($$NumItems:InventoryEntries = 1) OR ($$IsSysName:$$CollectionField:$LedgerName:2:LedgerEntries) Border : Thin Top : ($$NumItems:InventoryEntries > 1) OR (NOT $$IsSysName:$$CollectionField:$LedgerName:2:LedgerEntries) Width : If @@IsRightToLeftScript Then 8% Else 10% Page Style : Normal Invisible : NOT @@InvWithAmt Format : "NoComma" [ Part: POS AccInfo1 ] delete : line : POSInvTotal Line : POS AccInfo1, POSInvTotal1 Repeat : POS AccInfo1 : LedgerEntries Totals : POS AccAmount [Line: POS AccInfo1] Fields : POSSLNo, POS AccRate Right FieldsOS AccDesc , POS AccAmount Local : Field OS AccRate : Width: 35% page ;Local : Field OS AccDesc: Full Width: Yes Local : Field OS AccDesc:Width:40% page Local : Field OS AccAmount :Width:13% page Local : Field : POS SLNo : Set As : "" Empty if : (@@POSCardFilter OR @@POSChqFilter OR @@POSCashFilter OR @@POSGiftFilter) OR $$IsEmpty:$Amount [Line: POS InvTotal1 ] Fields : POS SLNo, POS AccDesc Right Fields: POS InvQty, POS DSPRate, POS TotalAmount Local : Field : POS SLNo : Set As : "" Local : Field : POS AccDesc : Set As : $$LocaleString:" " Local : Field : POS AccDesc : Align : Right Local : Field : POS AccDesc : SpaceRight: 2% Page ;Local : Field : POS InvQty : Set As : $$CollQtyTotal:InventoryEntries:$ActualQty Local : Field : POS InvQty : Set As : " " Local : Field : POS InvQty : Width : 12% Page Local : Field : POS InvQty : align : right Local : Field : POS TotalAmount : Width : 35% Page Add : Right Field : Before : POS InvQty : VCS SI Piece Print Total Add : Right Field : Before : VCS SI Piece Print Total : VCS SI Piece Print Total1 delete :Border : Totals Option : RPOS InvTotal : $$IsRemoteCompany [#Line: POS Declaration] Field : Name Field Local : Field : Name Field : Set As : $VCHPrintDecl:VoucherType:$VoucherTypeName Local : Field : Name Field : Full width : Yes Local : Field : Name Field : Lines : 0 Local : Field : Name Field : Align : Justified delete :Space Top : 0.5 delete :Border : Thin Top [#Line: POS MsgPrint1] Field : Name Field Local : Field : Name Field : Set As :"" ; $POSMessageLine1:VoucherType:$VoucherTypeName Local : Field : Name Field : Full width : Yes Local : Field : Name Field : Lines : 0 Local : Field : Name Field : Align : Centre Local : Field : Name Field : Style: Large bold delete :Space Top : 0.25 delete :Border : Thin Top ;============================================================================== ;; Print ;[#Line: EXPINV Column1] ; Add : Right Field : Before : EXPINV QtyTitle : VCS SI Piece Title ; Add : Right Field : Before : VCS SI Piece Title : VCS SI Piece Title1 ;[#Line : EXPINV Column2] ; Add : Right Field : Before : EXPINV ActualQtyTitle : VCS SI Piece Title ; Local : Field : VCS SI Piece Title : Set As : "" ; Local : Field : VCS SI Piece Title : Border : Thin Left ;Add : Right Field : Before : VCS SI Piece Title : VCS SI Piece Title1 ; Local : Field : VCS SI Piece Title1 : Set As : "" ; Local : Field : VCS SI Piece Title1 : Border : Thin Left ;[#Line: EXPINV Totals] ; Add : Right Field : Before : EXPINV ActualQtyTotal : VCS SI Piece Print Total ; Add : Right Field : Before : VCS SI Piece Print Total : VCS SI Piece Print Total1 ;[#Part: EXPINV InvInfo] ; Total : VCS SI Piece Print ; Total : VCS SI Piece Print1 [#Part: pos InvInfo] Total : VCS SI Piece Print Total : VCS SI Piece Print1 [Field : VCS SI Piece Print] Use : Number Field Set As : $VCSSIPiece Width : 5 Format : "No Zero" Align: Right [Field : VCS SI Piece Print1] Use : Number Field Set As : $VCSSIPiece1 Width : 5 Format : "No Zero" [Field : VCS SI Piece Print Total] Use : Number Field Set As : $$Total:VCSSIPiecePrint Width : 6 Format : "No Zero" [Field : VCS SI Piece Print Total1] Use : Number Field Set as: " " ;Set As : $$Total:VCSSIPiecePrint1 Width : 6 Format : "No Zero" [#Line: ICFGSkipFwdQty] Field: Long Prompt, Logical Field ;;;to skip the quantity field in case of POS invoice Local: Field: Long Prompt : Info : $$LocaleString:"Skip Qty for kempanavar invoice!)?" Local: Field: Logical Field :Modifies: ICFGSkipFwdQty Invisible : $$IsEmpty:$NumPOSInvoice:Company:##SVCurrentCompany
Kindly help, check following formula.if am wrong. [#Field: k1] Set as: $$asqty@newqtyformula1 [system :formula] newqtyformula1 : VCH BilledQty * #VCSSIPiece1
System formulas are referenced with double @@ and at some places you have used single @ which are used for local formulas. I guess that is the main problem. Correct it and try again.
