Routine: RCDPRPL1

Information

RCDPRPL1 ;WISC/RFJ-receipt profile listmanager options ;1 Jun 99

Name	Comments	DBIA/ICR reference
ENTRTRAN	; option: enter a payment transaction ; this option can only be selected for unapproved receipts ; screen placed in protocol file and below as backup
EDITTRAN	; option: edit a payment transaction ; this option can only be selected for unapproved receipts ; screen placed in protocol file and below as backup
CANCTRAN	; option: cancel a transaction ; this option can only be selected for unapproved receipts ; screen placed in protocol file and below as backup
MOVETRAN	; move a transaction from one receipt to another
UNLOCK	; unlock receipts
SELPAY(RCRECTDA)	; select the payment transaction for the receipt (from listmanager options)
ASKCANC(RCTRANDA)	; ask if it's okay to cancel a transaction ; 1 is yes, otherwise no
ASKMOVE(RECTDA)	; ask if its okay to move the transaction ; 1 is yes, otherwise no

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: ENTRTRAN+11
Function Call: WRITE	Prompt: !," Type of payment: ",$P($G(^RC(341.1,+$P(^RCY(344,RCRECTDA,0),"^",4),0)),"^") Line Location: ENTRTRAN+12
Function Call: WRITE	Prompt: !,"Adding a NEW payment transaction: " Line Location: ENTRTRAN+13
Function Call: WRITE	Prompt: "# ",RCTRANDA Line Location: ENTRTRAN+20
Function Call: WRITE	Prompt: !!,"Editing Payment: ",RCTRANDA Line Location: EDITTRAN+18
Function Call: WRITE	Prompt: !!,"Select the RECEIPT to move the payment transaction #"_RCTRANDA_" to:" Line Location: MOVETRAN+18
Function Call: WRITE	Prompt: !,"Cannot copy transaction to same receipt." Line Location: MOVETRAN+21
Function Call: WRITE	Prompt: !,"Cannot copy to a receipt which is CLOSED." Line Location: MOVETRAN+22
Function Call: WRITE	Prompt: ! Line Location: MOVETRAN+27
Function Call: WRITE	Prompt: !,"WARNING, receipt types of payment are not the same type of payment." Line Location: MOVETRAN+28
Function Call: WRITE	Prompt: ! Line Location: SELPAY+7
Function Call: WRITE	Prompt: ! Line Location: ASKCANC+5