deal slip reprint
- FOF
- Visitor
Please Log in or Create an account to join the conversation.
- durai611
- Offline
- Elite Member
- Posts: 300
- Thank you received: 51
I have attached here a worked out example. In similar lines you can try of your own.
Also you can create your own application, from where you can generate Deal Slip.
Please Log in or Create an account to join the conversation.
- durai611
- Offline
- Elite Member
- Posts: 300
- Thank you received: 51
Based on transaction code? May I know your exact requirement.
Please Log in or Create an account to join the conversation.
- durai611
- Offline
- Elite Member
- Posts: 300
- Thank you received: 51
For the first case you can add a code in the calling routine of PRODUCE.DEAL.SLIP to change the format of deal slip based on transaction code.
For the second case, it's better you can define a different VERSION for that transaction type. Still if you want to do, then try to change R.VERSION record value for field deal slip format in a version routine. I haven't tested this, have to give a try ;-)
Please Log in or Create an account to join the conversation.
- durai611
- Offline
- Elite Member
- Posts: 300
- Thank you received: 51
Please Log in or Create an account to join the conversation.
- durai611
- Offline
- Elite Member
- Posts: 300
- Thank you received: 51
Hope it will work ;-)
Please Log in or Create an account to join the conversation.
- Gigiipse
- Offline
- Senior Member
- Posts: 40
- Thank you received: 1
Please Log in or Create an account to join the conversation.
- Gigiipse
- Offline
- Senior Member
- Posts: 40
- Thank you received: 1
The correct parameters are:
History file ('F.TELLER$HIS')
ID of record passed, History id returned (ID of the teller)
History record (a return var, I believe it's your R.REC)
Error variable (a retrun var, just give it something, I don't think it's mandatory, you can give it "")
I hope I'm not mistakeing, I'm not 100% sure of it.
Please Log in or Create an account to join the conversation.
- jpb
- Offline
- Moderator
- TAFj-R20 - 'unix'
- Posts: 2854
- Thank you received: 649
HIS.ID = 'FT120011234'
FN.FT.HIS = 'F.FUNDS.TRANSFER$HIS'
F.FT.HIS = ''
CALL OPF(FN.FT.HIS,F.FT.HIS)
R.HIS = ''
YERROR = ''
CALL EB.READ.HISTORY.REC(F.FT.HIS,HIS.ID,R.HIS,YERROR)
HIS.ID will be returned with highest history number
Please Log in or Create an account to join the conversation.
- jpb
- Offline
- Moderator
- TAFj-R20 - 'unix'
- Posts: 2854
- Thank you received: 649
PROGRAM TEST.DEAL.SLIP.REPRINT
$INSERT I_COMMON
$INSERT I_EQUATE
$INSERT I_RC.COMMON
$INSERT I_GTS.COMMON
$INSERT I_F.TELLER
CRT @(-1)
INPUT TRANSACTION.ID
ID.NEW = TRANSACTION.ID
PGM.VERSION = ','
APPLICATION = "TELLER"
VER.ID = APPLICATION:","
HIS.ID = ID.NEW
FN.TT.HIS = 'F.TELLER$HIS'
F.TT.HIS = ''
CALL OPF(FN.TT.HIS,F.TT.HIS)
R.HIS = ''
YERROR = ''
CALL EB.READ.HISTORY.REC(F.TT.HIS,HIS.ID,R.HIS,YERROR)
MATPARSE R.NEW FROM R.HIS
BEGIN CASE
CASE R.HIS<TT.TE.TRANSACTION.CODE> = "XX"
D.SLIP.ID = 'xxxxxxxxxxxxxxxx'
CASE R.HIS<TT.TE.TRANSACTION.CODE> = "XX"
D.SLIP.ID = 'xxxxxxxxxxxxxxxx'
END CASE
OFS$DEAL.SLIP.PRINTING = 1
CALL PRODUCE.DEAL.SLIP(D.SLIP.ID)
STOP
END
Please Log in or Create an account to join the conversation.
- jpb
- Offline
- Moderator
- TAFj-R20 - 'unix'
- Posts: 2854
- Thank you received: 649
Crosscheck spelling with the I_F in your GLOBUS.BP / T24.BP
Please Log in or Create an account to join the conversation.
- jpb
- Offline
- Moderator
- TAFj-R20 - 'unix'
- Posts: 2854
- Thank you received: 649
Please Log in or Create an account to join the conversation.
- durai611
- Offline
- Elite Member
- Posts: 300
- Thank you received: 51
D.SLIP.ID = 'XXXXXXXXX' ;* working fine
CASE TXN.CODE = "130"
D.SLIP.ID = 'xxxxxxxxxxxx' AND D.SLIP.ID = 'xxxxxxxxxx' ;*not working
In the second case what you are trying to do?
Do you want to generate two deal slips of different format for the same transaction code?
Then pass it as
D.SLIP.ID<1> = 'xxxxxxxxxxxx'
D.SLIP.ID<2> = 'xxxxxxxxxx'
Please Log in or Create an account to join the conversation.
- vijaygubbi
- Offline
- Junior Member
- Posts: 23
- Thank you received: 1
Can any one suggest me. How to control poping up for (DEAL SLIP).
In my scenario i don't needed popup for generating deal slip.
Am generating deal slip through "PRODUCE.DEAL.SLIP". For this scenario am getting popup preview of deal slip.
I want to restrict this popup . Can any one help me out on this.
Please Log in or Create an account to join the conversation.