1package Business::EDI::CodeList::SurfaceOrLayerCode; 2 3use base 'Business::EDI::CodeList'; 4my $VERSION = 0.02; 5sub list_number {7383;} 6my $usage = 'C'; 7 8# 7383 Surface or layer code [C] 9# Desc: Code specifying the surface or layer of an object. 10# Repr: an..3 11 12my %code_hash = ( 13'1S' => [ 'Side one', 14 'The location is side one.' ], 15'2S' => [ 'Side two', 16 'The location is side two.' ], 17'AA' => [ 'On surface', 18 'To indicate that the entity being specified is on the surface.' ], 19'AB' => [ 'Off surface', 20 'To indicate that the entity being specified is off the surface.' ], 21'AC' => [ 'Soluble', 22 'Specifies that the surface/layer/position being described is the soluble portion.' ], 23'AD' => [ 'Opposite corners', 24 'The surface or layer of the product being described is the opposite corners.' ], 25'AE' => [ 'Corner Diagonals', 26 'The surface or layer of the product being described are the corner diagonals.' ], 27'AF' => [ 'Port', 28 'The left-hand side (looking forward) of a ship, boat or aircraft.' ], 29'AG' => [ 'Starboard', 30 'The right-hand side (looking forward) of a ship, boat or aircraft.' ], 31'AH' => [ 'Tooth facial surface', 32 'Surface of a tooth directed toward the face and opposite the lingual surface.' ], 33'AI' => [ 'Tooth incisal surface', 34 'Surface of the tooth relating to the cutting edge of the anterior teeth, incisors or canines.' ], 35'AJ' => [ 'Tooth distal surface', 36 'Surface of the tooth toward the back of the dental arch, or away from the midline.' ], 37'AK' => [ 'Tooth buccal surface', 38 'Surface of the tooth pertaining to or around the cheek.' ], 39'AL' => [ 'Tooth occlusal surface', 40 'Surface of the tooth pertaining to the masticating surfaces of the posterior teeth.' ], 41'AM' => [ 'Tooth lingual surface', 42 'Surface of the tooth pertaining to or around the tongue.' ], 43'AN' => [ 'Tooth mesial surface', 44 'Surface of the tooth toward the midline of the dental arch.' ], 45'BC' => [ 'Back of cab', 46 'The location is at the back of the cab.' ], 47'BS' => [ 'Both sides', 48 'The location is both sides.' ], 49'BT' => [ 'Bottom', 50 'The location is on the bottom.' ], 51'DF' => [ 'Dual fuel tank positions', 52 'The location is in the dual fuel tank positions.' ], 53'FR' => [ 'Front', 54 'The location is in the front.' ], 55'IN' => [ 'Inside', 56 'The location is in the inside.' ], 57'LE' => [ 'Left', 58 'The location is on the left.' ], 59'OA' => [ 'Overall', 60 'The location is overall.' ], 61'OS' => [ 'One side', 62 'The location is on one side.' ], 63'OT' => [ 'Outside', 64 'The location is on the outside.' ], 65'RI' => [ 'Right', 66 'The location is on the right.' ], 67'RR' => [ 'Rear', 68 'The location is in the rear.' ], 69'ST' => [ 'Spare tyre position', 70 'The location is the spare tyre position.' ], 71'TB' => [ 'Tank bottom', 72 'The location is at the tank bottom.' ], 73'TP' => [ 'Top', 74 'The location is on the top.' ], 75'TS' => [ 'Two sides', 76 'The location is on two sides.' ], 77'UC' => [ 'Under cab', 78 'The location is under the cab.' ], 79); 80sub get_codes { return \%code_hash; } 81 821; 83