Romanichine
Programmer
Hi,
I am working on someone else's code and it's using a grid component that I don't know anything about. I tried to get documentation on the net but can't find anything.
Here's some part of the code (see below). Let me know if you know anything about this.
Thanks!
ASP code
==============
//// HTML part
<OBJECT CODEBASE="../common/SPARCodebase.CAB" CLASSID="<%=c_strClassIDGrid%>"
NAME="grdServiceComponents"
TABINDEX = 78
STYLE="HEIGHT: 210px; LEFT: 0px; TOP: 0px; WIDTH: 658px" VIEWASTEXT id=OBJECT5>
<PARAM NAME="_ExtentX" VALUE="17410">
<PARAM NAME="_ExtentY" VALUE="5556">
</OBJECT>
[...]
//// Setting up the grid component (VB)
'*******************************************************************************
'Example: For creating Grid headers
'Name|Width|MaxLength|AllowUpdate|Unique|Mandatory|DataType|EditMask|Format
'*******************************************************************************
'Setting Grid columns
window.document.frmService.grdServiceComponents.ColumnDefinition = _
Array("<%=c_strColCompId%>|0|10|N|N|N||||Y", _
"<%=c_strColCompType%>|1320|10|Y|N|Y||||N", _
"<%=c_strColCompNo%>|1710|60|Y|N|N||||N", _
"<%=c_strColCompDesc%>|1875|50|Y|N|N||||N", _
"<%=c_strColCompStatus%>|1215|10|Y|N|Y||||N", _
"<%=c_strColPONo%>|1335|20|Y|N|N||||N", _
"<%=c_strColPOType%>|1335|10|Y|N|N||||N", _
"<%=c_strColCircuitConfig%>|1600|10|Y|N|N||||N", _
"<%=c_strColDistance%>|1200|20|Y|N|N||||N", _
"<%=c_strColQty%>|1200|4|Y|N|Y||9999||", _
"<%=c_strColChargePerUnit%>|1320|10|Y|N|Y||9999999.99|#.##|", _
"<%=c_strColServiceFromDt%>|1250|10|Y|N|Y|" & CStr(c_intflexDTDate) & "|9999-99-99|YYYY-MM-DD|", _
"<%=c_strColServiceToDt%>|1250|10|Y|N|N|" & CStr(c_intflexDTDate) & "|9999-99-99|YYYY-MM-DD|", _
"<%=c_strColTotalAmount%>|1710|15|N|N|N||9999999.99|#.##|", _
"<%=c_strColPaymentFrequency%>|1365|10|Y|N|Y||||N", _
"<%=c_strColInstallCharges%>|1230|10|Y|N|N||9999999.99|#.##|", _
"<%=c_strColActivationCharges%>|1230|10|Y|N|N||9999999.99|#.##|", _
"<%=c_strColOtherCharges%>|1230|10|Y|N|N||9999999.99|#.##|", _
"<%=c_strColOtherChargesDesc%>|2000|50|Y|N|N||||N", _
"<%=c_strColOrderDt%>|1250|10|Y|N|N|" & CStr(c_intflexDTDate) & "|9999-99-99|YYYY-MM-DD|", _
"<%=c_strColPSINetTargetDt%>|1250|10|Y|N|N|" & CStr(c_intflexDTDate) & "|9999-99-99|YYYY-MM-DD|", _
"<%=c_strColDisconnectDt%>|1450|10|Y|N|N|" & CStr(c_intflexDTDate) & "|9999-99-99|YYYY-MM-DD|", _
"<%=c_strColSPAcknDt%>|1710|10|Y|N|N|" & CStr(c_intflexDTDate) & "|9999-99-99|YYYY-MM-DD|", _
"<%=c_strColSPConfdt%>|1450|10|Y|N|N|" & CStr(c_intflexDTDate) & "|9999-99-99|YYYY-MM-DD|", _
"<%=c_strColSPConfNo%>|1335|20|Y|N|N||||N", _
"<%=c_strColPSIDemarcCoord%>|1335|20|Y|N|N||||N", _
"<%=c_strColSPDemarcCoord%>|1335|20|Y|N|N||||N", _
"<%=c_strColCustDemarcCoord%>|1335|50|Y|N|N||||N", _
"<%=c_strColImpMgr%>|1800|30|Y|N|N||||N", _
"<%=c_strColImpMgrPhone%>|1800|20|Y|N|N||||N", _
"<%=c_strColPSINetRFQNo%>|1335|20|Y|N|N||||N", _
"<%=c_strColSPQuotNo%>|1335|20|Y|N|N||||N", _
"<%=c_strColQuotSentdt%>|1250|10|Y|N|N|" & CStr(c_intflexDTDate) & "|9999-99-99|YYYY-MM-DD|", _
"<%=c_strColQuotRecdDt%>|1250|10|Y|N|N|" & CStr(c_intflexDTDate) & "|9999-99-99|YYYY-MM-DD|", _
"<%=c_strColProjectNo%>|1335|20|Y|N|N||||N", _
"<%=c_strColCompComments%>|3500|4000|Y|N|N||||N"
'Right Align Numeric Columns
window.document.frmService.grdServiceComponents.Grid.ColAlignment(c_strColQty) = c_intflexAlignRightCenter
window.document.frmService.grdServiceComponents.Grid.ColAlignment(c_strColChargePerUnit) = c_intflexAlignRightCenter
window.document.frmService.grdServiceComponents.Grid.ColAlignment(c_strColTotalAmount) = c_intflexAlignRightCenter
window.document.frmService.grdServiceComponents.Grid.ColAlignment(c_strColInstallCharges) = c_intflexAlignRightCenter
window.document.frmService.grdServiceComponents.Grid.ColAlignment(c_strColActivationCharges) = c_intflexAlignRightCenter
window.document.frmService.grdServiceComponents.Grid.ColAlignment(c_strColOtherCharges) = c_intflexAlignRightCenter
'Set the wrap text on
window.document.frmService.grdServiceComponents.Grid.AutoSizeMode = c_lngflexAutoSizeRowHeight
Call window.document.frmService.grdServiceComponents.Grid.AutoSize (1,window.document.frmService.grdServiceComponents.Grid.Cols -1)
'Copy / Paste Rows in GRID
window.document.frmService.grdServiceComponents.AllowCopyPaste = True
--
Roman
I am working on someone else's code and it's using a grid component that I don't know anything about. I tried to get documentation on the net but can't find anything.
Here's some part of the code (see below). Let me know if you know anything about this.
Thanks!
ASP code
==============
//// HTML part
<OBJECT CODEBASE="../common/SPARCodebase.CAB" CLASSID="<%=c_strClassIDGrid%>"
NAME="grdServiceComponents"
TABINDEX = 78
STYLE="HEIGHT: 210px; LEFT: 0px; TOP: 0px; WIDTH: 658px" VIEWASTEXT id=OBJECT5>
<PARAM NAME="_ExtentX" VALUE="17410">
<PARAM NAME="_ExtentY" VALUE="5556">
</OBJECT>
[...]
//// Setting up the grid component (VB)
'*******************************************************************************
'Example: For creating Grid headers
'Name|Width|MaxLength|AllowUpdate|Unique|Mandatory|DataType|EditMask|Format
'*******************************************************************************
'Setting Grid columns
window.document.frmService.grdServiceComponents.ColumnDefinition = _
Array("<%=c_strColCompId%>|0|10|N|N|N||||Y", _
"<%=c_strColCompType%>|1320|10|Y|N|Y||||N", _
"<%=c_strColCompNo%>|1710|60|Y|N|N||||N", _
"<%=c_strColCompDesc%>|1875|50|Y|N|N||||N", _
"<%=c_strColCompStatus%>|1215|10|Y|N|Y||||N", _
"<%=c_strColPONo%>|1335|20|Y|N|N||||N", _
"<%=c_strColPOType%>|1335|10|Y|N|N||||N", _
"<%=c_strColCircuitConfig%>|1600|10|Y|N|N||||N", _
"<%=c_strColDistance%>|1200|20|Y|N|N||||N", _
"<%=c_strColQty%>|1200|4|Y|N|Y||9999||", _
"<%=c_strColChargePerUnit%>|1320|10|Y|N|Y||9999999.99|#.##|", _
"<%=c_strColServiceFromDt%>|1250|10|Y|N|Y|" & CStr(c_intflexDTDate) & "|9999-99-99|YYYY-MM-DD|", _
"<%=c_strColServiceToDt%>|1250|10|Y|N|N|" & CStr(c_intflexDTDate) & "|9999-99-99|YYYY-MM-DD|", _
"<%=c_strColTotalAmount%>|1710|15|N|N|N||9999999.99|#.##|", _
"<%=c_strColPaymentFrequency%>|1365|10|Y|N|Y||||N", _
"<%=c_strColInstallCharges%>|1230|10|Y|N|N||9999999.99|#.##|", _
"<%=c_strColActivationCharges%>|1230|10|Y|N|N||9999999.99|#.##|", _
"<%=c_strColOtherCharges%>|1230|10|Y|N|N||9999999.99|#.##|", _
"<%=c_strColOtherChargesDesc%>|2000|50|Y|N|N||||N", _
"<%=c_strColOrderDt%>|1250|10|Y|N|N|" & CStr(c_intflexDTDate) & "|9999-99-99|YYYY-MM-DD|", _
"<%=c_strColPSINetTargetDt%>|1250|10|Y|N|N|" & CStr(c_intflexDTDate) & "|9999-99-99|YYYY-MM-DD|", _
"<%=c_strColDisconnectDt%>|1450|10|Y|N|N|" & CStr(c_intflexDTDate) & "|9999-99-99|YYYY-MM-DD|", _
"<%=c_strColSPAcknDt%>|1710|10|Y|N|N|" & CStr(c_intflexDTDate) & "|9999-99-99|YYYY-MM-DD|", _
"<%=c_strColSPConfdt%>|1450|10|Y|N|N|" & CStr(c_intflexDTDate) & "|9999-99-99|YYYY-MM-DD|", _
"<%=c_strColSPConfNo%>|1335|20|Y|N|N||||N", _
"<%=c_strColPSIDemarcCoord%>|1335|20|Y|N|N||||N", _
"<%=c_strColSPDemarcCoord%>|1335|20|Y|N|N||||N", _
"<%=c_strColCustDemarcCoord%>|1335|50|Y|N|N||||N", _
"<%=c_strColImpMgr%>|1800|30|Y|N|N||||N", _
"<%=c_strColImpMgrPhone%>|1800|20|Y|N|N||||N", _
"<%=c_strColPSINetRFQNo%>|1335|20|Y|N|N||||N", _
"<%=c_strColSPQuotNo%>|1335|20|Y|N|N||||N", _
"<%=c_strColQuotSentdt%>|1250|10|Y|N|N|" & CStr(c_intflexDTDate) & "|9999-99-99|YYYY-MM-DD|", _
"<%=c_strColQuotRecdDt%>|1250|10|Y|N|N|" & CStr(c_intflexDTDate) & "|9999-99-99|YYYY-MM-DD|", _
"<%=c_strColProjectNo%>|1335|20|Y|N|N||||N", _
"<%=c_strColCompComments%>|3500|4000|Y|N|N||||N"
'Right Align Numeric Columns
window.document.frmService.grdServiceComponents.Grid.ColAlignment(c_strColQty) = c_intflexAlignRightCenter
window.document.frmService.grdServiceComponents.Grid.ColAlignment(c_strColChargePerUnit) = c_intflexAlignRightCenter
window.document.frmService.grdServiceComponents.Grid.ColAlignment(c_strColTotalAmount) = c_intflexAlignRightCenter
window.document.frmService.grdServiceComponents.Grid.ColAlignment(c_strColInstallCharges) = c_intflexAlignRightCenter
window.document.frmService.grdServiceComponents.Grid.ColAlignment(c_strColActivationCharges) = c_intflexAlignRightCenter
window.document.frmService.grdServiceComponents.Grid.ColAlignment(c_strColOtherCharges) = c_intflexAlignRightCenter
'Set the wrap text on
window.document.frmService.grdServiceComponents.Grid.AutoSizeMode = c_lngflexAutoSizeRowHeight
Call window.document.frmService.grdServiceComponents.Grid.AutoSize (1,window.document.frmService.grdServiceComponents.Grid.Cols -1)
'Copy / Paste Rows in GRID
window.document.frmService.grdServiceComponents.AllowCopyPaste = True
--
Roman