Many resources are needed to download a project. Please understand that we have to compensate our server costs. Thank you in advance.
Project price only 1 $
You can buy this project and download/modify it how often you want.
com.imsweb.validation.edits.translated.naaccr.NaaccrTranslatedCompiledRules5.groovy Maven / Gradle / Ivy
package com.imsweb.validation.edits.translated.naaccr
import com.imsweb.validation.functions.MetafileContextFunctions
import com.imsweb.validation.runtime.CompiledRules
import groovy.transform.CompileStatic
@CompileStatic
class NaaccrTranslatedCompiledRules5 implements CompiledRules {
@Override
public String getValidatorId() {
return 'naaccr-translated'
}
@Override
public String getValidatorVersion() {
return 'NAACCR-011-01'
}
@Override
public Map>> getMethodParameters() {
return [
'untrimmedlines' : [Binding.class, Map.class, MetafileContextFunctions.class, List.class],
'untrimmedlines.untrimmedline' : [Binding.class, Map.class, MetafileContextFunctions.class, List.class, Map.class]
]
}
@Override
public boolean containsRuleId(String id) {
return 'NAACCR-01135' <= id && id <= 'NAACCR-01410'
}
// ID: NAACCR-01135; TAG: N0824; NAME: RX Summ--Hormone (NPCR)
public boolean naaccr01135(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummHormone))
return true
return functions.GEN_INLIST(untrimmedline.rxSummHormone, "00,01,82,85-88,99", "(\\d\\d)")
}
// ID: NAACCR-01136; TAG: N0818; NAME: RX Summ--Hormone, Date of DX (NPCR)
public boolean naaccr01136(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year < 2010) {
return true
}
if (dx_year < 2015) {
if (!(functions.GEN_INLIST(untrimmedline.primarySite, "180-189,199,209,500-509", "(C\\d\\d\\d)", 2, 3) && functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "8000-9044,9060-9136,9141-9582")))
return true
if (functions.GEN_EMPTY(untrimmedline.rxSummHormone))
return false
}
else {
if (functions.GEN_EMPTY(untrimmedline.rxSummHormone))
return functions.GEN_ERROR_MSG(binding, 'If DX year = 2015 or later, RX Summ--Hormone cannot be blank')
}
return true
}
// ID: NAACCR-01137; TAG: N0293; NAME: RX Summ--Hormone, DateDX, RptSrc (SEER IF62)
public boolean naaccr01137(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year < 2000) {
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001544", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
}
if (dx_year < 2003) {
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001562", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
}
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY)) {
if (!functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "6,7"))
return true
}
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "6")) {
if (functions.GEN_INLIST(untrimmedline.rxSummHormone, "00", "(\\d\\d)"))
return true
else
return false
}
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "7")) {
if (functions.GEN_INLIST(untrimmedline.rxSummHormone, "99", "(\\d\\d)"))
return true
else
return false
}
if (dx_year < 1988) {
if (functions.GEN_INLIST(untrimmedline.rxSummHormone, "00,01,88,99", "(\\d\\d)"))
return true
else
return false
}
else {
if ((dx_year >= 1988) && (dx_year <= 2002)) {
if (functions.GEN_INLIST(untrimmedline.rxSummHormone, "00,01,87,88,99", "(\\d\\d)"))
return true
else
return false
}
else {
if (dx_year > 2002) {
if (functions.GEN_INLIST(untrimmedline.rxSummHormone, "00,01,82,85-88,99", "(\\d\\d)"))
return true
else
return false
}
}
}
return true
}
// ID: NAACCR-01138; TAG: N1250; NAME: RX Summ--Hormone, RX Date Hormone (COC)
public boolean naaccr01138(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (functions.GEN_EMPTY(untrimmedline.rxSummHormone))
return true
if (functions.GEN_EMPTY(untrimmedline.rxDateHormone) && functions.GEN_EMPTY(untrimmedline.rxDateHormoneFlag))
return true
if (functions.GEN_INLIST(untrimmedline.rxSummHormone, "00,82,85-87")) {
if (functions.GEN_INLIST(untrimmedline.rxDateHormoneFlag, "11"))
return true
else
return functions.GEN_ERROR_MSG(binding, 'If RX Summ--Hormone = ${untrimmedline.rxSummHormone}, RX Date Hormone Flag must = 11')
}
if (functions.GEN_INLIST(untrimmedline.rxSummHormone, "01-03")) {
if (!functions.GEN_EMPTY(untrimmedline.rxDateHormone))
return true
else {
if (dx_year < 2012) {
if (functions.GEN_INLIST(untrimmedline.rxDateHormoneFlag, "10, 12"))
return true
else
return functions.GEN_ERROR_MSG(binding, 'If RX Summ--Hormone = ${untrimmedline.rxSummHormone} and RX Date Hormone is blank, if year of Date of Diagnosis < 2012, RX Date Hormone Flag must = 10 or 12')
}
else {
if (functions.GEN_INLIST(untrimmedline.rxDateHormoneFlag, "12"))
return true
else
return functions.GEN_ERROR_MSG(binding, 'If RX Summ--Hormone = ${untrimmedline.rxSummHormone} and RX Date Hormone is blank, if year of Date of Diagnosis > 2011, RX Date Hormone Flag must = 12')
}
}
}
if (functions.GEN_INLIST(untrimmedline.rxSummHormone, "88")) {
if (dx_year < 2012) {
if (functions.GEN_INLIST(untrimmedline.rxDateHormoneFlag, "10,11,12,15"))
return true
else
return functions.GEN_ERROR_MSG(binding, 'If RX Summ--Hormone = ${untrimmedline.rxSummHormone} and Date of Diagnosis < 2012, RX Date Hormone Flag must = 10, 11, 12, 15')
}
else {
if (functions.GEN_INLIST(untrimmedline.rxDateHormoneFlag, "15"))
return true
else
return functions.GEN_ERROR_MSG(binding, 'If RX Summ--Hormone = ${untrimmedline.rxSummHormone} and Date of Diagnosis > 2011, RX Date Hormone Flag must = 15')
}
}
if (functions.GEN_INLIST(untrimmedline.rxSummHormone, "99")) {
if (functions.GEN_INLIST(untrimmedline.rxDateHormoneFlag, "10"))
return true
else
return functions.GEN_ERROR_MSG(binding, 'If RX Summ--Hormone = ${untrimmedline.rxSummHormone}, RX Date Hormone Flag must = 10')
}
return true
}
// ID: NAACCR-01139; TAG: N0394; NAME: RX Summ--Hormone, RX Text--Hormone (NAACCR)
public boolean naaccr01139(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_INLIST(untrimmedline.rxSummHormone, "01")) {
if (functions.GEN_EMPTY(functions.GEN_SUBSTR(untrimmedline.rxTextHormone, 1, 79)))
return false
}
return true
}
// ID: NAACCR-01140; TAG: N0643; NAME: RX Summ--Hormone, Vital Status (COC)
public boolean naaccr01140(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_VAL(untrimmedline.rxSummHormone) == 85 && functions.GEN_VAL(untrimmedline.vitalStatus) == 1)
return false
return true
}
// ID: NAACCR-01141; TAG: N0825; NAME: RX Summ--Other (NPCR)
public boolean naaccr01141(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummOther))
return true
return functions.GEN_INLIST(untrimmedline.rxSummOther, "0-3,6-9")
}
// ID: NAACCR-01142; TAG: N0294; NAME: RX Summ--Other (SEER OTHERRX)
public boolean naaccr01142(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
return functions.GEN_INLIST(untrimmedline.rxSummOther, "0-3,6-9")
}
// ID: NAACCR-01143; TAG: N0820; NAME: RX Summ--Other, Date of DX (NPCR)
public boolean naaccr01143(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year < 2010) {
return true
}
if (dx_year < 2015) {
if (!(functions.GEN_INLIST(untrimmedline.primarySite, "180-189,199,209,500-509", "(C\\d\\d\\d)", 2, 3) && functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "8000-9044,9060-9136,9141-9582")))
return true
if (functions.GEN_EMPTY(untrimmedline.rxSummOther))
return false
}
if (dx_year > 2014) {
if (functions.GEN_EMPTY(untrimmedline.rxSummOther))
return functions.GEN_ERROR_MSG(binding, 'If DX year = 2015 or later, RX Summ--Other cannot be blank')
}
return true
}
// ID: NAACCR-01144; TAG: N0295; NAME: RX Summ--Other, DateDX, RptSrc (SEER IF64)
public boolean naaccr01144(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year < 2000) {
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001544", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
}
if (dx_year < 2003) {
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001562", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
}
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY)) {
if (!functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "6,7"))
return true
}
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "6")) {
if (functions.GEN_INLIST(untrimmedline.rxSummOther, "0"))
return true
else
return false
}
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "7")) {
if (functions.GEN_INLIST(untrimmedline.rxSummOther, "9"))
return true
else
return false
}
if (dx_year < 1988) {
if (functions.GEN_INLIST(untrimmedline.rxSummOther, "0-3,6,8,9"))
return true
else
return false
}
else {
if (dx_year > 1987) {
if (functions.GEN_INLIST(untrimmedline.rxSummOther, "0-3,6-9"))
return true
else
return false
}
}
return true
}
// ID: NAACCR-01145; TAG: N0193; NAME: RX Summ--Other, RX Date Other (NPCR)
public boolean naaccr01145(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (functions.GEN_EMPTY(untrimmedline.rxSummOther))
return true
if (functions.GEN_EMPTY(untrimmedline.rxDateOther) && functions.GEN_EMPTY(untrimmedline.rxDateOtherFlag))
return true
if (functions.GEN_INLIST(untrimmedline.rxSummOther, "0,7")) {
if (functions.GEN_INLIST(untrimmedline.rxDateOtherFlag, "11"))
return true
else
return false
}
if (functions.GEN_INLIST(untrimmedline.rxSummOther, "1-3,6")) {
if (!functions.GEN_EMPTY(untrimmedline.rxDateOther))
return true
else {
if (functions.GEN_INLIST(untrimmedline.rxDateOtherFlag, "10, 12"))
return true
else
return false
}
}
if (functions.GEN_INLIST(untrimmedline.rxSummOther, "8")) {
if (dx_year < 2015) {
if (functions.GEN_INLIST(untrimmedline.rxDateOtherFlag, "10,11,12,15"))
return true
else
return functions.GEN_ERROR_MSG(binding, 'If RX Summ--Other = ${untrimmedline.rxSummOther} and Date of Diagnosis < 2015, RX Date Other Flag must = 10, 11, 12, 15')
}
else {
if (functions.GEN_INLIST(untrimmedline.rxDateOtherFlag, "15"))
return true
else
return functions.GEN_ERROR_MSG(binding, 'If RX Summ--Other = ${untrimmedline.rxSummOther} and Date of Diagnosis > 2014, RX Date Other Flag must = 15')
}
}
if (functions.GEN_INLIST(untrimmedline.rxSummOther, "9")) {
if (functions.GEN_INLIST(untrimmedline.rxDateOtherFlag, "10, 12"))
return true
else
return false
}
return true
}
// ID: NAACCR-01146; TAG: N0395; NAME: RX Summ--Other, RX Text--Other (NAACCR)
public boolean naaccr01146(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_INLIST(untrimmedline.rxSummOther, "1-3,6")) {
if (functions.GEN_EMPTY(functions.GEN_SUBSTR(untrimmedline.rxTextOther, 1, 79)))
return false
}
return true
}
// ID: NAACCR-01147; TAG: N0514; NAME: RX Summ--Palliative Proc (COC)
public boolean naaccr01147(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_INLIST(untrimmedline.rxSummPalliativeProc, "0-7,9"))
return true
else
return false
return true
}
// ID: NAACCR-01148; TAG: N1245; NAME: RX Summ--Palliative Proc (NAACCR)
public boolean naaccr01148(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummPalliativeProc))
return true
if (functions.GEN_INLIST(untrimmedline.rxSummPalliativeProc, "0-7,9"))
return true
else
return false
return true
}
// ID: NAACCR-01149; TAG: N0223; NAME: RX Summ--Rad to CNS (SEER RBCNSYS)
public boolean naaccr01149(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummRadToCns))
return true
return functions.GEN_INLIST(untrimmedline.rxSummRadToCns, "0-1,7-9")
}
// ID: NAACCR-01150; TAG: N0235; NAME: RX Summ--Rad to CNS, Prim Site, RptSrc (SEER IF59)
public boolean naaccr01150(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year < 2000) {
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001544", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
}
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if ((dx_year < 1988) && !functions.GEN_INLIST(untrimmedline.registryId, "0000001529", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)")) {
if (functions.GEN_INLIST(untrimmedline.rxSummRadToCns, "9") || functions.GEN_EMPTY(untrimmedline.rxSummRadToCns))
return true
else
return false
}
else {
if (((dx_year >= 1988) && (dx_year <= 1997)) || ((dx_year < 1998) && functions.GEN_INLIST(untrimmedline.registryId, "0000001529", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))) {
if (functions.GEN_INLIST(untrimmedline.primarySite, "340-349", "(C\\d\\d\\d)", 2, 3) || functions.GEN_INLIST(untrimmedline.histologyIcdO2, "9800-9941")) {
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "6")) {
if (functions.GEN_INLIST(untrimmedline.rxSummRadToCns, "0"))
return true
else
return false
}
else {
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "7")) {
if (functions.GEN_INLIST(untrimmedline.rxSummRadToCns, "9"))
return true
else
return false
}
else {
if (functions.GEN_INLIST(untrimmedline.rxSummRadToCns, "0,1,7-9"))
return true
else
return false
}
}
}
else {
if (functions.GEN_INLIST(untrimmedline.rxSummRadToCns, "9"))
return true
else
return false
}
}
else {
if (dx_year > 1997) {
if (functions.GEN_INLIST(untrimmedline.rxSummRadToCns, "9") || functions.GEN_EMPTY(untrimmedline.rxSummRadToCns))
return true
else
return false
}
}
}
return true
}
// ID: NAACCR-01152; TAG: N0296; NAME: RX Summ--Radiation (SEER RADIATN)
public boolean naaccr01152(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummRadiation))
return true
return functions.GEN_INLIST(untrimmedline.rxSummRadiation, "0-9")
}
// ID: NAACCR-01153; TAG: N0234; NAME: RX Summ--Radiation, DateDX, RptSrc (SEER IF58)
public boolean naaccr01153(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR) || dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY) || dx_year >= 2018)
return true
if (dx_year < 2000) {
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001544", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
}
if (dx_year < 2003) {
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001562", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
}
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "6")) {
if (functions.GEN_INLIST(untrimmedline.rxSummRadiation, "0"))
return true
else
return false
}
else {
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "7")) {
if (functions.GEN_INLIST(untrimmedline.rxSummRadiation, "9"))
return true
else
return false
}
}
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
else {
if (dx_year < 1988 && !functions.GEN_EMPTY(untrimmedline.rxSummRadiation)) {
if (functions.GEN_INLIST(untrimmedline.rxSummRadiation, "0,1,4-6,8,9"))
return true
else
return false
}
else {
if (dx_year > 1987) {
if (functions.GEN_INLIST(untrimmedline.rxSummRadiation, "0-5, 7-9"))
return true
else
return false
}
}
}
return true
}
// ID: NAACCR-01154; TAG: N0397; NAME: Radiation, RX Text--Radiation (NAACCR)
public boolean naaccr01154(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_AT(untrimmedline.rxSummRadiation, "12345", 1) != 0 || functions.GEN_INLIST(untrimmedline.phase1RadiationTreatmentModality, "01-16,98")) {
if (functions.GEN_EMPTY(functions.GEN_SUBSTR(untrimmedline.rxTextRadiation, 1, 79)) && functions.GEN_EMPTY(functions.GEN_SUBSTR(untrimmedline.rxTextRadiationOther, 1, 79)))
return false
}
return true
}
// ID: NAACCR-01155; TAG: N0357; NAME: RX Summ--Reconstruct 1st (NAACCR)
public boolean naaccr01155(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_INLIST(untrimmedline.rxSummReconstruct1st, "0-9"))
return true
return false
}
// ID: NAACCR-01156; TAG: N0297; NAME: RX Summ--Reconstruct 1st (SEER RECONST)
public boolean naaccr01156(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummReconstruct1st))
return true
if (functions.GEN_INLIST(untrimmedline.rxSummReconstruct1st, "0-9"))
return true
return false
}
// ID: NAACCR-01157; TAG: N0340; NAME: RX Summ--Reconstruct 1st, Date of DX (COC)
public boolean naaccr01157(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if ((dx_year > 1997) && (dx_year < 2003)) {
if (functions.GEN_EMPTY(untrimmedline.rxSummReconstruct1st))
return false
}
return true
}
// ID: NAACCR-01158; TAG: N0253; NAME: RX Summ--Reconstruct 1st, Primary Site (COC)
public boolean naaccr01158(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
char[] Gpcode = new char[3], Sitelow = new char[5], Sitehigh = new char[5]
char[] Sitegrp = new char[4]
if (functions.GEN_EMPTY(untrimmedline.rxSummReconstruct1st))
return true
if (functions.GEN_RLOOKUP(untrimmedline.primarySite, context.NAACCR_SITGRP98, context.NAACCR_SITGRP98_SITELOW, ['GPCODE':Gpcode, 'SITELOW':Sitelow, 'SITEHIGH':Sitehigh])) {
if (functions.GEN_STRCMP(untrimmedline.primarySite, Sitelow) >= 0 && functions.GEN_STRCMP(untrimmedline.primarySite, Sitehigh) <= 0)
functions.GEN_STRCPY(Sitegrp, Gpcode)
else
functions.GEN_STRCPY(Sitegrp, "27")
}
else
functions.GEN_STRCPY(Sitegrp, "27")
functions.GEN_STRCAT(Sitegrp, untrimmedline.rxSummReconstruct1st)
if (functions.GEN_LOOKUP(Sitegrp, context.NAACCR_REST98, context.NAACCR_REST98_GROUPCODE, [:]))
return true
return false
}
// ID: NAACCR-01159; TAG: N0298; NAME: RX Summ--Reconstruct 1st,DateDx,RptSrc (SEER IF81)
public boolean naaccr01159(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001562,0000001563", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
if (dx_year < 2000) {
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001544", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
}
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if ((dx_year < 1998) || (dx_year > 2002)) {
if (functions.GEN_INLIST(untrimmedline.rxSummReconstruct1st, " "))
return true
else
return false
}
if (functions.GEN_INLIST(untrimmedline.primarySite, "500-509", "(C\\d\\d\\d)", 2, 3)) {
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "6")) {
if (functions.GEN_INLIST(untrimmedline.rxSummReconstruct1st, "0"))
return true
else
return false
}
else {
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "7")) {
if (functions.GEN_INLIST(untrimmedline.rxSummReconstruct1st, "9"))
return true
else
return false
}
else {
if (functions.GEN_INLIST(untrimmedline.rxSummReconstruct1st, "0-9"))
return true
else
return false
}
}
}
else {
if (functions.GEN_INLIST(untrimmedline.rxSummReconstruct1st, " "))
return true
else
return false
}
return true
}
// ID: NAACCR-01160; TAG: N0848; NAME: RX Summ--Reg LN Ex,DateDX,RptSrc,ICDO3 (SEER IF97)
public boolean naaccr01160(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year > 2017)
return true
if (functions.GEN_EMPTY(untrimmedline.histologicTypeIcdO3))
return true
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001562,0000001563", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
if (dx_year == 2003) {
if (functions.GEN_EMPTY(untrimmedline.rxSummRegLnExamined))
return true
}
if ((dx_year < 1998) || (dx_year > 2003)) {
if (functions.GEN_EMPTY(untrimmedline.rxSummRegLnExamined))
return true
else
return false
}
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "6")) {
if (functions.GEN_INLIST(untrimmedline.primarySite, "700, 710-719, 809", "(C\\d\\d\\d)", 2, 3) || functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "9590-9989")) {
if (functions.GEN_INLIST(untrimmedline.rxSummRegLnExamined, "00,99"))
return true
else
return false
}
else {
if (functions.GEN_INLIST(untrimmedline.rxSummRegLnExamined, "00"))
return true
else
return false
}
}
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "7")) {
if (functions.GEN_INLIST(untrimmedline.rxSummRegLnExamined, "99"))
return true
else
return false
}
if (functions.GEN_INLIST(untrimmedline.rxSummRegLnExamined, "00-99"))
return true
else
return false
return true
}
// ID: NAACCR-01161; TAG: N0255; NAME: RX Summ--Reg LN Examined (COC)
public boolean naaccr01161(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummRegLnExamined))
return true
return functions.GEN_INLIST(untrimmedline.rxSummRegLnExamined, "00-90, 95-99", "(\\d\\d)")
}
// ID: NAACCR-01162; TAG: N0299; NAME: RX Summ--Reg LN Examined (SEER SURGNODE)
public boolean naaccr01162(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummRegLnExamined))
return true
if (functions.GEN_INLIST(untrimmedline.rxSummRegLnExamined, "00-90, 95-99", "(\\d\\d)"))
return true
return true
}
// ID: NAACCR-01163; TAG: N0536; NAME: RX Summ--Reg LN Examined, Date of DX (COC)
public boolean naaccr01163(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year < 2003) {
if (functions.GEN_EMPTY(untrimmedline.rxSummRegLnExamined))
return false
}
return true
}
// ID: NAACCR-01164; TAG: N0554; NAME: RX Summ--Scope Reg 98-02 (COC)
public boolean naaccr01164(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummScopeReg9802))
return true
return functions.GEN_INLIST(untrimmedline.rxSummScopeReg9802, "0-9")
}
// ID: NAACCR-01165; TAG: N0555; NAME: RX Summ--Scope Reg 98-02, Date of DX (COC)
public boolean naaccr01165(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year < 2003) {
if (functions.GEN_EMPTY(untrimmedline.rxSummScopeReg9802))
return false
}
return true
}
// ID: NAACCR-01166; TAG: N0779; NAME: RX Summ--Scope Reg 98-02, Date of DX (SEER IF98)
public boolean naaccr01166(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year < 2003) {
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001562", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
}
if ((dx_year < 1998) || (dx_year > 2002)) {
if (functions.GEN_EMPTY(untrimmedline.rxSummScopeReg9802))
return true
else
return false
}
if ((dx_year >= 1998) && (dx_year <= 2002)) {
if (functions.GEN_EMPTY(untrimmedline.rxSummScopeReg9802))
return false
else
return true
}
return true
}
// ID: NAACCR-01167; TAG: N0556; NAME: RX Summ--Scope Reg 98-02, Primary Site, ICDO2 (COC)
public boolean naaccr01167(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
char[] Gpcode = new char[3], Sitelow = new char[5], Sitehigh = new char[5]
char[] Sitegrp = new char[4]
int dx_year
if (functions.GEN_EMPTY(untrimmedline.histologyIcdO2))
return true
if (functions.GEN_EMPTY(untrimmedline.rxSummScopeReg9802))
return true
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year > 2000)
return true
if (functions.GEN_RLOOKUP(untrimmedline.primarySite, context.NAACCR_SITGRP98, context.NAACCR_SITGRP98_SITELOW, ['GPCODE':Gpcode, 'SITELOW':Sitelow, 'SITEHIGH':Sitehigh])) {
if (functions.GEN_STRCMP(untrimmedline.primarySite, Sitelow) >= 0 && functions.GEN_STRCMP(untrimmedline.primarySite, Sitehigh) <= 0)
functions.GEN_STRCPY(Sitegrp, Gpcode)
else
functions.GEN_STRCPY(Sitegrp, "27")
}
else
functions.GEN_STRCPY(Sitegrp, "27")
functions.GEN_STRCAT(Sitegrp, untrimmedline.rxSummScopeReg9802)
if (!functions.GEN_LOOKUP(Sitegrp, context.NAACCR_SCOPE98, context.NAACCR_SCOPE98_GROUPCODE, [:]))
return false
if (dx_year > 1999) {
if ((functions.GEN_INLIST(untrimmedline.histologyIcdO2, "9590-9698,9702-9717") && functions.GEN_INLIST(untrimmedline.primarySite, "770-779", "(C\\d\\d\\d)", 2, 3)) || functions.GEN_INLIST(untrimmedline.histologyIcdO2, "9800-9989") || functions.GEN_INLIST(untrimmedline.primarySite, "700,710-719,809", "(C\\d\\d\\d)", 2, 3)) {
if (functions.GEN_INLIST(untrimmedline.rxSummScopeReg9802, "0,9"))
return true
else
return false
}
}
return true
}
// ID: NAACCR-01168; TAG: N0557; NAME: RX Summ--Scope Reg 98-02, Primary Site, ICDO3 (COC)
public boolean naaccr01168(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
char[] Gpcode = new char[3], Sitelow = new char[5], Sitehigh = new char[5]
char[] Sitegrp = new char[4]
int dx_year
if (functions.GEN_EMPTY(untrimmedline.histologicTypeIcdO3))
return true
if (functions.GEN_EMPTY(untrimmedline.rxSummScopeReg9802))
return true
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (functions.GEN_RLOOKUP(untrimmedline.primarySite, context.NAACCR_SITGRP98, context.NAACCR_SITGRP98_SITELOW, ['GPCODE':Gpcode, 'SITELOW':Sitelow, 'SITEHIGH':Sitehigh])) {
if (functions.GEN_STRCMP(untrimmedline.primarySite, Sitelow) >= 0 && functions.GEN_STRCMP(untrimmedline.primarySite, Sitehigh) <= 0)
functions.GEN_STRCPY(Sitegrp, Gpcode)
else
functions.GEN_STRCPY(Sitegrp, "27")
}
else
functions.GEN_STRCPY(Sitegrp, "27")
functions.GEN_STRCAT(Sitegrp, untrimmedline.rxSummScopeReg9802)
if (!functions.GEN_LOOKUP(Sitegrp, context.NAACCR_SCOPE98, context.NAACCR_SCOPE98_GROUPCODE, [:]))
return false
if ((dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY)) || (dx_year > 1999)) {
if ((functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "9590-9699,9702-9729") && functions.GEN_INLIST(untrimmedline.primarySite, "770-779", "(C\\d\\d\\d)", 2, 3)) || functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "9733,9742,9800-9989") || functions.GEN_INLIST(untrimmedline.primarySite, "700,710-719,809", "(C\\d\\d\\d)", 2, 3)) {
if (functions.GEN_INLIST(untrimmedline.rxSummScopeReg9802, "0,9"))
return true
else
return false
}
}
return true
}
// ID: NAACCR-01169; TAG: N0802; NAME: RX Summ--Scope Reg 98-02,Site,Rpt,ICDO3 (SEER IF79)
public boolean naaccr01169(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
char[] Gpcode = new char[3], Groupcode = new char[100], Sitelow = new char[5], Sitehigh = new char[5]
char[] Sitegrp = new char[5]
int dx_year
if (functions.GEN_EMPTY(untrimmedline.rxSummScopeReg9802))
return true
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year < 2000) {
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001544", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
}
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "6")) {
if (functions.GEN_INLIST(untrimmedline.primarySite, "700, 710-719, 809", "(C\\d\\d\\d)", 2, 3) || functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "9590-9989", "(\\d\\d\\d\\d)")) {
if (functions.GEN_INLIST(untrimmedline.rxSummScopeReg9802, "0,9"))
return true
else
return false
}
else {
if (functions.GEN_INLIST(untrimmedline.rxSummScopeReg9802, "0"))
return true
else
return false
}
}
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "7")) {
if (functions.GEN_INLIST(untrimmedline.rxSummScopeReg9802, "9"))
return true
else
return false
}
if (functions.GEN_RLOOKUP(untrimmedline.primarySite, context.NAACCR_SITGRP98, context.NAACCR_SITGRP98_SITELOW, ['GPCODE':Gpcode, 'SITELOW':Sitelow, 'SITEHIGH':Sitehigh])) {
if (functions.GEN_STRCMP(untrimmedline.primarySite, Sitelow) >= 0 && functions.GEN_STRCMP(untrimmedline.primarySite, Sitehigh) <= 0)
functions.GEN_STRCPY(Sitegrp, Gpcode)
else
functions.GEN_STRCPY(Sitegrp, "27")
}
else
functions.GEN_STRCPY(Sitegrp, "27")
functions.GEN_STRCAT(Sitegrp, untrimmedline.rxSummScopeReg9802)
if (functions.GEN_LOOKUP(Sitegrp, context.NAACCR_SCOPE98, context.NAACCR_SCOPE98_GROUPCODE, ['GROUPCODE':Groupcode]))
return true
return false
}
// ID: NAACCR-01170; TAG: N0252; NAME: RX Summ--Scope Reg LN Sur (COC)
public boolean naaccr01170(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
return functions.GEN_INLIST(untrimmedline.rxSummScopeRegLnSur, "0-7, 9")
}
// ID: NAACCR-01171; TAG: N0300; NAME: RX Summ--Scope Reg LN Sur (SEER SCOPE)
public boolean naaccr01171(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummScopeRegLnSur))
return true
if (functions.GEN_INLIST(untrimmedline.rxSummScopeRegLnSur, "0-7,9"))
return true
return false
}
// ID: NAACCR-01172; TAG: N0729; NAME: RX Summ--Scope Reg LN Sur, Date of DX (NPCR)
public boolean naaccr01172(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year > 2000) {
if (functions.GEN_EMPTY(untrimmedline.rxSummScopeRegLnSur))
return false
}
return true
}
// ID: NAACCR-01173; TAG: N0780; NAME: RX Summ--Scope Reg LN Sur, DateDX, RPTSRC (SEER IF100)
public boolean naaccr01173(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year < 2001) {
if (functions.GEN_EMPTY(untrimmedline.rxSummScopeRegLnSur))
return true
else
return false
}
if (dx_year >= 2001 && dx_year <= 2002 && !functions.GEN_EMPTY(untrimmedline.rxSummScopeRegLnSur)) {
if (functions.GEN_AT(untrimmedline.typeOfReportingSource, "6") != 0) {
if (functions.GEN_AT(untrimmedline.rxSummScopeRegLnSur, "90", 1) == 0)
functions.GEN_SAVE_ERROR_TEXT(binding, 'Conflict between RX Summ--Scope Reg LN Sur: ${untrimmedline.rxSummScopeRegLnSur} and Type of Reporting Source: ${untrimmedline.typeOfReportingSource}')
}
if (functions.GEN_AT(untrimmedline.typeOfReportingSource, "7") != 0) {
if (functions.GEN_AT(untrimmedline.rxSummScopeRegLnSur, "9") == 0)
functions.GEN_SAVE_ERROR_TEXT(binding, 'Conflict between RX Summ--Scope Reg LN Sur: ${untrimmedline.rxSummScopeRegLnSur} and Type of Reporting Source: ${untrimmedline.typeOfReportingSource}')
}
}
if (dx_year > 2002) {
if (functions.GEN_EMPTY(untrimmedline.rxSummScopeRegLnSur))
return false
if (functions.GEN_AT(untrimmedline.typeOfReportingSource, "6") != 0) {
if (functions.GEN_AT(untrimmedline.rxSummScopeRegLnSur, "90", 1) == 0)
functions.GEN_SAVE_ERROR_TEXT(binding, 'Conflict between RX Summ--Scope Reg LN Sur: ${untrimmedline.rxSummScopeRegLnSur} and Type of Reporting Source: ${untrimmedline.typeOfReportingSource}')
}
if (functions.GEN_AT(untrimmedline.typeOfReportingSource, "7") != 0) {
if (functions.GEN_AT(untrimmedline.rxSummScopeRegLnSur, "9") == 0)
functions.GEN_SAVE_ERROR_TEXT(binding, 'Conflict between RX Summ--Scope Reg LN Sur: ${untrimmedline.rxSummScopeRegLnSur} and Type of Reporting Source: ${untrimmedline.typeOfReportingSource}')
}
}
return true
}
// ID: NAACCR-01174; TAG: N0609; NAME: RX Summ--Scope Reg LN Sur, Site, ICDO2 (COC)
public boolean naaccr01174(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
if (functions.GEN_EMPTY(untrimmedline.histologyIcdO2))
return true
if (functions.GEN_EMPTY(untrimmedline.rxSummScopeRegLnSur))
return true
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year > 2000)
return true
if ((functions.GEN_INLIST(untrimmedline.histologyIcdO2, "9590-9595,9650-9698,9702-9717") && functions.GEN_INLIST(untrimmedline.primarySite, "770-779", "(C\\d\\d\\d)", 2, 3)) || functions.GEN_INLIST(untrimmedline.histologyIcdO2, "9720,9760-9764,9800-9820,9826,9840-9894,9910,9931-9962,9980-9989") || functions.GEN_INLIST(untrimmedline.primarySite, "420,421,423,424,700-729,760-768,809", "(C\\d\\d\\d)", 2, 3)) {
if (functions.GEN_INLIST(untrimmedline.rxSummScopeRegLnSur, "9"))
return true
else
return false
}
return true
}
// ID: NAACCR-01175; TAG: N0637; NAME: RX Summ--Scope Reg LN Sur, Site, ICDO3 (SEER IF109)
public boolean naaccr01175(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY) || dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR) || dx_year > 2017)
return true
if (functions.GEN_EMPTY(untrimmedline.histologicTypeIcdO3) || functions.GEN_EMPTY(untrimmedline.rxSummScopeRegLnSur))
return true
if (functions.GEN_INLIST(untrimmedline.primarySite, "700-729,751-753,760-768,809", "(C\\d\\d\\d)", 2, 3)) {
if (functions.GEN_INLIST(untrimmedline.rxSummScopeRegLnSur, "9"))
return true
else
return false
}
if (dx_year < 2010) {
if ((functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "9590-9729") && functions.GEN_INLIST(untrimmedline.primarySite, "770-779", "(C\\d\\d\\d)", 2, 3)) || functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "9750,9760-9764,9800-9820,9826,9831-9920,9931-9964,9980-9989") || functions.GEN_INLIST(untrimmedline.primarySite, "420,421,423,424,700-729,751-753,760-768,809", "(C\\d\\d\\d)", 2, 3)) {
if (functions.GEN_INLIST(untrimmedline.rxSummScopeRegLnSur, "9"))
return true
else
return false
}
}
if (dx_year > 2009 && dx_year < 2018) {
if ((functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "9590-9726,9728-9732,9734-9740,9750-9762,9811-9831,9940,9948,9971") && functions.GEN_INLIST(untrimmedline.primarySite, "770-779", "(C\\d\\d\\d)", 2, 3)) || functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "9727,9733,9741-9742,9764-9809,9832,9840-9931,9945-9946,9950-9967,9975-9992") || functions.GEN_INLIST(untrimmedline.primarySite, "420,421,423,424,700-729,751-753,760-768,809", "(C\\d\\d\\d)", 2, 3)) {
if (functions.GEN_INLIST(untrimmedline.rxSummScopeRegLnSur, "9"))
return true
else
return false
}
}
return true
}
// ID: NAACCR-01176; TAG: N0263; NAME: RX Summ--Surg Approch,RX Summ--Surg Site 98-02 (COC)
public boolean naaccr01176(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgicalApproch))
return true
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgSite9802))
return true
if (functions.GEN_INLIST(untrimmedline.rxSummSurgicalApproch, "0")) {
if (!functions.GEN_INLIST(untrimmedline.rxSummSurgSite9802, "00"))
return false
}
if (functions.GEN_INLIST(untrimmedline.rxSummSurgSite9802, "00")) {
if (!functions.GEN_INLIST(untrimmedline.rxSummSurgicalApproch, "0"))
return false
}
return true
}
// ID: NAACCR-01177; TAG: N0558; NAME: RX Summ--Surg Oth 98-02 (COC)
public boolean naaccr01177(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgOth9802))
return true
return functions.GEN_INLIST(untrimmedline.rxSummSurgOth9802, "0-9")
}
// ID: NAACCR-01178; TAG: N0559; NAME: RX Summ--Surg Oth 98-02, Date of DX (COC)
public boolean naaccr01178(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year < 2003) {
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgOth9802))
return false
}
return true
}
// ID: NAACCR-01179; TAG: N0781; NAME: RX Summ--Surg Oth 98-02, Date of DX (SEER IF99)
public boolean naaccr01179(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year < 2003) {
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001562", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
}
if ((dx_year < 1998) || (dx_year > 2002)) {
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgOth9802))
return true
else
return false
}
if ((dx_year >= 1998) && (dx_year <= 2002)) {
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgOth9802))
return false
else
return true
}
return true
}
// ID: NAACCR-01180; TAG: N0560; NAME: RX Summ--Surg Oth 98-02, Primary Site (COC)
public boolean naaccr01180(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
char[] Gpcode = new char[3], Sitelow = new char[5], Sitehigh = new char[5]
char[] Sitegrp = new char[5]
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgOth9802))
return true
if (functions.GEN_RLOOKUP(untrimmedline.primarySite, context.NAACCR_SITGRP98, context.NAACCR_SITGRP98_SITELOW, ['GPCODE':Gpcode, 'SITELOW':Sitelow, 'SITEHIGH':Sitehigh])) {
if (functions.GEN_STRCMP(untrimmedline.primarySite, Sitelow) >= 0 && functions.GEN_STRCMP(untrimmedline.primarySite, Sitehigh) <= 0)
functions.GEN_STRCPY(Sitegrp, Gpcode)
else
functions.GEN_STRCPY(Sitegrp, "27")
}
else
functions.GEN_STRCPY(Sitegrp, "27")
functions.GEN_STRCAT(Sitegrp, untrimmedline.rxSummSurgOth9802)
if (functions.GEN_LOOKUP(Sitegrp, context.NAACCR_SUROTH98, context.NAACCR_SUROTH98_GROUPCODE, [:]))
return true
return false
}
// ID: NAACCR-01181; TAG: N0803; NAME: RX Summ--Surg Oth 98-02,Site,Rpt,ICDO3 (SEER IF80)
public boolean naaccr01181(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
char[] Gpcode = new char[3], Groupcode = new char[100], Sitelow = new char[5], Sitehigh = new char[5]
char[] Sitegrp = new char[5]
int dx_year
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgOth9802))
return true
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year < 2000) {
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001544", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
}
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "6")) {
if (functions.GEN_INLIST(untrimmedline.primarySite, "700, 710-719, 809", "(C\\d\\d\\d)", 2, 3) || functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "9590-9989", "(\\d\\d\\d\\d)")) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgOth9802, "0,9"))
return true
else
return false
}
else {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgOth9802, "0"))
return true
else
return false
}
}
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "7")) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgOth9802, "9"))
return true
else
return false
}
if (functions.GEN_RLOOKUP(untrimmedline.primarySite, context.NAACCR_SITGRP98, context.NAACCR_SITGRP98_SITELOW, ['GPCODE':Gpcode, 'SITELOW':Sitelow, 'SITEHIGH':Sitehigh])) {
if (functions.GEN_STRCMP(untrimmedline.primarySite, Sitelow) >= 0 && functions.GEN_STRCMP(untrimmedline.primarySite, Sitehigh) <= 0)
functions.GEN_STRCPY(Sitegrp, Gpcode)
else
functions.GEN_STRCPY(Sitegrp, "27")
}
else
functions.GEN_STRCPY(Sitegrp, "27")
functions.GEN_STRCAT(Sitegrp, untrimmedline.rxSummSurgOth9802)
if (functions.GEN_LOOKUP(Sitegrp, context.NAACCR_SUROTH98, context.NAACCR_SUROTH98_GROUPCODE, ['GROUPCODE':Groupcode]))
return true
return false
}
// ID: NAACCR-01182; TAG: N0254; NAME: RX Summ--Surg Oth Reg/Dis (COC)
public boolean naaccr01182(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
return functions.GEN_INLIST(untrimmedline.rxSummSurgOthRegDis, "0-5,9")
}
// ID: NAACCR-01183; TAG: N0301; NAME: RX Summ--Surg Oth Reg/Dis (SEER SURGOTH)
public boolean naaccr01183(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgOthRegDis))
return true
if (functions.GEN_INLIST(untrimmedline.rxSummSurgOthRegDis, "0-5,9"))
return true
return false
}
// ID: NAACCR-01184; TAG: N0730; NAME: RX Summ--Surg Oth Reg/Dis, Date of DX (NPCR)
public boolean naaccr01184(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year > 2000) {
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgOthRegDis))
return false
}
return true
}
// ID: NAACCR-01185; TAG: N0782; NAME: RX Summ--Surg Oth Reg/Dis, DateDX, RPTSRC (SEER IF101)
public boolean naaccr01185(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year < 2003) {
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgOthRegDis))
return true
else {
return false
}
}
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgOthRegDis))
return false
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "6")) {
if (functions.GEN_INLIST(untrimmedline.primarySite, "700, 710-719, 809", "(C\\d\\d\\d)", 2, 3) || functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "9590-9993", "(\\d\\d\\d\\d)")) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgOthRegDis, "0,9"))
return true
else
return false
}
else {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgOthRegDis, "0"))
return true
else
return false
}
}
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "7")) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgOthRegDis, "9"))
return true
else
return false
}
return true
}
// ID: NAACCR-01186; TAG: N0124; NAME: RX Summ--Surg Prim Site (COC)
public boolean naaccr01186(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
return functions.GEN_INLIST(untrimmedline.rxSummSurgPrimSite, "00, 10-90, 98, 99", "(\\d\\d)")
}
// ID: NAACCR-01187; TAG: N0302; NAME: RX Summ--Surg Prim Site (SEER SURGPRIM)
public boolean naaccr01187(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgPrimSite))
return true
if (functions.GEN_INLIST(untrimmedline.rxSummSurgPrimSite, "00,10-90, 98, 99"))
return true
return false
}
// ID: NAACCR-01188; TAG: N0728; NAME: RX Summ--Surg Prim Site, Date of DX (NPCR)
public boolean naaccr01188(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year > 2000) {
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgPrimSite))
return false
}
return true
}
// ID: NAACCR-01189; TAG: N0599; NAME: RX Summ--Surg Prim Site, DateDX, RPTSRC (SEER IF102)
public boolean naaccr01189(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year < 2003) {
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001562,0000001563", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
}
if (dx_year < 1998) {
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgPrimSite))
return true
else
return false
}
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY)) {
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgPrimSite))
return false
else
return true
}
if (dx_year > 1997) {
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgPrimSite))
return false
if (functions.GEN_AT(untrimmedline.typeOfReportingSource, "6") != 0) {
if (functions.GEN_AT(untrimmedline.rxSummSurgPrimSite, "0098", 2) == 0)
functions.GEN_SAVE_ERROR_TEXT(binding, 'Conflict between RX Summ--Surg Prim Site (${untrimmedline.rxSummSurgPrimSite}) and Type of Reporting Source (${untrimmedline.typeOfReportingSource})')
}
if (functions.GEN_AT(untrimmedline.typeOfReportingSource, "7") != 0) {
if (functions.GEN_AT(untrimmedline.rxSummSurgPrimSite, "9899", 2) == 0)
functions.GEN_SAVE_ERROR_TEXT(binding, 'Conflict between RX Summ--Surg Prim Site (${untrimmedline.rxSummSurgPrimSite}) and Type of Reporting Source (${untrimmedline.typeOfReportingSource})')
}
}
return true
}
// ID: NAACCR-01190; TAG: N0303; NAME: RX Summ--Surg Prim Site, Diag Conf (SEER IF76)
public boolean naaccr01190(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgPrimSite))
return true
if (functions.GEN_INLIST(untrimmedline.overRideSurgDxconf, "1"))
return true
if (functions.GEN_INLIST(untrimmedline.rxSummSurgPrimSite, "20-90")) {
if (!functions.GEN_INLIST(untrimmedline.diagnosticConfirmation, "1-4"))
return false
}
return true
}
// ID: NAACCR-01191; TAG: N0598; NAME: RX Summ--Surg Prim Site, Primary Site, ICDO2 (COC)
public boolean naaccr01191(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
char[] Gpcode = new char[3], Sitelow = new char[5], Sitehigh = new char[5]
char[] Sitegrp = new char[5]
int dx_year
if (functions.GEN_EMPTY(untrimmedline.histologyIcdO2))
return true
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgPrimSite))
return true
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year > 2000) {
return true
}
if (functions.GEN_INLIST(untrimmedline.histologyIcdO2, "9720,9760-9764,9800-9820,9826,9840-9894,9910,9931-9962,9980-9989")) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgPrimSite, "98"))
return true
else {
return false
}
}
if (functions.GEN_INLIST(untrimmedline.primarySite, "420,421,423,424,760-768,809", "(C\\d\\d\\d)", 2, 3)) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgPrimSite, "98"))
return true
else
return false
}
if (functions.GEN_RLOOKUP(untrimmedline.primarySite, context.NAACCR_SITGRP03, context.NAACCR_SITGRP03_SITELOW, ['GPCODE':Gpcode, 'SITELOW':Sitelow, 'SITEHIGH':Sitehigh])) {
if (functions.GEN_STRCMP(untrimmedline.primarySite, Sitelow) >= 0 && functions.GEN_STRCMP(untrimmedline.primarySite, Sitehigh) <= 0)
functions.GEN_STRCPY(Sitegrp, Gpcode)
else
functions.GEN_STRCPY(Sitegrp, "30")
}
else {
functions.GEN_STRCPY(Sitegrp, "30")
}
if (functions.GEN_INLIST(Sitegrp, "30") && functions.GEN_INLIST(untrimmedline.rxSummSurgPrimSite, "41")) {
if (functions.GEN_INLIST(untrimmedline.primarySite, "690-699", "(C\\d\\d\\d)", 2, 3))
return true
else
return false
}
functions.GEN_STRCAT(Sitegrp, untrimmedline.rxSummSurgPrimSite)
if (functions.GEN_LOOKUP(Sitegrp, context.NAACCR_SURG03, context.NAACCR_SURG03_GROUPCODE, [:]))
return true
return false
}
// ID: NAACCR-01192; TAG: N0596; NAME: RX Summ--Surg Prim Site, Primary Site, ICDO3 (COC)
public boolean naaccr01192(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
char[] Gpcode = new char[3], Sitelow = new char[5], Sitehigh = new char[5]
char[] Sitegrp = new char[5]
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY) || dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return true
if (dx_year > 2017)
return true
if (functions.GEN_EMPTY(untrimmedline.histologicTypeIcdO3))
return true
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgPrimSite)) {
return true
}
if (dx_year < 2010) {
if (functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "9750,9760-9764,9800-9820,9826,9831-9920,9931-9964,9980-9989")) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgPrimSite, "98"))
return true
else
return false
}
}
if (dx_year > 2009 && dx_year < 2018) {
if (functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "9727,9733,9741-9742,9764-9809,9832,9840-9931,9945-9946,9950-9967,9975-9992")) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgPrimSite, "98"))
return true
else
return false
}
}
if (functions.GEN_INLIST(untrimmedline.primarySite, "420,421,423,424,760-768, 809", "(C\\d\\d\\d)", 2, 3)) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgPrimSite, "98"))
return true
else {
return false
}
}
if (functions.GEN_RLOOKUP(untrimmedline.primarySite, context.NAACCR_SITGRP03, context.NAACCR_SITGRP03_SITELOW, ['GPCODE':Gpcode, 'SITELOW':Sitelow, 'SITEHIGH':Sitehigh])) {
if (functions.GEN_STRCMP(untrimmedline.primarySite, Sitelow) >= 0 && functions.GEN_STRCMP(untrimmedline.primarySite, Sitehigh) <= 0)
functions.GEN_STRCPY(Sitegrp, Gpcode)
else
functions.GEN_STRCPY(Sitegrp, "30")
}
else {
functions.GEN_STRCPY(Sitegrp, "30")
}
if (functions.GEN_INLIST(Sitegrp, "30") && functions.GEN_INLIST(untrimmedline.rxSummSurgPrimSite, "41")) {
if (functions.GEN_INLIST(untrimmedline.primarySite, "690-699", "(C\\d\\d\\d)", 2, 3))
return true
else
return false
}
functions.GEN_STRCAT(Sitegrp, untrimmedline.rxSummSurgPrimSite)
if (functions.GEN_LOOKUP(Sitegrp, context.NAACCR_SURG03, context.NAACCR_SURG03_GROUPCODE, [:]))
return true
return false
}
// ID: NAACCR-01193; TAG: N0600; NAME: RX Summ--Surg Prim Site, Site, ICDO3 (SEER IF108)
public boolean naaccr01193(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
char[] Gpcode = new char[3], Sitelow = new char[5], Sitehigh = new char[5]
char[] Sitegrp = new char[5]
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY) || dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return true
if (dx_year > 2017)
return true
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgPrimSite)) {
return true
}
if (functions.GEN_INLIST(untrimmedline.rxSummSurgPrimSite, "99")) {
return true
}
if (dx_year < 2010) {
if (functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "9750,9760-9764,9800-9820,9826,9831-9920,9931-9964,9980-9989")) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgPrimSite, "98,99"))
return true
else
return false
}
}
if (dx_year > 2009 && dx_year < 2018) {
if (functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "9727,9733,9741-9742,9764-9809,9832,9840-9931,9945-9946,9950-9967,9975-9992")) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgPrimSite, "98,99"))
return true
else
return false
}
}
if (functions.GEN_RLOOKUP(untrimmedline.primarySite, context.NAACCR_SITGRP03, context.NAACCR_SITGRP03_SITELOW, ['GPCODE':Gpcode, 'SITELOW':Sitelow, 'SITEHIGH':Sitehigh])) {
if (functions.GEN_STRCMP(untrimmedline.primarySite, Sitelow) >= 0 && functions.GEN_STRCMP(untrimmedline.primarySite, Sitehigh) <= 0)
functions.GEN_STRCPY(Sitegrp, Gpcode)
else
functions.GEN_STRCPY(Sitegrp, "30")
}
else {
functions.GEN_STRCPY(Sitegrp, "30")
}
if (functions.GEN_INLIST(Sitegrp, "30") && functions.GEN_INLIST(untrimmedline.rxSummSurgPrimSite, "41")) {
if (functions.GEN_INLIST(untrimmedline.primarySite, "690-699", "(C\\d\\d\\d)", 2, 3))
return true
else
return false
}
functions.GEN_STRCAT(Sitegrp, untrimmedline.rxSummSurgPrimSite)
if (functions.GEN_LOOKUP(Sitegrp, context.NAACCR_SURG03, context.NAACCR_SURG03_GROUPCODE, [:]))
return true
return false
}
// ID: NAACCR-01194; TAG: N0545; NAME: RX Summ--Surg Site 98-02 (COC)
public boolean naaccr01194(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgSite9802))
return true
return functions.GEN_INLIST(untrimmedline.rxSummSurgSite9802, "00, 10-90, 99", "(\\d\\d)")
}
// ID: NAACCR-01195; TAG: N0547; NAME: RX Summ--Surg Site 98-02, Date of DX (COC)
public boolean naaccr01195(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year < 2003) {
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgSite9802))
return false
}
return true
}
// ID: NAACCR-01196; TAG: N0783; NAME: RX Summ--Surg Site 98-02, Date of DX (SEER IF103)
public boolean naaccr01196(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year < 2003) {
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001562", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
}
if ((dx_year < 1998) || (dx_year > 2002)) {
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgSite9802))
return true
else
return false
}
if ((dx_year >= 1998) && (dx_year <= 2002)) {
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgSite9802))
return false
else
return true
}
return true
}
// ID: NAACCR-01197; TAG: N0635; NAME: RX Summ--Surg Site 98-02, Diag Conf (SEER IF106)
public boolean naaccr01197(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY) || dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR) || (dx_year < 1998 && dx_year > 2002))
return true
if (functions.GEN_AT(untrimmedline.registryId, "0000001544") != 0 && (dx_year == 1998 || dx_year == 1999))
functions.GEN_NOOP()
return true
if (functions.GEN_AT(untrimmedline.registryId, "0000001562") != 0)
return true
if (functions.GEN_INLIST(untrimmedline.overRideSurgDxconf, "1"))
return true
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgPrimSite))
return true
if (functions.GEN_INLIST(untrimmedline.rxSummSurgPrimSite, "10-90")) {
if (!functions.GEN_INLIST(untrimmedline.diagnosticConfirmation, "1,2,4"))
return false
}
return true
}
// ID: NAACCR-01198; TAG: N0546; NAME: RX Summ--Surg Site 98-02, Primary Site (COC)
public boolean naaccr01198(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
char[] Gpcode = new char[3], Sitelow = new char[5], Sitehigh = new char[5]
char[] Sitegrp = new char[5]
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgSite9802))
return true
if (functions.GEN_RLOOKUP(untrimmedline.primarySite, context.NAACCR_SITGRP98, context.NAACCR_SITGRP98_SITELOW, ['GPCODE':Gpcode, 'SITELOW':Sitelow, 'SITEHIGH':Sitehigh])) {
if (functions.GEN_STRCMP(untrimmedline.primarySite, Sitelow) >= 0 && functions.GEN_STRCMP(untrimmedline.primarySite, Sitehigh) <= 0)
functions.GEN_STRCPY(Sitegrp, Gpcode)
else
functions.GEN_STRCPY(Sitegrp, "27")
}
else
functions.GEN_STRCPY(Sitegrp, "27")
functions.GEN_STRCAT(Sitegrp, untrimmedline.rxSummSurgSite9802)
if (functions.GEN_LOOKUP(Sitegrp, context.NAACCR_SURG98, context.NAACCR_SURG98_GROUPCODE, [:]))
return true
return false
}
// ID: NAACCR-01199; TAG: N0726; NAME: RX Summ--Surg Site 98-02, RX Summ--Surg Site (COC)
public boolean naaccr01199(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgSite9802) || functions.GEN_EMPTY(untrimmedline.rxSummSurgPrimSite))
return true
if (functions.GEN_INLIST(untrimmedline.rxSummSurgSite9802, "00")) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgPrimSite, "10-90,99"))
return false
}
if (functions.GEN_INLIST(untrimmedline.rxSummSurgSite9802, "10-90,99")) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgPrimSite, "00"))
return false
}
return true
}
// ID: NAACCR-01200; TAG: N0633; NAME: RX Summ--Surg Site 98-02, Site, RptSrc (SEER IF78)
public boolean naaccr01200(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
char[] Gpcode = new char[3], Groupcode = new char[100], Sitelow = new char[5], Sitehigh = new char[5]
char[] Sitegrp = new char[5]
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year < 2000) {
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001544", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
}
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgSite9802))
return true
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "6")) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgSite9802, "00"))
return true
else
return false
}
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "7")) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgSite9802, "99"))
return true
else
return false
}
if (functions.GEN_RLOOKUP(untrimmedline.primarySite, context.NAACCR_SITGRP98, context.NAACCR_SITGRP98_SITELOW, ['GPCODE':Gpcode, 'SITELOW':Sitelow, 'SITEHIGH':Sitehigh])) {
if (functions.GEN_STRCMP(untrimmedline.primarySite, Sitelow) >= 0 && functions.GEN_STRCMP(untrimmedline.primarySite, Sitehigh) <= 0)
functions.GEN_STRCPY(Sitegrp, Gpcode)
else
functions.GEN_STRCPY(Sitegrp, "27")
}
else
functions.GEN_STRCPY(Sitegrp, "27")
functions.GEN_STRCAT(Sitegrp, untrimmedline.rxSummSurgSite9802)
if (functions.GEN_LOOKUP(Sitegrp, context.NAACCR_SURG98, context.NAACCR_SURG98_GROUPCODE, ['GROUPCODE':Groupcode]))
return true
return false
}
// ID: NAACCR-01201; TAG: N0815; NAME: RX Summ--Surg/Rad Seq (NPCR)
public boolean naaccr01201(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgRadSeq))
return true
return functions.GEN_INLIST(untrimmedline.rxSummSurgRadSeq, "0,2-7,9")
}
// ID: NAACCR-01202; TAG: N0224; NAME: RX Summ--Surg/Rad Seq (SEER RADSEQ)
public boolean naaccr01202(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
return functions.GEN_INLIST(untrimmedline.rxSummSurgRadSeq, "0,2-7,9")
}
// ID: NAACCR-01203; TAG: N2352; NAME: RX Summ--Surg/Rad Seq, Date of DX (NPCR)
public boolean naaccr01203(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year < 2010)
return true
if (dx_year < 2015) {
if (functions.GEN_INLIST(untrimmedline.primarySite, "180-189,199,209,500-509", "(C\\d\\d\\d)", 2, 3) && functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "8000-9044,9060-9136,9141-9582")) {
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgRadSeq))
functions.GEN_SAVE_ERROR_TEXT(binding, 'If DX year - 2012-2014, Primary Site = ${untrimmedline.primarySite} and Histologic Type ICD-O-3 = ${untrimmedline.histologicTypeIcdO3}, RX Summ--Surg/Rad Seq cannot be blank')
}
}
if (dx_year > 2014) {
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgRadSeq))
return false
}
return true
}
// ID: NAACCR-01204; TAG: N0304; NAME: RX Summ--Surg/Rad Seq, DateDX, RptSrc (SEER IF60)
public boolean naaccr01204(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year < 2000) {
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001544", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
}
if (dx_year < 2003) {
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001562", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
}
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "6,7")) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgRadSeq, "0"))
return true
else
return false
}
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY)) {
return true
}
if (dx_year < 1988) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgRadSeq, "0,2-4,9"))
return true
else
return false
}
else {
if (dx_year > 1987 && dx_year < 2012) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgRadSeq, "0,2-6,9"))
return true
else
return false
}
else {
if (dx_year > 2011) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgRadSeq, "0,2-7,9"))
return true
else
return false
}
}
}
return true
}
// ID: NAACCR-01205; TAG: N0225; NAME: RX Summ--Surgery Type (SEER SURGRX)
public boolean naaccr01205(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgeryType))
return true
if (functions.GEN_INLIST(untrimmedline.rxSummSurgeryType, "00-99", "(\\d\\d)"))
return true
return false
}
// ID: NAACCR-01206; TAG: N0305; NAME: RX Summ--Surgery Type, Diag Conf (SEER IF46)
public boolean naaccr01206(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year < 2000) {
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001544", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
}
if (functions.GEN_INLIST(untrimmedline.overRideSurgDxconf, "1"))
return true
if (functions.GEN_INLIST(untrimmedline.rxSummSurgeryType, "01,02,05-07,10-98", "(\\d\\d)")) {
if (!functions.GEN_INLIST(untrimmedline.diagnosticConfirmation, "1,2,4"))
return false
}
return true
}
// ID: NAACCR-01207; TAG: N0227; NAME: RX Summ--Surgery Type, Radiation (SEER IF44)
public boolean naaccr01207(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int surg_num
boolean result
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgeryType))
return true
surg_num = functions.GEN_VAL(untrimmedline.rxSummSurgeryType)
if (surg_num > 9 && (functions.GEN_INLIST(untrimmedline.rxSummRadiation, "1-6") || functions.GEN_INLIST(untrimmedline.rxSummRadToCns, "1"))) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgRadSeq, "2-6,9"))
result = true
else
result = false
}
else {
if (surg_num < 10 || functions.GEN_INLIST(untrimmedline.rxSummRadiation, "0")) {
if (functions.GEN_VAL(untrimmedline.rxSummSurgRadSeq) == 0)
result = true
else
result = false
}
else
result = true
}
return result
}
// ID: NAACCR-01208; TAG: N0226; NAME: RX Summ--Surgery Type, Site, RptSrc (SEER IF29)
public boolean naaccr01208(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int rule_yr, site_num, surg_num
int dx_year
char[] w_SiteSurg = new char[7]
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001541", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)")) {
if (dx_year < 1998)
return true
}
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001544", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)")) {
if (dx_year < 2000)
return true
}
if (functions.GEN_INLIST(untrimmedline.registryId, "0000001562,0000001563", "(\\d\\d\\d\\d\\d\\d\\d\\d\\d\\d)"))
return true
if (dx_year > 1997) {
if (!(functions.GEN_EMPTY(untrimmedline.rxSummSurgeryType)))
return false
else
return true
}
if (dx_year < 1998) {
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "6")) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgeryType, "00"))
return true
else
return false
}
else {
if (functions.GEN_INLIST(untrimmedline.typeOfReportingSource, "7")) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgeryType, "09"))
return true
else
return false
}
}
}
if (!(functions.GEN_MATCH(untrimmedline.primarySite, "(C\\d\\d\\d)") && functions.GEN_MATCH(untrimmedline.rxSummSurgeryType, "(\\d\\d)")))
return false /* error flag 359 */
site_num = functions.GEN_VAL(functions.GEN_RIGHT(untrimmedline.primarySite, 3))
surg_num = functions.GEN_VAL(untrimmedline.rxSummSurgeryType)
if (site_num >= 540 && site_num <= 549 && dx_year > 1989 && surg_num == 35) {
return true
}
if (site_num >= 530 && site_num <= 539 && ((dx_year > 1989 && surg_num == 35) || (dx_year > 1990 && surg_num == 17))) {
return true
}
if ((site_num >= 700 && site_num <= 729) && (dx_year >= 1992 && dx_year <= 1997) && (surg_num == 35 || surg_num == 55)) {
return false
}
if (site_num >= 440 && site_num <= 449 && !(functions.GEN_INLIST(untrimmedline.histologyIcdO2, "8702-8790", "(\\d\\d\\d\\d)")) && dx_year < 1988 && !(surg_num == 9 || surg_num == 90)) {
return false
}
if (site_num >= 530 && site_num <= 539 && (dx_year > 1987 && surg_num == 15) && (functions.GEN_STRCMP(untrimmedline.behaviorIcdO2, "2") != 0)) {
return false
}
if (((site_num >= 500 && site_num <= 509) && functions.GEN_INLIST(untrimmedline.behaviorIcdO2, "2")) || functions.GEN_INLIST(untrimmedline.registryId, "0000001529"))
rule_yr = 1988
else {
rule_yr = dx_year
if (rule_yr < 1983) {
if (!functions.GEN_INLIST(untrimmedline.rxSummSurgeryType, "09,90"))
return false
}
else {
functions.GEN_STRCPY(w_SiteSurg, untrimmedline.primarySite)
functions.GEN_STRCAT(w_SiteSurg, untrimmedline.rxSummSurgeryType)
if (rule_yr < 1988)
return functions.GEN_ILOOKUP(w_SiteSurg, context.NAACCR_IF29_1, context.NAACCR_IF29_1_SITESURG, [:])
else
return functions.GEN_ILOOKUP(w_SiteSurg, context.NAACCR_IF29_2, context.NAACCR_IF29_2_SITESURG, [:])
}
}
return true
}
// ID: NAACCR-01209; TAG: N0493; NAME: RX Summ--Surgery, Reason for No Surgery (SEER IF51)
public boolean naaccr01209(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY) || dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR) || dx_year > 1997) {
return true
}
if (functions.GEN_INLIST(untrimmedline.rxSummSurgeryType, "01-07", "(\\d\\d)")) {
if (!functions.GEN_INLIST(untrimmedline.reasonForNoSurgery, "1,2,6-8"))
return false
}
if (functions.GEN_VAL(untrimmedline.rxSummSurgeryType) > 9) {
if (functions.GEN_STRCMP(untrimmedline.reasonForNoSurgery, "0") != 0)
return false
}
return true
}
// ID: NAACCR-01210; TAG: N0174; NAME: RX Summ--Surgical Approch (COC)
public boolean naaccr01210(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgicalApproch))
return true
return functions.GEN_INLIST(untrimmedline.rxSummSurgicalApproch, "0-9")
}
// ID: NAACCR-01211; TAG: N0576; NAME: RX Summ--Surgical Approch, Date of DX (COC)
public boolean naaccr01211(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year < 2003) {
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgicalApproch))
return false
}
return true
}
// ID: NAACCR-01212; TAG: N0256; NAME: RX Summ--Surgical Approch, Primary Site (COC)
public boolean naaccr01212(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
char[] Gpcode = new char[3], Sitelow = new char[5], Sitehigh = new char[5]
char[] Sitegrp = new char[5]
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgicalApproch))
return true
if (functions.GEN_RLOOKUP(untrimmedline.primarySite, context.NAACCR_SITGRP98, context.NAACCR_SITGRP98_SITELOW, ['GPCODE':Gpcode, 'SITELOW':Sitelow, 'SITEHIGH':Sitehigh])) {
if (functions.GEN_STRCMP(untrimmedline.primarySite, Sitelow) >= 0 && functions.GEN_STRCMP(untrimmedline.primarySite, Sitehigh) <= 0)
functions.GEN_STRCPY(Sitegrp, Gpcode)
else
functions.GEN_STRCPY(Sitegrp, "27")
}
else
functions.GEN_STRCPY(Sitegrp, "27")
functions.GEN_STRCAT(Sitegrp, untrimmedline.rxSummSurgicalApproch)
if (functions.GEN_LOOKUP(Sitegrp, context.NAACCR_SURAPP98, context.NAACCR_SURAPP98_GROUPCODE, ['GPCODE':Gpcode]))
return true
return false
}
// ID: NAACCR-01213; TAG: N0069; NAME: RX Summ--Surgical Margins (COC)
public boolean naaccr01213(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
return functions.GEN_INLIST(untrimmedline.rxSummSurgicalMargins, "0-3, 7-9")
}
// ID: NAACCR-01214; TAG: N1246; NAME: RX Summ--Surgical Margins (NAACCR)
public boolean naaccr01214(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummSurgicalMargins))
return true
return functions.GEN_INLIST(untrimmedline.rxSummSurgicalMargins, "0-3, 7-9")
}
// ID: NAACCR-01215; TAG: N0608; NAME: RX Summ--Surgical Margins, Primary Site, ICDO2 (COC)
public boolean naaccr01215(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
if (functions.GEN_EMPTY(untrimmedline.histologyIcdO2))
return true
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR))
return functions.GEN_ERROR_TEXT(binding, 'Date of Diagnosis: %DC')
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY))
return true
if (dx_year > 2000)
return true
if (functions.GEN_INLIST(untrimmedline.histologyIcdO2, "9720,9760-9764,9800-9820,9826,9840-9894,9910,9931-9962,9980-9989")) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgicalMargins, "9"))
return true
else
return functions.GEN_ERROR_MSG(binding, 'RX Summ--Surgical Margins must = 9 for this site/histology')
}
if (functions.GEN_INLIST(untrimmedline.primarySite, "420,421,423,424,760-768, 809", "(C\\d\\d\\d)", 2, 3)) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgicalMargins, "9"))
return true
else
return functions.GEN_ERROR_MSG(binding, 'RX Summ--Surgical Margins must = 9 for this site/histology')
}
if (functions.GEN_INLIST(untrimmedline.histologyIcdO2, "9590-9595, 9650-9698, 9702-9717 ")) {
if (functions.GEN_INLIST(untrimmedline.primarySite, "770-779", "(C\\d\\d\\d)", 2, 3)) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgicalMargins, "9"))
return true
else
return functions.GEN_ERROR_MSG(binding, 'RX Summ--Surgical Margins must = 9 for this site/histology')
}
}
if (functions.GEN_VAL(untrimmedline.rxSummSurgicalMargins) == 8) {
if (functions.GEN_VAL(untrimmedline.rxSummSurgPrimSite) != 0)
return false
}
if (functions.GEN_VAL(untrimmedline.rxSummSurgPrimSite) == 0) {
if (functions.GEN_VAL(untrimmedline.rxSummSurgicalMargins) != 8)
return false
}
return true
}
// ID: NAACCR-01216; TAG: N0607; NAME: RX Summ--Surgical Margins, Primary Site, ICDO3 (COC)
public boolean naaccr01216(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
int dx_year
dx_year = functions.GEN_DATE_YEAR_IOP(binding, untrimmedline.dateOfDiagnosis)
if (dx_year == ((Integer)context.NAACCR_GEN_DT_EMPTY) || dx_year == ((Integer)context.NAACCR_GEN_DT_ERROR) || dx_year > 2017)
return true
if (functions.GEN_EMPTY(untrimmedline.histologicTypeIcdO3) || functions.GEN_EMPTY(untrimmedline.rxSummSurgicalMargins))
return true
if (dx_year < 2010) {
if (functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "9750,9760-9764,9800-9820,9826,9831-9920,9931-9964,9980-9989")) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgicalMargins, "9"))
return true
else
return functions.GEN_ERROR_MSG(binding, 'RX Summ--Surgical Margins must = 9 for this site/histology')
}
}
if (dx_year > 2009 && dx_year < 2018) {
if (functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "9727,9733,9741-9742,9764-9809,9832,9840-9931,9945-9946,9950-9967,9975-9992")) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgicalMargins, "9"))
return true
else
return functions.GEN_ERROR_MSG(binding, 'RX Summ--Surgical Margins must = 9 for this site/histology')
}
}
if (functions.GEN_INLIST(untrimmedline.primarySite, "420,421,423,424,760-768, 809", "(C\\d\\d\\d)", 2, 3)) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgicalMargins, "9"))
return true
else
return functions.GEN_ERROR_MSG(binding, 'RX Summ--Surgical Margins must = 9 for this site/histology')
}
if (dx_year < 2010) {
if (functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "9590-9596,9650-9699,9702-9719,9727-9729")) {
if (functions.GEN_INLIST(untrimmedline.primarySite, "770-779", "(C\\d\\d\\d)", 2, 3)) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgicalMargins, "9"))
return true
else
return functions.GEN_ERROR_MSG(binding, 'RX Summ--Surgical Margins must = 9 for this site/histology')
}
}
}
if (dx_year > 2009 && dx_year < 2018) {
if (functions.GEN_INLIST(untrimmedline.histologicTypeIcdO3, "9590-9726,9728-9732,9734-9740,9750-9762,9811-9831,9940,9948,9971")) {
if (functions.GEN_INLIST(untrimmedline.primarySite, "770-779", "(C\\d\\d\\d)", 2, 3)) {
if (functions.GEN_INLIST(untrimmedline.rxSummSurgicalMargins, "9"))
return true
else
return functions.GEN_ERROR_MSG(binding, 'RX Summ--Surgical Margins must = 9 for this site/histology')
}
}
}
if (functions.GEN_VAL(untrimmedline.rxSummSurgicalMargins) == 8) {
if (functions.GEN_VAL(untrimmedline.rxSummSurgPrimSite) != 0)
return false
}
if (functions.GEN_VAL(untrimmedline.rxSummSurgPrimSite) == 0) {
if (functions.GEN_VAL(untrimmedline.rxSummSurgicalMargins) != 8)
return false
}
return true
}
// ID: NAACCR-01217; TAG: N0757; NAME: RX Summ--Systemic/Sur Seq (COC)
public boolean naaccr01217(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map untrimmedline) throws Exception {
functions.GEN_RESET_LOCAL_CONTEXT(binding)
if (functions.GEN_EMPTY(untrimmedline.rxSummSystemicSurSeq))
return true
return functions.GEN_INLIST(untrimmedline.rxSummSystemicSurSeq, "0,2-7,9")
}
// ID: NAACCR-01218; TAG: N0758; NAME: RX Summ--Systemic/Sur Seq, Date of DX (COC)
public boolean naaccr01218(Binding binding, Map context, MetafileContextFunctions functions, List> untrimmedlines, Map 