CREATE ALGORITHM=UNDEFINED DEFINER=`IDUSUAR`@`%` SQL SECURITY DEFINER VIEW `icsrcnto` AS select `pfrcnto`.`RTRCTO` AS `RTRCTO`,`pfrcnto`.`RTRCNT` AS `RTRCNT`,`pfrcnto`.`RTABRN` AS `RTABRN`,`pfrcnto`.`RTDIRR` AS `RTDIRR`,`pfrcnto`.`RTPOBR` AS `RTPOBR`,`pfrcnto`.`RTPRVR` AS `RTPRVR`,`pfrcnto`.`RTPOSR` AS `RTPOSR`,`pfrcnto`.`RTTEL1` AS `RTTEL1`,`pfrcnto`.`RTTEL2` AS `RTTEL2`,`pfrcnto`.`RTFAXR` AS `RTFAXR`,`pfrcnto`.`RTDIST` AS `RTDIST`,`pfrcnto`.`RTNOT1` AS `RTNOT1`,`pfrcnto`.`RTNOT2` AS `RTNOT2`,`pfrcnto`.`RTNOT3` AS `RTNOT3`,`pfrcnto`.`RTOBS1` AS `RTOBS1`,`pfrcnto`.`RTOBS2` AS `RTOBS2`,`pfrcnto`.`RTPUER` AS `RTPUER`,`pfrcnto`.`RTACTD` AS `RTACTD`,`pfrcnto`.`RTAUTO` AS `RTAUTO`,`pfrcnto`.`RTFMTR` AS `RTFMTR`,`pfrcnto`.`RTPLAN` AS `RTPLAN`,`pfrcnto`.`RTCUSR` AS `RTCUSR`,`pfrcnto`.`RTRNUM` AS `RTRNUM`,`pfrcnto`.`RTSPAC` AS `RTSPAC`,`pfrcnto`.`RTDARA` AS `RTDARA`,`pfrcnto`.`RTNLCA` AS `RTNLCA`,`pfrcnto`.`RTNLMT` AS `RTNLMT`,`pfrcnto`.`RTZOUN` AS `RTZOUN`,`pfrcnto`.`RTNUMR` AS `RTNUMR`,`pfrcnto`.`RTCONF` AS `RTCONF`,`pfrcnto`.`RTFLG1` AS `RTFLG1`,`pfrcnto`.`RTFLG2` AS `RTFLG2`,`pfrcnto`.`RTFLG3` AS `RTFLG3`,`pfrcnto`.`RTFLG4` AS `RTFLG4`,`pfrcnto`.`RTCOCO` AS `RTCOCO`,`pfrcnto`.`RTSALA` AS `RTSALA`,`pfrcnto`.`RTPIVA` AS `RTPIVA`,`pfrcnto`.`RTCOPO` AS `RTCOPO`,`pfrcnto`.`RTNOEM` AS `RTNOEM`,`pfrcnto`.`RTREEM` AS `RTREEM`,`pfrcnto`.`RTCOSA` AS `RTCOSA`,`pfrcnto`.`RTTISA` AS `RTTISA`,`pfrcnto`.`RTMULT` AS `RTMULT`,`pfrcnto`.`RTENVD` AS `RTENVD`,`pfrcnto`.`RTHATR` AS `RTHATR`,`pfrcnto`.`RTHCTR` AS `RTHCTR`,`pfrcnto`.`RTMXAC` AS `RTMXAC`,`pfrcnto`.`RTHCTQ` AS `RTHCTQ`,`pfrcnto`.`RTCTAF` AS `RTCTAF`,`pfrcnto`.`RTPAIS` AS `RTPAIS`,`pfrcnto`.`RTPROV` AS `RTPROV`,`pfrcnto`.`RTPOBL` AS `RTPOBL`,`pfrcnto`.`RTSIST` AS `RTSIST`,`pfrcnto`.`RTTCOB` AS `RTTCOB`,`pfrcnto`.`RTDESP` AS `RTDESP`,`pfrcnto`.`RTCINE` AS `RTCINE`,`pfrcnto`.`RTCONT` AS `RTCONT`,`pfrcnto`.`RTIDPC` AS `RTIDPC`,`pfrcnto`.`RTCALND` AS `RTCALND`,`pfrcnto`.`RTCIFI` AS `RTCIFI` from `pfrcnto` where _latin1'ICS' in (select `pflradm`.`XLCDIS` AS `XLCDIS` from `pflradm` where (`pflradm`.`XLREDA` = `pfrcnto`.`RTDIST`)) 
 


CREATE TRIGGER WRKCOMISICS AFTER INSERT ON WRKCASH FOR EACH ROW
BEGIN
    INSERT INTO WRKCOMISICS (ICTIPO,ICUSER,ICDIST,ICDSPV,ICCICL,ICFUNC,ICZONA,ICFILA,ICBUTA,ICPREU,ICPRUS,ICDTOE,ICPORE,
                             ICDTOV,ICPORV,ICVARD,ICIDVD,ICPVAD,ICVVDI,ICIMPT,ICPAGO,ICDATE,ICHORA,ICANUL,ICTRAS,ICRIMP,
                             ICAUDT,ICFLG1,ICFLG2,ICFLG3,ICFLG4,ICUSIM,ICDAIM,ICCOTA,ICCOPR,ICTINV,ICIDTK,ICUSED,ICRFVT,
                             ICCONT,ICTCOA,ICTARJ,ICCANAL,ICMPAGO,ICVALC,ICVALE,ICSIST,ICACTV,ICDESC,ICNUME,ICCPRO,ICMICS,ICMTST)
    VALUES (NEW.ATTIPO,NEW.ATUSER,NEW.ATDIST,NEW.ATDSPV,NEW.ATCICL,NEW.ATFUNC,
NEW.ATZONA,NEW.ATFILA,NEW.ATBUTA,NEW.ATPREU,NEW.ATPRUS,NEW.ATDTOE,
NEW.ATPORE,NEW.ATDTOV,NEW.ATPORV,NEW.ATVARD,NEW.ATIDVD,NEW.ATPVAD,
NEW.ATVVDI,NEW.ATIMPT,NEW.ATPAGO,NEW.ATDATE,NEW.ATHORA,NEW.ATANUL,
NEW.ATTRAS,NEW.ATRIMP,NEW.ATAUDT,NEW.ATFLG1,NEW.ATFLG2,NEW.ATFLG3,
NEW.ATFLG4,NEW.ATUSIM,NEW.ATDAIM,NEW.ATCOTA,NEW.ATCOPR,NEW.ATTINV,
NEW.ATIDTK,NEW.ATUSED,NEW.ATRFVT,NEW.ATCONT,NEW.ATTCOA,NEW.ATTARJ,
NEW.ATCANAL,NEW.ATMPAGO,NEW.ATVALC,NEW.ATVALE,NEW.ATSIST,'99','NO DESCRIPTION',1,'999','N',NOW());
END;