1

我对 Dynamics AX 2009 还很陌生，因为我还没有真正找到解决我正在做的事情的方法，所以我决定在这里提问。

我需要通过 X++ 发布（？）发票。

我已经找到了这个HOWTO: Facturación selectiva de líneas en Dynamics AX，即使它是西班牙语的，我想你也会明白的。

这是我从链接修改的代码：

static void JAEE_PurchFormLetter(Args _args)
{
    Num                 _invoiceNum;    // Núm. factura
    TransDate           _invoiceDate;   // Fecha factura

    MyPurchFormLetter     purchFormLetter =       PurchFormLetter::construct(DocumentStatus::Invoice);
    PurchParmUpdate     purchParmUpdate;
    PurchParmTable      purchParmTable;
    PurchParmLine       purchParmLine;

    TradeLineRefId      tableRefId;
    PurchTable          purchTable;
    PurchLine           purchLine;
    ;

    ttsbegin;

    _invoiceNum = 'Facbyjob';
    _invoiceDate = str2date('14-01-2013', 123);

    purchTable = PurchTable::find('00000019_062'); // Primer pedido
    // Inizializar purchFormLetter con el primer pedido
    purchFormLetter.parmCallerTable(purchTable);
    purchFormLetter.callInitParmPurchTable(purchTable);
    purchFormLetter.proforma(false);                                // Proforma: NO     (Registrar: SI)
    purchFormLetter.enableUpdateNowField(true);                     // Actualizar ahora: SI
    purchFormLetter.printFormLetter(false);                         // Imprimir: NO
    purchFormLetter.transDate(_invoiceDate);                        // Fecha de factura

    // Inizializar purchParmUpdate con el primer pedido
    purchParmUpdate.clear();
    purchParmUpdate.initValue();
    purchParmUpdate.ParmId              = purchFormLetter.parmId();
    purchParmUpdate.SumBy               = AccountOrder::Account;    // Agrupar por cliente
    purchParmUpdate.SumNum              = _invoiceNum;              // Núm. Factura
    purchParmUpdate.SpecQty             = PurchUpdate::All;         // Actualizar: Todo
    purchParmUpdate.DocumentStatus      = DocumentStatus::Invoice;  // Tipo documento: Factura
    purchParmUpdate.Proforma            = NoYes::No;                // Proforma: NO
    purchParmUpdate.SumIncludePending   = NoYes::No;                // Incluir pendiente: NO
    if (purchParmUpdate.validateWrite())
        purchParmUpdate.insert();
    else
        throw Exception::Error;

    purchFormLetter.purchParmUpdate(purchParmUpdate);
    purchFormLetter.parmParmTableNum(purchParmUpdate.SumNum);

    // Tabla temporal, se crea un registro de cabecera del primer pedido (sólo uno)
    purchParmTable.clear();
    purchParmTable.TableRefId = FormLetter::getTableRef();
    purchFormLetter.createParmTable(purchParmTable, purchTable);
    if (purchParmTable.validateWrite())
        purchParmTable.insert();
    else
        throw Exception::Error;

    tableRefId  = purchParmTable.TableRefId;

    // BEGIN - LINEAS
    //       - Repetir para cada línea que se quiera facturar y para cada una y 
    //       - asignar las variabies purchTable y purchLine según proceda
    purchParmLine.clear();
    purchParmLine.initValue();

    // Ajustar cantidades según necesidades

    // Catnidades de compra
    [purchParmLine.ReceiveNow,
     purchParmLine.RemainBefore,
     purchParmLine.RemainAfter] = purchFormLetter.qtyPurch(purchLine, naReal());

    // Cantidades de inventario
    [purchParmLine.InventNow,
     purchParmLine.RemainBeforeInvent,
     purchParmLine.RemainAfterInvent] = purchFormLetter.qtyInvent(purchLine, naReal());

    if (purchParmLine.ReceiveNow)
    {
        purchParmLine.ParmId = purchParmUpdate.ParmId;
        purchParmLine.initFromPurchLine(purchLine);
        purchParmLine.setLineAmount();
        purchParmLine.TableRefId = tableRefId;

        if (purchParmLine.validateWrite())
            purchParmLine.insert();
        else
            throw Exception::Error;
    }
    // END - LINEAS

    // Registrar!
    purchFormLetter.reArrangeNow(false); // No organizar
    purchFormLetter.run();

    ttscommit;
}

我的问题是在这一行： purchFormLetter.callInitParmPurchTable(purchTable);。

为什么initParmPurchTable()要从 PurchFormLetter 的派生类中调用？

还有，如何做到这一点？我尝试声明自己的MyPurchFormLetter扩展类PurchFormLetter，添加callInitParmPurchTable()方法，但编译器告诉我，当我尝试运行代码时，该对象没有该方法。

上面写着：

Error al ejecutar código: Object objeto no tiene el método 'callInitParmPurchTable'.

编辑：

我所做的就是将方法添加到类中，使其成为对象callInitParmPurchTable() 的一部分。但我将问题留待解决，因为我认为这不是正确的方法。

4

2 回答 2

2

您是否已修改PurchFormLetter::construct(DocumentStatus::Invoice);为返回 MyPurchFormLetter？

还要查看“编译前向”功能

于 2013-01-15T08:46:25.153 回答
0

我发现了以下内容：

创建一个继承并在那里实现显然是执行PurchFormLetter方法的类是正确的。callInitParmPurchTable()initParmPurchTable()

我最有可能缺少的一个部分是编译MyPurchFormLetter，以便编译器可以告诉该方法存在。

于 2013-01-16T16:32:46.937 回答