Skip to content

Commit

Permalink
Translate
Browse files Browse the repository at this point in the history
  • Loading branch information
@DitriXNew
DitriXNew committed Apr 10, 2024
1 parent 32972f1 commit 9a990c0
Show file tree
Hide file tree
Showing 174 changed files with 6,004 additions and 2,295 deletions.
50 changes: 16 additions & 34 deletions IRP/src/AccumulationRegisters/R1020B_AdvancesToVendors/ManagerModule.bsl
View file
Original file line number Diff line number Diff line change
@@ -1,3 +1,4 @@
// BSLLS-off
#Region AccessObject

// Get access key.
Expand Down Expand Up @@ -26,7 +27,7 @@ Function R1020B_AdvancesToVendors_BP_CP() Export
| PaymentList.Partner,
| PaymentList.LegalName,
| PaymentList.Currency,
| PaymentList.Order,
| PaymentList.OrderSettlements AS Order,
| PaymentList.Amount,
| PaymentList.Key,
| PaymentList.AdvanceAgreement AS Agreement,
Expand Down Expand Up @@ -116,7 +117,7 @@ Function R1020B_AdvancesToVendors_BR_CR() Export
| AND OffsetOfAdvances.Recorder REFS Document.VendorsAdvancesClosing";
EndFunction

Function R1020B_AdvancesToVendors_PI_PR_POC_SRTC() Export
Function R1020B_AdvancesToVendors_PI_PR_POC_SRTC() Export
Return
"SELECT
| CASE
Expand All @@ -125,17 +126,17 @@ Function R1020B_AdvancesToVendors_PI_PR_POC_SRTC() Export
| ELSE VALUE(AccumulationRecordType.Expense)
| END AS RecordType,
| OffsetOfAdvances.Period,
| OffsetOfAdvances.Recorder AS VendorsAdvancesClosing,
| OffsetOfAdvances.AdvanceOrder AS Order,
| OffsetOfAdvances.Company,
| OffsetOfAdvances.Branch,
| OffsetOfAdvances.Currency,
| OffsetOfAdvances.LegalName,
| OffsetOfAdvances.Partner,
| OffsetOfAdvances.LegalName,
| OffsetOfAdvances.Currency,
| OffsetOfAdvances.AdvanceAgreement AS Agreement,
| OffsetOfAdvances.AdvanceProject AS Project,
| OffsetOfAdvances.AdvanceOrder AS Order,
| OffsetOfAdvances.Amount,
| UNDEFINED AS Key
| UNDEFINED AS Key,
| OffsetOfAdvances.Recorder AS VendorsAdvancesClosing
|INTO R1020B_AdvancesToVendors
|FROM
| InformationRegister.T2010S_OffsetOfAdvances AS OffsetOfAdvances
Expand All @@ -147,40 +148,20 @@ EndFunction
Function R1020B_AdvancesToVendors_DebitNote() Export
Return
"SELECT
| VALUE(AccumulationRecordType.Receipt) AS RecordType,
| Transactions.Period,
| Transactions.Company,
| Transactions.Branch,
| Transactions.Partner,
| Transactions.LegalName,
| Transactions.Currency,
| Transactions.AdvanceAgreement AS Agreement,
| Transactions.Project,
| Transactions.Amount,
| Transactions.Key,
| UNDEFINED AS VendorsAdvancesClosing
|INTO R1020B_AdvancesToVendors
|FROM
| Transactions AS Transactions
|WHERE
| Transactions.IsVendor
|
|UNION ALL
|
|SELECT
| CASE
| WHEN OffsetOfAdvances.RecordType = VALUE(Enum.RecordType.Receipt)
| THEN VALUE(AccumulationRecordType.Receipt)
| ELSE VALUE(AccumulationRecordType.Expense)
| END,
| END AS RecordType,
| OffsetOfAdvances.Period,
| OffsetOfAdvances.Company,
| OffsetOfAdvances.Branch,
| OffsetOfAdvances.Partner,
| OffsetOfAdvances.LegalName,
| OffsetOfAdvances.Currency,
| OffsetOfAdvances.AdvanceAgreement,
| OffsetOfAdvances.AdvanceProject,
| OffsetOfAdvances.AdvanceAgreement AS Agreement,
| OffsetOfAdvances.AdvanceProject AS Project,
| OffsetOfAdvances.AdvanceOrder AS Order,
| OffsetOfAdvances.Amount,
| OffsetOfAdvances.Key,
| OffsetOfAdvances.Recorder
Expand All @@ -207,6 +188,7 @@ Function R1020B_AdvancesToVendors_CreditNote() Export
| OffsetOfAdvances.Currency,
| OffsetOfAdvances.AdvanceAgreement AS Agreement,
| OffsetOfAdvances.AdvanceProject AS Project,
| OffsetOfAdvances.AdvanceOrder AS Order,
| OffsetOfAdvances.Amount,
| OffsetOfAdvances.Key,
| OffsetOfAdvances.Recorder AS VendorsAdvancesClosing
Expand Down Expand Up @@ -321,7 +303,7 @@ Function R1020B_AdvancesToVendors_Cheque() Export
| Table.LegalName,
| Table.Currency,
| Table.AdvanceAgreement AS Agreement,
| Table.Order,
| Table.OrderSettlements AS Order,
| Table.Amount,
| UNDEFINED AS VendorsAdvancesClosing
|INTO R1020B_AdvancesToVendors
Expand All @@ -342,7 +324,7 @@ Function R1020B_AdvancesToVendors_Cheque() Export
| Table.LegalName,
| Table.Currency,
| Table.AdvanceAgreement,
| Table.Order,
| Table.OrderSettlements,
| Table.Amount,
| UNDEFINED
|FROM
Expand All @@ -362,7 +344,7 @@ Function R1020B_AdvancesToVendors_Cheque() Export
| Table.LegalName,
| Table.Currency,
| Table.AdvanceAgreement,
| Table.Order,
| Table.OrderSettlements,
| Table.Amount,
| UNDEFINED
|FROM
Expand Down
45 changes: 36 additions & 9 deletions IRP/src/AccumulationRegisters/R1021B_VendorsTransactions/ManagerModule.bsl
View file
Original file line number Diff line number Diff line change
@@ -1,3 +1,4 @@
// BSLLS-off
#Region AccessObject

