!ECHO ON
!.     INPUT MUST BE AN EDMS SCHEMA
!.    !SET F:SCHE DP/SCHEMA
!.    !SET F:DB01 DP/SCHEMA
!.     THE OUTPUT OF THIS CONVERTER IS THREE WORK FILES
!.          WHICH ARE CONCATENATED IN DDLOUT BY PCL AT THE END.
!DONT ECHO
!DELETE DP/ESCH_WF1
!DELETE DP/ESCH_WF2
!DELETE DP/ESCH_WF3
!SET F:SSCH DP/ESCH-SUB.:CONVERT
!SET F:DDL-OUT DP/ESCH_WF1;SAVE;KEYED
!SET F:DMCL-OUT DP/ESCH_WF2;SAVE;KEYED
!SET F:DMCL-IN DP/ESCH_WF2;SAVE;INOUT
!SET F:LOCK-OUT DP/ESCH_WF3;SAVE;KEYED
!SET F:LOCK-IN DP/ESCH_WF3;SAVE;INOUT
!SET F:LIST-OUT LP
!ESCH.:CONVERT
!COPY ESCH_WF1,ESCH_WF2,ESCH_WF3 OVER DDLOUT(LN)
!DELETE DP/ESCH_WF1
!DELETE DP/ESCH_WF2
!DELETE DP/ESCH_WF3
