Add stamped requisition forms now give bonus credits (#66230)

Requisition forms now grant bonus credits when they are stamped by the appropriate stamp listed under "Authorization Required:" on the form. Initially I was just going to have the req forms give the same amount of credits as the manifest but I was convinced to lower both of them so it doesn't unbalance crate returns too much.

code/modules/paperwork/paper.dm

@@ -63,7 +63,6 @@
 
 /obj/item/paper/Destroy()
 	stamps = null
-	stamped = null
 	form_fields = null
 	stamped = null
 	. = ..()
@@ -398,6 +397,29 @@
 		to_chat(usr, pick("You try to stamp but you miss!", "There is no where else you can stamp!"))
 		return FALSE
 
+/**
+ * is_approved
+ *
+ * To determine if a paper has the correct stamp. If no department stamp is specified then the
+ * regular granted stamp (/obj/item/stamp) is checked
+ *
+ * Arguments:
+ * * department (optional) - The department stamp we are checking for
+ */
+/obj/item/paper/proc/is_approved(department_stamp)
+	if(department_stamp)
+		return stamped && (department_stamp in stamped)
+	else
+		return stamped && ("stamp-ok" in stamped)
+
+/**
+ * is_denied
+ *
+ * To determine if a paper has the DENIED stamp
+ */
+/obj/item/paper/proc/is_denied()
+	return stamped && ("stamp-deny" in stamped)
+
 /obj/item/paper/ui_act(action, params, datum/tgui/ui)
 	. = ..()
 	if(.)

code/modules/paperwork/stamps.dm

@@ -17,6 +17,10 @@
 	user.visible_message(span_suicide("[user] stamps 'VOID' on [user.p_their()] forehead, then promptly falls over, dead."))
 	return (OXYLOSS)
 
+/obj/item/stamp/denied
+	name = "\improper DENIED rubber stamp"
+	icon_state = "stamp-deny"
+
 /obj/item/stamp/qm
 	name = "quartermaster's rubber stamp"
 	icon_state = "stamp-qm"
@@ -57,11 +61,6 @@
 	icon_state = "stamp-cmo"
 	dye_color = DYE_CMO
 
-/obj/item/stamp/denied
-	name = "\improper DENIED rubber stamp"
-	icon_state = "stamp-deny"
-	dye_color = DYE_REDCOAT
-
 /obj/item/stamp/clown
 	name = "clown's rubber stamp"
 	icon_state = "stamp-clown"