// Get access key.
Expand Down Expand Up @@ -29,7 +30,7 @@ Function R1021B_VendorsTransactions_BP_CP() Export
| PaymentList.Agreement,
| PaymentList.Project,
| PaymentList.TransactionDocument AS Basis,
| PaymentList.Order,
| PaymentList.OrderSettlements AS Order,
| PaymentList.Key,
| PaymentList.Amount,
| UNDEFINED AS VendorsAdvancesClosing
Expand Down Expand Up @@ -118,7 +119,7 @@ Function R1021B_VendorsTransactions_BR_CR() Export
| AND OffsetOfAdvances.Recorder REFS Document.VendorsAdvancesClosing";
EndFunction

Function R1021B_VendorsTransactions_PI_SRTC() Export
Function R1021B_VendorsTransactions_PI_SRTC() Export
Return
"SELECT
| VALUE(AccumulationRecordType.Receipt) AS RecordType,
Expand All @@ -131,7 +132,7 @@ Function R1021B_VendorsTransactions_PI_SRTC() Export
| ItemList.Agreement,
| ItemList.Project,
| ItemList.BasisDocument AS Basis,
| ItemList.PurchaseOrder AS Order,
| ItemList.PurchaseOrderSettlements AS Order,
| SUM(ItemList.Amount) AS Amount,
| UNDEFINED AS VendorsAdvancesClosing
|INTO R1021B_VendorsTransactions
Expand All @@ -142,7 +143,7 @@ Function R1021B_VendorsTransactions_PI_SRTC() Export
|GROUP BY
| ItemList.Agreement,
| ItemList.BasisDocument,
| ItemList.PurchaseOrder,
| ItemList.PurchaseOrderSettlements,
| ItemList.Company,
| ItemList.Branch,
| ItemList.Currency,
Expand Down Expand Up @@ -322,6 +323,29 @@ EndFunction
Function R1021B_VendorsTransactions_DebitNote() Export
Return
"SELECT
| VALUE(AccumulationRecordType.Receipt) AS RecordType,
| Transactions.Period,
| Transactions.Company,
| Transactions.Branch,
| Transactions.Currency,
| Transactions.LegalName,
| Transactions.Partner,
| Transactions.Agreement,
| Transactions.Project,
| Transactions.BasisDocument AS Basis,
| UNDEFINED AS Order,
| Transactions.Key,
| -Transactions.Amount AS Amount,
| UNDEFINED AS VendorsAdvancesClosing
|INTO R1021B_VendorsTransactions
|FROM
| Transactions AS Transactions
|WHERE
| Transactions.IsVendor
|
|UNION ALL
|
|SELECT
| CASE
| WHEN OffsetOfAdvances.RecordType = VALUE(Enum.RecordType.Receipt)
| THEN VALUE(AccumulationRecordType.Receipt)
Expand All @@ -336,6 +360,7 @@ Function R1021B_VendorsTransactions_DebitNote() Export
| OffsetOfAdvances.TransactionAgreement AS Agreement,
| OffsetOfAdvances.TransactionProject AS Project,
| OffsetOfAdvances.TransactionDocument AS Basis,
| OffsetOfAdvances.TransactionOrder AS Order,
| OffsetOfAdvances.Key,
| OffsetOfAdvances.Amount,
| OffsetOfAdvances.Recorder AS VendorsAdvancesClosing
Expand All @@ -359,6 +384,7 @@ Function R1021B_VendorsTransactions_CreditNote() Export
| Transactions.Agreement,
| Transactions.Project,
| Transactions.BasisDocument AS Basis,
| UNDEFINED AS Order,
| Transactions.Key,
| Transactions.Amount,
| UNDEFINED AS VendorsAdvancesClosing
Expand All @@ -385,6 +411,7 @@ Function R1021B_VendorsTransactions_CreditNote() Export
| OffsetOfAdvances.TransactionAgreement,
| OffsetOfAdvances.TransactionProject,
| OffsetOfAdvances.TransactionDocument,
| UNDEFINED,
| OffsetOfAdvances.Key,
| OffsetOfAdvances.Amount,
| OffsetOfAdvances.Recorder
Expand Down Expand Up @@ -446,7 +473,7 @@ Function R1021B_VendorsTransactions_DebitCreditNote() Export
| Doc.SendAgreement AS Agreement,
| Doc.SendProject AS Project,
| Doc.SendBasisDocument AS Basis,
| Doc.SendOrder AS Order,
| Doc.SendOrderSettlements AS Order,
| Doc.Amount,
| UNDEFINED AS VendorsAdvancesClosing
|INTO R1021B_VendorsTransactions
Expand Down Expand Up @@ -479,7 +506,7 @@ Function R1021B_VendorsTransactions_DebitCreditNote() Export
| Doc.ReceiveAgreement,
| Doc.ReceiveProject,
| Doc.ReceiveBasisDocument,
| Doc.ReceiveOrder,
| Doc.ReceiveOrderSettlements,
| Doc.Amount,
| UNDEFINED
|FROM
Expand Down Expand Up @@ -526,7 +553,7 @@ Function R1021B_VendorsTransactions_Cheque() Export
| Table.Currency,
| Table.Agreement,
| Table.BasisDocument AS Basis,
| Table.Order,
| Table.OrderSettlements AS Order,
| Table.Amount,
| UNDEFINED AS VendorsAdvancesClosing
|INTO R1021B_VendorsTransactions
Expand All @@ -548,7 +575,7 @@ Function R1021B_VendorsTransactions_Cheque() Export
| Table.Currency,
| Table.Agreement,
| Table.BasisDocument,
| Table.Order,
| Table.OrderSettlements,
| Table.Amount,
| UNDEFINED
|FROM
Expand All @@ -569,7 +596,7 @@ Function R1021B_VendorsTransactions_Cheque() Export
| Table.Currency,
| Table.Agreement,
| Table.BasisDocument,
| Table.Order,
| Table.OrderSettlements,
| Table.Amount,
| UNDEFINED
|FROM
Expand Down
39 changes: 10 additions & 29 deletions IRP/src/AccumulationRegisters/R2020B_AdvancesFromCustomers/ManagerModule.bsl
View file
Original file line number Diff line number Diff line change
Expand Up @@ -28,7 +28,7 @@ Function R2020B_AdvancesFromCustomers_BR_CR() Export
| PaymentList.Currency,
| PaymentList.AdvanceAgreement AS Agreement,
| PaymentList.Project,
| PaymentList.Order,
| PaymentList.OrderSettlements AS Order,
| PaymentList.Amount,
| PaymentList.Key,
| UNDEFINED AS CustomersAdvancesClosing
Expand Down Expand Up @@ -118,7 +118,7 @@ Function R2020B_AdvancesFromCustomers_BP_CP() Export
| AND OffsetOfAdvances.Recorder REFS Document.CustomersAdvancesClosing";
EndFunction

