cA303 ;Landcodes ;%A303 ; [ 12/29/00  5:08 PM ]
 G 1
 ;
T0 ;Landcodes ;
 ;
T0F ;Codes pays ;
 ;
T0E ;Country codes ;
 ;
1 I QU="SU" D BS^cAN210("ISO.LAND",0,0,0,0) G YZ
11 D RS^cAN210("ISO.LAND",0,0,0,0) G YZ
 ;
YZ Q
 ;
ZZ ; 05.02.01 - 16 u 23 * V7.84