118: RETURN (TRUE);
119: END AFTERREPORT;
120:
121: PROCEDURE PRINT_STATUS_UPDATE IS
122: PC RA_CUSTOMER_TRX.PRINTING_COUNT%TYPE;
123: PLP RA_CUSTOMER_TRX.PRINTING_LAST_PRINTED%TYPE;
124: POD RA_CUSTOMER_TRX.PRINTING_ORIGINAL_DATE%TYPE;
125: CTI RA_CUSTOMER_TRX.CUSTOMER_TRX_ID%TYPE;
126: CURSOR C1 IS
119: END AFTERREPORT;
120:
121: PROCEDURE PRINT_STATUS_UPDATE IS
122: PC RA_CUSTOMER_TRX.PRINTING_COUNT%TYPE;
123: PLP RA_CUSTOMER_TRX.PRINTING_LAST_PRINTED%TYPE;
124: POD RA_CUSTOMER_TRX.PRINTING_ORIGINAL_DATE%TYPE;
125: CTI RA_CUSTOMER_TRX.CUSTOMER_TRX_ID%TYPE;
126: CURSOR C1 IS
127: SELECT
120:
121: PROCEDURE PRINT_STATUS_UPDATE IS
122: PC RA_CUSTOMER_TRX.PRINTING_COUNT%TYPE;
123: PLP RA_CUSTOMER_TRX.PRINTING_LAST_PRINTED%TYPE;
124: POD RA_CUSTOMER_TRX.PRINTING_ORIGINAL_DATE%TYPE;
125: CTI RA_CUSTOMER_TRX.CUSTOMER_TRX_ID%TYPE;
126: CURSOR C1 IS
127: SELECT
128: PRINTING_COUNT,
121: PROCEDURE PRINT_STATUS_UPDATE IS
122: PC RA_CUSTOMER_TRX.PRINTING_COUNT%TYPE;
123: PLP RA_CUSTOMER_TRX.PRINTING_LAST_PRINTED%TYPE;
124: POD RA_CUSTOMER_TRX.PRINTING_ORIGINAL_DATE%TYPE;
125: CTI RA_CUSTOMER_TRX.CUSTOMER_TRX_ID%TYPE;
126: CURSOR C1 IS
127: SELECT
128: PRINTING_COUNT,
129: PRINTING_LAST_PRINTED,
129: PRINTING_LAST_PRINTED,
130: PRINTING_ORIGINAL_DATE,
131: CUSTOMER_TRX_ID
132: FROM
133: RA_CUSTOMER_TRX
134: WHERE SET_OF_BOOKS_ID = P_SET_OF_BOOKS_ID
135: AND COMPLETE_FLAG = 'Y'
136: AND CUST_TRX_TYPE_ID = DECODE(P_DOCUMENT_TYPE
137: ,NULL
167: INTO PC,PLP,POD,CTI;
168: EXIT WHEN C1%NOTFOUND;
169: IF P_PRINT_CODE = 'N' THEN
170: UPDATE
171: RA_CUSTOMER_TRX
172: SET
173: PRINTING_COUNT = DECODE(PC
174: ,NULL
175: ,0
182: AND NVL(PRINTING_COUNT
183: ,0) = 0;
184: ELSE
185: UPDATE
186: RA_CUSTOMER_TRX
187: SET
188: PRINTING_COUNT = DECODE(PC
189: ,NULL
190: ,0
280: SELECT
281: MIN(TRX_NUMBER)
282: INTO TRX_LOW
283: FROM
284: RA_CUSTOMER_TRX;
285: SELECT
286: MAX(TRX_NUMBER)
287: INTO TRX_HIGH
288: FROM
285: SELECT
286: MAX(TRX_NUMBER)
287: INTO TRX_HIGH
288: FROM
289: RA_CUSTOMER_TRX;
290: SELECT
291: MAX(REGISTRATION_NUMBER)
292: INTO COMP_NO
293: FROM