List Of PO with Line details Which are confirmed more then one Ax 2012

static void som_POHistoryGreaterThen1withPurchID(Args _args)
{
 PurchTable purchTable;
    PurchLine  purchLine;
    PurchId purchase;
    VendPurchOrderJour vendPurchOrderJour;
    /////
   PurchLineAllVersions purchLineAllVersions;
   PurchTableAllVersions purchTableAllVersions;
    PurchId         pid= 'LPO-000005361';
    int counter=0;
    RecId rec;
    while select purchTable where purchTable.DocumentState == enum2int(VersioningDocumentState::Confirmed)
    {
        purchase = pid;

            rec = (select count(RecId) from vendPurchOrderJour where vendPurchOrderJour.PurchId == purchase).RecId;
            if(rec > 1)
            {

                   while select * from vendPurchOrderJour where vendPurchOrderJour.PurchId == purchase
                    {                        counter++;
                        if(counter == 1)
                        {
                    info(strFmt("---------------->Purchase Order Number :- %1, Purchase Journal = %2, Date =  %3, Amount =  %4",vendPurchOrderJour.PurchId, vendPurchOrderJour.PurchOrderDocNum, vendPurchOrderJour.PurchOrderDate, vendPurchOrderJour.Amount));
                            while select purchLineAllVersions
                               where purchLineAllVersions.PurchId == vendPurchOrderJour.PurchId
                               && purchLineAllVersions.PurchTableVersionRecId == vendPurchOrderJour.PurchTableVersion
                            {
                              info(strFmt("purchid-%1,ItemID-%2,Item Name- %3,Qty-%4 , unit Price-%5",purchLineAllVersions.purchid,purchLineAllVersions.ItemId,purchLineAllVersions.itemName(),purchLineAllVersions.PurchQty,purchLineAllVersions.PurchPrice));
                            }
                        }
                        else
                        {
                           info(strFmt("----------------------------------------------------> Purchase Journal = %1, Date =  %2, Amount =  %3",vendPurchOrderJour.PurchOrderDocNum, vendPurchOrderJour.PurchOrderDate, vendPurchOrderJour.Amount));
                            while select purchLineAllVersions
                               where purchLineAllVersions.PurchId == vendPurchOrderJour.PurchId
                               && purchLineAllVersions.PurchTableVersionRecId == vendPurchOrderJour.PurchTableVersion
                            {
                               info(strFmt("purchid-%1,ItemID-%2,Item Name- %3,Qty-%4 , unit Price-%5",purchLineAllVersions.purchid,purchLineAllVersions.ItemId,purchLineAllVersions.itemName(),purchLineAllVersions.PurchQty,purchLineAllVersions.PurchPrice));
                            }
                        }

                    }
                counter = 0;
                info("----------------------------------------------------------------");
        info("----------------------------------------------------------------");
        }

        info("*********************************************************************************************************");
    }
}

PO List Confirmed more then one with comparison

static void JobMatchData(Args _args)
{
         PurchTable purchTable;
         PurchTableHistory PurchTableHistory;
         PurchLine purchline;
         PurchLineHistory purchLineHistory;


          int      a, k;


          a = 0;

    while select purchTable join PurchTableHistory where purchTable.PurchId == PurchTableHistory.PurchId
    {
      while select purchline where PurchLine.PurchId == purchTable.PurchId
       {
        if(a == 0)
           {
             info(strFmt("purchid --%1",purchtable.PurchId));

             a = 1;
           }
         info(strFmt(" item =%1",PurchLine.ItemId));

        }
        while select purchLineHistory where purchLineHistory.PurchId == purchTable.PurchId
       {
        if(a == 0)
           {
             //info(strFmt("purchid --%1",purchtable.PurchId));

             a = 1;
           }
         info(strFmt(" item =%1",purchLineHistory.ItemId));

        }

    a =0;

    }


}