PMS32 Online- Hilfereferenz
Fill2Grids - under construction
GRID = Fill2Grids(toMaster AS GRID , toChild AS GRID)
Rückgabe der Funktion: GRID
PROCEDURE Fill2Grids (toMaster AS GRID,toChild AS GRID) AS GRID */ Erstellt ein Datenraster aus zwei Datenrastern LOCAL loGrid AS GRID , laCols[1], lni AS INTEGER, loX60 AS pmsx60TableBasic OF vcx\pmsmyclients.vcx, loColumn AS COLUMN, lcCaption AS STRING loX60 = My.Clients.X60Table loGrid = CREATEOBJECT("GRID") =ADDPROPERTY(m.loGrid,"_DoNotUseRelation",.T.) loGrid.COLUMNCOUNT = 0 loGrid.RECORDSOURCE = m.toMaster.RECORDSOURCE IF loX60.GetColumnListByColumnOrder(@laCols,m.toMaster)>0 */ Der Master FOR m.lni = 1 TO ALEN(laCols) IF laCols[m.lni].VISIBLE loGrid.ADDCOLUMN(loGrid.COLUMNCOUNT+1) loColumn = loGrid.COLUMNS(loGrid.COLUMNCOUNT) TRY lcCaption = EVALUATE(laCols[m.lni].__Caption) CATCH lcCaption = laCols[m.lni].__Caption ENDTRY loColumn.ADDPROPERTY("__Caption",m.lcCaption) loColumn.Header1.CAPTION = m.lcCaption loColumn.CONTROLSOURCE = laCols[m.lni].CONTROLSOURCE ENDIF NEXT m.lni */ Das Child IF loX60.GetColumnListByColumnOrder(@laCols,m.toChild)>0 FOR m.lni = 1 TO ALEN(laCols) IF laCols[m.lni].VISIBLE loGrid.ADDCOLUMN(loGrid.COLUMNCOUNT+1) loColumn = loGrid.COLUMNS(loGrid.COLUMNCOUNT) TRY lcCaption = EVALUATE(laCols[m.lni].__Caption) CATCH lcCaption = laCols[m.lni].__Caption ENDTRY loColumn.ADDPROPERTY("__Caption",m.lcCaption) loColumn.Header1.CAPTION = m.lcCaption loColumn.CONTROLSOURCE = laCols[m.lni].CONTROLSOURCE ENDIF NEXT m.lni ENDIF ENDIF RETURN m.loGrid ENDPROC
Siehe auch : Hauptmenü / Hauptindex / Such Index / Cursor Index / Programm Module / Tabellen Index / Tabellenmodule / Masken Index / Programmcode Index / Servicepacks / My.Struktur / Funktionen / Sonstiges Index
Lokale Benutzerhilfe : Meine eigene Hilfe / Zurück zur PMS32 - Hilfe
Dateiversion:1.0.04#3648 - H.U.DD#SSFF 02.12.2022
Senden Sie Ihren Kommentar zu diesem Thema an das Entwicklungsteam von PMS32
Weitere Informationen finden Sie unter der aktuellen
PMS32 WEB-Hilfe
Die Informationen dieser Mitteilung sind vertraulich und nur für Sie bestimmt. Unbefugtes Weiterleiten,
Veröffentlichen, Kopieren usw. sind untersagt und werden gerichtlich verfolgt.
© PMS Compelec GmbH 2022 ® el-Projekt