P
Patrick Tingen
Guest
This is not entirely true and I beg to differ 
If you look at RUN foo (INPUT DATASET myDataset:HANDLE ). It is perfectly clear for the compiler that it is a HANDLE that is passed to the procedure. That is because the word 'HANDLE' is added. There is a difference in passing the table as a whole or the handle and we are doing the latter here. Stronger, if you try to pass the handle when the procedure is expecting the table, you will get a runtime error. Try this: DEFINE TEMP-TABLE ttData FIELD cField AS CHARACTER. CREATE ttData. ttData.cField = 'Hello world'. RUN bar(INPUT TEMP-TABLE ttData:HANDLE). PROCEDURE bar: DEFINE INPUT PARAMETER TABLE FOR ttData. FIND FIRST ttData. MESSAGE ttData.cField VIEW-AS ALERT-BOX INFO BUTTONS OK. END PROCEDURE. It will give you this:
Continue reading...
If you look at RUN foo (INPUT DATASET myDataset:HANDLE ). It is perfectly clear for the compiler that it is a HANDLE that is passed to the procedure. That is because the word 'HANDLE' is added. There is a difference in passing the table as a whole or the handle and we are doing the latter here. Stronger, if you try to pass the handle when the procedure is expecting the table, you will get a runtime error. Try this: DEFINE TEMP-TABLE ttData FIELD cField AS CHARACTER. CREATE ttData. ttData.cField = 'Hello world'. RUN bar(INPUT TEMP-TABLE ttData:HANDLE). PROCEDURE bar: DEFINE INPUT PARAMETER TABLE FOR ttData. FIND FIRST ttData. MESSAGE ttData.cField VIEW-AS ALERT-BOX INFO BUTTONS OK. END PROCEDURE. It will give you this:Continue reading...