Function R2020B_AdvancesFromCustomers_SI_SR_SOC_SRFTA() Export
Function R2020B_AdvancesFromCustomers_SI_SR_SOC_SRFTA() Export
Return
"SELECT
| CASE
Expand Down Expand Up @@ -162,6 +162,7 @@ Function R2020B_AdvancesFromCustomers_DebitNote() Export
| OffsetOfAdvances.Currency,
| OffsetOfAdvances.AdvanceAgreement AS Agreement,
| OffsetOfAdvances.AdvanceProject AS Project,
| OffsetOfAdvances.AdvanceOrder AS Order,
| OffsetOfAdvances.Amount,
| OffsetOfAdvances.Key,
| OffsetOfAdvances.Recorder AS CustomersAdvancesClosing
Expand All @@ -176,43 +177,23 @@ EndFunction
Function R2020B_AdvancesFromCustomers_CreditNote() Export
Return
"SELECT
| VALUE(AccumulationRecordType.Receipt) AS RecordType,
| Transactions.Period,
| Transactions.Company,
| Transactions.Branch,
| Transactions.Partner,
| Transactions.LegalName,
| Transactions.Currency,
| Transactions.AdvanceAgreement AS Agreement,
| Transactions.Project,
| Transactions.Amount,
| Transactions.Key,
| UNDEFINED AS CustomersAdvancesClosing
|INTO R2020B_AdvancesFromCustomers
|FROM
| Transactions AS Transactions
|WHERE
| Transactions.IsCustomer
|
|UNION ALL
|
|SELECT
| CASE
| WHEN OffsetOfAdvances.RecordType = VALUE(Enum.RecordType.Receipt)
| THEN VALUE(AccumulationRecordType.Receipt)
| ELSE VALUE(AccumulationRecordType.Expense)
| END,
| END AS RecordType,
| OffsetOfAdvances.Period,
| OffsetOfAdvances.Company,
| OffsetOfAdvances.Branch,
| OffsetOfAdvances.Partner,
| OffsetOfAdvances.LegalName,
| OffsetOfAdvances.Currency,
| OffsetOfAdvances.AdvanceAgreement,
| OffsetOfAdvances.AdvanceProject,
| OffsetOfAdvances.AdvanceProject AS Project,
| OffsetOfAdvances.AdvanceOrder AS Order,
| OffsetOfAdvances.Amount,
| OffsetOfAdvances.Key,
| OffsetOfAdvances.Recorder
| OffsetOfAdvances.Recorder AS CustomersAdvancesClosing
|FROM
| InformationRegister.T2010S_OffsetOfAdvances AS OffsetOfAdvances
|WHERE
Expand Down Expand Up @@ -325,7 +306,7 @@ Function R2020B_AdvancesFromCustomers_Cheque() Export
| Table.LegalName,
| Table.Currency,
| Table.AdvanceAgreement AS Agreement,
| Table.Order,
| Table.OrderSettlements AS Order,
| Table.Amount,
| UNDEFINED AS CustomersAdvancesClosing
|INTO R2020B_AdvancesFromCustomers
Expand All @@ -345,7 +326,7 @@ Function R2020B_AdvancesFromCustomers_Cheque() Export
| Table.LegalName,
| Table.Currency,
| Table.AdvanceAgreement,
| Table.Order,
| Table.OrderSettlements,
| Table.Amount,
| UNDEFINED
|FROM
Expand All @@ -364,7 +345,7 @@ Function R2020B_AdvancesFromCustomers_Cheque() Export
| Table.LegalName,
| Table.Currency,
| Table.AdvanceAgreement,
| Table.Order,
| Table.OrderSettlements,
| Table.Amount,
| UNDEFINED
|FROM
Expand Down
Loading

0 comments on commit 9a990c0

Please sign in to comment.