I think i' m missing the right way to use ANY (PB35 Reference Guide, p. 83 bottom). I never used it before.
I' m getting a compilation error
("Error 481: Parameter mismatch - may need ByCopy") on the SUB statement.
I hope someone can point me to the error.
$DIM ALL
TYPE TypeRecord
zName AS STRING * 10
zCode AS INTEGER
END TYPE
DECLARE SUB Proc(RecordParam AS ANY)
END
SUB Proc(RecordParam AS TypeRecord) PUBLIC
PRINT "RecordParam.zName="; RecordParam.zName
PRINT "RecordParam.zCode="; RecordParam.zCode
END SUB
------------------
I' m getting a compilation error
("Error 481: Parameter mismatch - may need ByCopy") on the SUB statement.
I hope someone can point me to the error.
$DIM ALL
TYPE TypeRecord
zName AS STRING * 10
zCode AS INTEGER
END TYPE
DECLARE SUB Proc(RecordParam AS ANY)
END
SUB Proc(RecordParam AS TypeRecord) PUBLIC
PRINT "RecordParam.zName="; RecordParam.zName
PRINT "RecordParam.zCode="; RecordParam.zCode
END SUB
------------------
Comment