Copy Clarion record structures using file references

brahn · May 28, 2014, 2:44pm

Given two file references, copy their record structures using deep assignment:

gist.github.com

https://gist.github.com/fushnisoft/5361600

gistfile1.txt

Convert   PROCEDURE(*FILE pSourceFile, *FILE pTargetFile)
sourceRec   &GROUP
targetRec   &GROUP
  CODE
  sourceRec &= pSourceFile{PROP:Record}
  targetRec &= pTargetFile{PROP:Record}
  targetRec :=: sourceRec