//  j[t@C̏.pdf QƂĂD
demographs
{
    dialog_title = ʏ ;
    column_width = 440;
    column_divide = 2;
    text_item
    {
        mnemonic = ID;
        label = ID;
        characters = 0123456789-;
        ime = ascii;
        alaert = yes;
    }
    text_item
    {
        mnemonic = ;
        ime = kana;
        alaert = yes;
    }
    column_divide = 1;
    text_item
    {
        mnemonic = Ȑ;
        ime = kana;
    }
    column_divide = 2;
    radio_item
    {
        mnemonic = ;
        file = DMG-JSAI.txt#;
        alaert = yes;
    }
    text_item
    {
        mnemonic = N;
        ime = ascii;
        alaert = yes;
    }
    separator = "physical status";
    column_divide = 3;
    text_item
    {
        mnemonic = g;
        label = g(cm);
        ime = ascii;
        characters = 0123456789.;
    }
    text_item
    {
        mnemonic = ̏d;
        label = ̏d(kg);
        ime = ascii;
        characters = 0123456789.;
    }
    column_divide = 3;
    radio_item
    {
        mnemonic = ABO^;
        choice = A B O AB ;
    }
    radio_item
    {
        mnemonic = Rh^;
        choice = + - ;
    }
    radio_item
    {
        mnemonic = ASA;
        file = DMG-JSAI.txt#ASA;
        lines = 2;
    }
    radio_item
    {
        mnemonic = NYHA;
        file = DMG-JSAI.txt#NYHA;
        lines = 2;
    }
    separator = "";
    column_divide = 6;
    radio_item
    {
        mnemonic = MRSA ;
        label = "" ;
        choice = MRSA ;
    }
    radio_item
    {
        mnemonic = HBs ;
        label = "" ;
        choice = HBs ;
    }
    radio_item
    {
        mnemonic = HCV ;
        label = "" ;
        choice = HCV ;
    }
    radio_item
    {
        mnemonic = Wa ;
        label = "" ;
        choice = Wa ;
    }
    radio_item
    {
        mnemonic =  ;
        label = "" ;
        choice =  ;
    }
    
    column_divide = 3;
    separator = "fÉ";
    tree_menu_item
    {
        mnemonic = Ȗ;
        label = ;
        file = DMG-{ݕ.txt#Ȗ;
        ime = kana;
    }
    tree_menu_item
    {
        mnemonic = a;
        label = ;
        file = DMG-{ݕ.txt#a;
        ime = kana;
    }
    tree_menu_item
    {
        mnemonic = p;
        label = ;
        file = DMG-{ݕ.txt#p;
    }
    column_divide = 2;
    tree_menu_item
    {
        mnemonic = p1;
        file = DMG-l.txt;
        ime = kana;
        editable_menu = yes;
        concatenation = "/";
    }
    tree_menu_item
    {
        mnemonic = 1;
        file = DMG-l.txt;
        ime = kana;
        editable_menu = yes;
        concatenation = "/";
    }
    tree_menu_item
    {
        mnemonic = p2;
        file = DMG-l.txt;
        ime = kana;
        editable_menu = yes;
        concatenation = "/";
    }
    tree_menu_item
    {
        mnemonic = 2;
        file = DMG-l.txt;
        ime = kana;
        editable_menu = yes;
        concatenation = "/";
    }
    tree_menu_item
    {
        mnemonic = p3;
        file = DMG-l.txt;
        ime = kana;
        editable_menu = yes;
        concatenation = "/";
    }
    tree_menu_item
    {
        mnemonic = 3;
        file = DMG-l.txt;
        ime = kana;
        editable_menu = yes;
        concatenation = "/";
    }
    tree_menu_item
    {
        mnemonic = p4;
        file = DMG-l.txt;
        ime = kana;
        editable_menu = yes;
        concatenation = "/";
    }
//    tree_menu_item
//    {
//        mnemonic = w1;
//        file = DMG-l.txt;
//        ime = kana;
//        editable_menu = yes;
//        concatenation = "/";
//    }
//    tree_menu_item
//    {
//        mnemonic = p5;
//        file = DMG-l.txt;
//        ime = kana;
//        editable_menu = yes;
//        concatenation = "/";
//    }
//    tree_menu_item
//    {
//        mnemonic = w2;
//        file = DMG-l.txt;
//        ime = kana;
//        editable_menu = yes;
//        concatenation = "/";
//    }
//    tree_menu_item
//    {
//        mnemonic = p6;
//        file = DMG-l.txt;
//        ime = kana;
//        editable_menu = yes;
//        concatenation = "/";
//    }
//    tree_menu_item
//    {
//        mnemonic = w3;
//        file = DMG-l.txt;
//        ime = kana;
//        editable_menu = yes;
//        concatenation = "/";
//    }
//    tree_menu_item
//    {
//        mnemonic = 1;
//        file = DMG-l.txt;
//        ime = kana;
//        editable_menu = yes;
//        concatenation = "/";
//    }
//    tree_menu_item
//    {
//        mnemonic = 2;
//        file = DMG-l.txt;
//        ime = kana;
//        editable_menu = yes;
//        concatenation = "/";
//    }
//    tree_menu_item
//    {
//        mnemonic = 3;
//        file = DMG-l.txt;
//        ime = kana;
//        editable_menu = yes;
//        concatenation = "/";
//    }
//    tree_menu_item
//    {
//        mnemonic = Ԑ1;
//        file = DMG-l.txt;
//        ime = kana;
//        editable_menu = yes;
//        concatenation = "/";
//    }
//    tree_menu_item
//    {
//        mnemonic = Ԑ2;
//        file = DMG-l.txt;
//        ime = kana;
//        editable_menu = yes;
//        concatenation = "/";
//    }
//    tree_menu_item
//    {
//        mnemonic = Ԑ3;
//        file = DMG-l.txt;
//        ime = kana;
//        editable_menu = yes;
//        concatenation = "/";
//    }
    radio_item
    {
        mnemonic = {;
        label = {;
        file = DMG-JSAI.txt#{;
    }
    separator = "";
    column_divide = 1;
    text_item
    {
        mnemonic = pO];
        label = pO;
        lines = 5;
        ime = kana;
    }
    text_item
    {
        mnemonic = p];
        label = p;
        lines = 5;
        ime = kana;
    }
    separator = "ir`p/";
    tree_menu_item
    {
        mnemonic = p;
        file = DMG-JSAI.txt#p;
        concatenation = "/";
        ime = ascii;
    }
    tree_menu_item
    {
        mnemonic = @;
        file = DMG-JSAI.txt#@;
        ime = ascii;
    }
    separator = "ir`pOǏ";
    tree_menu_item
    {
        mnemonic = pO1;
        file = DMG-JSAI.txt#pO;
        concatenation = "/";
        ime = ascii;
    }
    tree_menu_item
    {
        mnemonic = pO2;
        file = DMG-JSAI.txt#pO;
        concatenation = "/";
        ime = ascii;
    }
    tree_menu_item
    {
        mnemonic = pO3;
        file = DMG-JSAI.txt#pO;
        concatenation = "/";
        ime = ascii;
    }
    column_width = 440;
    candidate_menu_item
    {
        mnemonic = pOa1;
        file = DMG-a.txt;
        lines = 2;
        ime = kana;
    }
    candidate_menu_item
    {
        mnemonic = pOa2;
        file = DMG-a.txt;
        lines = 2;
        ime = kana;
    }
    candidate_menu_item
    {
        mnemonic = pOa3;
        file = DMG-a.txt;
        lines = 2;
        ime = kana;
    }
    radio_item
    {
        mnemonic = \p1;
        label = "\p1";
        choice =  E ;
    }
    candidate_menu_item
    {
        mnemonic = \p1;
        label = "";
        file = DMG-p.txt;
        lines = 2;
        ime = kana;
    }
    radio_item
    {
        mnemonic = \p2;
        label = "\p2";
        choice =  E ;
    }
    candidate_menu_item
    {
        mnemonic = \p2;
        label = "";
        file = DMG-p.txt;
        lines = 2;
        ime = kana;
    }
    radio_item
    {
        mnemonic = \p3;
        label = "\p3";
        choice =  E ;
    }
    candidate_menu_item
    {
        mnemonic = \p3;
        label = "";
        file = DMG-p.txt;
        lines = 2;
        ime = kana;
    }
    separator = "";
    candidate_menu_item
    {
        mnemonic = pa1;
        file = DMG-a.txt;
        lines = 2;
        ime = kana;
    }
    candidate_menu_item
    {
        mnemonic = pa2;
        file = DMG-a.txt;
        lines = 2;
        ime = kana;
    }
    candidate_menu_item
    {
        mnemonic = pa3;
        file = DMG-a.txt;
        lines = 2;
        ime = kana;
    }
    radio_item
    {
        mnemonic = {p1;
        label = "{p1";
        choice =  E ;
    }
    candidate_menu_item
    {
        mnemonic = {p1;
        label = "";
        file = DMG-p.txt;
        lines = 2;
        ime = kana;
    }
    radio_item
    {
        mnemonic = {p2;
        label = "{p2";
        choice =  E ;
    }
    candidate_menu_item
    {
        mnemonic = {p2;
        label = "";
        file = DMG-p.txt;
        lines = 2;
        ime = kana;
    }
    radio_item
    {
        mnemonic = {p3;
        label = "{p3";
        choice =  E ;
    }
    candidate_menu_item
    {
        mnemonic = {p3;
        label = "";
        file = DMG-p.txt;
        lines = 2;
        ime = kana;
    }
}

incidents
{
    dialog_title = CVfg ;
    column_width = 600;
    column_divide = 2;
    text_item
    {
        mnemonic = pԍ;
        ime = ascii;
    }
    static_item
    {
        mnemonic = ID;
        label = ID;
    }
    static_item
    {
        mnemonic = ;
    }
    static_item
    {
        mnemonic = Ȑ;
    }
    static_item
    {
        mnemonic = ;
    }
    static_item
    {
        mnemonic = N;
    }
    separator = "p/";
    column_divide =2;
    tree_menu_item
    {
        mnemonic = p;
        file = DMG-JSAI.txt#p;
        concatenation = "/";
        ime = ascii;
    }
    tree_menu_item
    {
        mnemonic = @;
        file = DMG-JSAI.txt#@;
        ime = ascii;
    }
    separator = "pOǏ";
    column_divide = 1;
    tree_menu_item
    {
        mnemonic = pO1;
        file = DMG-JSAI.txt#pO;
        concatenation = "/";
        ime = ascii;
    }
    tree_menu_item
    {
        mnemonic = pO2;
        file = DMG-JSAI.txt#pO;
        concatenation = "/";
        ime = ascii;
    }
    tree_menu_item
    {
        mnemonic = pO3;
        file = DMG-JSAI.txt#pO;
        concatenation = "/";
        ime = ascii;
    }
    column_divide = 1;
    text_item
    {
        mnemonic = oʔl;
        ime = kana;
    }
    text_item
    {
        mnemonic = Aʔl;
        ime = kana;
    }
    separator = "Ǘ";
    tree_menu_item
    {
        mnemonic = ǂ̎;
        label = ;
        file = DMG-JSAI.txt#ǂ̎;
        concatenation = "/";
        ime = ascii;
    }
    text_item
    {
        mnemonic = ǂ̎޺;
        label = ޺;
        ime = kana;
    }
    column_divide = 2;
    tree_menu_item
    {
        mnemonic = ǂ̔ǎ;
        label = ǎ;
        file = DMG-JSAI.txt#ǔǂ̎;
        concatenation = "/";
        ime = ascii;
    }
    tree_menu_item
    {
        mnemonic = ǂ̖h~̉\;
        label = h~\;
        file = DMG-JSAI.txt#h~̉\;
        concatenation = "/";
        ime = ascii;
    }
    column_divide = 1;
    tree_menu_item
    {
        mnemonic = ǂ̓]A;
        label = ]A;
        file = DMG-JSAI.txt#]A;
        concatenation = "/";
        ime = ascii;
    }
    text_item
    {
        mnemonic = ǂ̓]A;
        label = ]A;
        ime = kana;
    }
    tree_menu_item
    {
        mnemonic = ǂ̌;
        label = 匴;
        file = DMG-JSAI.txt#ǂ̎匴;
        concatenation = "/";
        ime = ascii;
    }
    text_item
    {
        mnemonic = ǂ̌;
        label = 匴;
        ime = kana;
    }
    separator = ǂ̐;
    column_divide = 2;
    tree_menu_item
    {
        mnemonic = ǐ_pO]s\;
        label = pO]s\;
        file = DMG-JSAI.txt#ǂ̐;
        ime = ascii;
    }
    tree_menu_item
    {
        mnemonic = ǐ_ms;
        label = ms;
        file = DMG-JSAI.txt#ǂ̐;
        ime = ascii;
    }
    tree_menu_item
    {
        mnemonic = ǐ_Zps;
        label = Zps;
        file = DMG-JSAI.txt#ǂ̐;
        ime = ascii;
    }
    tree_menu_item
    {
        mnemonic = ǐ_󋵔fx;
        label = 󋵔fx;
        file = DMG-JSAI.txt#ǂ̐;
        ime = ascii;
    }
    tree_menu_item
    {
        mnemonic = ǐ_Эƹݕs;
        label = Эƹݕs;
        file = DMG-JSAI.txt#ǂ̐;
        ime = ascii;
    }
    tree_menu_item
    {
        mnemonic = ǐ_Ŏs\;
        label = Ŏs\;
        file = DMG-JSAI.txt#ǂ̐;
        ime = ascii;
    }
    tree_menu_item
    {
        mnemonic = ǐ_ߏdJ;
        label = ߏdJ;
        file = DMG-JSAI.txt#ǂ̐;
        ime = ascii;
    }
    tree_menu_item
    {
        mnemonic = ǐ_ܰs;
        label = ܰs;
        file = DMG-JSAI.txt#ǂ̐;
        ime = ascii;
    }
    tree_menu_item
    {
        mnemonic = ǐ_̑;
        label = ̑;
        file = DMG-JSAI.txt#ǂ̐;
        ime = ascii;
    }
}

//uJv޲۸ނŃXg\鍀ڂłD
// start_date stop_date start_time stop_time file_suffix ͗\łC
// IDȉ́Cdemograph̍ږłD
// display = c ͕\̏iEցj
// sort = c ͐̏łD
// -start_date͎pJn̑傫̂珬(~)ցC
// +file_suffix͎pJn̂ɂĎpԂ܂̓j^@Ԃ
// ̂傫()ցC+start_time͓pCp
// ̏ǗɂāCJnɕבւƂӖłD

open_dialog
{
//    display = start_date start_time file_suffix
//              ID  | Ȑ  Ȗ {p1 | \p1 ;
    display = start_date start_time file_suffix ID   Ȗ {p1 | \p1 ;
    prompt = t   ID    p ;
    sort = -start_date +file_suffix +start_time ;
//    search = ID  Ȑ Ȗ {p1 ;
    search = ID  Ȗ {p1 ;
}

calc
{
    ID = demograph ('ID') ;
    pԍ = demograph ('pԍ') ;
     = demograph ('') ;
    Ȑ = demograph ('Ȑ') ;
     =  | Ȑ ;
    ʕ = demograph ('') ;
    N = demograph ('N') ;
    Nߒl = age ('N') ;

// ґt@C̐NvZN
// ( P͓CN͏TCSΖ́HˁHCȏ́H )

    Nߕ = Nߒl < 0.07671 ?   Nߒl * 365 + 0.5 # 1 $ '#' :
                 Nߒl < 0.5 ?       Nߒl * 52.14 + 0.5 # 1 $ '#T' :
                 Nߒl < 4 ?         Nߒl # 1 $ '#' @ Nߒl * 12 % 12 # 1 $ '#' :
                 Nߒl # 1 $ '#' ;

    gl = demograph ('g');
    g = gl $ '  #' ;
    ̏dl = demograph ('̏d');
    ̏d = ̏dl > 10 ? (̏dl $ ' #') :
                 ̏dl > 3 ? (̏dl $ '#.#') : (̏dl $ '#.##') ;

    ABO^ = demograph ('ABO^') ;
    Rh^ = demograph ('Rh^') ;
    t^ = ABO^ @ Rh^ ;
    ASA = demograph ('ASA') ;
    NYHA = demograph ('NYHA');
    MRSA = demograph ('MRSA');
    HBs = demograph ('HBs') ;
    HCV = demograph ('HCV') ;
    Wa = demograph ('Wa') ;
     = demograph ('') ;

    Ȗ = iȖ;
    a = ia;
    p = ip;

    pOa1 = ipOa1;
    pOa2 = ipOa2;
    pOa3 = ipOa3;
    \p1 = i\p1 @ i\p1;
    \p2 = i\p2 @ i\p2;
    \p3 = i\p3 @ i\p3;
    pO] = demograph ('pO]');

    pa1 = ipa1;
    pa2 = ipa2;
    pa3 = ipa3;
    {p1 = i{p1 @ i{p1;
    {p2 = i{p2 @ i{p2;
    {p3 = i{p3 @ i{p3;
    p] = demograph ('p]');

    ҕ1 = i1;
    ҕ2 = i2;
    ҕ3 = i3;
    ҕ4 = iw1;
    ҕ5 = iw2;
    ҕ6 = iw3;

    pҕ1 = ip1;
    pҕ2 = ip2;
    pҕ3 = ip3;
    pҕ4 = ip4;
    pҕ5 = ip5;
    pҕ6 = ip6;

    ҕ1 = i1;
    ҕ2 = i2;
    ҕ3 = i3;
    Ԑڎҕ4 = iԐڎ1;
    Ԑڎҕ5 = iԐڎ2;
    Ԑڎҕ6 = iԐڎ3;
}

inout_body_weight
{
    name = ̏d ;
    write_back = yes ;
}

// Íڎw̑}ꏊ
//beginCryptDefinition (do not touch this bookmark line)
crypt = "ID" "" "Ȑ" "N" ;
//endDefinition (do not touch this bookmark line)
