Create a .PCODE file for area line input to ARCDFAD

ITEM NAME        WIDTH OUTPUT  TYPE 
-------------------------------------
FACODE               4     5     B
HEIGHT               4     5     B
FICODE               4     5     B
SMCCODE              4     5     B
NSTRUCT_PSK          2     5     B
PCT_TREE_COV         2     5     B
PCT_ROOF_COV         2     5     B

/* NAME: PCODE.AML
/*
/* USAGE: &RUN PCODE.AML
/*
/* NOTES:
/*
/* Run this AML from the Arc prompt.
/* Run this AML from a directory that is NOT the workspace
/* directory that will be converted with ARCDFAD
/*
/* This is not an ESRI supported AML. Please use at your own risk.
/* Also, please make a backup of your data before running this AML
/* and carefully check the output. This is just a skeleton AML with
/* no real error checking. It is meant only as a guide to developing an
/* AML specific to your data inputs and desired outputs.

&args worksp incov
&sv orig_work = [show &workspace]
&workspace %worksp%
&if ^ [exist %incov% -cover] &then
&type Coverage %incov% not found.
&else
&do
tables
define %incov%.pcode
facode,4,5,b
height,4,5,b
ficode,4,5,b
smccode,4,5,b
nstruct_psk,2,5,b
pct_tree_cov,2,5,b
pct_roof_cov,2,5,b
~
quit
&end
&workspace %orig_work%
&return

Note:
The ArcInfo DFAD translator supports DFAD levels 1, 2, 1-C, and 3-C only. Check with your data provider to determine what DFAD level you have.