TABLE OF CONTENTS

::pwtk::input::cardGetFlags

SYNOPSIS

proc ::pwtk::input::cardGetFlags {name {trim ""}} {

PURPOSE

Return the flags of the card.

ARGUMENTS

SOURCE

    global ::pwtk::input::card ::pwtk::input::card_flags 

    set result ""
    if { [info exists ::pwtk::input::card($name)] && [info exists ::pwtk::input::card_flags($name)] } {
        set result $::pwtk::input::card_flags($name)
    }
    
    if { $trim != "" && $trim != 0 } {  
        return [::pwtk::trimCardFlag $result]
    }
    return $result
}