NO1

    Const STS_FIRST As String = "初出"
    strSQL = strSQL & "ORDER BY [呼出ID]"

    Const TBL_PRC As String = "t03a_プロシージャ名"
    strSQL = strSQL & "AND [PrcID] NOT IN (SELECT [PRC_ID] FROM [" & TBL_PRC & "] WHERE [入口Prc]=True) "