Ссылка QoQ в таблице CFS - PullRequest
Новая
       19

Ссылка QoQ в таблице CFS

0 голосов
/ 09 февраля 2012

Я унаследовал страницу, которая строит запрос инвентаризации из четырех таблиц и выводит их с QoQ: 

<cfoutput query="getParts">
     <cfquery dbtype="query" name="jobdata">
       select *
       from getJobs
       where partnum = '#getparts.partnum#'
     </cfquery>
     <cfquery dbtype="query" name="orderdata">
       select *
       from getOrders
       where partnum = '#getparts.partnum#'
     </cfquery>
     <cfquery dbtype="query" name="receiptdata">
       select *
       from getIncoming
       where partnum = '#getparts.partnum#'
     </cfquery>

     <tr>
       <td>#partnum#</td>
       <td align="center">#partdescription#</td>
       <td align="center">#allocated#</td>
       <td align="center">#onhand#</td>
       <td align="center">#receiptdata.recqty#</td>
       <td align="center">#jobdata.JobCount#</td>
       <td align="center">#jobdata.QtyNeeded#</td>
       <td align="center">#jobdata.qtySent#</td>
       <td align="center">#orderdata.ordercount#</td>
       <td align="center">#orderdata.ordered#</td>
       <td align="center">#orderdata.shipqty#</td>
     </tr>
</cfoutput>

<cfset filenametouse = 'myFile' />
<cfset theDir = GetDirectoryFromPath(GetCurrentTemplatePath()) /> 
<cfset theFile = theDir & filenametouse & ".xls" /> 

<cflock name="fileActionSentItems" type="exclusive" timeout="30" throwontimeout="true">
<cfset SpreadsheetObj = spreadsheetNew()>
<cfset fcol = {}>
<cfset fcol.dataformat = "@">

<cfset SpreadsheetAddRow(SpreadsheetObj, "Part Number, Description, Allocated, On Hand, Pending Receipt, Job Count, Qty Needed, Qty Issued, Order Count, Qty Ordered, Qty Shipped")>

<cfset SpreadsheetAddRow(SpreadsheetObj,"NOT SURE HOW TO GET DATA HERE")>
<cfset SpreadsheetFormatColumn(SpreadsheetObj,fcol,11)>

<cfspreadsheet action="write" filename="#theFile#" name="SpreadsheetObj" sheetname="Sheet1" overwrite="true" />

Я не уверен, как ссылаться на данные для заполнения ячеек, поскольку они поступают из нескольких запросов. Переписать запрос в один было непросто, и я пробую другой путь, чтобы увидеть, есть ли другой способ, которого я не вижу.

1 Ответ

0 голосов
/ 09 февраля 2012

Как насчет этого: 

<cfset filenametouse = 'myFile' />
<cfset theDir = GetDirectoryFromPath(GetCurrentTemplatePath()) /> 
<cfset theFile = theDir & filenametouse & ".xls" /> 

<cflock name="fileActionSentItems" type="exclusive" timeout="30" throwontimeout="true">
<cfset SpreadsheetObj = spreadsheetNew()>
<cfset fcol = {}>
<cfset fcol.dataformat = "@">

<cfset SpreadsheetAddRow(SpreadsheetObj, "Part Number, Description, Allocated, On Hand, Pending Receipt, Job Count, Qty Needed, Qty Issued, Order Count, Qty Ordered, Qty Shipped")>

<cfoutput query="getParts">
     <cfquery dbtype="query" name="jobdata">
       select *
       from getJobs
       where partnum = '#getparts.partnum#'
     </cfquery>
     <cfquery dbtype="query" name="orderdata">
       select *
       from getOrders
       where partnum = '#getparts.partnum#'
     </cfquery>
     <cfquery dbtype="query" name="receiptdata">
       select *
       from getIncoming
       where partnum = '#getparts.partnum#'
     </cfquery>

     <!--- add all columns to an array --->
     <cfset aColumns = [ partdescription, receiptdata.recqty, jobdata.JobCount ] />

     <cfset SpreadsheetAddRow(SpreadsheetObj, ArrayToList(aColumns)) />
</cfoutput>

<cfspreadsheet action="write" filename="#theFile#" name="SpreadsheetObj" sheetname="Sheet1" overwrite="true" />
...