Customization fillSlipTxt(): AmountCur withholdTax; AmountCur withholdBaseAmount; AmountCur totalWithholdBaseAmount; TaxWithholdTrans taxWithholdTrans; TaxWithholdCode taxWithholdCode; ------------------------------------------------------------------------------------------------- case ChequeFormType::ILStyle : chequeSlipTxt = ; -------------------------------------------------------------------------------------------------- while select taxWithholdTrans where taxWithholdTrans.SpecTransId == specTrans.RecId { totalWithholdBaseAmount += taxWithholdTrans.PaymWithholdBaseAmount; withholdTax += taxWithholdTrans.PaymTaxWithholdAmount; taxWithholdCode = taxWithholdTrans.TaxWithholdCode; } --------------------------------------------------------------------------------------------------- withholdBaseAmount = 0; while select taxWithholdTrans where taxWithholdTrans.SpecTransId == specTrans.RecId { withholdBaseAmount += taxWithholdTrans.PaymWithholdBaseAmount; } chequeSlipTxt += strfmt( %1 %2 + strrep( ,40) + %3 %4\r\n , strLRTrim(_ledgerJournalTrans.CurrencyCode), strLRTrim(num2str(withholdBaseAmount, 16, 2, -1, -1)), strLFix(vendTrans.Invoice,15), _ledgerJournalTrans.Txt); ---------------------------------------------------------------------------------------------------- if (!totalPrinted && totalLines == lines && _chequeFormType == ChequeFormType::ILStyle) { tmpChequePrintout.IL_WithholdBaseAmount = totalWithholdBaseAmount; tmpChequePrintout.IL_WithholdTax = withholdTax; tmpChequePrintout.IL_TaxWithholdCode = taxWithholdCode; }
{"Image DocumentName": "Customization fillSlipTxt(): AmountCur withholdTax;", "Image ImageDescription": "AmountCur withholdBaseAmount; AmountCur totalWithholdBaseAmount; TaxWithholdTrans taxWithholdTrans; TaxWithholdCode taxWithholdCode; case ChequeFormType::ILStyle : chequeSlipTxt = ; while select taxWithholdTrans. where taxWithholdTrans.SpecTransId == specTrans.RecId. { totalWithholdBaseAmount += taxWithholdTrans.PaymWithholdBaseAmount; withholdTax += taxWithholdTrans.PaymTaxWithholdAmount; taxWithholdCode = taxWithholdTrans.TaxWithholdCode; } withholdBaseAmount = 0; withholdBaseAmount += taxWithholdTrans.PaymWithholdBaseAmount; chequeSlipTxt += strfmt( %1 %2 + strrep( ,40) + %3 %4\\r\\n , strLRTrim(_ledgerJournalTrans.CurrencyCode), strLRTrim(num2str(withholdBaseAmount, 16, 2, -1, -1)), strLFix(vendTrans.Invoice,15), _ledgerJournalTrans.Txt); if (!totalPrinted && totalLines == lines && _chequeFormType == ChequeFormType::ILStyle) tmpChequePrintout.IL_WithholdBaseAmount = totalWithholdBaseAmount; tmpChequePrintout.IL_WithholdTax = withholdTax; tmpChequePrintout.IL_TaxWithholdCode = taxWithholdCode;", "Image XResolution": "37", "Image YResolution": "37", "Image ResolutionUnit": "Pixels/Centimeter", "Image Software": "SlidePlayer", "Image YCbCrPositioning": "Centered"}