DictTable example in axapta

This is sample code for DictTable example in axapta

 static void Job24(Args _args)  
 {  
 DictField df;  
 extendedTypeId eti;  
 DictType dt;  
 date _date = 28\08\2008;  
 ;  
 df = new DictField(tablenum(Address), fieldnum(Address, AddrTableId));  
 info(strFmt('%1 %2', Year(_date), MthOfYr(_date) ));  
 if (df)  
 {  
 eti = df.typeId();  
 if (0 != eti)  
 {  
 dt = new DictType(eti);  
 if (dt)  
 {  
 print strfmt("The field is based on %1.", dt.name());  
 }  
 }  
 else  
 {  
 print "The field is not based on an extended data type.";  
 }  
 }  
 pause;  
 }