pgcfc = CreateObject("Component", "components.general.progressnotes"); retiredcareplans = pgcfc.retire_careplans(#arguments.Careplan_ID#); UPDATE #Request.prefix_db_agency#.pCareplan SET Proc_QA = , Date_Change = , Change_by = WHERE Careplan_ID = ANd Status = 0 pgcfc = CreateObject("Component", "components.general.progressnotes"); retiredcareplans = pgcfc.retire_careplans(#arguments.Careplan_ID#); UPDATE #Request.prefix_db_agency#.pCareplan SET Status = 0, QA_approve = , Date_Change = , Change_by = WHERE Careplan_ID = ANd Status = 1 pgcfc = CreateObject("Component", "components.general.progressnotes"); retiredcareplans = pgcfc.retire_assessments(#arguments.Assmt_ID#); UPDATE #Request.prefix_db_agency#.pAssessments SET QA_Count = , Record_Mod_Date = , Record_Mod_By = WHERE Assmt_ID = ANd Status = 0 pgcfc = CreateObject("Component", "components.general.progressnotes"); retiredschedules = pgcfc.retire_schedules(#arguments.Schedule_ID#); UPDATE #Request.prefix_db_agency#.pSchedules SET QA_View = , Date_Change = , Change_by = WHERE Schedule_ID = ANd Status = 0 pgcfc = CreateObject("Component", "components.general.progressnotes"); retiredschedules = pgcfc.retire_schedules(#arguments.Schedule_ID#); UPDATE #Request.prefix_db_agency#.pSchedules SET QA_Proc = , pgnotesdraft = , Date_Change = , Change_by = WHERE Schedule_ID = ANd Status = 0