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

ATXXB238.m

Go to the documentation of this file.
  1. ATXXB238 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON APR 29, 2014;
  1. ;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48
  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,"1804,DU005ZZ ",.01)
  1. ;;DU005ZZ
  1. ;;9002226.02101,"1804,DU005ZZ ",.02)
  1. ;;DU005ZZ
  1. ;;9002226.02101,"1804,DU005ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU006ZZ ",.01)
  1. ;;DU006ZZ
  1. ;;9002226.02101,"1804,DU006ZZ ",.02)
  1. ;;DU006ZZ
  1. ;;9002226.02101,"1804,DU006ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU010ZZ ",.01)
  1. ;;DU010ZZ
  1. ;;9002226.02101,"1804,DU010ZZ ",.02)
  1. ;;DU010ZZ
  1. ;;9002226.02101,"1804,DU010ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU011ZZ ",.01)
  1. ;;DU011ZZ
  1. ;;9002226.02101,"1804,DU011ZZ ",.02)
  1. ;;DU011ZZ
  1. ;;9002226.02101,"1804,DU011ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU012ZZ ",.01)
  1. ;;DU012ZZ
  1. ;;9002226.02101,"1804,DU012ZZ ",.02)
  1. ;;DU012ZZ
  1. ;;9002226.02101,"1804,DU012ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU013Z0 ",.01)
  1. ;;DU013Z0
  1. ;;9002226.02101,"1804,DU013Z0 ",.02)
  1. ;;DU013Z0
  1. ;;9002226.02101,"1804,DU013Z0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU013ZZ ",.01)
  1. ;;DU013ZZ
  1. ;;9002226.02101,"1804,DU013ZZ ",.02)
  1. ;;DU013ZZ
  1. ;;9002226.02101,"1804,DU013ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU014ZZ ",.01)
  1. ;;DU014ZZ
  1. ;;9002226.02101,"1804,DU014ZZ ",.02)
  1. ;;DU014ZZ
  1. ;;9002226.02101,"1804,DU014ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU015ZZ ",.01)
  1. ;;DU015ZZ
  1. ;;9002226.02101,"1804,DU015ZZ ",.02)
  1. ;;DU015ZZ
  1. ;;9002226.02101,"1804,DU015ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU016ZZ ",.01)
  1. ;;DU016ZZ
  1. ;;9002226.02101,"1804,DU016ZZ ",.02)
  1. ;;DU016ZZ
  1. ;;9002226.02101,"1804,DU016ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU020ZZ ",.01)
  1. ;;DU020ZZ
  1. ;;9002226.02101,"1804,DU020ZZ ",.02)
  1. ;;DU020ZZ
  1. ;;9002226.02101,"1804,DU020ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU021ZZ ",.01)
  1. ;;DU021ZZ
  1. ;;9002226.02101,"1804,DU021ZZ ",.02)
  1. ;;DU021ZZ
  1. ;;9002226.02101,"1804,DU021ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU022ZZ ",.01)
  1. ;;DU022ZZ
  1. ;;9002226.02101,"1804,DU022ZZ ",.02)
  1. ;;DU022ZZ
  1. ;;9002226.02101,"1804,DU022ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU023Z0 ",.01)
  1. ;;DU023Z0
  1. ;;9002226.02101,"1804,DU023Z0 ",.02)
  1. ;;DU023Z0
  1. ;;9002226.02101,"1804,DU023Z0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU023ZZ ",.01)
  1. ;;DU023ZZ
  1. ;;9002226.02101,"1804,DU023ZZ ",.02)
  1. ;;DU023ZZ
  1. ;;9002226.02101,"1804,DU023ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU024ZZ ",.01)
  1. ;;DU024ZZ
  1. ;;9002226.02101,"1804,DU024ZZ ",.02)
  1. ;;DU024ZZ
  1. ;;9002226.02101,"1804,DU024ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU025ZZ ",.01)
  1. ;;DU025ZZ
  1. ;;9002226.02101,"1804,DU025ZZ ",.02)
  1. ;;DU025ZZ
  1. ;;9002226.02101,"1804,DU025ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU026ZZ ",.01)
  1. ;;DU026ZZ
  1. ;;9002226.02101,"1804,DU026ZZ ",.02)
  1. ;;DU026ZZ
  1. ;;9002226.02101,"1804,DU026ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU1097Z ",.01)
  1. ;;DU1097Z
  1. ;;9002226.02101,"1804,DU1097Z ",.02)
  1. ;;DU1097Z
  1. ;;9002226.02101,"1804,DU1097Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU1098Z ",.01)
  1. ;;DU1098Z
  1. ;;9002226.02101,"1804,DU1098Z ",.02)
  1. ;;DU1098Z
  1. ;;9002226.02101,"1804,DU1098Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU1099Z ",.01)
  1. ;;DU1099Z
  1. ;;9002226.02101,"1804,DU1099Z ",.02)
  1. ;;DU1099Z
  1. ;;9002226.02101,"1804,DU1099Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU109BZ ",.01)
  1. ;;DU109BZ
  1. ;;9002226.02101,"1804,DU109BZ ",.02)
  1. ;;DU109BZ
  1. ;;9002226.02101,"1804,DU109BZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU109CZ ",.01)
  1. ;;DU109CZ
  1. ;;9002226.02101,"1804,DU109CZ ",.02)
  1. ;;DU109CZ
  1. ;;9002226.02101,"1804,DU109CZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU109YZ ",.01)
  1. ;;DU109YZ
  1. ;;9002226.02101,"1804,DU109YZ ",.02)
  1. ;;DU109YZ
  1. ;;9002226.02101,"1804,DU109YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU10B7Z ",.01)
  1. ;;DU10B7Z
  1. ;;9002226.02101,"1804,DU10B7Z ",.02)
  1. ;;DU10B7Z
  1. ;;9002226.02101,"1804,DU10B7Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU10B8Z ",.01)
  1. ;;DU10B8Z
  1. ;;9002226.02101,"1804,DU10B8Z ",.02)
  1. ;;DU10B8Z
  1. ;;9002226.02101,"1804,DU10B8Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU10B9Z ",.01)
  1. ;;DU10B9Z
  1. ;;9002226.02101,"1804,DU10B9Z ",.02)
  1. ;;DU10B9Z
  1. ;;9002226.02101,"1804,DU10B9Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU10BBZ ",.01)
  1. ;;DU10BBZ
  1. ;;9002226.02101,"1804,DU10BBZ ",.02)
  1. ;;DU10BBZ
  1. ;;9002226.02101,"1804,DU10BBZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU10BCZ ",.01)
  1. ;;DU10BCZ
  1. ;;9002226.02101,"1804,DU10BCZ ",.02)
  1. ;;DU10BCZ
  1. ;;9002226.02101,"1804,DU10BCZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU10BYZ ",.01)
  1. ;;DU10BYZ
  1. ;;9002226.02101,"1804,DU10BYZ ",.02)
  1. ;;DU10BYZ
  1. ;;9002226.02101,"1804,DU10BYZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU1197Z ",.01)
  1. ;;DU1197Z
  1. ;;9002226.02101,"1804,DU1197Z ",.02)
  1. ;;DU1197Z
  1. ;;9002226.02101,"1804,DU1197Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU1198Z ",.01)
  1. ;;DU1198Z
  1. ;;9002226.02101,"1804,DU1198Z ",.02)
  1. ;;DU1198Z
  1. ;;9002226.02101,"1804,DU1198Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU1199Z ",.01)
  1. ;;DU1199Z
  1. ;;9002226.02101,"1804,DU1199Z ",.02)
  1. ;;DU1199Z
  1. ;;9002226.02101,"1804,DU1199Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU119BZ ",.01)
  1. ;;DU119BZ
  1. ;;9002226.02101,"1804,DU119BZ ",.02)
  1. ;;DU119BZ
  1. ;;9002226.02101,"1804,DU119BZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU119CZ ",.01)
  1. ;;DU119CZ
  1. ;;9002226.02101,"1804,DU119CZ ",.02)
  1. ;;DU119CZ
  1. ;;9002226.02101,"1804,DU119CZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU119YZ ",.01)
  1. ;;DU119YZ
  1. ;;9002226.02101,"1804,DU119YZ ",.02)
  1. ;;DU119YZ
  1. ;;9002226.02101,"1804,DU119YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU11B7Z ",.01)
  1. ;;DU11B7Z
  1. ;;9002226.02101,"1804,DU11B7Z ",.02)
  1. ;;DU11B7Z
  1. ;;9002226.02101,"1804,DU11B7Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU11B8Z ",.01)
  1. ;;DU11B8Z
  1. ;;9002226.02101,"1804,DU11B8Z ",.02)
  1. ;;DU11B8Z
  1. ;;9002226.02101,"1804,DU11B8Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU11B9Z ",.01)
  1. ;;DU11B9Z
  1. ;;9002226.02101,"1804,DU11B9Z ",.02)
  1. ;;DU11B9Z
  1. ;;9002226.02101,"1804,DU11B9Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU11BBZ ",.01)
  1. ;;DU11BBZ
  1. ;;9002226.02101,"1804,DU11BBZ ",.02)
  1. ;;DU11BBZ
  1. ;;9002226.02101,"1804,DU11BBZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU11BCZ ",.01)
  1. ;;DU11BCZ
  1. ;;9002226.02101,"1804,DU11BCZ ",.02)
  1. ;;DU11BCZ
  1. ;;9002226.02101,"1804,DU11BCZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU11BYZ ",.01)
  1. ;;DU11BYZ
  1. ;;9002226.02101,"1804,DU11BYZ ",.02)
  1. ;;DU11BYZ
  1. ;;9002226.02101,"1804,DU11BYZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU1297Z ",.01)
  1. ;;DU1297Z
  1. ;;9002226.02101,"1804,DU1297Z ",.02)
  1. ;;DU1297Z
  1. ;;9002226.02101,"1804,DU1297Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU1298Z ",.01)
  1. ;;DU1298Z
  1. ;;9002226.02101,"1804,DU1298Z ",.02)
  1. ;;DU1298Z
  1. ;;9002226.02101,"1804,DU1298Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU1299Z ",.01)
  1. ;;DU1299Z
  1. ;;9002226.02101,"1804,DU1299Z ",.02)
  1. ;;DU1299Z
  1. ;;9002226.02101,"1804,DU1299Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU129BZ ",.01)
  1. ;;DU129BZ
  1. ;;9002226.02101,"1804,DU129BZ ",.02)
  1. ;;DU129BZ
  1. ;;9002226.02101,"1804,DU129BZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU129CZ ",.01)
  1. ;;DU129CZ
  1. ;;9002226.02101,"1804,DU129CZ ",.02)
  1. ;;DU129CZ
  1. ;;9002226.02101,"1804,DU129CZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU129YZ ",.01)
  1. ;;DU129YZ
  1. ;;9002226.02101,"1804,DU129YZ ",.02)
  1. ;;DU129YZ
  1. ;;9002226.02101,"1804,DU129YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU12B7Z ",.01)
  1. ;;DU12B7Z
  1. ;;9002226.02101,"1804,DU12B7Z ",.02)
  1. ;;DU12B7Z
  1. ;;9002226.02101,"1804,DU12B7Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU12B8Z ",.01)
  1. ;;DU12B8Z
  1. ;;9002226.02101,"1804,DU12B8Z ",.02)
  1. ;;DU12B8Z
  1. ;;9002226.02101,"1804,DU12B8Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU12B9Z ",.01)
  1. ;;DU12B9Z
  1. ;;9002226.02101,"1804,DU12B9Z ",.02)
  1. ;;DU12B9Z
  1. ;;9002226.02101,"1804,DU12B9Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU12BBZ ",.01)
  1. ;;DU12BBZ
  1. ;;9002226.02101,"1804,DU12BBZ ",.02)
  1. ;;DU12BBZ
  1. ;;9002226.02101,"1804,DU12BBZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU12BCZ ",.01)
  1. ;;DU12BCZ
  1. ;;9002226.02101,"1804,DU12BCZ ",.02)
  1. ;;DU12BCZ
  1. ;;9002226.02101,"1804,DU12BCZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU12BYZ ",.01)
  1. ;;DU12BYZ
  1. ;;9002226.02101,"1804,DU12BYZ ",.02)
  1. ;;DU12BYZ
  1. ;;9002226.02101,"1804,DU12BYZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU20DZZ ",.01)
  1. ;;DU20DZZ
  1. ;;9002226.02101,"1804,DU20DZZ ",.02)
  1. ;;DU20DZZ
  1. ;;9002226.02101,"1804,DU20DZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU20HZZ ",.01)
  1. ;;DU20HZZ
  1. ;;9002226.02101,"1804,DU20HZZ ",.02)
  1. ;;DU20HZZ
  1. ;;9002226.02101,"1804,DU20HZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU20JZZ ",.01)
  1. ;;DU20JZZ
  1. ;;9002226.02101,"1804,DU20JZZ ",.02)
  1. ;;DU20JZZ
  1. ;;9002226.02101,"1804,DU20JZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU21DZZ ",.01)
  1. ;;DU21DZZ
  1. ;;9002226.02101,"1804,DU21DZZ ",.02)
  1. ;;DU21DZZ
  1. ;;9002226.02101,"1804,DU21DZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU21HZZ ",.01)
  1. ;;DU21HZZ
  1. ;;9002226.02101,"1804,DU21HZZ ",.02)
  1. ;;DU21HZZ
  1. ;;9002226.02101,"1804,DU21HZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU21JZZ ",.01)
  1. ;;DU21JZZ
  1. ;;9002226.02101,"1804,DU21JZZ ",.02)
  1. ;;DU21JZZ
  1. ;;9002226.02101,"1804,DU21JZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU22DZZ ",.01)
  1. ;;DU22DZZ
  1. ;;9002226.02101,"1804,DU22DZZ ",.02)
  1. ;;DU22DZZ
  1. ;;9002226.02101,"1804,DU22DZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU22HZZ ",.01)
  1. ;;DU22HZZ
  1. ;;9002226.02101,"1804,DU22HZZ ",.02)
  1. ;;DU22HZZ
  1. ;;9002226.02101,"1804,DU22HZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU22JZZ ",.01)
  1. ;;DU22JZZ
  1. ;;9002226.02101,"1804,DU22JZZ ",.02)
  1. ;;DU22JZZ
  1. ;;9002226.02101,"1804,DU22JZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DUY07ZZ ",.01)
  1. ;;DUY07ZZ
  1. ;;9002226.02101,"1804,DUY07ZZ ",.02)
  1. ;;DUY07ZZ
  1. ;;9002226.02101,"1804,DUY07ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DUY08ZZ ",.01)
  1. ;;DUY08ZZ
  1. ;;9002226.02101,"1804,DUY08ZZ ",.02)
  1. ;;DUY08ZZ
  1. ;;9002226.02101,"1804,DUY08ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DUY0CZZ ",.01)
  1. ;;DUY0CZZ
  1. ;;9002226.02101,"1804,DUY0CZZ ",.02)
  1. ;;DUY0CZZ
  1. ;;9002226.02101,"1804,DUY0CZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DUY0FZZ ",.01)
  1. ;;DUY0FZZ
  1. ;;9002226.02101,"1804,DUY0FZZ ",.02)
  1. ;;DUY0FZZ
  1. ;;9002226.02101,"1804,DUY0FZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DUY17ZZ ",.01)
  1. ;;DUY17ZZ
  1. ;;9002226.02101,"1804,DUY17ZZ ",.02)
  1. ;;DUY17ZZ
  1. ;;9002226.02101,"1804,DUY17ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DUY18ZZ ",.01)
  1. ;;DUY18ZZ
  1. ;;9002226.02101,"1804,DUY18ZZ ",.02)
  1. ;;DUY18ZZ
  1. ;;9002226.02101,"1804,DUY18ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DUY1CZZ ",.01)
  1. ;;DUY1CZZ
  1. ;;9002226.02101,"1804,DUY1CZZ ",.02)
  1. ;;DUY1CZZ
  1. ;;9002226.02101,"1804,DUY1CZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DUY1FZZ ",.01)
  1. ;;DUY1FZZ
  1. ;;9002226.02101,"1804,DUY1FZZ ",.02)
  1. ;;DUY1FZZ
  1. ;;9002226.02101,"1804,DUY1FZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DUY27ZZ ",.01)
  1. ;;DUY27ZZ
  1. ;;9002226.02101,"1804,DUY27ZZ ",.02)
  1. ;;DUY27ZZ
  1. ;;9002226.02101,"1804,DUY27ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DUY28ZZ ",.01)
  1. ;;DUY28ZZ
  1. ;;9002226.02101,"1804,DUY28ZZ ",.02)
  1. ;;DUY28ZZ
  1. ;;9002226.02101,"1804,DUY28ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DUY2CZZ ",.01)
  1. ;;DUY2CZZ
  1. ;;9002226.02101,"1804,DUY2CZZ ",.02)
  1. ;;DUY2CZZ
  1. ;;9002226.02101,"1804,DUY2CZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DUY2FZZ ",.01)
  1. ;;DUY2FZZ
  1. ;;9002226.02101,"1804,DUY2FZZ ",.02)
  1. ;;DUY2FZZ
  1. ;;9002226.02101,"1804,DUY2FZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DV000ZZ ",.01)
  1. ;;DV000ZZ
  1. ;;9002226.02101,"1804,DV000ZZ ",.02)
  1. ;;DV000ZZ
  1. ;;9002226.02101,"1804,DV000ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DV001ZZ ",.01)
  1. ;;DV001ZZ
  1. ;;9002226.02101,"1804,DV001ZZ ",.02)
  1. ;;DV001ZZ
  1. ;;9002226.02101,"1804,DV001ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DV002ZZ ",.01)
  1. ;;DV002ZZ
  1. ;;9002226.02101,"1804,DV002ZZ ",.02)
  1. ;;DV002ZZ
  1. ;;9002226.02101,"1804,DV002ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DV003Z0 ",.01)
  1. ;;DV003Z0