Показать сообщение отдельно
Старый 10.12.2008, 19:58   #2  
anatol33 is offline
anatol33
Участник
 
109 / 10 (1) +
Регистрация: 02.09.2008
мда, а менять то многовато

Цитата:
Text-Export of : Table 23 Vendor [Fld/Cntrl/Elem.] Vendor Posting Group - Object Tree

Company : NAV
Database : Devtool

================================================================================

- Table 23 [Fld/Cntrl/Elem.] Vendor Posting Group
- Table 23 Vendor
* Key 3 "Vendor Posting Group";
- Table 38 Purchase Header
- FieldTrigger OnValidate 4 Pay-to Vendor No. [Code20]
* Vend.TESTFIELD("Vendor Posting Group");
* "Vendor Posting Group" := Vend."Vendor Posting Group";
- Table 81 Gen. Journal Line
- FieldTrigger OnValidate 4 Account No. [Code20]
* "Posting Group" := Vend."Vendor Posting Group";
- FieldTrigger OnValidate 11 Bal. Account No. [Code20]
* "Posting Group" := Vend."Vendor Posting Group";
- Table 751 Standard General Journal Line
- FieldTrigger OnValidate 4 Account No. [Code20]
* "Posting Group" := Vend."Vendor Posting Group";
- FieldTrigger OnValidate 11 Bal. Account No. [Code20]
* "Posting Group" := Vend."Vendor Posting Group";
- Report 33 Reconcile Cust. and Vend. Accs
- Procedure 3 CalcVendAccAmount(PostingGr : Code[10]) : Return : Decimal
* Vend.SETCURRENTKEY("Vendor Posting Group");
* Vend.SETRANGE("Vendor Posting Group",PostingGr);
- Procedure 7 CalcVendCreditAmount(PostingGr : Code[10] ;EntryType : Option []) : Return : Decimal
* Vend.SETCURRENTKEY("Vendor Posting Group");
* Vend.SETRANGE("Vendor Posting Group",PostingGr);
- Procedure 5 CalcVendDebitAmount(PostingGr : Code[10] ;EntryType : Option []) : Return : Decimal
* Vend.SETCURRENTKEY("Vendor Posting Group");
* Vend.SETRANGE("Vendor Posting Group",PostingGr);
- Report 393 Suggest Vendor Payments
- Local Procedure 6 SaveAmount()
* "Posting Group" := Vend2."Vendor Posting Group";
- Report 595 Adjust Exchange Rates
- Procedure 24 AdjustVendorLedgerEntry(VendLedgerEntry : Record 25;PostingDate2 : Date)
* "Currency Code",Vendor."Vendor Posting Group",
* "Currency Code",Vendor."Vendor Posting Group",
* "Currency Code",Vendor."Vendor Posting Group",
- Report 5194 Create Conts. from Vendors
- Trigger OnAfterGetRecord Dataitem 1 Table 23 Vendor
* Cont.TRANSFERFIELDS(Vendor);
- Report 8612 Create Vendor Journal Lines
- Trigger OnAfterGetRecord Dataitem 1 Table 23 Vendor
* IF Vendor."Vendor Posting Group" <> '' THEN
* IF VendorPostGrp.GET(Vendor."Vendor Posting Group") THEN BEGIN
* IF Vendor."Vendor Posting Group" <> '' THEN
* IF VendorPostGrp.GET(Vendor."Vendor Posting Group") THEN BEGIN
- Report 12451 Vendor G/L Turnover
- Trigger OnAfterGetRecord Dataitem 1 Vendor Table 23 Vendor
* IF NOT VendPostingGr.GET("Vendor Posting Group") THEN
- Report 12452 Advance Statement
- Procedure 1210001 GetDebitAccount(PurchesLineLoc : Record 39) : Return : Code[10]
* Vend.TESTFIELD(Vend."Vendor Posting Group");
* VendorPostingGroup.GET(Vend."Vendor Posting Group");
- Report 12454 Posted Advance Statement
- Procedure 1210001 GetDebitAccount(PurchesLineLoc : Record 123) : Return : Code[10]
* Vend.TESTFIELD(Vend."Vendor Posting Group");
* VendorPostingGroup.GET(Vend."Vendor Posting Group");
- Report 12465 Change Double Links
- Trigger OnAfterGetRecord Dataitem 1 Table 23 Vendor
* TmpVendor.TRANSFERFIELDS(Vend);
* TmpVendor.TRANSFERFIELDS(Vend);
* TRANSFERFIELDS(TmpVendor);
- Report 14810 Insurance Premium (App.6)
- Trigger OnPreDataItem Dataitem 1 Table 81 Gen. Journal Line
* VendorPostingGroup.SETRANGE(Code,Vendor."Vendor Posting Group");
* VendorPostingGroup.SETRANGE(Code,Vendor."Vendor Posting Group");
* VendorPostingGroup.SETRANGE(Code,Vendor."Vendor Posting Group");
* VendorPostingGroup.SETRANGE(Code,Vendor."Vendor Posting Group");
* VendorPostingGroup.SETRANGE(Code,Vendor."Vendor Posting Group");
* VendorPostingGroup.SETRANGE(Code,Vendor."Vendor Posting Group");
* VendorPostingGroup.SETRANGE(Code,Vendor."Vendor Posting Group");
* VendorPostingGroup.SETRANGE(Code,Vendor."Vendor Posting Group");
- Report 14811 Post Insurance Premium (App.6)
- Trigger OnPreDataItem Dataitem 1 Table 17 G/L Entry
* VendorPostingGroup.SETRANGE(Code,Vendor."Vendor Posting Group");
* VendorPostingGroup.SETRANGE(Code,Vendor."Vendor Posting Group");
* VendorPostingGroup.SETRANGE(Code,Vendor."Vendor Posting Group");
* VendorPostingGroup.SETRANGE(Code,Vendor."Vendor Posting Group");
* VendorPostingGroup.SETRANGE(Code,Vendor."Vendor Posting Group");
* VendorPostingGroup.SETRANGE(Code,Vendor."Vendor Posting Group");
* VendorPostingGroup.SETRANGE(Code,Vendor."Vendor Posting Group");
* VendorPostingGroup.SETRANGE(Code,Vendor."Vendor Posting Group");
- Report 14842 Spreadsheet Account
- Trigger OnAfterGetRecord Dataitem 1 Table 14821 Payroll Ledger Entry
* VendorPostingGroup.SETRANGE(Code,Vendor."Vendor Posting Group");
- Report 14843 Spreadsheet Department Account
- Trigger OnAfterGetRecord Dataitem 1 Table 14821 Payroll Ledger Entry
* VendorPostingGr.SETRANGE(Code,Vendor."Vendor Posting Group");
- Report 14902 Cash Report CO-4
- Trigger OnAfterGetRecord Dataitem 2 Table 271 Bank Account Ledger Entry
* Vendor.TESTFIELD("Vendor Posting Group");
* VendPostGroup.GET(Vendor."Vendor Posting Group");
- Report 14903 Cash Register (Month)
- Trigger OnAfterGetRecord Dataitem 2 Table 271 Bank Account Ledger Entry
* Vendor.TESTFIELD("Vendor Posting Group");
* VendPostGroup.GET(Vendor."Vendor Posting Group");
- Report 14913 Create Invent. Act Lines
- Trigger OnAfterGetRecord Dataitem 3 Table 23 Vendor
* IF NOT VendPostGroupBuffer.GET(VendLedgerEntry."Vendor Posting Group") THEN BEGIN
* VendPostGroup.GET(VendLedgerEntry."Vendor Posting Group");
- Codeunit 12 Gen. Jnl.-Post Line
- Local Procedure 13 PostVend()
* Vend.TESTFIELD("Vendor Posting Group");
* "Posting Group" := Vend."Vendor Posting Group";
- Local Procedure 14 PostBankAcc()
* Vend.TESTFIELD("Vendor Posting Group");
* CheckLedgEntry."Posting Group" := Vend."Vendor Posting Group";
- Procedure 41 VendPostApplyVendLedgEntry(VAR GenJnlLinePostApply : Record 81;VAR VendLedgEntryPostApply : Record 25)
* Vend.TESTFIELD("Vendor Posting Group");
* "Posting Group" := Vend."Vendor Posting Group";
- Procedure 1210014 PostVendVATForAdjustment(VAR GenJnlLine2 : Record 81;DtldVendLedgEntry : Record 380;VAR TempJnlLineDim2 : Record 356)
* VendPostingGr.GET(Vend."Vendor Posting Group");
- Codeunit 367 CheckManagement
- Procedure 1470002 CheckUnpostedVendor(VAR CheckLedgEntry : Record 272;VAR GenJnlLine : Record 81)
* VendPostGr.GET(Vendor."Vendor Posting Group");

================================================================================

Developer's Toolkit for Microsoft Dynamics NAV