Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: BGP8FXGD

BGP8FXGD.m

Go to the documentation of this file.
  1. BGP8FXGD ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON SEP 28, 2007 ;
  1. ;;8.0;IHS CLINICAL REPORTING;;MAR 12, 2008
  1. ;;;BGP6;;SEP 28, 2007
  1. ;
  1. START ;
  1. K:'$G(ATXPGMC) ^TMP("ATX",$J)
  1. S ATXPGMC=$G(ATXPGMC)+1
  1. F ATXI=1:1 S X=$P($T(TMP+ATXI),";;",2,99) Q:X="" S X="^TMP(""ATX"",$J,"_X,ATXI=ATXI+1,Y=$P($T(TMP+ATXI),";;",2,99) S @X=Y
  1. Q
  1. ;
  1. TMP ;;TAXONOMY (WITH BULLETIN)
  1. ;;9002226.02101,"624,00247-0187-50 ",.01)
  1. ;;00247-0187-50
  1. ;;9002226.02101,"624,00247-0187-50 ",.02)
  1. ;;00247-0187-50
  1. ;;9002226.02101,"624,00247-0187-60 ",.01)
  1. ;;00247-0187-60
  1. ;;9002226.02101,"624,00247-0187-60 ",.02)
  1. ;;00247-0187-60
  1. ;;9002226.02101,"624,00247-0187-98 ",.01)
  1. ;;00247-0187-98
  1. ;;9002226.02101,"624,00247-0187-98 ",.02)
  1. ;;00247-0187-98
  1. ;;9002226.02101,"624,00247-0294-02 ",.01)
  1. ;;00247-0294-02
  1. ;;9002226.02101,"624,00247-0294-02 ",.02)
  1. ;;00247-0294-02
  1. ;;9002226.02101,"624,00247-0294-20 ",.01)
  1. ;;00247-0294-20
  1. ;;9002226.02101,"624,00247-0294-20 ",.02)
  1. ;;00247-0294-20
  1. ;;9002226.02101,"624,00247-0345-00 ",.01)
  1. ;;00247-0345-00
  1. ;;9002226.02101,"624,00247-0345-00 ",.02)
  1. ;;00247-0345-00
  1. ;;9002226.02101,"624,00247-0345-02 ",.01)
  1. ;;00247-0345-02
  1. ;;9002226.02101,"624,00247-0345-02 ",.02)
  1. ;;00247-0345-02
  1. ;;9002226.02101,"624,00247-0345-03 ",.01)
  1. ;;00247-0345-03
  1. ;;9002226.02101,"624,00247-0345-03 ",.02)
  1. ;;00247-0345-03
  1. ;;9002226.02101,"624,00247-0345-07 ",.01)
  1. ;;00247-0345-07
  1. ;;9002226.02101,"624,00247-0345-07 ",.02)
  1. ;;00247-0345-07
  1. ;;9002226.02101,"624,00247-0345-10 ",.01)
  1. ;;00247-0345-10
  1. ;;9002226.02101,"624,00247-0345-10 ",.02)
  1. ;;00247-0345-10
  1. ;;9002226.02101,"624,00247-0345-15 ",.01)
  1. ;;00247-0345-15
  1. ;;9002226.02101,"624,00247-0345-15 ",.02)
  1. ;;00247-0345-15
  1. ;;9002226.02101,"624,00247-0345-20 ",.01)
  1. ;;00247-0345-20
  1. ;;9002226.02101,"624,00247-0345-20 ",.02)
  1. ;;00247-0345-20
  1. ;;9002226.02101,"624,00247-0345-30 ",.01)
  1. ;;00247-0345-30
  1. ;;9002226.02101,"624,00247-0345-30 ",.02)
  1. ;;00247-0345-30
  1. ;;9002226.02101,"624,00247-0345-98 ",.01)
  1. ;;00247-0345-98
  1. ;;9002226.02101,"624,00247-0345-98 ",.02)
  1. ;;00247-0345-98
  1. ;;9002226.02101,"624,00247-0493-00 ",.01)
  1. ;;00247-0493-00
  1. ;;9002226.02101,"624,00247-0493-00 ",.02)
  1. ;;00247-0493-00
  1. ;;9002226.02101,"624,00247-0493-02 ",.01)
  1. ;;00247-0493-02
  1. ;;9002226.02101,"624,00247-0493-02 ",.02)
  1. ;;00247-0493-02
  1. ;;9002226.02101,"624,00247-0493-03 ",.01)
  1. ;;00247-0493-03
  1. ;;9002226.02101,"624,00247-0493-03 ",.02)
  1. ;;00247-0493-03
  1. ;;9002226.02101,"624,00247-0493-06 ",.01)
  1. ;;00247-0493-06
  1. ;;9002226.02101,"624,00247-0493-06 ",.02)
  1. ;;00247-0493-06
  1. ;;9002226.02101,"624,00247-0493-07 ",.01)
  1. ;;00247-0493-07
  1. ;;9002226.02101,"624,00247-0493-07 ",.02)
  1. ;;00247-0493-07
  1. ;;9002226.02101,"624,00247-0493-10 ",.01)
  1. ;;00247-0493-10
  1. ;;9002226.02101,"624,00247-0493-10 ",.02)
  1. ;;00247-0493-10
  1. ;;9002226.02101,"624,00247-0493-12 ",.01)
  1. ;;00247-0493-12
  1. ;;9002226.02101,"624,00247-0493-12 ",.02)
  1. ;;00247-0493-12
  1. ;;9002226.02101,"624,00247-0493-14 ",.01)
  1. ;;00247-0493-14
  1. ;;9002226.02101,"624,00247-0493-14 ",.02)
  1. ;;00247-0493-14
  1. ;;9002226.02101,"624,00247-0493-20 ",.01)
  1. ;;00247-0493-20
  1. ;;9002226.02101,"624,00247-0493-20 ",.02)
  1. ;;00247-0493-20
  1. ;;9002226.02101,"624,00247-0493-30 ",.01)
  1. ;;00247-0493-30
  1. ;;9002226.02101,"624,00247-0493-30 ",.02)
  1. ;;00247-0493-30
  1. ;;9002226.02101,"624,00247-0939-03 ",.01)
  1. ;;00247-0939-03
  1. ;;9002226.02101,"624,00247-0939-03 ",.02)
  1. ;;00247-0939-03
  1. ;;9002226.02101,"624,00247-0939-06 ",.01)
  1. ;;00247-0939-06
  1. ;;9002226.02101,"624,00247-0939-06 ",.02)
  1. ;;00247-0939-06
  1. ;;9002226.02101,"624,00247-0939-15 ",.01)
  1. ;;00247-0939-15
  1. ;;9002226.02101,"624,00247-0939-15 ",.02)
  1. ;;00247-0939-15
  1. ;;9002226.02101,"624,00247-0939-30 ",.01)
  1. ;;00247-0939-30
  1. ;;9002226.02101,"624,00247-0939-30 ",.02)
  1. ;;00247-0939-30
  1. ;;9002226.02101,"624,00364-0774-01 ",.01)
  1. ;;00364-0774-01
  1. ;;9002226.02101,"624,00364-0774-01 ",.02)
  1. ;;00364-0774-01
  1. ;;9002226.02101,"624,00364-0774-02 ",.01)
  1. ;;00364-0774-02
  1. ;;9002226.02101,"624,00364-0774-02 ",.02)
  1. ;;00364-0774-02
  1. ;;9002226.02101,"624,00364-0774-05 ",.01)
  1. ;;00364-0774-05
  1. ;;9002226.02101,"624,00364-0774-05 ",.02)
  1. ;;00364-0774-05
  1. ;;9002226.02101,"624,00364-0775-01 ",.01)
  1. ;;00364-0775-01
  1. ;;9002226.02101,"624,00364-0775-01 ",.02)
  1. ;;00364-0775-01
  1. ;;9002226.02101,"624,00364-0775-02 ",.01)
  1. ;;00364-0775-02
  1. ;;9002226.02101,"624,00364-0775-02 ",.02)
  1. ;;00364-0775-02
  1. ;;9002226.02101,"624,00364-0775-05 ",.01)
  1. ;;00364-0775-05
  1. ;;9002226.02101,"624,00364-0775-05 ",.02)
  1. ;;00364-0775-05
  1. ;;9002226.02101,"624,00364-0776-01 ",.01)
  1. ;;00364-0776-01
  1. ;;9002226.02101,"624,00364-0776-01 ",.02)
  1. ;;00364-0776-01
  1. ;;9002226.02101,"624,00364-0776-02 ",.01)
  1. ;;00364-0776-02
  1. ;;9002226.02101,"624,00364-0776-02 ",.02)
  1. ;;00364-0776-02
  1. ;;9002226.02101,"624,00364-0776-05 ",.01)
  1. ;;00364-0776-05
  1. ;;9002226.02101,"624,00364-0776-05 ",.02)
  1. ;;00364-0776-05
  1. ;;9002226.02101,"624,00364-0801-05 ",.01)
  1. ;;00364-0801-05
  1. ;;9002226.02101,"624,00364-0801-05 ",.02)
  1. ;;00364-0801-05
  1. ;;9002226.02101,"624,00364-0825-48 ",.01)
  1. ;;00364-0825-48
  1. ;;9002226.02101,"624,00364-0825-48 ",.02)
  1. ;;00364-0825-48
  1. ;;9002226.02101,"624,00378-0211-01 ",.01)
  1. ;;00378-0211-01
  1. ;;9002226.02101,"624,00378-0211-01 ",.02)
  1. ;;00378-0211-01
  1. ;;9002226.02101,"624,00378-0211-05 ",.01)
  1. ;;00378-0211-05
  1. ;;9002226.02101,"624,00378-0211-05 ",.02)
  1. ;;00378-0211-05
  1. ;;9002226.02101,"624,00378-0271-01 ",.01)
  1. ;;00378-0271-01
  1. ;;9002226.02101,"624,00378-0271-01 ",.02)
  1. ;;00378-0271-01
  1. ;;9002226.02101,"624,00378-0271-05 ",.01)
  1. ;;00378-0271-05
  1. ;;9002226.02101,"624,00378-0271-05 ",.02)
  1. ;;00378-0271-05
  1. ;;9002226.02101,"624,00378-0277-01 ",.01)
  1. ;;00378-0277-01
  1. ;;9002226.02101,"624,00378-0277-01 ",.02)
  1. ;;00378-0277-01
  1. ;;9002226.02101,"624,00378-0277-05 ",.01)
  1. ;;00378-0277-05
  1. ;;9002226.02101,"624,00378-0277-05 ",.02)
  1. ;;00378-0277-05
  1. ;;9002226.02101,"624,00378-0345-01 ",.01)
  1. ;;00378-0345-01
  1. ;;9002226.02101,"624,00378-0345-01 ",.02)
  1. ;;00378-0345-01
  1. ;;9002226.02101,"624,00378-0345-05 ",.01)
  1. ;;00378-0345-05
  1. ;;9002226.02101,"624,00378-0345-05 ",.02)
  1. ;;00378-0345-05
  1. ;;9002226.02101,"624,00378-0477-01 ",.01)
  1. ;;00378-0477-01
  1. ;;9002226.02101,"624,00378-0477-01 ",.02)
  1. ;;00378-0477-01
  1. ;;9002226.02101,"624,00378-0477-05 ",.01)
  1. ;;00378-0477-05
  1. ;;9002226.02101,"624,00378-0477-05 ",.02)
  1. ;;00378-0477-05
  1. ;;9002226.02101,"624,00378-4415-01 ",.01)
  1. ;;00378-4415-01
  1. ;;9002226.02101,"624,00378-4415-01 ",.02)
  1. ;;00378-4415-01
  1. ;;9002226.02101,"624,00378-4415-05 ",.01)
  1. ;;00378-4415-05
  1. ;;9002226.02101,"624,00378-4415-05 ",.02)
  1. ;;00378-4415-05
  1. ;;9002226.02101,"624,00378-4430-01 ",.01)
  1. ;;00378-4430-01
  1. ;;9002226.02101,"624,00378-4430-01 ",.02)
  1. ;;00378-4430-01
  1. ;;9002226.02101,"624,00378-4430-05 ",.01)
  1. ;;00378-4430-05
  1. ;;9002226.02101,"624,00378-4430-05 ",.02)
  1. ;;00378-4430-05
  1. ;;9002226.02101,"624,00405-0040-01 ",.01)
  1. ;;00405-0040-01
  1. ;;9002226.02101,"624,00405-0040-01 ",.02)
  1. ;;00405-0040-01
  1. ;;9002226.02101,"624,00405-0040-02 ",.01)
  1. ;;00405-0040-02
  1. ;;9002226.02101,"624,00405-0040-02 ",.02)
  1. ;;00405-0040-02
  1. ;;9002226.02101,"624,00405-0041-01 ",.01)
  1. ;;00405-0041-01
  1. ;;9002226.02101,"624,00405-0041-01 ",.02)
  1. ;;00405-0041-01
  1. ;;9002226.02101,"624,00405-0041-03 ",.01)
  1. ;;00405-0041-03
  1. ;;9002226.02101,"624,00405-0041-03 ",.02)
  1. ;;00405-0041-03
  1. ;;9002226.02101,"624,00405-0042-01 ",.01)
  1. ;;00405-0042-01
  1. ;;9002226.02101,"624,00405-0042-01 ",.02)
  1. ;;00405-0042-01
  1. ;;9002226.02101,"624,00405-0042-02 ",.01)
  1. ;;00405-0042-02
  1. ;;9002226.02101,"624,00405-0042-02 ",.02)
  1. ;;00405-0042-02
  1. ;;9002226.02101,"624,00405-0068-01 ",.01)
  1. ;;00405-0068-01
  1. ;;9002226.02101,"624,00405-0068-01 ",.02)
  1. ;;00405-0068-01
  1. ;;9002226.02101,"624,00405-0068-02 ",.01)
  1. ;;00405-0068-02
  1. ;;9002226.02101,"624,00405-0068-02 ",.02)
  1. ;;00405-0068-02
  1. ;;9002226.02101,"624,00405-0068-03 ",.01)
  1. ;;00405-0068-03
  1. ;;9002226.02101,"624,00405-0068-03 ",.02)
  1. ;;00405-0068-03
  1. ;;9002226.02101,"624,00405-0069-01 ",.01)
  1. ;;00405-0069-01
  1. ;;9002226.02101,"624,00405-0069-01 ",.02)
  1. ;;00405-0069-01
  1. ;;9002226.02101,"624,00405-0069-02 ",.01)
  1. ;;00405-0069-02
  1. ;;9002226.02101,"624,00405-0069-02 ",.02)
  1. ;;00405-0069-02
  1. ;;9002226.02101,"624,00405-0069-03 ",.01)
  1. ;;00405-0069-03
  1. ;;9002226.02101,"624,00405-0069-03 ",.02)
  1. ;;00405-0069-03
  1. ;;9002226.02101,"624,00405-0070-01 ",.01)
  1. ;;00405-0070-01
  1. ;;9002226.02101,"624,00405-0070-01 ",.02)
  1. ;;00405-0070-01
  1. ;;9002226.02101,"624,00405-0070-02 ",.01)
  1. ;;00405-0070-02
  1. ;;9002226.02101,"624,00405-0070-02 ",.02)
  1. ;;00405-0070-02
  1. ;;9002226.02101,"624,00405-0085-01 ",.01)
  1. ;;00405-0085-01
  1. ;;9002226.02101,"624,00405-0085-01 ",.02)
  1. ;;00405-0085-01
  1. ;;9002226.02101,"624,00405-0085-02 ",.01)
  1. ;;00405-0085-02
  1. ;;9002226.02101,"624,00405-0085-02 ",.02)
  1. ;;00405-0085-02
  1. ;;9002226.02101,"624,00405-0086-01 ",.01)
  1. ;;00405-0086-01
  1. ;;9002226.02101,"624,00405-0086-01 ",.02)
  1. ;;00405-0086-01
  1. ;;9002226.02101,"624,00405-0086-02 ",.01)
  1. ;;00405-0086-02
  1. ;;9002226.02101,"624,00405-0086-02 ",.02)
  1. ;;00405-0086-02
  1. ;;9002226.02101,"624,00409-1273-32 ",.01)
  1. ;;00409-1273-32
  1. ;;9002226.02101,"624,00409-1273-32 ",.02)
  1. ;;00409-1273-32
  1. ;;9002226.02101,"624,00409-3213-02 ",.01)
  1. ;;00409-3213-02
  1. ;;9002226.02101,"624,00409-3213-02 ",.02)
  1. ;;00409-3213-02
  1. ;;9002226.02101,"624,00536-3487-05 ",.01)
  1. ;;00536-3487-05
  1. ;;9002226.02101,"624,00536-3487-05 ",.02)
  1. ;;00536-3487-05
  1. ;;9002226.02101,"624,00536-3489-05 ",.01)
  1. ;;00536-3489-05
  1. ;;9002226.02101,"624,00536-3489-05 ",.02)
  1. ;;00536-3489-05
  1. ;;9002226.02101,"624,00536-3796-01 ",.01)
  1. ;;00536-3796-01
  1. ;;9002226.02101,"624,00536-3796-01 ",.02)
  1. ;;00536-3796-01
  1. ;;9002226.02101,"624,00536-3796-05 ",.01)
  1. ;;00536-3796-05
  1. ;;9002226.02101,"624,00536-3796-05 ",.02)
  1. ;;00536-3796-05
  1. ;;9002226.02101,"624,00555-0033-02 ",.01)
  1. ;;00555-0033-02
  1. ;;9002226.02101,"624,00555-0033-02 ",.02)
  1. ;;00555-0033-02
  1. ;;9002226.02101,"624,00555-0033-05 ",.01)
  1. ;;00555-0033-05
  1. ;;9002226.02101,"624,00555-0033-05 ",.02)
  1. ;;00555-0033-05
  1. ;;9002226.02101,"624,00555-0158-02 ",.01)
  1. ;;00555-0158-02
  1. ;;9002226.02101,"624,00555-0158-02 ",.02)
  1. ;;00555-0158-02
  1. ;;9002226.02101,"624,00555-0158-04 ",.01)
  1. ;;00555-0158-04
  1. ;;9002226.02101,"624,00555-0158-04 ",.02)
  1. ;;00555-0158-04
  1. ;;9002226.02101,"624,00555-0159-02 ",.01)
  1. ;;00555-0159-02
  1. ;;9002226.02101,"624,00555-0159-02 ",.02)
  1. ;;00555-0159-02
  1. ;;9002226.02101,"624,00555-0159-04 ",.01)
  1. ;;00555-0159-04
  1. ;;9002226.02101,"624,00555-0159-04 ",.02)
  1. ;;00555-0159-04
  1. ;;9002226.02101,"624,00555-0163-02 ",.01)
  1. ;;00555-0163-02
  1. ;;9002226.02101,"624,00555-0163-02 ",.02)
  1. ;;00555-0163-02
  1. ;;9002226.02101,"624,00555-0163-05 ",.01)
  1. ;;00555-0163-05
  1. ;;9002226.02101,"624,00555-0163-05 ",.02)
  1. ;;00555-0163-05
  1. ;;9002226.02101,"624,00555-0164-02 ",.01)
  1. ;;00555-0164-02
  1. ;;9002226.02101,"624,00555-0164-02 ",.02)
  1. ;;00555-0164-02
  1. ;;9002226.02101,"624,00555-0164-05 ",.01)
  1. ;;00555-0164-05
  1. ;;9002226.02101,"624,00555-0164-05 ",.02)
  1. ;;00555-0164-05
  1. ;;9002226.02101,"624,00555-0363-02 ",.01)
  1. ;;00555-0363-02
  1. ;;9002226.02101,"624,00555-0363-02 ",.02)
  1. ;;00555-0363-02
  1. ;;9002226.02101,"624,00555-0363-05 ",.01)
  1. ;;00555-0363-05
  1. ;;9002226.02101,"624,00555-0363-05 ",.02)
  1. ;;00555-0363-05
  1. ;;9002226.02101,"624,00591-0785-01 ",.01)
  1. ;;00591-0785-01
  1. ;;9002226.02101,"624,00591-0785-01 ",.02)
  1. ;;00591-0785-01
  1. ;;9002226.02101,"624,00591-0785-05 ",.01)
  1. ;;00591-0785-05
  1. ;;9002226.02101,"624,00591-0785-05 ",.02)
  1. ;;00591-0785-05
  1. ;;9002226.02101,"624,00591-0786-01 ",.01)
  1. ;;00591-0786-01
  1. ;;9002226.02101,"624,00591-0786-01 ",.02)
  1. ;;00591-0786-01
  1. ;;9002226.02101,"624,00591-0786-05 ",.01)
  1. ;;00591-0786-05
  1. ;;9002226.02101,"624,00591-0786-05 ",.02)
  1. ;;00591-0786-05
  1. ;;9002226.02101,"624,00591-0786-10 ",.01)
  1. ;;00591-0786-10
  1. ;;9002226.02101,"624,00591-0786-10 ",.02)
  1. ;;00591-0786-10
  1. ;;9002226.02101,"624,00591-0787-01 ",.01)
  1. ;;00591-0787-01
  1. ;;9002226.02101,"624,00591-0787-01 ",.02)
  1. ;;00591-0787-01
  1. ;;9002226.02101,"624,00591-0787-05 ",.01)
  1. ;;00591-0787-05
  1. ;;9002226.02101,"624,00591-0787-05 ",.02)
  1. ;;00591-0787-05
  1. ;;9002226.02101,"624,00591-5619-01 ",.01)
  1. ;;00591-5619-01
  1. ;;9002226.02101,"624,00591-5619-01 ",.02)
  1. ;;00591-5619-01
  1. ;;9002226.02101,"624,00591-5619-05 ",.01)
  1. ;;00591-5619-05
  1. ;;9002226.02101,"624,00591-5619-05 ",.02)
  1. ;;00591-5619-05
  1. ;;9002226.02101,"624,00591-5619-10 ",.01)
  1. ;;00591-5619-10
  1. ;;9002226.02101,"624,00591-5619-10 ",.02)
  1. ;;00591-5619-10
  1. ;;9002226.02101,"624,00591-5620-01 ",.01)
  1. ;;00591-5620-01
  1. ;;9002226.02101,"624,00591-5620-01 ",.02)
  1. ;;00591-5620-01
  1. ;;9002226.02101,"624,00591-5620-05 ",.01)
  1. ;;00591-5620-05
  1. ;;9002226.02101,"624,00591-5620-05 ",.02)
  1. ;;00591-5620-05
  1. ;;9002226.02101,"624,00591-5620-10 ",.01)
  1. ;;00591-5620-10
  1. ;;9002226.02101,"624,00591-5620-10 ",.02)
  1. ;;00591-5620-10
  1. ;;9002226.02101,"624,00591-5621-01 ",.01)
  1. ;;00591-5621-01
  1. ;;9002226.02101,"624,00591-5621-01 ",.02)
  1. ;;00591-5621-01
  1. ;;9002226.02101,"624,00591-5621-05 ",.01)
  1. ;;00591-5621-05
  1. ;;9002226.02101,"624,00591-5621-05 ",.02)
  1. ;;00591-5621-05
  1. ;;9002226.02101,"624,00591-5621-10 ",.01)
  1. ;;00591-5621-10
  1. ;;9002226.02101,"624,00591-5621-10 ",.02)
  1. ;;00591-5621-10
  1. ;;9002226.02101,"624,00603-2666-32 ",.01)
  1. ;;00603-2666-32
  1. ;;9002226.02101,"624,00603-2666-32 ",.02)
  1. ;;00603-2666-32
  1. ;;9002226.02101,"624,00603-2667-21 ",.01)
  1. ;;00603-2667-21
  1. ;;9002226.02101,"624,00603-2667-21 ",.02)
  1. ;;00603-2667-21
  1. ;;9002226.02101,"624,00603-2690-21 ",.01)
  1. ;;00603-2690-21
  1. ;;9002226.02101,"624,00603-2690-21 ",.02)
  1. ;;00603-2690-21
  1. ;;9002226.02101,"624,00603-2690-28 ",.01)
  1. ;;00603-2690-28
  1. ;;9002226.02101,"624,00603-2690-28 ",.02)
  1. ;;00603-2690-28
  1. ;;9002226.02101,"624,00603-2691-21 ",.01)
  1. ;;00603-2691-21
  1. ;;9002226.02101,"624,00603-2691-21 ",.02)
  1. ;;00603-2691-21
  1. ;;9002226.02101,"624,00603-2691-28 ",.01)
  1. ;;00603-2691-28
  1. ;;9002226.02101,"624,00603-2691-28 ",.02)
  1. ;;00603-2691-28
  1. ;;9002226.02101,"624,00603-3213-21 ",.01)
  1. ;;00603-3213-21