Salve salve....
Pontos de Entrada P12.2210
ACDA030.PRW - ACDA30CHK() -> IF ! EXECBLOCK('ACDA30OK',.F.,.F.)
ACDA030.PRW - AI030() -> EXECBLOCK("ACD030FM",.F.,.F.)
ACDA030.PRW - AI030() -> LOK := EXECBLOCK("ACDA30VE",.F.,.F.)
ACDA030.PRW - AI031() -> LOK := EXECBLOCK("ACDA30VP",.F.,.F.)
ACDA030.PRW - AIVA30AUT() -> LRETPE := EXECBLOCK("AI030PER",.F.,.F.)
ACDA030.PRW - GERASB7AUTO() -> AUSERLOG := EXECBLOCK('ACDA30LG',.F.,.F.)
ACDA032.PRW - AUTRECON() -> EXECBLOCK("AC32RECON",.F.,.F.)
ACDA032.PRW - GETARRAY() -> LCONTINUA := EXECBLOCK("CBA03201",.F.,.F.,{SBF->BF_PRODUTO,SBF->BF_LOCAL,SBF->BF_LOCALIZ,SBF->BF_NUMSERI,SBF->BF_LOTECTL,SBF->BF_NUMLOTE})
ACDA035.PRW - VLDEND() -> IF ! EXECBLOCK("CBINV02",,,{CARMAZEM,CENDERECO})
ACDA080.PRW - VLDDADOS() -> IF ! EXECBLOCK("ACD080PR",.F.,.F.)
ACDA080.PRW - VLDDADOS() -> IF ! EXECBLOCK("ACD080PSA",.F.,.F.)
ACDA100.PRW - A100ITGRP() -> AITENSUSR := EXECBLOCK("ACD100G3", .F., .F., {ATAIL(AITENS),AAUX[NIND]} )
ACDA100.PRW - A100ITGRP() -> BASCVET := EXECBLOCK("ACD100G2", .F., .F., {BASCVET,NAGLUTPED,NAGLUTARM} )
ACDA100.PRW - ACDA100() -> ACORESUSR := EXECBLOCK("ACD100CR",.F.,.F.,{ACORES})
ACDA100.PRW - ACDA100AL() -> EXECBLOCK("ACD100ALT",.F.,.F.)
ACDA100.PRW - ACDA100AL() -> IF VALTYPE( AUSBUTTONS := EXECBLOCK( "ACD100BUT", .F., .F., {NOPCX} ) ) == "A"
ACDA100.PRW - ACDA100AL() -> LCONTINUA := EXECBLOCK("AC100VLA")
ACDA100.PRW - ACDA100ET() -> EXECBLOCK("ACD100ET",.F.,.F.)
ACDA100.PRW - ACDA100ET() -> LCONTINUA := EXECBLOCK('ACD100VE',.F.,.F.)
ACDA100.PRW - ACDA100GR() -> ANEWFIL := EXECBLOCK("ACD100FI",.F.,.F.,{NORIGEXP})
ACDA100.PRW - ACDA100GR() -> EXECBLOCK("ACD100MNU",.F.,.F.,{NORIGEXP})
ACDA100.PRW - ACDA100LG() -> ACORUSR := EXECBLOCK("ACD100LG",.F.,.F.,{ACORDESC})
ACDA100.PRW - ACDA100RE() -> CCUSTREL := EXECBLOCK("ACD100RE",.F.,.F.)
ACDA100.PRW - ACDA100RE() -> EXECBLOCK( CCUSTREL, .F., .F.)
ACDA100.PRW - ACDA100VS() -> IF VALTYPE( AUSBUTTONS := EXECBLOCK( "ACD100BUT", .F., .F., {NOPCX} ) ) == "A"
ACDA100.PRW - GERAOSEPNOTA() -> EXECBLOCK("A100CABE",.F.,.F.)
ACDA100.PRW - GERAOSEPNOTA() -> EXECBLOCK("ACD100GI",.F.,.F.)
ACDA100.PRW - GERAOSEPNOTA() -> EXECBLOCK("ACDA100F",.F.,.F.,{AORDSEP[NI]})
ACDA100.PRW - GERAOSEPNOTA() -> IF ! EXECBLOCK("ACD100VG",.F.,.F.,)
ACDA100.PRW - GERAOSEPNOTA() -> IF !EXECBLOCK("ACDA100I",.F.,.F.)
ACDA100.PRW - GERAOSEPPEDIDO() -> AAUXUSR := EXECBLOCK("ACD100G1", .F., .F., ATAIL(AAUX) )
ACDA100.PRW - GERAOSEPPEDIDO() -> EXECBLOCK("A100CABE",.F.,.F.)
ACDA100.PRW - GERAOSEPPEDIDO() -> EXECBLOCK("ACD100GI",.F.,.F.)
ACDA100.PRW - GERAOSEPPEDIDO() -> EXECBLOCK("ACDA100F",.F.,.F.,{AORDSEP[NI]})
ACDA100.PRW - GERAOSEPPEDIDO() -> IF ! EXECBLOCK("ACD100VG",.F.,.F.,)
ACDA100.PRW - GERAOSEPPEDIDO() -> IF !EXECBLOCK("ACDA100I",.F.,.F.)
ACDA100.PRW - GERAOSEPPRODUCAO() -> EXECBLOCK("A100CABE",.F.,.F.)
ACDA100.PRW - GERAOSEPPRODUCAO() -> EXECBLOCK("ACD100GI",.F.,.F.)
ACDA100.PRW - GERAOSEPPRODUCAO() -> EXECBLOCK("ACDA100F",.F.,.F.,{AORDSEP[NI]})
ACDA100.PRW - GERAOSEPPRODUCAO() -> IF ! EXECBLOCK("ACD100VG",.F.,.F.,)
ACDA100.PRW - GERAOSEPPRODUCAO() -> IF !EXECBLOCK("ACDA100I",.F.,.F.)
ACDA100.PRW - GERAOSEPPRODUCAO() -> LACD100EMP := EXECBLOCK("ACD100EMP",.F.,.F.,{SD4->D4_OP,SD4->D4_COD,SD4->D4_QUANT})
ACDA100.PRW - IMPETIQVOL() -> EXECBLOCK("IMG05",,,{CIDVOL,CB7->CB7_PEDIDO,CB7->CB7_NOTA,CB7->CB7_SERIE})
ACDA100.PRW - IMPETIQVOL() -> EXECBLOCK("IMG05OFI",,,{NTOTVOL,NVOLATU})
ACDA100.PRW - IMPETIQVOL() -> LIMPVOL := EXECBLOCK("ACD100VO",.F.,.F.,{CIDVOL})
ACDA100.PRW - RETSLDEND() -> LACD100END := EXECBLOCK("ACD100END",.F.,.F.,{(CALIASSBF)->BF_LOCAL,(CALIASSBF)->BF_LOCALIZ,(CALIASSBF)->BF_PRODUTO,(CALIASSBF)->BF_NUMSERI,(CALIASSBF)->BF_LOTECTL,(CALIASSBF)->BF_NUMLOTE})
ACDI010.PRW - ACDI10CX() -> EXECBLOCK("IMG00",,,{CREIMP+PROCNAME(),})
ACDI010.PRW - ACDI10CX() -> EXECBLOCK("IMG01CX",,,{NQE,,NID,NQTDE,MV_PAR03,MV_PAR04})
ACDI010.PRW - ACDI10DE() -> EXECBLOCK("IMG00",,,{PROCNAME(),})
ACDI010.PRW - ACDI10DE() -> EXECBLOCK("IMG01DE",,,{NCOPIAS,CCODBARRAS})
ACDI010.PRW - ACDI10NF() -> EXECBLOCK("IMG00",,,{"R"+PROCNAME()})
ACDI010.PRW - ACDI10NF() -> EXECBLOCK("IMG00",,,{PROCNAME()})
ACDI010.PRW - ACDI10NF() -> EXECBLOCK("IMG01",,,{,,CB0->CB0_CODETI})
ACDI010.PRW - ACDI10NF() -> EXECBLOCK("IMG01",,,{NQE,,, NQTDE,SD1->D1_DOC,SD1->D1_SERIE,SD1->D1_FORNECE,SD1->D1_LOJA,SD1->D1_LOCAL,,SD1->D1_NUMSEQ,SD1->D1_LOTECTL,SD1->D1_NUMLOTE,SD1->D1_DTVALID,,,, SDB->DB_NUMSERI,, SDB->DB_LOCALIZ,,0,SD1->D1_ITEM})
ACDI010.PRW - ACDI10NF() -> EXECBLOCK("IMG01",,,{NQE,,, SDB->DB_QUANT,SD1->D1_DOC,SD1->D1_SERIE,SD1->D1_FORNECE,SD1->D1_LOJA,SD1->D1_LOCAL,, SD1->D1_NUMSEQ,SD1->D1_LOTECTL,SD1->D1_NUMLOTE,SD1->D1_DTVALID,,,, SDB->DB_NUMSERI,, SDB->DB_LOCALIZ,,0,SD1->D1_ITEM})
ACDI010.PRW - ACDI10NF() -> EXECBLOCK("IMG01",,,{NQE,,,NQTDE,SD1->D1_DOC,SD1->D1_SERIE,SD1->D1_FORNECE,SD1->D1_LOJA,SD1->D1_LOCAL,,CNUMSEQ,SD1->D1_LOTECTL,SD1->D1_NUMLOTE,SD1->D1_DTVALID,,,,,,,,0,SD1->D1_ITEM})
ACDI010.PRW - ACDI10NF() -> EXECBLOCK("IMG01",,,{NRESTO,,,1,SD1->D1_DOC,SD1->D1_SERIE,SD1->D1_FORNECE,SD1->D1_LOJA,SD1->D1_LOCAL,, CNUMSEQ,SD1->D1_LOTECTL,SD1->D1_NUMLOTE,SD1->D1_DTVALID,,,,,,,,0,SD1->D1_ITEM})
ACDI010.PRW - ACDI10NF() -> EXECBLOCK("IMG01",,,{NRESTO,,,1,SD1->D1_DOC,SD1->D1_SERIE,SD1->D1_FORNECE,SD1->D1_LOJA,SD1->D1_LOCAL,,CNUMSEQ,SD1->D1_LOTECTL,SD1->D1_NUMLOTE,SD1->D1_DTVALID,,,,,,,,0,SD1->D1_ITEM})
ACDI010.PRW - ACDI10NF() -> EXECBLOCK("IMG01",,,{NRESTO,,,1,SD1->D1_DOC,SD1->D1_SERIE,SD1->D1_FORNECE,SD1->D1_LOJA,SD1->D1_LOCAL,,SD1->D1_NUMSEQ,SD1->D1_LOTECTL,SD1->D1_NUMLOTE,SD1->D1_DTVALID,,,,SDB->DB_NUMSERI,,SDB->DB_LOCALIZ,,0,SD1->D1_ITEM})
ACDI010.PRW - ACDI10OP() -> EXECBLOCK("IMG00",,,{PROCNAME(),})
ACDI010.PRW - ACDI10OP() -> LOK:=EXECBLOCK("AI10OPIMP",.F.,.F.)
ACDI010.PRW - ACDI10OP() -> LRET := EXECBLOCK("IMG01",.F.,.F.,{NQE,NIL,NIL,NCOPIAS,NIL,NIL,NIL,NIL,SD3->D3_LOCAL,SD3->D3_OP,SD3->D3_NUMSEQ,SD3->D3_LOTECTL,SD3->D3_NUMLOTE,SD3->D3_DTVALID,NIL,NIL,NIL,SD3->D3_NUMSERI,"SD3",NIL,NIL,NRESTO})
ACDI010.PRW - ACDI10PD() -> EXECBLOCK("IMG00",,,{PROCNAME(),CPEDANT,CFORN,CLOJA})
ACDI010.PRW - ACDI10PD() -> EXECBLOCK("IMG01",,,{NQE,NIL,NIL,NQTDE,NIL,NIL,CFORN,CLOJA,SC7->C7_LOCAL,NIL,NIL,"","",NIL,NIL,NIL,NIL,NIL,NIL,NIL,SC7->C7_NUM+SC7->C7_ITEM})
ACDI010.PRW - ACDI10PD() -> EXECBLOCK("IMG01",,,{NRESTO,NIL,NIL,1,NIL,NIL,CFORN,CLOJA,SC7->C7_LOCAL,NIL,NIL,"","",NIL,NIL,NIL,NIL,NIL,NIL,NIL,SC7->C7_NUM+SC7->C7_ITEM})
ACDI010.PRW - ACDI10PR() -> EXECBLOCK('IMG00',,,{CREIMP+PROCNAME(),})
ACDI011.PRW - IMPRIME() -> EXECBLOCK("IMG00",,,{ "ACDV230", CCODPT } )
ACDI011.PRW - IMPRIME() -> EXECBLOCK("IMG01",,,{NQE,,, NQVOL,SD1->D1_DOC,SD1->D1_SERIE,SD1->D1_FORNECE,SD1->D1_LOJA,SD1->D1_LOCAL,,SD1->D1_NUMSEQ,SD1->D1_LOTECTL,SD1->D1_NUMLOTE,SD1->D1_DTVALID,,,, SDB->DB_NUMSERI,, SDB->DB_LOCALIZ,,0,SD1->D1_ITEM})
ACDI011.PRW - IMPRIME() -> EXECBLOCK("IMG01",,,{NQE,,,NQVOL,IIF(CORIGEM == CORINFLANG,CNOTAFISC,""),CSERIENFISC,CFORN,CLOJAFORN,CLOCAL,,,CLOTE,CSLOTE,DVALID,,,,CNUMSERIE,,CENDERECO,,,( CALIASORI )->D1_ITEM } )
ACDI011.PRW - IMPRIME() -> EXECBLOCK("IMG01",,,{NQE,,,NQVOL,IIF(CORIGEM == CORINFLANG,CNOTAFISC,""),CSERIENFISC,CFORN,CLOJAFORN,CLOCAL,,,CLOTE,CSLOTE,DVALID,,,,CNUMSERIE,,CENDERECO})
ACDI011.PRW - IMPRIME() -> EXECBLOCK("IMG01",,,{NRESTO,,,1,CNOTAFISC,CNUMSERIE,CFORN,CLOJAFORN,CLOCAL,,,CLOTE,CSLOTE,DVALID,,,,CNUMSERIE,,CENDERECO,,,( CALIASORI )->D1_ITEM } )
ACDI011.PRW - IMPRIME() -> EXECBLOCK("IMG01",,,{NRESTO,,,1,CNOTAFISC,CNUMSERIE,CFORN,CLOJAFORN,CLOCAL,,,CLOTE,CSLOTE,DVALID,,,,CNUMSERIE,,CENDERECO})
ACDI011.PRW - IMPRIME() -> EXECBLOCK("IMG01",,,{NRESTO,,,1,SD1->D1_DOC,SD1->D1_SERIE,SD1->D1_FORNECE,SD1->D1_LOJA,SD1->D1_LOCAL,,SD1->D1_NUMSEQ,SD1->D1_LOTECTL,SD1->D1_NUMLOTE,SD1->D1_DTVALID,,,,SDB->DB_NUMSERI,,SDB->DB_LOCALIZ,,0,SD1->D1_ITEM})
ACDI011.PRW - IMPRIME() -> EXECBLOCK("IMG10",,,{ CCODPT } )
ACDI011.PRW - LISTBOXMAR() -> LALPE := EXECBLOCK("ACDI11VA",.F.,.F.)
ACDI011.PRW - VLDALBX() -> LACDI11VL := EXECBLOCK("ACDI11VL",.F.,.F.,{COPCSEL,ALBX})
ACDI020.PRW - ACDI020LO() -> EXECBLOCK("IMG00",,,{CRET+PROCNAME()})
ACDI050.PRW - ACDI050TR() -> EXECBLOCK("IMG00",,,{CRET+PROCNAME(),IF(NID==NIL,MV_PAR01,CCODTR),IF(NID==NIL,MV_PAR02,CCODTR)})
ACDI060.PRW - ACDI060US() -> EXECBLOCK("IMG00",,,{CRET+PROCNAME(),IF(NID==NIL,MV_PAR01,CCODOPE),IF(NID==NIL,MV_PAR02,CCODOPE)})
ACDI070.PRW - ACDI070EXEC() -> EXECBLOCK('IMG00',,,{"ACDI070",MV_PAR01,MV_PAR02})
ACDI080.PRW - ACDI080EXEC() -> EXECBLOCK('IMG00',,,{"ACDI080",ALLTRIM(MV_PAR01),ALLTRIM(MV_PAR02)})
ACDV010.PRG - ACDV0101() -> EXECBLOCK("ACDV10FIM",.F.,.F.,)
ACDV010.PRG - ANALISA() -> ARETPE := EXECBLOCK('A010WMSO', NIL, NIL, {NTIPO, ADIST[NI,2], CARMAZEM, ADIST[NI,3]})
ACDV010.PRG - VLDPROD() -> IF EXISTBLOCK("AIC010VPR") .AND. ! EXECBLOCK("AIC010VPR",.F.,.F.,CPROD)
ACDV010.PRG - VLDPROD() -> LFORCAARM := EXECBLOCK("V010FARM",.F.,.F.)
ACDV020.PRG - ACDV020() -> EXECBLOCK('ACD020PR',.F.,.F.)
ACDV020.PRG - AIV020VALOP() -> IF ! EXECBLOCK("ACD020OP",.F.,.F.)
ACDV020.PRG - GRAVAOP() -> AMATA250 := EXECBLOCK('ACD020G2',.F.,.F.,{AMATA250,I})
ACDV020.PRG - GRAVAOP() -> AMATA250 := EXECBLOCK('ACD020GV',.F.,.F.,AMATA250)
ACDV020.PRG - GRAVAOP() -> LMOSTRAERRO := IF(VALTYPE(LMOSTRAERRO := EXECBLOCK('ACD020ME',.F.,.F.,{NOMEAUTOLOG()}))#"L",.T.,LMOSTRAERRO)
ACDV020.PRG - VLDQTD() -> EXECBLOCK('V020FQTD',.F.,.F.)
ACDV020.PRG - VLDQTD() -> IF ! EXECBLOCK("ACD020QE",.F.,.F.,{(APRODCD[NPOS,2]+NQTD)})
ACDV020.PRG - VLDQTD() -> IF ! EXECBLOCK("ACD020QE",.F.,.F.,{NQTD})
ACDV023.PRG - CB023CBH() -> EXECBLOCK("AC023FMV",.F.,.F.)
ACDV023.PRG - CB023GRV() -> EXECBLOCK("ACD023GR",.F.,.F.,{COP,COPERACAO,CRECURSO,COPERADOR,NQTD})
ACDV023.PRG - CB023IOPE() -> CRETPE := EXECBLOCK("CB023IOPE",.F.,.F.,{CCODOPE})
ACDV023.PRG - CB023OP() -> IF ! EXECBLOCK("ACD023OP",.F.,.F.)
ACDV023.PRG - CB023OPERAC() -> COPERACAO := EXECBLOCK("ACD023VOPER",.F.,.F.,{COP,CROTEIRO,COPERACAO,CPRODUTO})
ACDV023.PRG - CB023QTD() -> LRET := EXECBLOCK('ACD023VQ',.F.,.F.,{COP,COPERACAO,COPERADOR,NQTD,LINICIO})
ACDV023.PRG - CB023REC() -> LACD023RC := EXECBLOCK('ACD023RC',.F.,.F.,{COP,COPERACAO,COPERADOR,CRECURSO,LRET})
ACDV023.PRG - CB023REC() -> NACD023QE:= EXECBLOCK("ACD023QE",.F.,.F.,{COP,COPERACAO,CRECURSO,COPERADOR,NQTD})
ACDV023.PRG - CB023REC() -> NACD023QE:= EXECBLOCK("ACD023QE",.F.,.F.,{M->CBH_OP,M->CBH_OPERAC,M->CBH_RECUR,M->CBH_OPERAD,M->CBH_QTD})
ACDV023.PRG - CB023VTRAN() -> LACD023TR := EXECBLOCK('ACD023TR',.F.,.F.,{COP,COPERACAO,COPERADOR,CTRANSAC})
ACDV023.PRG - GRVPAUSA() -> EXECBLOCK("ACD023GP",.F.,.F.,{COP,COPERACAO,COPERADOR,CTRANSAC})
ACDV023.PRG - GRVPERDA() -> IF ! EXECBLOCK("ACD023PR",.F.,.F.,{COP,COPERACAO,CRECURSO,COPERADOR,NQTD,CTRANSAC,CLOTE})
ACDV023.PRG - GRVPROD() -> IF ! EXECBLOCK("ACD023PR",.F.,.F.,{COP,COPERACAO,CRECURSO,COPERADOR,NQTD,CTRANSAC,CLOTE})
ACDV025.PRG - CB025GRV() -> APEAUX := EXECBLOCK("CB025AUT",.F.,.F.,{APEAUX,COP,COPERACAO,CTRANSAC,CPRODUTO,CRECURSO,COPERADOR,CTIPATU,NQTD,DDTINI,CHRINI,DDTFIM,CHRFIM,CLOTE,DVALID})
ACDV025.PRG - CB025GRV() -> EXECBLOCK("ACD025GR",.F.,.F.,{COP,COPERACAO,CRECURSO,COPERADOR,NQTD,CTRANSAC})
ACDV025.PRG - CB025GRV() -> LACD25MOV := EXECBLOCK("ACD25MOV",.F.,.F.)
ACDV035.PRG - ACD35CBM() -> LRETPE := EXECBLOCK("CBINV06",.F.,.F.,{CPRODUTO,CARM,CEND,CNUMSER,CLOTE,CSLOTE})
ACDV035.PRG - ACDV035X() -> LRET:=EXECBLOCK('CBINVFIM',.F.,.F.)
ACDV035.PRG - ACDV035X() -> URETETI := EXECBLOCK('CBINVPR',.F.,.F.)
ACDV035.PRG - ACDVGSB7() -> EXECBLOCK("CBINV05",,,{CPRODUTO,CARM,CEND,CDOC,DDATA,CLOTE,CSLOTE,CNUMSERI,CCODUNIT,CCODTIPO})
ACDV035.PRG - CBLOADEST() -> LNOLOOP := EXECBLOCK("CBINV06",.F.,.F.,{(CALIASSBF)->BF_PRODUTO,(CALIASSBF)->BF_LOCAL,(CALIASSBF)->BF_LOCALIZ,(CALIASSBF)->BF_NUMSERIE,(CALIASSBF)->BF_LOTECTL,(CALIASSBF)->BF_NUMLOTE})
ACDV035.PRG - CBLOADEST() -> LNOLOOP := EXECBLOCK("CBINV06",.F.,.F.,{SBF->BF_PRODUTO,SBF->BF_LOCAL,SBF->BF_LOCALIZ,SBF->BF_NUMSERIE,SBF->BF_LOTECTL,SBF->BF_NUMLOTE})
ACDV035.PRG - VLDCODINV() -> LRETORNO := EXECBLOCK("V035VLDM",.F.,.F.)
ACDV035.PRG - VLDEND() -> LRET := EXECBLOCK("CBINV02",,,{CARMAZEM,CENDERECO})
ACDV035.PRG - VLDETIPRO() -> CETIQPROD := EXECBLOCK("CBINV01",,,{CARMAZEM,CENDERECO,CETIQPROD})
ACDV035.PRG - VLDETIPRO() -> EXECBLOCK("CBINV04",.F.,.F.)
ACDV035.PRG - VLDETIPRO() -> LRET := EXECBLOCK("CBINVVAL",.F.,.F.)
ACDV035.PRG - VLDETIPRO() -> NQTDAUX := EXECBLOCK("V035ALTQTD",.F.,.F.,{NQTDETIQ})
ACDV035.PRG - VLDMETI() -> CETIQAUX := EXECBLOCK("CBINV01",,,{CLOCAL,NIL,CETIQUETA})
ACDV035.PRG - VLDMETI() -> LRET := EXECBLOCK("CBINV02",,,{CLOCAL,CCODIGO})
ACDV035.PRG - VPEALTQTD() -> NQTDAUX := EXECBLOCK("V035ALTQTD",.F.,.F.,{NQTDETIQ})
ACDV040.PRG - ACDV040X() -> EXECBLOCK("IMG00",,,{"ACDV040",CTM,""})
ACDV040.PRG - ACDV040X() -> EXECBLOCK("IMG00",,,{"ACDV040",CTM,IF(SF5->F5_TIPO=="R",AHISETI[LEN(AHISETI),8],"")})
ACDV040.PRG - ACDV040X() -> EXECBLOCK("IMG00",,,{"ACDV040",CTM,IF(SF5->F5_TIPO=="R",AHISETI[NX,8],"")})
ACDV040.PRG - ACDV040X() -> EXECBLOCK('ACD040GR',.F.,.F.)
ACDV040.PRG - DISTRIPROC() -> EXECBLOCK('ACD040DPR',.F.,.F.)
ACDV040.PRG - GRAVA() -> AMATAPE := EXECBLOCK('AI040GRD',.F.,.F.,AMATA)
ACDV040.PRG - GRAVA() -> EXECBLOCK('AI130DGR',.F.,.F.)
ACDV040.PRG - GRAVACB0() -> EXECBLOCK('ACD040CB0',.F.,.F.,{NQTDORI})
ACDV040.PRG - GRAVACB0() -> LNUMSERDEV := EXECBLOCK("SD3NSDV",.F.,.F.)
ACDV040.PRG - IMPRIME() -> EXECBLOCK('IMG01',,,({NQUANT,NIL,NIL,NETIQ,AHISETI[NX,12],AHISETI[NX,13],AHISETI[NX,14],AHISETI[NX,15],AHISETI[NX,6],NIL,SD3->D3_NUMSEQ,AHISETI[NX,4],AHISETI[NX,5],NIL,AHISETI[NX,9],NIL,NIL,IF(LNUMSERDEV,CNUMSERI," "),CORIGEM,IF(LNUMSERDEV .AND. !EMPTY(CNUMSERI),AHISETI[NX,7]," "),AHISETI[NX,16]}))
ACDV040.PRG - IMPRIME() -> EXECBLOCK('IMG01',,,({NQUANT,NIL,NIL,NETIQ,AHISETI[NX,12],AHISETI[NX,13],AHISETI[NX,14],AHISETI[NX,15],IF(CBARMPROC(AHISETI[NX,2],CTM),CARMPROC,AHISETI[NX,6]),NIL,SD3->D3_NUMSEQ,AHISETI[NX,4],AHISETI[NX,5],NIL,AHISETI[NX,9],AHISETI[NX,6],AHISETI[NX,8],CNUMSERI,CORIGEM,IF(CBARMPROC(AHISETI[NX,2],CTM)," ",AHISETI[NX,7]),AHISETI[NX,16]}))
ACDV040.PRG - IMPRIME() -> LNUMSERDEV := EXECBLOCK("SD3NSDV",.F.,.F.)
ACDV040.PRG - NEXTDOC() -> CDOC := EXECBLOCK('ACD040DOC',.F.,.F.)
ACDV040.PRG - VLDETIQ() -> LRET := EXECBLOCK("ACDV040VPR",.F.,.F.,{CB0->CB0_CODPRO,CB0->CB0_OPREQ,AHISTOP})
ACDV040.PRG - VLDQUANT() -> LRET := EXECBLOCK("ACD040QE")
ACDV060.PRG - ACDV0601() -> CCONSF3 := EXECBLOCK("ACD060F3",.F.,.F.)
ACDV060.PRG - ACDV0601() -> EXECBLOCK("ACD060CA",.F.,.F.)
ACDV060.PRG - DISTRIBUI() -> EXECBLOCK("ACD060GR",.F.,.F.)
ACDV060.PRG - DISTRIBUI() -> EXECBLOCK("ACD060OK",.F.,.F.)
ACDV060.PRG - VLDENDERECO() -> EXECBLOCK("ACD060CF",.F.,.F.)
ACDV060.PRG - VLDENDERECO() -> LOK := EXECBLOCK("ACD060VE",.F.,.F.)
ACDV060.PRG - VLDESTORNO() -> EXECBLOCK("ACD060ES",.F.,.F.,{CETIQUETA,NQTDEPRO})
ACDV060.PRG - VLDETIQ() -> EXECBLOCK("ACD060ET",,,{CPROD})
ACDV060.PRG - VLDPROD() -> IF LAIC060VP .AND. ! EXECBLOCK("AIC060VPR",.F.,.F.,{CPROD,AETIQUETA[2]*NQTDEPRO,AETIQUETA})
ACDV060.PRG - VLDPROD() -> LFORCAARM := EXECBLOCK("V160FARM",.F.,.F.)
ACDV110.PRG - DADOSGERAIS() -> AHIST := EXECBLOCK('ACDV110D',.F.,.F.,{AHIST})
ACDV110.PRG - MENUPRODC() -> ADADOS := ACLONE(EXECBLOCK('ACDV110C',,,{1,ADADOS}))
ACDV110.PRG - MENUPRODC() -> EXECBLOCK('ACDV110C',,,{2,CPRODUTO})
ACDV110.PRG - MOSTRAEND() -> ADADOSAUX := EXECBLOCK("CDV110END",.F.,.F.,{ADADOS})
ACDV120.PRG - ACDV120() -> EXECBLOCK("AV120SAICF")
ACDV120.PRG - ACDV120() -> LAV120FIM := EXECBLOCK("AV120FIM",.F.,.F.,{CNOTA,CSERIE,CFORNEC,CLOJA})
ACDV120.PRG - AV120VLDPRD() -> CETIQRET := EXECBLOCK("AV120CB0",.F.,.F.,{CETIQPROD})
ACDV120.PRG - AV120VLDPRD() -> EXECBLOCK("AV120QTD",.F.,.F.,{CPRODUTO,NQE,NQTDETIQ2-NCOPIAS,NIL})
ACDV120.PRG - AV120VLDPRD() -> EXECBLOCK("AV120QTD",.F.,.F.,{CPRODUTO,NQTDETIQ2,1,CETIQPROD})
ACDV120.PRG - AV120VLDPRD() -> EXECBLOCK("AV120VLD",.F.,.F.,{CETIQPROD,LFORCAIMP})
ACDV120.PRG - AV120VLDPRD() -> EXECBLOCK("IMG01",,,{NQE,CCODOPE,,NCOPIAS,CNOTA,CSERIE,CFORNEC,CLOJA,,,,CLOTE,'',DVALID})
ACDV120.PRG - AV120VLDPRD() -> LAC120VLD := EXECBLOCK("AC120VLD",.F.,.F.,{CETIQPROD})
ACDV120.PRG - AV120VLDPRD() -> LFORCAIMP := EXECBLOCK("CBVLDIRE",.F.,.F.,{CETIQPROD,CNOTA,CSERIE,CFORNEC,CLOJA,CLOTE,DVALID,NOPCAO,NQTDETIQ2})
ACDV120.PRG - AV120VLDPRD() -> LPROD := EXECBLOCK("A120PROD",.F.,.F.,{CETIQPROD})
ACDV120.PRG - DISTQTDCONF() -> EXECBLOCK("AV120SD1",.F.,.F.,{LESTORNA})
ACDV120.PRG - GRAVACBE() -> EXECBLOCK("AV120CBE",.F.,.F.,{LESTORNO})
ACDV120.PRG - VLD2UM() -> ARETPE := EXECBLOCK("AV120UM",.F.,.F.,{CPRODUTO})
ACDV120.PRG - VLDNOTA() -> LVLDNFE := EXECBLOCK("AV120NFE",.F.,.F.)
ACDV121.PRG - ACDV121() -> EXECBLOCK("ACD121TL")
ACDV121.PRG - ACDV121() -> EXECBLOCK("AV121SAICF")
ACDV121.PRG - ACDV121() -> LAV121FIM := EXECBLOCK("AV121FIM",.F.,.F.,{CNOTA,CSERIE,CFORNEC,CLOJA})
ACDV121.PRG - AV121VLDPRD() -> CETIQRET := EXECBLOCK("AV121CB0",.F.,.F.,{CETIQPROD})
ACDV121.PRG - AV121VLDPRD() -> EXECBLOCK("AV121QTD",.F.,.F.,{CPRODUTO,NQE,NQTDETIQ2-NCOPIAS,NIL})
ACDV121.PRG - AV121VLDPRD() -> EXECBLOCK("AV121QTD",.F.,.F.,{CPRODUTO,NQTDETIQ2,1,CETIQPROD})
ACDV121.PRG - AV121VLDPRD() -> EXECBLOCK("AV121VLD",.F.,.F.,{CETIQPROD,LFORCAIMP})
ACDV121.PRG - AV121VLDPRD() -> EXECBLOCK("IMG01",,,{NQE,CCODOPE,,NCOPIAS,CNOTA,CSERIE,CFORNEC,CLOJA,,,,CLOTE,'',DVALID})
ACDV121.PRG - AV121VLDPRD() -> LAC121VLD := EXECBLOCK("AC121VLD",.F.,.F.,{CETIQPROD})
ACDV121.PRG - AV121VLDPRD() -> LFORCAIMP := EXECBLOCK("CBVLDIRE",.F.,.F.,{CETIQPROD,CNOTA,CSERIE,CFORNEC,CLOJA,CLOTE,DVALID,NOPCAO,NQTDETIQ2})
ACDV121.PRG - AV121VLDPRD() -> LPROD := EXECBLOCK("A121PROD",.F.,.F.,{CETIQPROD})
ACDV121.PRG - DISTQTDCONF() -> EXECBLOCK("AV121SD1",.F.,.F.,{LESTORNA})
ACDV121.PRG - VLD2UM() -> ARETPE := EXECBLOCK("AV121UM",.F.,.F.,{CPRODUTO})
ACDV121.PRG - VLDNOTA() -> LVLDNFE := EXECBLOCK("AV121NFE",.F.,.F.)
ACDV125.PRG - GERANOTA() -> EXECBLOCK("ACD125103")
ACDV125.PRG - GERANOTA() -> EXECBLOCK("ACD125VNF",.F.,.F.,{ADUPL})
ACDV125.PRG - GERAPRENOTA() -> EXECBLOCK("ACD125140")
ACDV125.PRG - IMPETI() -> EXECBLOCK("IMG00",,,{"ACDV125",LEFT(CPEDIDO,6),CFORN,CLOJA})
ACDV125.PRG - IMPETI() -> EXECBLOCK("IMG01",,,{NQE,NIL,NIL,NQTDE,NIL,NIL,CFORN,CLOJA,NIL,NIL,NIL,NIL,NIL,NIL,NIL,NIL,NIL,NIL,NIL,NIL,CPEDIDO})
ACDV125.PRG - VLDETICONF() -> EXECBLOCK("ACD125VLD",.F.,.F.,{CETIQUETA})
ACDV125.PRG - VLDQTDE() -> LRET := EXECBLOCK("ACD125QT",.F.,.F.,{AITENS[NELEM,3],VAL(AITENS[NELEM,5]),NVLDQTDE})
ACDV130.PRG - AI130GRAVA() -> AMATA := EXECBLOCK('AI130GMI',.F.,.F.,AMATA)
ACDV130.PRG - AI130GRAVA() -> EXECBLOCK('AI130DGR',.F.,.F.)
ACDV130.PRG - AI130GRMD2() -> EXECBLOCK('AI130DGR',.F.,.F.)
ACDV130.PRG - VLDETIQ() -> CETI := EXECBLOCK("AV130AVL",,,{CETI})
ACDV130.PRG - VLDETIQ() -> CETI := EXECBLOCK("AV130VPL",,,{CETI})
ACDV130.PRG - VLDETIQ() -> RETURN(EXECBLOCK('AI130VCB',.F.,.F.,CETI))
ACDV140.PRG - VLDQTD() -> CRESULT :=EXECBLOCK("IMG07",,,{STRZERO(I,10),CNOTA,CSERIE,CFORNEC,CLOJA,NQTDVOL})
ACDV150.PRG - GRAVATRANSF() -> APEAUX := EXECBLOCK("V150AUTO",.F.,.F.,{ATRANSF})
ACDV150.PRG - GRAVATRANSF() -> EXECBLOCK("ACD150GR",.F.,.F.)
ACDV150.PRG - GRAVATRANSF() -> EXECBLOCK("ACD150OK",.F.,.F.)
ACDV150.PRG - GRAVATRANSF() -> LRET := EXECBLOCK("AV150CF")
ACDV150.PRG - TRATAARRAY() -> EXECBLOCK("AV150ARR",.F.,.F.,{CETIQUETA,NPOS})
ACDV150.PRG - VALIDEND() -> LRET := EXECBLOCK("ACD150VE", .F., .F., {CARMAZEM, CENDERECO, NTIPO} )
ACDV150.PRG - VLDENDDES() -> AEND := EXECBLOCK("ACD150ME", .F., .F., {2,CARMDES,CENDDES} )
ACDV150.PRG - VLDENDDES() -> AEND := EXECBLOCK("ACD150ME", .F., .F., {2,CCB0ENDDES} )
ACDV150.PRG - VLDENDORI() -> AEND := EXECBLOCK("ACD150ME", .F., .F., {1,CARMORI,CENDORI} )
ACDV150.PRG - VLDESTORNO() -> LRET := EXECBLOCK("AV150EST", .F., .F., {CETIQUETA,NQTDE})
ACDV150.PRG - VLDPRODUTO() -> EXECBLOCK("V150PROD", .F., .F., {CTIPO})
ACDV150.PRG - VLDPRODUTO() -> LFORCAARM := EXECBLOCK("V150FARM",.F.,.F.)
ACDV150.PRG - VLDPRODUTO() -> LRET := EXECBLOCK("AV150VPR", .F., .F., {CETIQUETA})
ACDV151.PRG - GRAVATRANSF() -> APEAUX := EXECBLOCK("V151AUTO",.F.,.F.,{ATRANSF})
ACDV151.PRG - GRAVATRANSF() -> CDOC := EXECBLOCK('ACD151DC',.F.,.F.)
ACDV151.PRG - GRAVATRANSF() -> EXECBLOCK("ACD151GR",.F.,.F.)
ACDV151.PRG - GRAVATRANSF() -> EXECBLOCK("ACD151OK",.F.,.F.)
ACDV151.PRG - VLDENDDES() -> LRET := EXECBLOCK("AV151VLD",.F.,.F.,{2,CARMDES})
ACDV151.PRG - VLDPRODUTO() -> IF ! EXECBLOCK("AV151VPR",.F.,.F.,CETIQUETA)
ACDV152.PRG - GRAVATRANSF() -> EXECBLOCK("ACD152GR",.F.,.F.)
ACDV152.PRG - GRAVATRANSF() -> EXECBLOCK("ACD152OK",.F.,.F.)
ACDV152.PRG - VLDPRODUTO() -> IF ! EXECBLOCK("AV152VPR",.F.,.F.,CETIQUETA)
ACDV153.PRG - GRAVATRANSF() -> EXECBLOCK("ACD153GR",.F.,.F.)
ACDV153.PRG - GRAVATRANSF() -> EXECBLOCK("ACD153OK",.F.,.F.)
ACDV160.PRG - IMPRIME() -> CB0->(EXECBLOCK("IMG01",,,{NQE,,,1,CB0_NFENT,CB0_SERIEE,CB0_FORNEC,CB0_LOJAFO,CB0_LOCAL,CB0_OP,CB0_NUMSEQ,CB0_LOTE,CB0_SLOTE,CB0_DTVLD,CB0_LOCALI}))
ACDV160.PRG - IMPRIME() -> EXECBLOCK("IMG00",,,{"RACDI010PR"})
ACDV160.PRG - VLDETIREG() -> CETIQUETA := EXECBLOCK("ACD160RE",,,{CETIQUETA,CCODETIPAI})
ACDV160.PRG - VLDETIREG() -> IF EXISTBLOCK("ACD160VET") .AND. ! EXECBLOCK("ACD160VET",.F.,.F.,{AETIPAI,CETIQUETA})
ACDV165.PRG - GERANEWETI() -> EXECBLOCK("IMG00",,,{"ACDV170",CORDSEP})
ACDV165.PRG - GERANEWETI() -> EXECBLOCK("IMG01",,,{,,CB0->CB0_CODETI})
ACDV165.PRG - GERAOSOP() -> LRET := EXECBLOCK("ACDV165F",.F.,.F.,{CNEWORDSEP})
ACDV165.PRG - GERAOSPV() -> LRET := EXECBLOCK("ACDV165F",.F.,.F.,{CNEWORDSEP})
ACDV165.PRG - TELA() -> EXECBLOCK("A165TELA",.F.,.F.)
ACDV165.PRG - TELA() -> NQTDRET := EXECBLOCK('CBRQEESP',,,SB1->B1_COD)
ACDV165.PRG - VLDCAIXA() -> ARETPE := EXECBLOCK('ACD165VE',,,{ARET,NQTDE})
ACDV165.PRG - VLDETI() -> AETIQUETA:=EXECBLOCK('ACD170VE',,,AETIQUETA)
ACDV165.PRG - VLDETI() -> ARETPE := EXECBLOCK('ACD165VE',,,{AETIQUETA,NQTDE})
ACDV165.PRG - VLDPROD() -> ARETPE := EXECBLOCK('ACD165VE',,,{ARET,NQTDE})
ACDV166.PRG - ACDV166X() -> LRETPE := EXECBLOCK("ACD166VI")
ACDV166.PRG - ESTORNA() -> NQTDPE:=EXECBLOCK("CBRQEESP",,,SB1->B1_COD)
ACDV166.PRG - ETIPRODUTO() -> URETQTDE :=EXECBLOCK("V166NQTDE")
ACDV166.PRG - FIMPROCESS() -> EXECBLOCK("ACD166FI",.F.,.F.)
ACDV166.PRG - FIMPROCESS() -> EXECBLOCK("ACD166FM")
ACDV166.PRG - GRAVACB8() -> LRET := EXECBLOCK("ACDVCB8",.F.,.F.,{NQTDE,CARM,CEND,CPROD,CLOTE,CSLOTE,CLOTENEW,CSLOTENEW,CNUMSER,CCODCB0,CNUMSERNEW})
ACDV166.PRG - GRAVACB9() -> EXECBLOCK("ACDGCB9",.F.,.F.,{NQTDE})
ACDV166.PRG - GRVESTCB9() -> EXECBLOCK("ACDGCB9E",.F.,.F.,{NQTDE})
ACDV166.PRG - LIBERA() -> LACD166FLIB := EXECBLOCK("ACD166FLIB",.F.,.F.)
ACDV166.PRG - REQUISITOP() -> ARETPESD3 := EXECBLOCK("ACD166RQ",.F.,.F.,{AMATA})
ACDV166.PRG - SEPAROU() -> LV166SPOK:= EXECBLOCK("V166SPOK",.F.,.F.)
ACDV166.PRG - TELA() -> EXECBLOCK("A166TELA",.F.,.F.,{NQTDSEP,ATAM,CUNIDADE})
ACDV166.PRG - TELA() -> NQTDPE:=EXECBLOCK("CBRQEESP",,,SB1->B1_COD)
ACDV166.PRG - VLDCODSEP() -> LRET := EXECBLOCK("ACD166SP",.F.,.F.,{CORDSEP})
ACDV166.PRG - VLDCODSEP() -> LRET := EXECBLOCK("ACD166ST",.F.,.F.,{CORDSEP})
ACDV166.PRG - VLDESTEND() -> ARET := EXECBLOCK("ACD166EST",.F.,.F.,{ARET,CARMAZEM,CENDERECO})
ACDV166.PRG - VLDESTEND() -> IF ! EXECBLOCK("V166VLDE",,,{CEPRODUTO})
ACDV166.PRG - VLDPRODUTO() -> AETIQUETA := EXECBLOCK("ACD170VE",,,AETIQUETA)
ACDV166.PRG - VLDPRODUTO() -> IF ! EXECBLOCK("V166VLD",,,{CV166VLD,NQTDE})
ACDV166.PRG - VLDPRODUTO() -> LACD166BEMP := EXECBLOCK("ACD166BEMP",.F.,.F.)
ACDV166.PRG - VLDVOLUME() -> CRET := EXECBLOCK("ACD170EB")
ACDV166.PRG - VLDVOLUME() -> EXECBLOCK("IMG05",.F.,.F.,{CCODVOL,CB7->CB7_PEDIDO,CB7->CB7_NOTA,CB7->CB7_SERIE})
ACDV166.PRG - VLDVOLUME() -> LACD166V1 := EXECBLOCK("ACD166V1",.F.,.F.)
ACDV167.PRG - FIMPROCEMB() -> EXECBLOCK("ACD167FI",.F.,.F.)
ACDV167.PRG - INICPROCEMB() -> EXECBLOCK("ACD167IN",.F.,.F.)
ACDV167.PRG - VLDCODSEP() -> LRET := EXECBLOCK("ACD167OS",.F.,.F.,{CORDSEP})
ACDV167.PRG - VLDPRODEMB() -> ARET := EXECBLOCK("ACD167VE",,,{ARET,LESTORNA,NQTDE})
ACDV167.PRG - VLDPRODEMB() -> EXECBLOCK("IMG01",,,{,,CB9->CB9_CODETI})
ACDV167.PRG - VLDPRODEMB() -> EXECBLOCK("V167VLD",,,{CEPRODUTO,CTIPO})
ACDV167.PRG - VLDVOLEST() -> LRET := EXECBLOCK("ACD167VV",.F.,.F.,{CORDSEP,CVOLUME})
ACDV167.PRG - VLDVOLUME() -> LRET:= EXECBLOCK("ACD167VO",.F.,.F.,{CVOLUME})
ACDV168.PRG - GERANOTA() -> EXECBLOCK("ACD170FIM",,,{1,CNOTA,CSERIE})
ACDV168.PRG - GERANOTA() -> LNFOK := EXECBLOCK("ACD168NFOK",.F.,.F.)
ACDV168.PRG - LIBERA() -> LACD168FLIB := (IF(VALTYPE((LACD168FLIB := EXECBLOCK("ACD168FLIB",.F.,.F.))) == "L",LACD168FLIB,.F.))
ACDV170.PRG - DESFAZ() -> CRETPE := EXECBLOCK("ACD170DES", .F., .F., {AITENS[NX,_POSCODPRO]})
ACDV170.PRG - DESFAZ() -> NQTDCX:=EXECBLOCK('CBRQEESP',,,SB1->B1_COD)
ACDV170.PRG - GERANEWETI() -> EXECBLOCK("IMG01",,,{,,CB0->CB0_CODETI,1})
ACDV170.PRG - IMPVOLUME() -> EXECBLOCK("IMG05OFI",,,{LEN(AVOLUME),NX})
ACDV170.PRG - SEPARA() -> CRETPE := EXECBLOCK("ACD170DES", .F., .F., {AITENS[NX,_POSCODPRO]})
ACDV170.PRG - SEPARA() -> EXECBLOCK("ACD170SEP",,,{CB7->CB7_ORDSEP})
ACDV170.PRG - VLDCODSEP() -> LRETPE := EXECBLOCK("ACD166VL")
ACDV170.PRG - VLDETIDF() -> AETIQUETA:=EXECBLOCK('ACD170VD',,,AETIQUETA)
ACDV170.PRG - VLDVOLUME() -> CCODEMB := EXECBLOCK("ACD170EB")
ACDV170.PRG - VLDVOLUME() -> EXECBLOCK("IMG05",,,{CCODVOL,CPEDIDO,CB7->CB7_NOTA,CB7->CB7_SERIE})
ACDV175.PRG - FIMEMBARQ() -> EXECBLOCK("ACD175FI",.F.,.F.,{CB7->CB7_ORDSEP})
ACDV175.PRG - INFORMA() -> AETIQUETA:=EXECBLOCK('ACD175VE',,,{AETIQUETA,"01"})
ACDV175.PRG - TRANSPORT() -> URETTRANS := EXECBLOCK("V175CODT",.F.,.F.)
ACDV175.PRG - VLDCONFTRANSP() -> ARET:=EXECBLOCK('ACD175VE',,,{ARET,"06"})
ACDV175.PRG - VLDEBQVOL() -> ARET:=EXECBLOCK('ACD175VE',,,{ARET,"05"})
ACDV175.PRG - VLDEBQVOL() -> CVOLUME := EXECBLOCK("ACD175VO",.F.,.F.,{CVOLUME})
ACDV175.PRG - VLDPRODEBQ() -> AETIQUETA:=EXECBLOCK('ACD175VE',,,{AETIQUETA,"01"})
ACDV175.PRG - VLDPRODEBQ() -> ARET:=EXECBLOCK('ACD175VE',,,{ARET,"01"})
ACDV175.PRG - VLDQTDE() -> LRET:=EXECBLOCK("ACD175QTD",.F.,.F.,{NQTDE})
ACDV176.PRG - DEVITENS() -> NQTDCX:=EXECBLOCK("CBRQEESP",,,SB1->B1_COD)
ACDV176.PRG - FIMPROCESSO() -> EXECBLOCK("CB176FIM",.F.,.F.,CORDSEP)
ACDV176.PRG - VLDETIDESFAZ() -> AETIQUETA:=EXECBLOCK("ACD170VD",,,AETIQUETA)
ACDV210.PRG - IMPETI() -> EXECBLOCK("ACD210DI",.F.,.F., {CCODETIORI,CNEWETIQ})
ACDV210.PRG - IMPETI() -> EXECBLOCK("IMG00",,,{"ACDV210"})
ACDV210.PRG - IMPETI() -> EXECBLOCK("IMG01",,,{,,CB0->CB0_CODETI,1})
ACDV220.PRG - IMPETI() -> EXECBLOCK("IMG00",,,{"ACDV220"})
ACDV230.PRG - GERAPALLET() -> EXECBLOCK("IMG00",,,{ "ACDV230", CETIPALLET } )
ACDV230.PRG - GERAPALLET() -> EXECBLOCK("IMG10",,,{ CETIPALLET } )
ACDXFUN.PRW - CBGETTAMETQ() -> NRET:= EXECBLOCK( 'CBTAMETQ', .F., .F.,{ NTAMETQ } )
ACDXFUN.PRW - CBIMPETI() -> LRETPE := EXECBLOCK("CBETIQUE",.F.,.F.,{CCODPROD,LRET})
ACDXFUN.PRW - CBITPALLET() -> ARETPE := EXECBLOCK("CBPALLET",.F.,.F.,{CID})
ACDXFUN.PRW - CBLOG() -> EXECBLOCK("CBLOGALT",.F.,.F.,AESTRU)
ACDXFUN.PRW - CBNUMSER() -> LCBVLDNS := EXECBLOCK("CBVLDNS",.F.,.F.,{CNUMSER,CSERIE,AETIQUETA})
ACDXFUN.PRW - CBQTDEMB() -> NQTDPE := EXECBLOCK("CBRQEESP",.F.,.F.,CPRODUTO)
ACDXFUN.PRW - CBQTDVAR() -> LRETPE := EXECBLOCK("CBQTDVAR",.F.,.F.,{CCODPROD})
ACDXFUN.PRW - CBRASTRO() -> ARETAUX := EXECBLOCK("CBRASTRO",.F.,.F.,{CPRODUTO,CLOTE,CSUBLOTE,DVALID})
ACDXFUN.PRW - CBRETETI() -> ARETPE := EXECBLOCK("CBRETET2",.F.,.F.,{CID,CTIPID})
ACDXFUN.PRW - CBRETETI() -> ARETPE := EXECBLOCK("CBRETETI",.F.,.F.,{CID,CTIPID})
ACDXFUN.PRW - CBRETETI() -> LRETPE := EXECBLOCK("CBVRETIQ")
ACDXFUN.PRW - CBRETETIEAN() -> ARET := EXECBLOCK("CBRETEAN",,,{CID})
ACDXFUN.PRW - CBRETTIPO() -> CTIPO:=EXECBLOCK("CBRETIP2",.F.,.F.,{CID})
ADMXFUN.PRW - ADMGETFIL() -> AFIL := EXECBLOCK("ADMSELFIL",.F.,.F.,{CTITULO,ASIT,MVPARDEF,NTAMFIL})
ADMXFUN.PRW - ADMGETFIL() -> AFIL := EXECBLOCK("CTGETFIL",.F.,.F.,{AFIL})
ADMXFUN.PRW - ADMGETFIL() -> ASIT := EXECBLOCK("CTSETFIL",.F.,.F.,{ASIT,NI})
ADMXFUN.PRW - LEDADOSCV4() -> EXECBLOCK("F50CV4TMP1", .F., .F., { "CTK" })
ADMXFUN.PRW - LEDADOSCV4() -> EXECBLOCK("F50CV4TMP1", .F., .F., {"CV4"})
ADMXFUN.PRW - VLDCTBDC() -> LTOK := EXECBLOCK("CTBDCVLD",.F.,.F.,NOPCTBDC,CALIASGRV,ACPSCTBD,ACPSCTBC,CCTBCT1D,CCTBCTTD,CCTBCTDD,CCTBCTHD,CCTBCT1C,CCTBCTTC,CCTBCTDC,CCTBCTHC)
AE_COLAB_AP7.PRW - AE_COLAB()() -> LOCAL CVLDEXC := "T_VLDEXCCOL()"
AE_DESP_AP6.PRW - AE_DESP()() -> LOCAL CVLDEXC := ".T."
AE_DV001_AP6.PRW - AE_DV001(_NSTATUS() -> EXECBLOCK("PRESTCONT",.F.,.F.,{ACOLS})
AE_DV001_AP6.PRW - GRAVADESP() -> EXECBLOCK("AE_GRDESP",.F.,.F.)
AE_DV001_AP6.PRW - GRAVADESP() -> LTRATALCAVL := EXECBLOCK("AEDVLCAVL",.F.,.F.)
AE_DV001_AP6.PRW - GRAVADESP() -> _LDADOSOK := EXECBLOCK("VALIDPRES", .F., .F.,{_CCODPREST,_DVOOS,_CVOOS,_DVOOC,_CVOOC,AHEADER,ACOLS})
AE_DV003_AP6.PRW - AXINCLUILOC() -> IF LF3
AE_DV003_AP6.PRW - GREEMBOLSO() -> AGRVSE2 := EXECBLOCK("AE_GRVSE2",.F., .F.,{_CPROCESSO,AGRVSE2})
AE_DV003_AP6.PRW - GREEMBOLSO() -> AGRVSE2 := EXECBLOCK("AGRVSE2_U",.F., .F.,{_CPROCESSO,AGRVSE2})
AE_DV003_AP6.PRW - GREEMBOLSO() -> EXECBLOCK("CONTABPR", .F., .F.,{_CPROCESSO})
AE_FUNCOES.PRW - AEDEFDEST(_NRECNO,() -> EXECBLOCK("AE_DEFDEST",.F.,.F.,{_COPCAO,_CTIPO})
AE_FUNCOES.PRW - AEMAILFIN(_NRECNO,() -> CRETMSG := EXECBLOCK("AE_MSGVIAJ",.F.,.F.,{_CMSG})
AE_FUNCOES.PRW - AEMONTAEML(_CROTINA() -> OHTML := EXECBLOCK("CAMPOSHTML", .F., .F.,{ OHTML })
AE_FV001_AP6.PRW - CADFORN() -> LTESTE = EXECBLOCK("BLQFORN",.F.,.F.)
AE_FV001_AP6.PRW - EFETIVA() -> AGRVSE2 := EXECBLOCK("GRAVASE2", .F., .F.,{_CPROCESSO, AGRVSE2})
AE_FV001_AP6.PRW - EFETIVA() -> AGRVSE2 := EXECBLOCK("GRVSE2_U", .F., .F.,{_CPROCESSO, AGRVSE2})
AE_FV001_AP6.PRW - EFETIVA() -> EXECBLOCK("CUST_EN2",.F.,.F.)
AE_FV001_AP6.PRW - EFETIVA() -> EXECBLOCK("GRAVASE2", .F., .F.,{_CPROCESSO})
AE_FV001_AP6.PRW - EFETIVA() -> EXECBLOCK("GRVSE2_U", .F., .F.,{_CPROCESSO})
AE_HOTEIS.PRW - AE_HOTEIS() -> LOCAL CVLDEXC := "T_VALEXCHOT()"
AE_MUNIC.PRW - AE_MUNIC() -> LOCAL CVLDEXC := "T_VLDEXCMUN()"
AE_SV001_AP6.PRW - ACAO() -> EXECBLOCK("CDVPCOLCO",.F.,.F.)
AE_SV001_AP6.PRW - ACAO() -> EXECBLOCK("PE_APROV", .F., .F.)
AE_SV001_AP6.PRW - AE_SV001(NSTAT)() -> AADD(ABUTTONS, {"BUDGETY", {|| _NVALACR := EXECBLOCK("CUST_ADTO",.F.,.F.)}, STR0005 })
AE_SV001_AP6.PRW - AE_SV001(NSTAT)() -> _CDESFATURA := EXECBLOCK("RETDESFAT", .F., .F.)
AE_SV001_AP6.PRW - AE_SV001(NSTAT)() -> _LALVEIC:= EXECBLOCK("ALOC_VEIC",.F.,.F.)
AE_SV001_AP6.PRW - CALCULA() -> _NVALORES := EXECBLOCK("POS_ADIA", .F., .F.,{_CQUEM, _CANTEC, _DEMISSAO,;
AE_SV001_AP6.PRW - DADOSOK() -> LNOADTO :=EXECBLOCK("AE_NOADTO",.F.,.F.)
AE_SV001_AP6.PRW - EDITATEXTO(_CTITULO() -> EXECBLOCK("AE_MOTVIAG",.F.,.F.)
AE_SV001_AP6.PRW - GRAVA() -> EXECBLOCK("GRVGRAVA", .F., .F.,{_CQUEM, _CANTEC, _DEMISSAO,;
AE_SV001_AP6.PRW - GRAVA() -> _LRETURN := EXECBLOCK("VLDGRAVA", .F., .F.,{_CQUEM, _CANTEC, _DEMISSAO,;
AE_SV001_AP6.PRW - VFUNC() -> EXECBLOCK("AUT_APROV",.F.,.F.)
AE_SVIAG_AP6.PRW - AE_SVIAG()() -> CFIL := EXECBLOCK("LHPFIL",.F.,.F.,__CUSERID)
AE_WF001.PRW - AEWF001(_NOPCAO,() -> AGRVSE2 := EXECBLOCK("GRAVASE2", .F., .F.,{_CPROCESSO, AGRVSE2})
AE_WF001.PRW - AEWF001(_NOPCAO,() -> AGRVSE2 := EXECBLOCK("GRVSE2_U", .F., .F.,{_CPROCESSO, AGRVSE2})
AE_WF001.PRW - AEWF001(_NOPCAO,() -> EXECBLOCK("CUST_ENV",.F.,.F.,{_NOPCAO,OPROCESS})
AE_WF001.PRW - AEWF001(_NOPCAO,() -> EXECBLOCK("PE_APRV2", .F., .F.)
AE_WF001.PRW - AEWF001(_NOPCAO,() -> _CMAILTO := EXECBLOCK("PE1WF001", .F., .F.)
AGRA100.PRW - AGRA100N() -> EXECBLOCK('AGRA100DP',.F.,.F.)
AGRA100.PRW - FATUALPR() -> EXECBLOCK('AGRA100PR',.F.,.F.)
AGRA105.PRW - AGRA105I() -> LRETORNO := EXECBLOCK('AGRA105RP',.F.,.F.)
AGRA105.PRW - FALTDADOS() -> EXECBLOCK('AGRA105E2',.F.,.F.)
AGRA105.PRW - FEXCLUI() -> EXECBLOCK('AGRA105E2',.F.,.F.)
AGRA105.PRW - FINCLUI() -> EXECBLOCK('AGRA105E2',.F.,.F.)
AGRA200.PRW - AGRA200B() -> ACPOSEQ := EXECBLOCK('AGRA200EQ',.F.,.F.,ACPOSEQ)
AGRA200.PRW - AGRA200B() -> ACPOSPD := EXECBLOCK('AGRA200PD',.F.,.F.,ACPOSPD)
AGRA200.PRW - AGRA200B() -> IF !EXECBLOCK("AGRA200CO",.F.,.F.,NOPCAO)
AGRA205.PRW - AGRA205A() -> ACPOSEQ := EXECBLOCK('AGRA205EQ',.F.,.F.,ACPOSEQ)
AGRA205.PRW - AGRA205A() -> ACPOSPD := EXECBLOCK('AGRA205PD',.F.,.F.,ACPOSPD)
AGRA205.PRW - AGRA205G() -> LAGRA205GE := EXECBLOCK('AGRA205GE',.F.,.F.)
AGRA205.PRW - FGRAVARET() -> EXECBLOCK('AGRA205RA',.F.,.F.)
AGRA280.PRW - FEXCLUI() -> EXECBLOCK('AGRA280EX',.F.,.F.)
AGRA600.PRW - A600APROD() -> ARET := EXECBLOCK("AGR600PR",.F.,.F.,{AMATA})
AGRA600.PRW - A600GERAOP() -> ARET := EXECBLOCK("AGR600OP",.F.,.F.,{AVETOR})
AGRA600.PRW - AGRA600C() -> LAG600STQ := EXECBLOCK('AG600STQ', .F.,.F.,{OMODEL})
AGRA600.PRW - AGRA600E() -> LAG600STQ := EXECBLOCK('AG600STQ', .F.,.F.,{OMODEL})
AGRA600.PRW - TRANSFINTERN() -> ARET := EXECBLOCK("AGR600TRI",.F.,.F.,{ACAB,AITENS})
AGRA600.PRW - TRANSFINTERN() -> ARET := EXECBLOCK("AGR600TRI",.F.,.F.,{AMATA})
AGRA600.PRW - VIEWDEF() -> OVIEW := EXECBLOCK("AGRA600BUT",.F.,.F.,{OVIEW})
AGRA601.PRW - A601PRODU() -> CD3_CC := EXECBLOCK("A601PROPE",.F.,.F.)
AGRA601.PRW - AGRA601PE() -> CRET := EXECBLOCK('AGR601P1',.F.,.F.,)
AGRA610.PRW - AGR610FISCAL() -> LRET := EXECBLOCK('AG610PNF',.F.,.F.,{AFARDOES,APEDIDOS})
AGRA615.PRW - A165DTBEN() -> LEXEC := EXECBLOCK("AG615DTB",.F.,.F.)
AGRA615.PRW - A615CODETI() -> LRET := EXECBLOCK('AGRA615PE',.F.,.F.)
AGRA615.PRW - A615CODETI() -> NFDIPBR := EXECBLOCK( 'AGR615PS', .F., .F. )
AGRA615.PRW - A615PRINT() -> EXECBLOCK("AG615PRT",.F.,.F.,{CCODPRO, CCODFAZ, CPESO})
AGRA615.PRW - A615SALVAR() -> LRET := EXECBLOCK("AG615SAVE", .F., .F., { {CCODETQ, CCODFDI, CCODFDA, CCODCNJ, CPRODBN,;
AGRA615.PRW - AGRA615A() -> EXECBLOCK('AG615BTN',.F.,.F.,{OPNLWND1, OSIZE1})
AGRA615.PRW - FTRATAPEF9() -> ARET := EXECBLOCK('AG615FRDA',.F.,.F.)
AGRA615.PRW - MENUDEF() -> ARET := EXECBLOCK('AG615MNU',.F.,.F.,{AROTINA})
AGRA620.PRW - A620APROD() -> ARET := EXECBLOCK('AGR620PRD',.F.,.F.,{AMATA})
AGRA620.PRW - A620GERAOP() -> ARET := EXECBLOCK('AGR620VOP',.F.,.F.,{AVETOR, CCONJUNTO})
AGRA620.PRW - A620REQOP() -> ARET := EXECBLOCK('AGR620RQ',.F.,.F.,{AITEMT241, APRODUCAO[13] /* CONJUNTO */ })
AGRA620.PRW - A620REQOP() -> ARET := EXECBLOCK('AGR620RQ',.F.,.F.,{AMATA241, APRODUCAO[13] /* CONJUNTO */ })
AGRA620.PRW - AGRA620GRV() -> ARET := EXECBLOCK('AGR620DP',.F.,.F.,{A242CAB, A242ITENS,AFARDOES[NX,7] /* CONJUNTO */})
AGRA620.PRW - AGRA620GRV() -> LRETPE := EXECBLOCK('AG620TOK',.F.,.F., {AFARDOES[NX]})
AGRA620.PRW - GERAPRODUCAO() -> CNUMOP := EXECBLOCK('AGR620OP',.F.,.F.,{APRODUCAO[1],APRODUCAO[13]})
AGRA650.PRW - AGRA650BLC() -> CRETPE := EXECBLOCK('AG650QRY', .F. , .F., {CQRY, NOPC, OMODEL})
AGRA750.PRW - A750GERAD3() -> ARET := EXECBLOCK('AGR750D3',.F.,.F.,{ACAB, ALINHAS})
AGRA750.PRW - A750GERAD3() -> ARET := EXECBLOCK('AGR75ID3',.F.,.F.,{ALINHAS})
AGRA750.PRW - AGRA750P() -> LNF := EXECBLOCK('AG750NF',.F.,.F.,)
AGRA750.PRW - INCLUIPV() -> ARETPE := EXECBLOCK("AGR750PV",.F.,.F.,{APEDIDO, AITENS})
AGRA750.PRW - INCLUIPV() -> LMSERROAUTO:= EXECBLOCK("AGRA75001",.F.,.F.,{CNUMPV})
AGRA840.PRW - AGR840GRV() -> ARET := EXECBLOCK("AGR840P5",.F.,.F.,{APRODUC})
AGRA840.PRW - AGR840GRV() -> ARET := EXECBLOCK("AGRA840P",.F.,.F.,{AAPONT})
AGRA840.PRW - AGR840ID3() -> ARET := EXECBLOCK("AGR840PI",.F.,.F.,{ACAB,AITENS[LEN(AITENS)]})
AGRA840.PRW - AGR840POS() -> LHELP := EXECBLOCK("AGR840P4",.F.,.F.)
AGRA840.PRW - AGR840PRE() -> LRET := EXECBLOCK("AGR840P6",.F.,.F.,{NOP})
AGRA840.PRW - AGRA840DN() -> ARET := EXECBLOCK("AGR840DE",.F.,.F.)
AGRA840.PRW - AGRA840DN() -> EXECBLOCK("AGR840P9",.F.,.F.,{A242CABITE, A242ITENS,LDESCARTE})
AGRA840.PRW - AGRA840DN() -> LDESM := EXECBLOCK("AGR840CDES",.F.,.F.,{A242CABITE[1],A242ITEM,NP9->NP9_CODSAF/* ACORDADO COM A CEREAL OURO */})
AGRA840.PRW - AGRCAG1B8() -> CLOCALMP := EXECBLOCK("AGR840P7",.F.,.F.,)
AGRA840.PRW - MENUDEF() -> ARETM := EXECBLOCK('AGR840P3',.F.,.F.)
AGRA840.PRW - MODELDEF() -> ARETIN := EXECBLOCK("AGR840P2",.F.,.F.)
AGRA840.PRW - MODELDEF() -> ARETIN := EXECBLOCK("AGR840P8",.F.,.F.)
AGRA860.PRW - AGR860DEOK() -> ARETPE := EXECBLOCK("AG860DES",.F.,.F.)
AGRA870A.PRW - AGR870AADD() -> IF !EXECBLOCK("AG870OK",.F.,.F.)
AGRA870A.PRW - AGR870AAOK() -> LRET := EXECBLOCK('AG870CONF',.F.,.F.,)
AGRA870A.PRW - AGR870AMKB() -> ASQL := EXECBLOCK("AG870AA2",.F.,.F., {ASQL} )
AGRA870A.PRW - AGR870AMKB() -> ASQL := EXECBLOCK("AG870AA3",.F.,.F., {ASQL} )
AGRA870A.PRW - AGR870ASTT() -> ARES := EXECBLOCK("AG870AA5",.F.,.F., {_AMKB2, _ACPMKB2, AIND } )
AGRA870A.PRW - AGR870ASTT() -> ARES := EXECBLOCK("AG870AA4",.F.,.F., {_AMKB, _ACPMKB, AIND } )
AGRA870A.PRW - AGRA870AEX() -> LRET := EXECBLOCK("AG870AA6",.F.,.F.,{_CALIMKB, _CALIMKB2})
AGRA870A.PRW - AGRA870B() -> ANEWBUTTON := EXECBLOCK("AG870AA1",.F.,.F.,{ANEWBUTTON})
AGRA870A.PRW - AGRF4LOTE() -> CAG870AA8 := EXECBLOCK( "AG870AA8",.F.,.F.,{CQRYTEMPO, (_CALIMKB)->PEDIDO, (_CALIMKB)->ITEM,(_CALIMKB)->PRODUTO })
AGRA870A.PRW - AGRF4LOTE() -> CAG870AA9 := EXECBLOCK( "AG870AA9",.F.,.F.,{CQRYTEMPO, CALIASQRY, (_CALIMKB)->PEDIDO, (_CALIMKB)->ITEM,(_CALIMKB)->PRODUTO, LUSOUDIRE } )
AGRA870C.PRW - FMONTAQUERY() -> CCPOSUSER := EXECBLOCK("AG870C02",.F.,.F.,{CQUERY})
AGRA890.PRW - AGR890APR() -> LRET := EXECBLOCK("AGR890P1",.F.,.F.)
AGRA890.PRW - AGRA890ACT() -> ACAMPOS := EXECBLOCK("AGR890P3",.F.,.F., ACAMPOS)
AGRA900.PRW - AGR900PRE() -> LRET := EXECBLOCK("AGR900P6",.F.,.F.,{NOP})
AGRA900.PRW - AGRA900STA() -> APEDIDO := EXECBLOCK("AGR900P5",.F.,.F.,{APEDIDO})
AGRA900.PRW - AGRA900STA() -> APEDIDO := EXECBLOCK("AGR900PV",.F.,.F.,{APEDIDO})
AGRA900.PRW - AGRA900STA() -> LPART9 := EXECBLOCK("AGR900P2",.F.,.F.,)
AGRA900.PRW - FQRYLOTE() -> CRETQUERY := EXECBLOCK("AGR900P7",.F.,.F.,{CQUERY})
AGRUTIL01.PRW - AGR840LIF() -> LRET := EXECBLOCK("AGR840CP",.F.,.F.,{AHEADER, ACOLS})
AGRUTIL01.PRW - AGR840LIS() -> LRET := EXECBLOCK('AGR840CT', .F.,.F.)
AGRUTIL01.PRW - AGRA840NFE() -> ART840DV := EXECBLOCK("AGR840DV",.F.,.F.,{AHEADER, ACOLS})
AGRX500B.PRW - AX500SPDFC() -> CNUMOP := EXECBLOCK('AGRX50OP',.F.,.F.,)
AGRX500C.PRW - AGRX500PCF() -> CNUMOP := EXECBLOCK('AGRX50OP',.F.,.F.,)
AGRX500C.PRW - AX500PCFIS() -> CNUMOP := EXECBLOCK('AGRX50OP',.F.,.F.,)
AGRX500J.PRW - AX500PRFUN() -> LRET := EXECBLOCK("AX500PE2",.F.,.F.)
AGRX500O.PRW - AX500FVLCT() -> CRETQUERY := EXECBLOCK("AGR500QC",.F.,.F.,{CQUERY})
AGRXFUN1.PRW - AGREMTNF() -> ARET := EXECBLOCK('AGRXEMTNT',.F.,.F.,{APVLNFS, CSERIE, CROTINA})
AGRXFUN1.PRW - AGRXSTPROP() -> EXECBLOCK("AGXFUN1",.F.,.F.,{OSTRUCT, CFIELD, NTYPEVIEW, XVALUE})
APDA020.PRX - MENUDEF() -> AROTPE := EXECBLOCK( "APD20ROT", .F., .F. )
APDA020.PRX - RD0CCVLD() -> EXECBLOCK( "CHKRDZREL" , .F., .F., { "END" , LSRACHANGED } )
APDA020.PRX - RD0CCVLD() -> LSRACHANGED := EXECBLOCK( "CHKRDZREL" , .F., .F., { "INIT" } )
APDA020.PRX - RD0RELATION() -> EXECBLOCK( "CHKRDZREL" , .F., .F., { "END" , LSRACHANGED } )
APDA020.PRX - SRAUPDRD0() -> CRETSITUAC := EXECBLOCK( "APDGRV02", .F., .F.)
APDA020.PRX - SRAUPDRD0() -> EXECBLOCK("APDGRV01",.F.,.F.,{CRD0CODIGO,"SRA",NSRARECNO,CFILSRA+SRA->RA_MAT,ARELATION,NOPCREL,"I"})
APDA020.PRX - SRAUPDRD0() -> EXECBLOCK("APDGRV01",.F.,.F.,{RD0->RD0_CODIGO,"SRA",NSRARECNO,CFILSRA+SRA->RA_MAT,ARELATION,NOPCREL,"A"})
APDA020.PRX - SRAUPDRD0() -> IF( VALTYPE( LRET := EXECBLOCK( "APD20REL", .F., .F.) ) == "L" )
APDA270.PRW - APDA270MNT() -> EXECBLOCK("APD80DEL",.F.,.F.,{AAREARD6,LCHKDELSHWLOG,ALOGCHKDEL})
APDA270.PRW - APDA270MNT() -> EXECBLOCK("APDMONTA",.F.,.F.,{RD6->RD6_CODIGO})
APDM010.PRW - FCALCMEDIACOMP() -> IF ( VALTYPE( ARET := EXECBLOCK("APD01001", .F. , .F. ,{AMEDIAITEMCOMP,AVLRQUESTAO}) ) == "A" )
APTA100.PRW - APT100VLD() -> IF(VALTYPE(LVLDRET := EXECBLOCK( "APTA100VLD", .F.,.F.,{ACLONE(APROCESS),ACLONE(ADADOS)} )) == "L")
ARGNFE.PRX - ARGNNFETRF() -> CXML :=EXECBLOCK("NFAEXML001",.F.,.F.,{CTIPO,ANOTAS[NX][3],ANOTAS[NX][4],ANOTAS[NX][5],ANOTAS[NX][6],NULTID,CMODELOWS,ANOTAS[NX][9]})
ARGNFE.PRX - ARGTRANSNF() -> CXML :=EXECBLOCK("NFAEXML001",.F.,.F.,{CTIPO,ANOTAS[NX][3],ANOTAS[NX][4],ANOTAS[NX][5],ANOTAS[NX][6],0,CMODELOWS,ANOTAS[NX][9]})
ARGNFE.PRX - MENUDEF() -> EXECBLOCK("FISTRFNFE",.F.,.F.)
ARGNFE.PRX - WSNFEMNT() -> EXECBLOCK("ARGMNTASF",.F.,.F.,{CALIAS,CMODELOWS})
ARGNFE.PRX - WSNFEMNT() -> EXECBLOCK("ARGMNTNFE",.F.,.F.,{OXML,AMSG, CMODELOWS})
ARGREMELET.PRX - ARGNREMTRF() -> CQUERY := EXECBLOCK("FILTRREM", .F., .F.,{CQUERY,CSERIE,CNOTAINI,CNOTAFIM,CPLANTA,CPORTA})
ARGREMELET.PRX - ARGNREMTRF() -> CXML :=EXECBLOCK("ARGREMCOTXML",.F.,.F.,{CTIPO,ANOTAS[NX][3],ANOTAS[NX][4],ANOTAS[NX][5],ANOTAS[NX][6]})
ARGREMELET.PRX - MENUDEF() -> EXECBLOCK("FISTRFREM",.F.,.F.)
ARGREMELET.PRX - XMLREMESSA() -> EXECBLOCK("FISENVREM",.F.,.F.,{OWS:OWSREMESSAREMITORESULT:OWSXMLID:CBASE64BINARY})
AR_REMP.PRX - RPTDETAIL() -> @ NLIN, 023 PSAY TRANSFORM(SCM->CM_PRODUTO, X3PICTURE( SCM->CM_PRODUTO))
AR_REMP.PRX - RPTDETAIL() -> CPICTURE := X3PICTURE( SA2->A2_CGC)
AR_REMP.PRX - RPTDETAIL() -> CPICTURE := X3PICTURE( SCM->CM_TRANS)
ATFA010.PRW - AF010BAR() -> IF VALTYPE( AUSBUTTONS := EXECBLOCK( "AF010BUT", .F., .F. ) ) == "A"
ATFA010.PRW - AF010COMP() -> CTEXTO := EXECBLOCK("AF10DESC",.F.,.F.)
ATFA010.PRW - ATFA010CAD() -> CCHAVE := EXECBLOCK("AF010BRO",.F.,.F.,{CCHAVE})
ATFA010.PRW - ATFA010CAD() -> CFILTER := EXECBLOCK( "A010BRWT", .F., .F. )
ATFA010A.PRW - AF010ACHAP() -> LRET := EXECBLOCK("AF010CHP",.F.,.F.,{CCHAPA,LREPCHAPA})
ATFA010A.PRW - AF010ADLAT() -> EXECBLOCK("AF010DEL",.F.,.F.)
ATFA010A.PRW - AF010AVLDL() -> LRET := EXECBLOCK("F010VLDDEL",.F.,.F.,{CALIAS1, LCOMPRA})
ATFA010A.PRW - AF010VEXC() -> LRET:= EXECBLOCK("AF010EXC",.F.,.F.)
ATFA010A.PRW - ATFGRVCFG() -> IF "EXECBLOCK" $ UPPER(SNK->NK_CBASE) .OR. "U_" $ UPPER(SNK->NK_CBASE)
ATFA012.PRW - AF012ACHAP() -> LRET := EXECBLOCK("AF012CHP",.F.,.F.,{NCHAPA,LREPCHAPA})
ATFA012.PRW - AF012ACONV() -> OAUX:SETVALUE(AAUX[NPOSVORIGATF][3], IF(EXISTBLOCK("A30EMBRA"),NVALOR/EXECBLOCK("A30EMBRA",.F.,.F.),;
ATFA012.PRW - AF012ADPAC() -> OAUX:SETVALUE(AAUX[NPOSMODATF][3], NVALOR / EXECBLOCK("A30EMBRA",.F.,.F.))
ATFA012.PRW - AF012AFNG() -> EXECBLOCK("A012ALTG",.F.,.F.,{OAUX:AHEADER, OAUX:ACOLS})
ATFA012.PRW - AF012AFNG() -> EXECBLOCK("A012FNG",.F.,.F.,{OAUX:AHEADER, OAUX:ACOLS, OAUX})
ATFA012.PRW - AF012AFNG() -> EXECBLOCK("A012RCOL",.F.,.F.,{OAUX:AHEADER, OAUX:ACOLS, OAUX})
ATFA012.PRW - AF012AGRV() -> EXECBLOCK("ATFA012",.F.,.F., {OMODEL, 'MODELCOMMITNTTS', 'SN3DETAIL'})
ATFA012.PRW - AF012AGRV() -> EXECBLOCK("ATFA012",.F.,.F.,{OMODEL, 'FORMCOMMITTTSPOS', 'SN3DETAIL', IF(NOPER == 3, .T., .F.)})
ATFA012.PRW - AF012ALNOK() -> EXECBLOCK("A30EMBRA",.F.,.F.),RECMOEDA(DDATABASE,CMOEDAATF))) -;
ATFA012.PRW - AF012ALNOK() -> IF !EXECBLOCK("AF12VLR0",.F.,.F.,{NVALORI,NVORIGATF})
ATFA012.PRW - AF012ALNOK() -> IF ABS((NVALORI + NVALCORACU) / EXECBLOCK("A30EMBRA",.F.,.F.) - NVORIGATF ) > 1
ATFA012.PRW - AF012ALNOK() -> LRET := EXECBLOCK("ATFA012" ,.F.,.F.,{OAUX, 'FORMLINEPOS', 'SN3DETAIL', NATUAL })
ATFA012.PRW - AF012ATAXA() -> LRET:= EXECBLOCK("ATLIBGRP",.F.,.F.,{FUNNAME()})
ATFA012.PRW - AF012ATDOK() -> LRET := EXECBLOCK("AF010TOK",.F.,.F.)
ATFA012.PRW - AF012ATDOK() -> LRET := EXECBLOCK("ATFA012",.F.,.F., {OMODEL, 'MODELPOS', 'SN3DETAIL'})
ATFA012.PRW - AF012AVLDL() -> LRET := EXECBLOCK("F010VLDDEL",.F.,.F.,{CALIAS1, LCOMPRA})
ATFA012.PRW - AF012CPY() -> LRETPE:= EXECBLOCK("AF012COPY",.F.,.F.)
ATFA012.PRW - AF012DLAT() -> EXECBLOCK("AF010DEL",.F.,.F.)
ATFA012.PRW - AF012EST() -> CDESC := EXECBLOCK("AF10DESC",.F.,.F., {CDESC})
ATFA012.PRW - AF012EXCLT() -> LOCAL LMOSTRA := IF( LPE .AND. (EXECBLOCK('ATMOSCNT')),.T., .F.)
ATFA012.PRW - AF012MULTI() -> LAF012COPY:= EXECBLOCK("AF012COPY",.F.,.F.)
ATFA012.PRW - AF012VEXC() -> LRET:= EXECBLOCK("AF012EXC",.F.,.F.)
ATFA012.PRW - ATFGRV12CFG() -> IF "EXECBLOCK" $ UPPER(SNK->NK_CBASE) .OR. "U_" $ UPPER(SNK->NK_CBASE)
ATFA012.PRW - F012STRUCT() -> EXECBLOCK("ATFA012" ,.F.,.F.,{OSTRUCT, 'FORMSTRUCT', 'SN3DETAIL' })
ATFA012.PRW - MENUDEF() -> AROTINA := EXECBLOCK("AF012ROT",.F.,.F.,{AROTINA})
ATFA012.PRW - MODELDEF() -> EXECBLOCK("AT012SN1",.F.,.F.,{OSN1})
ATFA030.PRX - A030ATUARQ() -> EXECBLOCK("AF030CAN",.F.,.F.)
ATFA030.PRX - AF030AUTO() -> CFILTROAUX := EXECBLOCK("AF03AUTFIL",.F.,.F.)
ATFA030.PRX - AF030AUTO() -> EXECBLOCK("AF030AUTBT",.F.,.F., {ODLG})
ATFA030.PRX - AF030AUTO() -> LOCAL BFOR := { || SN3->N3_OK == CMARCA .AND. ((!LCANCELA .AND. SN3->N3_BAIXA < "1") .OR. (LCANCELA .AND. SN3->N3_BAIXA >= "1")) .AND. (!LF030FIL .OR. &(EXECBLOCK("F030FIL",.F.,.F.))) }
ATFA030.PRX - AF030BAIXA() -> LRET := EXECBLOCK("AF030VLBX",.F.,.F.,{"ATFA030","MAN"})
ATFA030.PRX - AF030BAIXA() -> PRIVATE NVLVEND:= IIF(EXISTBLOCK( "AF030VAL" ),EXECBLOCK("AF030VAL",.F.,.F.), 0)
ATFA030.PRX - AF030CALC() -> NTAXACORR := IIF(EXISTBLOCK("A30EMBRA"),EXECBLOCK("A30EMBRA",.F.,.F.),NTAXACORR)
ATFA030.PRX - AF030CAOFF() -> NTAXACORR := IIF(EXISTBLOCK("A30EMBRA"),EXECBLOCK("A30EMBRA",.F.,.F.),NTAXACORR)
ATFA030.PRX - AF030DADOSBX() -> EXECBLOCK("AF030CHA",.F.,.F.)
ATFA030.PRX - AF030GRAVA() -> EXECBLOCK("AF030GRV",.F.,.F.)
ATFA030.PRX - AF030GRAVA() -> EXECBLOCK("ATFA030",.F.,.F.)
ATFA030.PRX - AF030GROFF() -> EXECBLOCK("AF030GRV",.F.,.F.)
ATFA030.PRX - AF030GROFF() -> EXECBLOCK("ATFA030",.F.,.F.)
ATFA030.PRX - AF030MARCA() -> IF ! LTODOS .AND. (!LF030FIL .OR. &(EXECBLOCK("F030FIL",.F.,.F.)))
ATFA030.PRX - AF030MARCA() -> IF EVAL(BCOND) .AND. ((!LCANCELA .AND. SN3->N3_BAIXA < "1") .OR. (LCANCELA .AND. SN3->N3_BAIXA >= "1")) .AND. (!LF030FIL .OR. &(EXECBLOCK("F030FIL",.F.,.F.)))
ATFA030.PRX - AF030VLAUTO() -> LRET := EXECBLOCK("AF030VLBX",.F.,.F.,{"ATFA030","AUTO"})
ATFA030.PRX - FA030MARK14() -> .AND. (!LF030FIL .OR. &(EXECBLOCK("F030FIL",.F.,.F.)))
ATFA030.PRX - FA030MK15() -> (!LF030FIL .OR. &(EXECBLOCK("F030FIL",.F.,.F.)))
ATFA030.PRX - TUDOK() -> IF !EXECBLOCK("AF030VBX",.F.,.F.,{CMOTIVO,CNOTA,CSERIE,LBX})
ATFA030.PRX - TUDOKA() -> IF !EXECBLOCK("AT030BX",.F.,.F.,{CMOTIVO,CNOTA,CSERIE,LCANCELA})
ATFA035.PRX - A035ATUARQ() -> EXECBLOCK("AF035CAN",.F.,.F.)
ATFA035.PRX - AF035AUTO() -> LOCAL BFOR := { || SN3->N3_OK == CMARCA .AND. ((!LCANCELA .AND. SN3->N3_BAIXA < "1") .OR. (LCANCELA .AND. SN3->N3_BAIXA >= "1")) .AND. (!LF035FIL .OR. &(EXECBLOCK("F035FIL",.F.,.F.))) }
ATFA035.PRX - AF035BAIXA() -> LRET := EXECBLOCK("AF030VLBX",.F.,.F.,{"ATFA035","MAN"})
ATFA035.PRX - AF035BAIXA() -> PRIVATE NVLVEND:= IIF(EXISTBLOCK( "AF035VAL" ),EXECBLOCK("AF035VAL",.F.,.F.), 0)
ATFA035.PRX - AF035DADOSBX() -> EXECBLOCK("AF035CHA",.F.,.F.)
ATFA035.PRX - AF035GRAVA() -> EXECBLOCK("AF035GRV",.F.,.F.)
ATFA035.PRX - AF035GRAVA() -> EXECBLOCK("ATFA035",.F.,.F.)
ATFA035.PRX - AF035MARCA() -> (LCANCELA .AND. SN3->N3_BAIXA >= "1")) .AND. (!LF035FIL .OR. &(EXECBLOCK("F035FIL",.F.,.F.)))
ATFA035.PRX - AF035MARCA() -> IF ! LTODOS .AND. (!LF035FIL .OR. &(EXECBLOCK("F035FIL",.F.,.F.)))
ATFA035.PRX - AF035VLAUTO() -> LRET := EXECBLOCK("AF030VLBX",.F.,.F.,{"ATFA035","AUTO"})
ATFA035.PRX - FA035MARK14() -> (!LF035FIL .OR. &(EXECBLOCK("F035FIL",.F.,.F.)))
ATFA035.PRX - FA035MK15() -> (!LF035FIL .OR. &(EXECBLOCK("F035FIL",.F.,.F.)))
ATFA036.PRW - A036ATUARQ() -> EXECBLOCK("AF036CAN",.F.,.F.)
ATFA036.PRW - AF036ATU() -> NTAXACORR := EXECBLOCK("A36EMBRA",.F.,.F.)
ATFA036.PRW - AF036CANCE() -> EXECBLOCK("AF036CPR",.F.,.F.)
ATFA036.PRW - AF036DTBX() -> LRETDEPR := EXECBLOCK("AF036DEP", .F., .F.,{DULTDEPR,DDATABX})
ATFA036.PRW - AF036GRAVA() -> EXECBLOCK("AF036POC",.F.,.F.)
ATFA036.PRW - AF036GRAVA() -> EXECBLOCK("AF036PRC",.F.,.F.)
ATFA036.PRW - AF036GRAVA() -> LOCAL NVLVEND:= IIF(EXISTBLOCK( "AF036VAL" ),EXECBLOCK("AF036VAL",.F.,.F.), 0)
ATFA036.PRW - AF036X3VAL() -> LRET := EXECBLOCK("A036VLDSER", .F., .F., {OMODELFN6})
ATFA036.PRW - AS TRIGGER() -> LRETDEPR := EXECBLOCK("AF036DEP", .F., .F.,{DULTDEPR,DDATABX})
ATFA036L.PRW - AF036ATV() -> CQRYBENS += " AND " + EXECBLOCK("AF36AFIL",.F.,.F.) + CRLF
ATFA036L.PRW - AF036LMARK() -> LMARCA := EXECBLOCK("F036FIL",.F.,.F.)
ATFA040.PRX - AF040BAIX() -> EXECBLOCK("AF040BAI",.F.,.F., ARECPON)
ATFA040.PRX - AF040BXPARCIAL() -> PRIVATE NVLVEND:= IIF(EXISTBLOCK( "AF030VAL" ),EXECBLOCK("AF030VAL",.F.,.F.), 0)
ATFA040.PRX - FA040CHECK() -> CFILTROAUX := EXECBLOCK("FA040CHK", .F., .F., {CFILTRO} )
ATFA045.PRX - AF045BXPARCIAL() -> PRIVATE NVLVEND:= IIF(EXISTBLOCK( "AF045VAL" ),EXECBLOCK("AF045VAL",.F.,.F.), 0)
ATFA050.PRX - AF050CHK() -> LRESULT := EXECBLOCK( "AF050CHK", .F., .F. )
ATFA050.PRX - AFA050VLTP() -> AAUX := EXECBLOCK( "AF050VTP", .F., .F. )
ATFA050.PRX - ATFRAT() -> CFILTRO += "ORDER BY " + SQLORDER(EXECBLOCK("ATF50ORD"))
ATFA050.PRX - ATFX3() -> ARET := EXECBLOCK("AF050CTB",.T.,.T., { NHDLPRV, CLOTEATF, CARQUIVO, NTOTAL, .T. })
ATFA050.PRX - ATFX3() -> CFILTRO += "ORDER BY " + SQLORDER(EXECBLOCK("ATF50ORD"))
ATFA050.PRX - ATFX3() -> EXECBLOCK("AF050CAL",.F.,.F.)
ATFA050.PRX - ATFX3() -> IF !EXECBLOCK("ATF050LOG")
ATFA050.PRX - ATFX3() -> IF EXECBLOCK("AF050FPR",.F.,.F.,{CCHAVE})
ATFA050.PRX - ATFX3() -> LRET := EXECBLOCK("AF050SPS",.F.,.F.)
ATFA050.PRX - CALCCMARG() -> NTAXADEPR := IIF( LA30EMBRA, EXECBLOCK("A30EMBRA",.F.,.F.), NTAXADEPR )
ATFA050.PRX - CALCCMPADRAO() -> NTAXADEPR := IIF( LA30EMBRA, EXECBLOCK("A30EMBRA",.F.,.F.), NTAXADEPR )
ATFA050.PRX - GETTXMEDIA() -> AGETTX[ VAL( CMOEDAATF ) ] := EXECBLOCK("A30EMBRA",.F.,.F.)
ATFA050.PRX - GETTXVARIACAO() -> AGETTX[ VAL(CMOEDAATF) ] := EXECBLOCK("A30EMBRA",.F.,.F.)
ATFA060.PRX - A060CANCTB() -> EXECBLOCK("AF060CCTB",.F.,.F.)
ATFA060.PRX - AF060COMMIT() -> EXECBLOCK("ATF060END",.F.,.F.,{OMODEL})
ATFA060.PRX - AF060COMMIT() -> EXECBLOCK("ATF060GRV",.F.,.F.,{OMODEL})
ATFA060.PRX - AF060EXECA() -> CLOGERROPE := EXECBLOCK("AF060CAC",.F.,.F.,{CIDMOVFNR})
ATFA060.PRX - AF060EXECA() -> LCONT := EXECBLOCK("AF060VLC",.F.,.F.,{NOPCAO, CLOTEATF})
ATFA060.PRX - AF060GRUPO() -> EXECBLOCK("AF060GRP",.F.,.F.,{SN1->N1_GRUPO,CGRUPO})
ATFA060.PRX - AF060MOV() -> EXECBLOCK("AF060GSN4",.F.,.F.)
ATFA060.PRX - AF060PE() -> AVALUE := EXECBLOCK("AF060GAT",.F.,.F., {CCAMPO,OMODELFNS:GETVALUE(CCAMPO),AVETPE})
ATFA060.PRX - AF060TDOK() -> LAUX := EXECBLOCK("AF060TOK",.F.,.F.,{OMODEL})
ATFA060.PRX - AF060TRANS() -> EXECBLOCK("AF060CHA",.F.,.F.)
ATFA060.PRX - AF060VALID() -> LRET := EXECBLOCK("AF060VAL",.F.,.F.)
ATFA060.PRX - AFA060FIL() -> LRET := EXECBLOCK("AF060DES",.F.,.F.,{CFILDES,DULTDEPROR,DULTDEPRDS})
ATFA060.PRX - AFA060NFE() -> CESPECIE := EXECBLOCK("EXISTESPEC",.F.,.F.)
ATFA060.PRX - LOADFNR() -> CFILTRO := EXECBLOCK("AF060FIL",.F.,.F.)
ATFA060.PRX - MENUDEF() -> AROTNEW := EXECBLOCK("AF060BUT",.F.,.F.,{AROT})
ATFA070.PRX - A070CALC() -> EXECBLOCK("AF070DES",.F.,.F.)
ATFA070.PRX - A070CALC() -> IF EXECBLOCK("AF050FPR",.F.,.F.,{SN3->N3_CBASE+SN3->N3_ITEM})
ATFA070.PRX - ATFA070AUT() -> IF ! EXECBLOCK("ATFA070")
ATFA090.PRW - ATF090LOAD() -> CFILUSER:= EXECBLOCK("ATF90FI",.F.,.F.)
ATFA090.PRW - REAVALIAR() -> NTAXAREA := EXECBLOCK("AF90TAXI",.F.,.F.,NTAXAREA)
ATFA125.PRW - A125WFTR() -> AEMAILPE :=EXECBLOCK( "AF125APT", .F., .F., { AEMAILSOL, CCODSOL } )
ATFA125.PRW - AF125CONTA() -> AVALUE := EXECBLOCK("AF060GAT",.F.,.F., { CCPOATU, CCODIGO, AVAR } )
ATFA125.PRW - AF125LESN3() -> EXECBLOCK( "AF125GTL", .F., .F. )
ATFA125.PRW - AF125PRCBX() -> EXECBLOCK( "AF125GRB" , .F., .F. )
ATFA125.PRW - AF125PRCTR() -> EXECBLOCK( "AF125GRT", .F., .F. )
ATFA125.PRW - AF125SOLTR() -> AAF125CPO := EXECBLOCK( "AF125CPOBL", .F., .F.)
ATFA125.PRW - AF125TOKBX() -> LRET := EXECBLOCK( "AF125OKB", .F., .F., { NOPC, CCBASE, CITEM, NQTDBX, CMOTBX,;
ATFA125.PRW - AF125TOKTR() -> LRET := EXECBLOCK( "AF125OKT", .F., .F., { NOPC, CCBASE, CITEM, CGERANF, CCLASNFE, CTESNFS, CTESNFE, CNOTA, CSERIE, CCONDPG, CHISTSOL, CCCUSTODST, CLOCALDST,CFILDEST } )
ATFA125.PRW - AF125VALATF() -> LRET := EXECBLOCK("AF060VAL",.F.,.F.)
ATFA125.PRW - GRAVABX() -> EXECBLOCK( "AF125GRVBX" , .F., .F. )
ATFA125.PRW - GRAVATR() -> EXECBLOCK( "AF125GVT" , .F., .F. )
ATFA125.PRW - WFSBAPROV() -> EXECBLOCK( "AT125RTB", .F., .F., CFILANT + CWFID )
ATFA125.PRW - WFSBAPROV() -> EXECBLOCK("WFATFA125", .F., .F., { CUSERFLUIG, ASOLBX[2] })
ATFA125.PRW - WFSTAPROV() -> CEMAILRET := EXECBLOCK( "A125EMRT", .F., .F., { CEMAILUSR, CCODSOL } )
ATFA125.PRW - WFSTAPROV() -> CEMAILRET := EXECBLOCK( "A125EMRT", .F., .F., {CEMAILUSR,CCODSOL})
ATFA125.PRW - WFSTAPROV() -> EXECBLOCK( "AT125RTT", .F., .F., CFILANT+CWFID )
ATFA126.PRW - AF126GRV() -> ABXAUX := EXECBLOCK("A126EDGRV", .F., .F.,{ABXAUX})
ATFA126.PRW - AF126GRV() -> EXECBLOCK("ATF126GRV",.F.,.F.,{NOPC})
ATFA126.PRW - AF126GRV() -> LRET := EXECBLOCK("AF126TOK", .F., .F.,{NOPC,CTIPOSOL,CCODIGO})
ATFA130.PRX - AF130PROC() -> EXECBLOCK("AF130GRV",.F.,.F.,{"SN2"})
ATFA130.PRX - AF130PROC() -> EXECBLOCK("AF130GRV",.F.,.F.,{"SN3"})
ATFA130.PRX - AF130PROC() -> EXECBLOCK("AF130GRV",.F.,.F.,{"SN4"})
ATFA240.PRX - AF240CLASS() -> EXECBLOCK("AF240CLA",.F.,.F.)
ATFA240.PRX - ATFA240() -> CFILTER :=EXECBLOCK("AF240BRT",.F.,.F.,CFILTER)
ATFA240.PRX - MENUDEF() -> AAF240BUT := EXECBLOCK( "AF240BUT", .F., .F., AROTINA )
ATFA250.PRX - AF250AHEAD() -> AAF250AHD := EXECBLOCK('AF250AHD', .F., .F., ACLONE(AHEADER) )
ATFA250.PRX - AF250CANC() -> EXECBLOCK("AF250GRV",.F.,.F.,ACOLS[NCNT])
ATFA250.PRX - AF250CANC() -> LCANCELA := EXECBLOCK("AF250CAN",.F.,.F.,{ACOLS,NCNT})
ATFA250.PRX - AF250CHAPA() -> LRET := EXECBLOCK("AF250CHP",.F.,.F.,{CCHAPA,LREPETE,NPOSCHAPA,ACOLS})
ATFA250.PRX - AF250CTIMP() -> AAF250GRIMP := EXECBLOCK( 'AF250GRIMP', .F., .F., ACLONE(AAF250IMP) )
ATFA250.PRX - AF250GRAVA() -> EXECBLOCK("A250GRN3",.F.,.F.,{ACOLS[NX],NX})
ATFA250.PRX - AF250GRAVA() -> EXECBLOCK("A250GRSN4",.F.,.F.,{NOPCA,SN4->N4_TIPO,"1",SN4->N4_OCORR, SN4->N4_TIPOCNT})
ATFA250.PRX - AF250GRAVA() -> EXECBLOCK("A250GRSN4",.F.,.F.,{NOPCA,SN4->N4_TIPO,"2",SN4->N4_OCORR, SN4->N4_TIPOCNT})
ATFA250.PRX - AF250GRAVA() -> EXECBLOCK("AF250GRV",.F.,.F.,ACOLS[NX])
ATFA250.PRX - AF250LINOK() -> IF !EXECBLOCK( 'AF250LOK', .F., .F., @AAF250IMP )
ATFA250.PRX - AF250RATINF() -> ARETIMP := EXECBLOCK( 'AF250RIMP', .F., .F., ACLONE(AAF250IMP) )
ATFA250.PRX - AF250TUDOK() -> IF !EXECBLOCK( 'AF250TOK', .F., .F., {@AAF250IMP,@AAF250DESC,@AAF250DORI} )
ATFA250.PRX - MENUDEF() -> AAF250BUT := EXECBLOCK("AF250BUT",.F.,.F.,AROTINA)
ATFA251.PRX - AF251AHEAD() -> AAF251AHD := EXECBLOCK('AF251AHD', .F., .F., ACLONE(AHEADER) )
ATFA251.PRX - AF251CANC() -> EXECBLOCK("AF251GRV",.F.,.F.,ACOLS[NCNT])
ATFA251.PRX - AF251CANC() -> EXECBLOCK("AF251GRV",.F.,.F.,{ACOLS[NCNT], COPCAOGRV})
ATFA251.PRX - AF251CANC() -> LCANCELA := EXECBLOCK("AF251CAN",.F.,.F.,{ACOLS,NCNT})
ATFA251.PRX - AF251CHAPA() -> LRET := EXECBLOCK("AF251CHP",.F.,.F.,{CCHAPA,LREPETE,NPOSCHAPA,ACOLS})
ATFA251.PRX - AF251CTIMP() -> AAF251GRIMP := EXECBLOCK( 'AF251GRIMP', .F., .F., ACLONE(AAF251IMP) )
ATFA251.PRX - AF251GRAVA() -> EXECBLOCK("A251GRN3",.F.,.F.,{ACOLS[NX],NX})
ATFA251.PRX - AF251GRAVA() -> EXECBLOCK("A251GRSN4",.F.,.F.,{NOPCA,SN4->N4_TIPO,"1",SN4->N4_OCORR, SN4->N4_TIPOCNT})
ATFA251.PRX - AF251GRAVA() -> EXECBLOCK("A251GRSN4",.F.,.F.,{NOPCA,SN4->N4_TIPO,"2",SN4->N4_OCORR, SN4->N4_TIPOCNT})
ATFA251.PRX - AF251GRAVA() -> EXECBLOCK("AF251GRV",.F.,.F.,{ACOLS[NX], COPCAOGRV})
ATFA251.PRX - AF251GRPC() -> AEDTACOLS := EXECBLOCK ("AF251EAC",.F.,.F.,{AHEADER, ACOLS, AHEADERCOMP, ACOLSCOMP})
ATFA251.PRX - AF251LINOK() -> ARETAF251LOK := EXECBLOCK( 'AF251LNK', .F., .F., {@OGETDADTOT, @OGETDADIMP} )
ATFA251.PRX - AF251LINOK() -> IF !EXECBLOCK( 'AF251LOK', .F., .F., @AAF251IMP )
ATFA251.PRX - AF251RATINF() -> ARETIMP := EXECBLOCK( 'AF251RIMP', .F., .F., ACLONE(AAF251IMP) )
ATFA251.PRX - AF251TUDOK() -> IF !EXECBLOCK( 'AF251TOK', .F., .F., {@AAF251IMP,@AAF251DESC,@AAF251DORI} )
ATFA251.PRX - AF251TUDOK() -> LVALICMS := EXECBLOCK("AF251ICM",.F.,.F.)
ATFA251.PRX - AF251VLDTP() -> ATIPOSC := EXECBLOCK('AF251TIP', .F., .F., { ATIPOSC } )
ATFA251.PRX - AF251VORIG() -> ARETAF251V := EXECBLOCK("AF251VLO", .F., .F., { @OGETDADTOT, @OGETDADIMP } )
ATFA251.PRX - FA251CHECK() -> CFILAUX := EXECBLOCK( "AF251FILTR", .F., .F., {CFILTRO} )
ATFA251.PRX - MENUDEF() -> AAF251BUT := EXECBLOCK("AF251BUT",.F.,.F.,AROTINA)
ATFA370.PRX - ATFA370PROC() -> EXECBLOCK("ATF370CFR", .F., .F.,)
ATFA380.PRW - AF380GRVWZ() -> LRET := EXECBLOCK( "AF380VLIN", .F., .F.,{OGETD:AHEADER,OGETD:ACOLS,NINC,NOPC,LEFETIVA } )
ATFA380.PRW - ATFA380VAL() -> ACOLS[N][NPOSVRECATF] := IIF(EXISTBLOCK("A30EMBRA"),NVALOR/EXECBLOCK("A30EMBRA",.F.,.F.),NVALOR / RECMOEDA(DDTCONV,VAL(CMOEDAATF)))
ATFA380.PRW - ATFIOAEFET() -> SN3->N3_HISTOR := EXECBLOCK( "AF380HIST", .F., .F. )
ATFA385.PRW - MENUDEF() -> AROTINA := EXECBLOCK("AF385ROT",.F.,.F.,{AROTINA})
ATFXINT.PRW - ATFRECORDMOV() -> EXECBLOCK("RATGRAV",.F.,.F.,{AVLRRAT, NI})
ATFXINT.PRW - ATFXMOV() -> EXECBLOCK( "ATFXMOV", .F., .F. )
ATFXOLD.PRW - ATFLEGENDA() -> ACORESNEW := EXECBLOCK("ATFLEGPOS",.F.,.F.,{NREG,CALIAS,URETORNO})
ATFXOLD.PRW - ATFLEGENDA() -> ALEGNEW := EXECBLOCK("ATFLEGCX",.F.,.F.,{NREG,CALIAS,ALEGENDA})
ATFXSAL.PRW - ATFXSLDCTB() -> CSINAL := EXECBLOCK("ATFSINAL",.F.,.F.,{CCONTA,DDATA,CTIPO,AVALOR[1],AVALOR[2],AVALOR[3],AVALOR[4],AVALOR[5],CSINAL,NTAXA,CSUBCONTA,CFIL,CCLVL,CCUSTO,CTIPOCNT, FUNNAME(), AVALOR })
ATFXSAL.PRW - ATFXSLDCTB() -> CTIPOAUX := EXECBLOCK("ATFTIPO",.F.,.F.,{CCONTA,DDATA,CTIPO,AVALOR[1],AVALOR[2],AVALOR[3],AVALOR[4],AVALOR[5],CSINAL,NTAXA,CSUBCONTA,CFIL,CCLVL,CCUSTO,CTIPOCNT,FUNNAME(),AVALOR})
ATFXSAL.PRW - ATFXSLDCTB() -> EXECBLOCK("ATFGRSLD",.F.,.F.,{CTIPOAUX, CSINAL, "SNC"})
ATFXSAL.PRW - ATFXSLDCTB() -> EXECBLOCK("ATFGRSLD",.F.,.F.,{CTIPOAUX, CSINAL,"SN5"})
ATFXSAL.PRW - ATFXSLDCTB() -> EXECBLOCK("ATFGRSLD",.F.,.F.,{CTIPOAUX, CSINAL,"SN6"})
ATFXSAL.PRW - ATFXSLDCTB() -> EXECBLOCK("ATFGRSLD",.F.,.F.,{CTIPOAUX, CSINAL,"SNA"})
ATFXVLD.PRW - ATCLSSVER() -> LATCLSSVER := EXECBLOCK("AFCLDEPR",.F.,.F.,{CCLASSIF})
AUTONFEBUSINESS.PRW - CANCELAAUTONFE() -> ANOTAS := EXECBLOCK("TRFNFECANC",.F.,.F.,{ANOTAS})
AUTONFEBUSINESS.PRW - MONITORUPD() -> EXECBLOCK("SPDNFDANF",.F.,.F.,{CNOTA,CSERIE,SUBSTR(NFEIDSPED(CXML,"ID"),4), CIDENT, CCLIFOR, CLOJA})
AVCADGE.PRW - AT140VAL() -> IF(EASYENTRYPOINT("AVCADGE"),EXECBLOCK("AVCADGE",.F.,.F.,"ATUALIZA_TAXA"),)
AVCADGE.PRW - EECMEND() -> EXECBLOCK("AVCADGE",.F.,.F.,{"EECMEND",{CALIAS,NORDEM,CCHAVE,LVET,NTAM,NRET}})
AVCADGE.PRW - EICA140MANUT() -> EXECBLOCK("AVCADGE", .F., .F., {"LOK_VALID"})
AVCADGE.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EY0100MNU",.F.,.F.)
AVCADGE.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IA030MNU",.F.,.F.)
AVCADGE.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IA060MNU",.F.,.F.)
AVCADGE.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IA140MNU",.F.,.F.)
AVCADGE.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IA150MNU",.F.,.F.)
AVCADGE.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IA300MNU",.F.,.F.)
AVCADGE.PRW - TR350ARQUIVO() -> IF(EASYENTRYPOINT("ICPADGR1"),EXECBLOCK("ICPADGR1",.F.,.F.,"PATH"),)
AVCADGE.PRW - TR350VALID() -> IF(EASYENTRYPOINT("ICPADGR1"),EXECBLOCK("ICPADGR1",.F.,.F.,"VARPATH"),)
AVCRW.PRW - AVEMAIL() -> EXECBLOCK("AVCRW", .F., .F., {"AVEMAIL_SAIR"})
AVCRW.PRW - AVEMAIL() -> EXECBLOCK("AVCRW",.F.,.F.,{"AVEMAIL_CFROM"})
AVCRW.PRW - AVEMAIL() -> EXECBLOCK("AVCRW",.F.,.F.,{"AVEMAIL_RPT", CDIRRPT, CARQRPT})
AVCRW.PRW - AVEMAIL() -> EXECBLOCK("AVCRW",.F.,.F.,{"EMAIL",APARAM})
AVCRW.PRW - E_AVGLTT() -> EXECBLOCK("AVCRW",.F.,.F.,{"TELA"})
AVCRW.PRW - E_HISTDOC() -> IF(EASYENTRYPOINT("AVCRW"),EXECBLOCK("AVCRW",.F.,.F.,"EDITA_SY0"),)
AVFLUXO.PRW - AVPOS_DI() -> IF(EASYENTRYPOINT("AVFLUXO"),EXECBLOCK("AVFLUXO",.F.,.F.,"VALOR_TIT_PRE"),)
AVFLUXO.PRW - AVPOS_DI() -> IF(EASYENTRYPOINT("AVFLUXO"),EXECBLOCK("AVFLUXO",.F.,.F.,"VALOR_TIT_PRE_POS"),)
AVFLUXO.PRW - AVPOS_PO() -> IF(EASYENTRYPOINT("AVFLUXO"),EXECBLOCK("AVFLUXO",.F.,.F.,"VALOR_TIT_PR"),)
AVFRM105.PRW - PREENCHEWORK() -> IF(EASYENTRYPOINT("AVFRM105"),EXECBLOCK("AVFRM105",.F.,.F.,{"DELETA_REGISTRO",CALIASWK}),)
AVGDM151.PRW - AVGDM151() -> EXECBLOCK("AVGDM151",.F.,.F.,"ANTES_GRV_DETAIL")
AVGDM400.PRW - DM400EMIS() -> EXECBLOCK("AVGDM400",.F.,.F.,"DATA_DO_EMBARQUE")
AVGDM400.PRW - DM400EMIS() -> EXECBLOCK("AVGDM400",.F.,.F.,"IMPRESSAOCRYSTAL")
AVGDM400.PRW - DM400EXCL() -> IF(EASYENTRYPOINT("AVGDM400"),EXECBLOCK("AVGDM400",.F.,.F.,"ANTES_EXCLUSAO"),)
AVGDM400.PRW - DM400MANUT() -> IF(EASYENTRYPOINT("AVGDM400"),EXECBLOCK("AVGDM400",.F.,.F.,"ANTES_GRAVACAO"),)
AVGDM400.PRW - DM400MANUT() -> IF(EASYENTRYPOINT("AVGDM400"),EXECBLOCK("AVGDM400",.F.,.F.,"INICIO_MANUTENCAO"),)
AVGDM400.PRW - DM400MANUT() -> IF(EASYENTRYPOINT("AVGDM400"),EXECBLOCK("AVGDM400",.F.,.F.,{"APOS_GRAVACAO",NOPCAO}),)
AVGDM400.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("ADM400MNU",.F.,.F.)
AVGERAL.PRW - ADDCPOUSER() -> IF(EASYENTRYPOINT("AVGERAL"),EXECBLOCK("AVGERAL",.F.,.F.,{"CPOUSER",PROCNAME()}),)
AVGERAL.PRW - AVGNUMSEQ() -> EXECBLOCK("AVGERAL",.F.,.F.,"ALTERA_FILIAL")
AVGERAL.PRW - AVGSELECTFIL() -> EXECBLOCK("AVGERAL",.F.,.F.,"AVGSELECTFIL_AJUSTA_FILIAIS")
AVGERAL.PRW - AVGSELECTFIL() -> EXECBLOCK("AVGERAL",.F.,.F.,"AVGSELECTFIL_ANTES_GETS")
AVGERAL.PRW - AVKEYAUTO() -> EXECBLOCK("AVKEYAUTO", .F., .F., {AAUTOARRAY[NI][1], AAUTOARRAY[NI][2]})
AVGERAL.PRW - BUSCA_UM() -> EXECBLOCK("AVGERAL",.F.,.F.,{"BUSCA_UNID_MED"})
AVGERAL.PRW - COMPARAPESO() -> EXECBLOCK("AVGERAL", .F., .F., "COMPARAPESO_MENSAGEM")
AVGERAL.PRW - EASYGETNUM() -> EXECBLOCK("AVGERAL",.F.,.F.,"EASYGETNUM")
AVGERAL.PRW - EASYORIGEM() -> IF(EASYENTRYPOINT("AVGERAL"),EXECBLOCK("AVGERAL",.F.,.F.,"ALTERA_TIT"),)
AVGERAL.PRW - EICADICIND() -> EXECBLOCK("EICADICIND", .F., .F., {CORIGEM, CTIPO})
AVGERAL.PRW - EXCLUIITEM() -> IF LEXISTE .AND. EXECBLOCK('MTA010OK',.F.,.F.)
AVGERAL.PRW - EXCLUIITEM() -> LFUNC:=EXECBLOCK('MTA010E',.F.,.F.)
AVGERAL.PRW - E_INIT() -> SETKEY(VK_F12,{|| EXECBLOCK("EICCALEND",.F.,.F.)})
AVGERAL.PRW - GETNFEIMP() -> EXECBLOCK("GETNFEIMP",.F.,.F.,{"COMPLEMENTAR"})
AVGERAL.PRW - GETNFEIMP() -> EXECBLOCK("GETNFEIMP",.F.,.F.,{"LSWN"})
AVGERAL.PRW - GETNFEIMP() -> EXECBLOCK("GETNFEIMP",.F.,.F.,{"UNICA"})
AVGERAL.PRW - GETREG1100SPED() -> EXECBLOCK("AVGETEXPSPED",.F.,.F.,"ALTERA_SPED_1100")
AVGERAL.PRW - RETVETNFE() -> EXECBLOCK("AVGERAL",.F.,.F.,"GETNFEIMP")
AVGERAL.PRW - TEORIGEASY() -> EXECBLOCK("AVGERAL",.F.,.F.,{"ORIGEM_EASY_F100"})
AVGERAL.PRW - VALIDFIL () -> EXECBLOCK("AVGERAL",.F.,.F.,"VALIDFIL_AJUSTA_FILIAIS")
AVGMD150.PRW - AVGMD150() -> EXECBLOCK("AVGMD150", .F., .F.,"ANTES_PERGUNTE")
AVGMD150.PRW - AVGMDREL_BD() -> EXECBLOCK("AVGMD150", .F., .F.,"IMP_AGRUPAMENTO")
AVGMD150.PRW - AVGMDWORK() -> EXECBLOCK("AVGMD150", .F., .F.,"CRIA_WORK")
AVGMD150.PRW - AVGMDWORK() -> EXECBLOCK("AVGMD150", .F., .F.,"GRV_WORK")
AVGMD150.PRW - AVGMDWORK() -> EXECBLOCK("AVGMD150", .F., .F.,"STRING_FILTROS")
AVGMD150.PRW - AVGMDWORK() -> EXECBLOCK("AVGMD150",.F.,.F.,"VALIDA_PERGUNTE_DBF")
AVGMD150.PRW - AVGMDWORK() -> EXECBLOCK("AVGMD150",.F.,.F.,"VALIDA_PERGUNTE_TOP")
AVGMD150.PRW - PLINHA() -> EXECBLOCK("AVGMD150", .F., .F.,"QUEBRA_PAGINA")
AVINT101.PRW - EECBXFITIT() -> EXECBLOCK("AVINT101", .F., .F., "EECBXFITIT_ALTDTEMBA")
AVINT101.PRW - EECINCOM() -> EXECBLOCK("AVINT101",.F.,.F.,"EECINCOM")
AVINT101.PRW - EECINFIN() -> EXECBLOCK("AVINT101",.F.,.F.,"ALT_ARRAY_FIN_AVINT101")
AVINT101.PRW - EECRABAIXA() -> EXECBLOCK("AVINT101", .F., .F., "ALTERA_PARCELA")
AVPRINTE.PRW - AVPRINTBEGIN() -> IF(EASYENTRYPOINT("AVPRINTE"),EXECBLOCK("AVPRINTE",.F.,.F.,"INSERE_BOTAO"),)
AVPRINTE.PRW - GERAMAIL() -> IF(EASYENTRYPOINT("AVPRINTE"),EXECBLOCK("AVPRINTE",.F.,.F.,"EMAIL"),)
AVPRINTE.PRW - GERAMAIL() -> IF(EASYENTRYPOINT("AVPRINTE"),EXECBLOCK("AVPRINTE",.F.,.F.,"ORIENTACAO"),)
AVPRINTE.PRW - GERAMAIL() -> IF(EASYENTRYPOINT("AVPRINTE"),EXECBLOCK("AVPRINTE",.F.,.F.,"ZOOM"),)
AVRETBC.PRW - LERARQUIVO() -> EXECBLOCK("AVRETBC",.F.,.F.,"APOS_LEITURA_CSV")
BIXFUNA.PRW - BIXRUNENTRYPOINT() -> AFIELD := EXECBLOCK( "BIEXTGRV", .F., .F., { CENTITY, ORECORD:GETSTRUCT( .F. ), LISDIM } )
BIXFUNA.PRW - BIXRUNUSRTAB() -> ATABLES := EXECBLOCK("BIUSRTAB", .F., .F., { CENTITY } )
CADTABPRECO.PRW - OMS010FOR() -> ACOLS[LEN(ACOLS)] := EXECBLOCK("OS010LCO",.F.,.F.,{AHEADER,ACOLS[LEN(ACOLS)]})
CADTABPRECO.PRW - OMS010GRV() -> LOCAL AUSRMEMO := IF( EXISTBLOCK( "OM010MEM" ), EXECBLOCK( "OM010MEM", .F.,.F. ), {} )
CADTABPRECO.PRW - OMS010TOK()() -> LRET := EXECBLOCK("OM010TOK",.F.,.F.)
CAT63.PRW - CAT63CDM() -> EXECBLOCK("CAT63TRB",.F.,.F.,{"TMP","SDI","ICM",DDTINI,DDTFIM})
CDAA010.PRW - CD010ALTERA() -> AEDITCPO := EXECBLOCK("CD010CPO",.F.,.F.,AEDITFLD)
CDAA010.PRW - CD010ALTERA() -> EXECBLOCK("CD010ACONT",.F.,.F.)
CDAA010.PRW - CD010DELETA() -> EXECBLOCK("CD010DCONT",.F.,.F.)
CDAA010.PRW - MENUDEF() -> EXECBLOCK("CD010MNU",.F.,.F.)
CDAA020.PRW - MENUDEF() -> EXECBLOCK("CD020MNU",.F.,.F.)
CDAA030.PRW - CD030ARRAY() -> AREGRAAH2 := EXECBLOCK("DIRA020",.F.,.F.,AREGRAAH2)
CDAA030.PRW - CD030CALC2() -> ACALMOV:= EXECBLOCK("CDAA101",.F.,.F.,{LSEGUINTE,AQTDEAH7})
CDAA030.PRW - CD030CALC2() -> ACALMOV:= EXECBLOCK("CDAA102",.F.,.F.,{LSEGUINTE,AQTDEAH7})
CDAA030.PRW - CD030CALC2() -> ACALMOV:= EXECBLOCK("DIRA100",.F.,.F.,{LSEGUINTE,AQTDEAH7})
CDAA030.PRW - CD030CALC2() -> AQTDEAH7[8] += EXECBLOCK("DIRA110",.F.,.F.)
CDAA030.PRW - CD030CALC2() -> EXECBLOCK("DIRA140",.F.,.F.,{NDIRAUTOR,CALIAS})
CDAA030.PRW - CD030CALC2() -> LSEGUINTE := EXECBLOCK("CDAA103",.F.,.F.)
CDAA030.PRW - CD030CALC2() -> LSEGUINTE := EXECBLOCK("DIRA120",.F.,.F.)
CDAA030.PRW - CD030CALC2() -> NDIRAUTOR := EXECBLOCK("CDA030VDA", .F., .F., {NQTDVEND2, NPRECOUN, AREGRAAH2[I][5]})
CDAA030.PRW - CD030CALC2() -> NPRECOUN := EXECBLOCK("CDAA105",.F.,.F.,{CALIAS,AREGRAAH2})
CDAA030.PRW - CD030CALC2() -> NPRECOUN := EXECBLOCK("CDAPRDEV",.F.,.F.)
CDAA030.PRW - CD030CALC2() -> NPRECOUN := EXECBLOCK("DIRA130",.F.,.F.,{NPRECOUN,NMOEDAFOR})
CDAA030.PRW - CD030CALDA() -> ACONDICAO := EXECBLOCK( "DIRA070",.F.,.F.,CPRODUTO)
CDAA030.PRW - CD030CALDA() -> ACONDICAO := EXECBLOCK( "DIRA080", .F., .F. ,CPRODUTO)
CDAA030.PRW - CD030CALDA() -> ACONDICAO := EXECBLOCK("DIRA060",.F.,.F.,CPRODUTO)
CDAA030.PRW - CD030CALDA() -> ARETSALDO := EXECBLOCK("DIRA090",.F.,.F.,{CPRODUTO,DPERINI,DPERFIM})
CDAA030.PRW - CD030CALTOP() -> ACALMOV:= EXECBLOCK("CDAA101",.F.,.F.,{LSEGUINTE,AQTDEAH7})
CDAA030.PRW - CD030CALTOP() -> ACALMOV:= EXECBLOCK("CDAA102",.F.,.F.,{LSEGUINTE,AQTDEAH7})
CDAA030.PRW - CD030CALTOP() -> ACALMOV:= EXECBLOCK("DIRA100",.F.,.F.,{LSEGUINTE,AQTDEAH7})
CDAA030.PRW - CD030CALTOP() -> AQTDEAH7[8] += EXECBLOCK("DIRA110",.F.,.F.)
CDAA030.PRW - CD030CALTOP() -> EXECBLOCK("DIRA140",.F.,.F.,{NDIRAUTOR,CALIAS})
CDAA030.PRW - CD030CALTOP() -> LSEGUINTE := EXECBLOCK("CDAA103",.F.,.F.)
CDAA030.PRW - CD030CALTOP() -> LSEGUINTE := EXECBLOCK("DIRA120",.F.,.F.)
CDAA030.PRW - CD030CALTOP() -> NDIRAUTOR := EXECBLOCK("CDA030VDA", .F., .F., {NQTDVEND2, NPRECOUN, AREGRAAH2[I][5]})
CDAA030.PRW - CD030CALTOP() -> NPRECOUN := EXECBLOCK("CDAA105",.F.,.F.,{CALIAS,AREGRAAH2})
CDAA030.PRW - CD030CALTOP() -> NPRECOUN := EXECBLOCK("CDAPRDEV",.F.,.F.)
CDAA030.PRW - CD030CALTOP() -> NPRECOUN := EXECBLOCK("DIRA130",.F.,.F.,{NPRECOUN,NMOEDAFOR})
CDAA030.PRW - CD030DELDA() -> NREGISTRO := EXECBLOCK("DIRA010",.F.,.F.)
CDAA030.PRW - CD030GERIN() -> ACHAVE := EXECBLOCK("DIRA030",.F.,.F.,{DPERINI,DPERFIM})
CDAA030.PRW - CD030GERIN() -> ACHAVE := EXECBLOCK("DIRA040",.F.,.F.,{DPERINI,DPERFIM})
CDAA030.PRW - CD030GERIN() -> ACHAVE := EXECBLOCK("DIRA050",.F.,.F.,{DPERINI,DPERFIM})
CDAA030.PRW - CD030GRAH7() -> AINCONSIST := EXECBLOCK("DIRA150",.F.,.F.,{AINCONSIST,NDIFERENC,CPRODUTO,AQTDEAH7[13]})
CDAA030.PRW - CD030GRAH7() -> ARETSALDO := EXECBLOCK("DIRA090",.F.,.F.,{CPRODUTO,DPERINI,DPERFIM})
CDAA030.PRW - CD030PROCESSA() -> EXECBLOCK("CDAA104",.F.,.F., {DPERINI, DPERFIM})
CDAA030.PRW - CD030PROCESSA() -> LRET := EXECBLOCK("CDA030A",.F.,.F.)
CDAA030.PRW - CD030PROCTOP() -> ARETSALDO := EXECBLOCK("DIRA090",.F.,.F.,{AH1->AH1_PRODUTO,DPERINI,DPERFIM})
CDAA030.PRW - CD030PROCTOP() -> ARETSALDO := EXECBLOCK("DIRA090",.F.,.F.,{CPRODUTO,DPERINI,DPERFIM})
CDAA030.PRW - CD030PROCTOP() -> CQUERY := EXECBLOCK("DIRA160",.F.,.F.,{DPERINI,DPERFIM,CQUERY})
CDAA030.PRW - CD030PROCTOP() -> EXECBLOCK("CDAA104",.F.,.F., {DPERINI, DPERFIM})
CDAA030.PRW - CD030PROCTOP() -> LRET := EXECBLOCK("CDA030A",.F.,.F.)
CENSIPWIZ.PRW - CENPLAPLS() -> AREGS:= EXECBLOCK("PLSDADCON",.F.,.F.,{})
CENSIPWIZ.PRW - CRIA_PG5() -> AREGS:= EXECBLOCK("PLSDADCON",.F.,.F.,{})
CFGX019.PRW - MENUDEF() -> EXECBLOCK("CFG019MNU",.F.,.F.)
CFGX019.PRW - X019COMMIT() -> EXECBLOCK("X19GRAVA",.F., .F.,{CALIAS,NREG,NOPC})
CFGX019.PRW - X19ALTERA() -> EXECBLOCK("X19GRAVA",.F., .F.,{CALIAS,NREG,NOPC})
CFGX019.PRW - X19INCLUI() -> EXECBLOCK("X19GRAVA",.F., .F., {CALIAS,0,NOPC})
CFGX046.PRX - GERAARQ() -> EXECBLOCK(CEXECPOS,.F.,.F., { "POS", CFILE })
CFGX046.PRX - GERAARQ() -> IF ! (EXECBLOCK("FILTSD1",.F.,.F.))
CFGX046.PRX - GERAARQ() -> IF ! (EXECBLOCK("FILTSF1",.F.,.F.))
CFGX046.PRX - GERAARQ() -> IF !(EXECBLOCK("FILTSD1",.F.,.F.))
CFGX046.PRX - GERAARQ() -> IF !(EXECBLOCK("FILTSE1",.F.,.F.))
CFGX046.PRX - GERAARQ() -> IF !(EXECBLOCK("FILTSE2",.F.,.F.))
CFGX046.PRX - GERAARQ() -> IF !(EXECBLOCK("FILTSE5",.F.,.F.))
CFGX046.PRX - GERAARQ() -> IF !(EXECBLOCK("FILTSF1",.F.,.F.))
CNTA090.PRW - CN090GERPA() -> LRET := EXECBLOCK("CNTVLDPMS",.F.,.F.,{M->CN8_VLEFET,"2"})
CNTA090.PRW - CN090GRPGTO() -> LRET := EXECBLOCK("CNTVLDPMS",.F.,.F.,{NVALTIT,"1"})
CNTA090.PRW - CN090GRPGTO() -> LRET := EXECBLOCK("CNTVLDPMS",.F.,.F.,{NVALTIT,"2"})
CNTA090.PRW - CN090MVENTR() -> EXECBLOCK("CN090MVFIN",.F.,.F.)
CNTA090.PRW - GERAPA() -> LRET := EXECBLOCK("CNTVLDPMS",.F.,.F.,{M->CN8_VLEFET,"1"})
CNTA090.PRW - GERAPA() -> LRET := EXECBLOCK("CNTVLDPMS",.F.,.F.,{M->CN8_VLEFET,"2"})
CNTA090.PRW - MENUDEF() -> EXECBLOCK("CTA090MNU",.F.,.F.)
CNTA100.PRW - CN100BXCAUC() -> CRETPRF := IF(VALTYPE(CNEWPREF:=EXECBLOCK("CNTRETPR",.F.,.F.))=="C",PADR(CNEWPREF,LEN(SE2->E2_PREFIXO)),CRETPRF)
CNTA100.PRW - CN100BXCAUC() -> EXECBLOCK("CN100ABAIX",.F.,.F.,{NVLREG,OGETCNT:ACOLS,OGETCNT:AHEADER,CCODICNT,CLOJACNT})
CNTA100.PRW - CN100BXCAUC() -> EXECBLOCK("CN100DBAIX",.F.,.F.,{NVLREG,CRETPRF,CNUMTIT,CPARCELA,CTPTIT,CCODICNT,CLOJACNT})
CNTA100.PRW - CN100CTIT() -> EXECBLOCK("CNTPRSE1",.F.,.F.)
CNTA100.PRW - CN100CTIT() -> EXECBLOCK("CNTPRSE2",.F.,.F.)
CNTA100.PRW - CN100DOC() -> DEFINE SBUTTON FROM APOSOBJ1[3,1], APOSOBJ1[3,4]-55 TYPE 1 ACTION (IF(LCN100DCS, LLIBER:=EXECBLOCK("CN100DCS",.F.,.F.,{ODLDOC,ADOCS,LLIBER}),IF((NPOS:=ASCAN(ADOCS,{|X| X[8]==0})==0),(ODLDOC:END()),(LLIBER:=CN100NODOC(ADOCS),ODLDOC:END())))) ENABLE OF ODLDOC
CNTA100.PRW - CN100ESTBX() -> ARET := EXECBLOCK("CN100ESR",.F.,.F.)
CNTA100.PRW - CN100ESTBX() -> CTPPREF := IF(VALTYPE(CNEWPREF:=EXECBLOCK("CNTRETPR",.F.,.F.))=="C",PADR(CNEWPREF,LEN(SE2->E2_PREFIXO)),CTPPREF)
CNTA100.PRW - CN100ETIT() -> EXECBLOCK("CN100TIT",.F.,.F.,{CCONTRA,(CMYALIAS)->PREFIXO,(CMYALIAS)->NUMERO})
CNTA100.PRW - CN100ETIT() -> EXECBLOCK("CN100TIT",.F.,.F.,{CCONTRA,SE1TMP->E1_PREFIXO,SE1TMP->E1_NUM})
CNTA100.PRW - CN100ETIT() -> EXECBLOCK("CN100TIT",.F.,.F.,{CCONTRA,SE2TMP->E2_PREFIXO,SE2TMP->E2_NUM})
CNTA100.PRW - CN100GERSE2() -> LRET := EXECBLOCK("CNTVLDPMS",.F.,.F.,{NVLRET,"1"})
CNTA100.PRW - CN100GRSE1() -> ACN100RAU:= EXECBLOCK("CN100RAU",.F.,.F.,{AROTAUTO})
CNTA100.PRW - CN100GRSE1() -> LRET := EXECBLOCK("CNTVLDPMS",.F.,.F.,{NVLRET,"2"})
CNTA100.PRW - CN100PRCBXRET() -> LRET := EXECBLOCK("CN100BXRET",.F.,.F.,{CCODIGO,CLOJA,NVLREG,ACOLS,AHEADER})
CNTA100.PRW - CN100PROCAD() -> EXECBLOCK("CN100ADI",.F.,.F.)
CNTA100.PRW - CN100PROCAD() -> EXECBLOCK("CN100ANT",.F.,.F.,{CNUMCNX,CESPCTR,CCONTRA,CCODICNT,CLOJACNT,CBCO,CAGC,CCTA,NVLADIANTA,CRETNAT,CRETPRF,CTPTIT,CNUMTIT})
CNTA100.PRW - CN100RECTI() -> EXECBLOCK("CNTPRSE1",.F.,.F.)
CNTA100.PRW - CN100RECTI() -> EXECBLOCK("CNTPRSE2",.F.,.F.)
CNTA100.PRW - CN100SITCH() -> LCN100VDA := EXECBLOCK("CN100VDA",.F.,.F.)
CNTA100.PRW - CN100SITCH() -> URET := EXECBLOCK("CN100VST",.F.,.F.,{CNEWSITUC,CCONTRA,CREVISA})
CNTA100.PRW - CN100SITUAC() -> EXECBLOCK("CN100SIT",.F.,.F.,{CSITORG,OSITUCB})
CNTA100.PRW - CN100VLDBX() -> URET := EXECBLOCK("CN100VBAIX",.F.,.F.,{M->BAIXA,ACOLS,AHEADER})
CNTA100.PRW - CONTROLSIT() -> EXECBLOCK("CN100SIT",.F.,.F.,{CSITORG,OSITUCB})
CNTA120.PRW - C120PESQP() -> ACN120PSQ := EXECBLOCK("CN120PSQ",.F.,.F.,{AARRAYF4,CPESQ,COPCASC,CASCAN,BASCAN,NPOS,ACAMPOS,NTIPO,NBUSCA})
CNTA120.PRW - C120TITSE1() -> ATITUSER:= EXECBLOCK("CN120ALT",.F.,.F.,{AROTAUTO,"2"})
CNTA120.PRW - C120TITSE1() -> CRETNAT := EXECBLOCK("CN120NAT",.F.,.F.,{CND->CND_FILIAL, CND->CND_NUMMED})
CNTA120.PRW - C120TITSE2() -> ATITUSER:= EXECBLOCK("CN120ALT",.F.,.F.,{AROTAUTO,"1"})
CNTA120.PRW - C120TITSE2() -> CRETNAT := EXECBLOCK("CN120NAT",.F.,.F.,{CND->CND_FILIAL, CND->CND_NUMMED})
CNTA120.PRW - CN120CAUCRET() -> EXECBLOCK("CN120INCCA",.F.,.F.)
CNTA120.PRW - CN120CAUCRET() -> LGRVCAU := EXECBLOCK("CN120GRVCA",.F.,.F.)
CNTA120.PRW - CN120COMPET() -> ACN120CPO := EXECBLOCK("CN120CPO",.F.,.F.)
CNTA120.PRW - CN120COMPET() -> CCN120QRY := EXECBLOCK("CN120QRY",.F.,.F.,{CQUERY})
CNTA120.PRW - CN120COMPET() -> CQUERY:= EXECBLOCK('CN120QCP', .F., .F., {CQUERY})
CNTA120.PRW - CN120COMPET() -> EXECBLOCK("CN120GTR",.F.,.F.,{LFIXO,TRB->PLANREC})
CNTA120.PRW - CN120COMPET() -> EXECBLOCK('C121LCXN', .F., .F., {OMODELCXN, "TRB"})
CNTA120.PRW - CN120COMPET() -> LSEMMED := EXECBLOCK("CN120SEMED",.F.,.F.,{CCONTRA,CREVISA})
CNTA120.PRW - CN120COMPET() -> LVERPLAN := EXECBLOCK("CN120VRP",.F.,.F.)
CNTA120.PRW - CN120CTRAUTO() -> LCN120CTU := EXECBLOCK("CN120CTU",.F.,.F.,{LRET})
CNTA120.PRW - CN120ENCE() -> LCONTINUA:=EXECBLOCK("CN120ENVL",.F.,.F.)
CNTA120.PRW - CN120ESTOR() -> IF LCONTINUA .AND. !LCN120MAB .OR. (LCN120MAB .AND. EXECBLOCK("CN120MAB",.F.,.F.) )
CNTA120.PRW - CN120ESTOR() -> LCONTINUA:=EXECBLOCK("CN120VLEST",.F.,.F.)
CNTA120.PRW - CN120EXCEC() -> ARETPE := EXECBLOCK("CN120AUTVL",.F.,.F.,{AVALIDGET})
CNTA120.PRW - CN120EXCEC() -> CCONSSXB := IF(VALTYPE(CCN120SXB:=EXECBLOCK("CN120SXB",.F.,.F.))=="C",CCN120SXB,"CN9003")
CNTA120.PRW - CN120EXCEM() -> ACN130CEX := EXECBLOCK("CN130CEX",.F.,.F.,{AEDITCAMP})
CNTA120.PRW - CN120GETRA() -> ACN120RAT := EXECBLOCK("CN120RAT",.F.,.F.,{ARET,CTIPO})
CNTA120.PRW - CN120GRVPED() -> ACN120ITM := EXECBLOCK("CN120ITM",.F.,.F.,{ACAB,AITEM,CALIASCNE})
CNTA120.PRW - CN120GRVPED() -> APEDCOM:= EXECBLOCK("CN120IT7",.F.,.F.,{AITEM})
CNTA120.PRW - CN120GRVPED() -> ARET := EXECBLOCK("CN120PED",.F.,.F.,{ACAB,AITEM,CALIASCNE})
CNTA120.PRW - CN120GRVPED() -> EXECBLOCK("CN120ADP",.F.,.F.)
CNTA120.PRW - CN120GRVPED() -> EXECBLOCK("CN120AEP",.F.,.F.)
CNTA120.PRW - CN120GRVPED() -> EXECBLOCK("CN120GPM",.F.,.F.,{CNUMSC7,CNUMPED})
CNTA120.PRW - CN120GRVPED() -> EXECBLOCK("CN120GSC",.F.,.F.)
CNTA120.PRW - CN120GRVPED() -> EXECBLOCK("CTA120FN",.F.,.F.)
CNTA120.PRW - CN120GRVPED() -> EXECBLOCK("CTA120FV",.F.,.F.)
CNTA120.PRW - CN120GRVPED() -> LCN120PDM := EXECBLOCK("CN120PDM",.F.,.F.,{LRET})
CNTA120.PRW - CN120INC() -> ACN120CTAUT := EXECBLOCK("CN120CTAUT",.F.,.F.)
CNTA120.PRW - CN120INC() -> ARET := EXECBLOCK("CN120AUTVL",.F.,.F.,{AVALIDGET})
CNTA120.PRW - CN120INC() -> CCONSSXB := IF(VALTYPE(CCN120SXB:=EXECBLOCK("CN120SXB",.F.,.F.))=="C",CCN120SXB,"CN9003")
CNTA120.PRW - CN120INC() -> EXECBLOCK("CN120BOK",.F.,.F.,{CCONTRA,CREVISA,CPLAN,CPARCEL})
CNTA120.PRW - CN120INC() -> IF !LCN120SEMED .OR. (LCN120SEMED .AND. !EXECBLOCK("CN120SEMED",.F.,.F.,{CCONTRA,CREVISA}))
CNTA120.PRW - CN120LEG() -> ALEGEUSR := EXECBLOCK("CN120LEG",.F.,.F.,{ALEGENDA})
CNTA120.PRW - CN120MEDENC() -> EXECBLOCK("CN120ENCMD",.F.,.F.)
CNTA120.PRW - CN120MEDENC() -> EXECBLOCK("CN120ENMED",.F.,.F.)
CNTA120.PRW - CN120MEDENC() -> EXECBLOCK("CN120ENSLD",.F.,.F.,{LMEDEVE,LFISICO,CCRONOG,LFIXO,LVALOR})
CNTA120.PRW - CN120MEDENC() -> LATUSLD := EXECBLOCK("CN120ATSLD",.F.,.F.)
CNTA120.PRW - CN120MEDENC() -> LCN120VMP := EXECBLOCK("CN120VMP",.F.,.F.,{LRET})
CNTA120.PRW - CN120MEDENC() -> LGRPED := EXECBLOCK("CN120GRPED",.F.,.F.)
CNTA120.PRW - CN120MEDENC() -> LRETVLPAR := IF(VALTYPE(LRETVLPAR:=EXECBLOCK("CN120VLPAR",.F.,.F.))=="L",LRETVLPAR,.T.)
CNTA120.PRW - CN120MEDENC() -> LSLDFLEX := EXECBLOCK("CN120VDSD",.F.,.F.)
CNTA120.PRW - CN120MEDENC() -> URET := EXECBLOCK("CN120VENC", .F., .F., {LRET})
CNTA120.PRW - CN120MEDEST() -> EXECBLOCK("CN120EPE",.F.,.F.)
CNTA120.PRW - CN120MEDEST() -> EXECBLOCK("CN120EPM",.F.,.F.)
CNTA120.PRW - CN120MEDEST() -> EXECBLOCK("CN120ESMED",.F.,.F.,{CNUMSC5})
CNTA120.PRW - CN120MEDEST() -> EXECBLOCK("CN120ESMED",.F.,.F.,{CNUMSC7})
CNTA120.PRW - CN120MEDEST() -> EXECBLOCK("CN120ESSLD",.F.,.F.,{LMEDEVE,LFISICO,CCRONOG,LFIXO,LVALOR})
CNTA120.PRW - CN120MEDEST() -> EXECBLOCK("CN120ESTMD",.F.,.F.,{CNUMSC5})
CNTA120.PRW - CN120MEDEST() -> EXECBLOCK("CN120ESTMD",.F.,.F.,{CNUMSC7})
CNTA120.PRW - CN120MEDEST() -> EXECBLOCK("CN120PVA",.F.,.F.)
CNTA120.PRW - CN120MEDEST() -> EXECBLOCK("CN120PVE",.F.,.F.)
CNTA120.PRW - CN120MEDEST() -> LESTSLD := EXECBLOCK("CN120ATESL",.F.,.F.)
CNTA120.PRW - CN120MEDEST() -> URET := EXECBLOCK("CN120VEST", .F., .F., {LCONTINUA})
CNTA120.PRW - CN120PLANS() -> ACN120CPO := EXECBLOCK("CN120CPO",.F.,.F.)
CNTA120.PRW - CN120VLCON() -> LCN120DTCON:= EXECBLOCK("CN120DTCON",.F.,.F.,{LRET})
CNTA120.PRW - CN120VLDCPT() -> LCN120CPT := EXECBLOCK("CN120CPT",.F.,.F.,{LRET})
CNTA120.PRW - CNDMEDESP() -> ACN120CMP :=EXECBLOCK('CN120CMP', .F., .F., {ACAB,ACAMPOS})
CNTA120.PRW - CNDMEDESP() -> CQUERYPE := EXECBLOCK('CN120ESY', .F., .F., {CQUERY})
CNTA120.PRW - CNDMEDESP() -> CQUERYPE := EXECBLOCK('CN120QCC', .F., .F., {CQUERY1, CQUERY2, CQUERY3, CQUERY4, CQUERY5})
CNTA120.PRW - CNTA120() -> ACORESUSR := EXECBLOCK("CN120COR",.F.,.F.,{ACORES})
CNTA120.PRW - CNTVLDCTR() -> CCONSPAD := IF(VALTYPE(CCN120SXB:=EXECBLOCK("CN120SXB",.F.,.F.))=="C",CCN120SXB,"CN9003")
CNTA120.PRW - CNTVLDCTR() -> CQUERY := EXECBLOCK('CN120QVD', .F., .F., {CQUERY})
CNTA120.PRW - CNTVLDPLAN() -> CNEWPLAN := EXECBLOCK("CN120PLN",.F.,.F.,{CCONTRA, CREVISA})
CNTA120.PRW - ESTORNTIT() -> CCN120PRE := EXECBLOCK("CN120PRE",.F.,.F.,{CRETPRF, CESPCTR})
CNTA120.PRW - MENUDEF() -> EXECBLOCK("CTA120MNU",.F.,.F.)
CNTA121.PRW - BROWSEDEF() -> CCN121FIL := EXECBLOCK("CN121FIL",.F.,.F.)
CNTA121.PRW - CN121GERDOC() -> ACABUSER := EXECBLOCK("CN121AFN",.F.,.F.,{ADOCS[NA][2],"1"})
CNTA121.PRW - CN121GERDOC() -> ACABUSER := EXECBLOCK("CN121AFN",.F.,.F.,{ADOCS[NA][2],"2"})
CNTA121.PRW - CN121GERDOC() -> ARET := EXECBLOCK("CN121PED",.F.,.F.,{ACAB,AITEM})
CNTA121.PRW - CN121GERDOC() -> EXECBLOCK("CNT121PC",.F.,.F.)
CNTA121.PRW - CN121GRV() -> LGRPED := EXECBLOCK("CN121GPD",.F.,.F.)
CNTA121.PRW - CN121INCAU() -> EXECBLOCK("CN120INCCA",.F.,.F.)
CNTA121.PRW - CN121INCAU() -> LGRVCAU := EXECBLOCK("CN120GRVCA",.F.,.F.)
CNTA121.PRW - CN121LIMPLA() -> IF EXISTBLOCK("CN121VPA") .AND. !EXECBLOCK("CN121VPA",.F.,.F.)
CNTA121.PRW - CN121MEDENC() -> EXECBLOCK("CN121ENC",.F.,.F.,{.F., LRET})
CNTA121.PRW - CN121MEDENC() -> EXECBLOCK("CN121ENC",.F.,.F.,{.T., LRET})
CNTA121.PRW - CN121MEDENC() -> EXECBLOCK("CN121ESD",.F.,.F.,{LMEDEVE,LFISICO,CCRONOG,LFIXO,LVALOR})
CNTA121.PRW - CN121MEDENC() -> LATUSLD := EXECBLOCK("CN121ATS",.F.,.F.)
CNTA121.PRW - CN121MEDENC() -> LCN121VMP := EXECBLOCK("CN121VMP",.F.,.F.,{LRET})
CNTA121.PRW - CN121MEDENC() -> LSLDFLEX := EXECBLOCK("CN121VDS",.F.,.F.)
CNTA121.PRW - CN121MEDEST() -> EXECBLOCK("CN121ELD",.F.,.F.,{LMEDEVE,LFISICO,CCRONOG,LFIXO,LVALOR})
CNTA121.PRW - CN121MEDEST() -> EXECBLOCK("CN121EPM",.F.,.F.)
CNTA121.PRW - CN121MEDEST() -> EXECBLOCK("CN121EST",.F.,.F.,{ADOCUMENTS, .F.})
CNTA121.PRW - CN121MEDEST() -> EXECBLOCK("CN121EST",.F.,.F.,{ADOCUMENTS, .T.})
CNTA121.PRW - CN121MEDEST() -> LESTSLD := EXECBLOCK("CN121ASD",.F.,.F.)
CNTA121.PRW - CN121NATTT() -> CRETNAT := EXECBLOCK("CN121NAT",.F.,.F.,{OMODELCND:GETVALUE("CND_FILIAL"), CNUMMED})
CNTA121.PRW - CN121NATTT() -> CRETNAT := EXECBLOCK("CN121NAT",.F.,.F.,{XFILIAL("CND", CFILCONTR), CNUMMED})
CNTA121.PRW - CN121RETCA() -> NCAUCRET := IF(VALTYPE(NCN121VRET := EXECBLOCK("CN121VRE",.F.,.F.,{CCONTRA,CREVISA,CPLAN}))=="N",NCN121VRET,NCAUCRET)
CNTA121.PRW - CN121RETCA() -> NCN121VRET := EXECBLOCK( "CN121VRE", .F., .F., {CCONTRA,CREVISA,CPLAN} )
CNTA121.PRW - MENUDEF() -> EXECBLOCK("CNT121BT",.F.,.F.)
CNTA121.PRW - MODELDEF() -> EXECBLOCK("C121MCPO",.F.,.F.,{OMODEL})
CNTA121.PRW - VIEWDEF() -> EXECBLOCK("C121VCPO",.F.,.F.,{OSTRUCND, OSTRUCXN, OSTRUCNE, OVIEW})
CNTA121.PRW - VLDCXNENC() -> LCN121VMP := EXECBLOCK("CN121VMP",.F.,.F.,{LRET})
CNTA121.PRW - VLDCXNENC() -> LSLDFLEX := EXECBLOCK("CN121VDS",.F.,.F.)
CNTA130.PRW - CN130ADMULT() -> ACN130TPC := EXECBLOCK("CN130TPC",.F.,.F.,{CMULMANUAL})
CNTA130.PRW - CN130DELOK() -> URET := EXECBLOCK("C130KDEL",.F.,.F.)
CNTA130.PRW - CN130DESPV() -> CRETPE := EXECBLOCK("CN130TPD",.F.,.F.)
CNTA130.PRW - CN130EXCE() -> ACN130CEX := EXECBLOCK("CN130CEX",.F.,.F.,{AEDITCAMP})
CNTA130.PRW - CN130GRV() -> EXECBLOCK("CN130PGRV",.F.,.F.,{NOPC})
CNTA130.PRW - CN130GRV() -> EXECBLOCK("MD130GRV",.F.,.F.,{NOPC})
CNTA130.PRW - CN130LINOK() -> URET := EXECBLOCK("CN130VLIN",.F.,.F.,{ACOLS[N],AHEADER})
CNTA130.PRW - CN130LINOK() -> URET := EXECBLOCK("CN130VTOT",.F.,.F.,{})
CNTA130.PRW - CN130MANUT() -> @ 019,117 SAY IF(LCN130LBM,(IF(VALTYPE(CCN130LBM:= EXECBLOCK("CN130LBM",.F.,.F.))=="C",CCN130LBM, OEMTOANSI(STR0054))),OEMTOANSI(STR0054)) OF OFOLDER:ADIALOGS[1] PIXEL
CNTA130.PRW - CN130MANUT() -> ARET := EXECBLOCK("CN130INC",.F.,.F.,{AHEADER,ACOLS,AHEADDCS,ADESCS})
CNTA130.PRW - CN130MANUT() -> EXECBLOCK("CN130ALT",.F.,.F.,{NOPC})
CNTA130.PRW - CN130MANUT() -> IF VALTYPE( AUSBUTTONS := EXECBLOCK( "CN130BUT", .F., .F. ) ) == "A"
CNTA130.PRW - CN130MANUT() -> LCONTINUA := EXECBLOCK( "CN130PRG", .F., .F., { CALIAS, NREG, NOPC } )
CNTA130.PRW - CN130MKCRON() -> LRETVCK := IF(VALTYPE(LRETVCK:=EXECBLOCK("CN130VCK",.F.,.F.))=="L",LRETVCK,.T.)
CNTA130.PRW - CN130MULDESC() -> ARET := EXECBLOCK("CN130MLD",.F.,.F.,{CDESCRI,NVALOR,CTIPO,CPEDFLAG,NOPCAO})
CNTA130.PRW - CN130MULTAS() -> DEFINE SBUTTON OBUT2 FROM 178, IF( LALTERA, 280, 312 ) TYPE 1 ACTION ( NOPCA := 1, IF(!LCN130VLD,ODLGMULT:END(),(LRET:=EXECBLOCK("CN130VLDMT",.F.,.F.),IF((VALTYPE(LRET)=="L" .AND. LRET),ODLGMULT:END(),NOPCA := 0))) ) ENABLE OF ODLGMULT
CNTA130.PRW - CN130TUDOK() -> URET := EXECBLOCK("CN130TOK",.F.,.F.,{ARATGCT})
CNTA130.PRW - CN130VLDDES() -> LRETU := EXECBLOCK("CN130USRVD",.F.,.F.,{AHEADE,ACOLDE})
CNTA130.PRW - CN130VLDMED() -> LRETVAD := IF(VALTYPE(LRETVAD:=EXECBLOCK("CN130VAD",.F.,.F.))=="L",LRETVAD,.T.)
CNTA130.PRW - CN130VLDMULT() -> URET := EXECBLOCK("CN130MTINC",.F.,.F.,{CDESCRI,NVALOR,ALISTBOX,NITEM,NACAO})
CNTA170.PRW - CN170GRV() -> EXECBLOCK("CN170GRD",.F.,.F.,{NOPC})
CNTA170.PRW - MENUDEF() -> EXECBLOCK("CTA170MNU",.F.,.F.)
CNTA190.PRW - CNTA190() -> LOCAL CVLDEXC := ".T."
CNTA200.PRW - CN200ADDMARK() -> ACN200SPC := EXECBLOCK("CN200SPC",.F.,.F.,{CMARCA,AMARCA,CCAMPOOK,CALIAS})
CNTA240.PRW - CN240GRV() -> EXECBLOCK("CN240CGRV",.F.,.F.,{AUSRS,CCONTRA})
CNTA260.PRW - CNTA260JOB() -> EXECBLOCK("CNT260GRV",.F.,.F.)
CNTA260.PRW - GETQRYTRB() -> CCNT260FIL := EXECBLOCK("CNT260FIL",.F.,.F.)
CNTA260.PRW - INCENC121() -> EXECBLOCK("CN260OBRIG",.F.,.F.,{OMODEL})
CNTA260.PRW - INCENC121() -> EXECBLOCK("CNT260GRV",.F.,.F.)
CNTA300.PRW - CN300ACTIV() -> AGCTCRM := EXECBLOCK("A300XCRM",.F.,.F.,{AGCTCRM})
CNTA300.PRW - CN300ACTIV() -> EXECBLOCK("CN300ACT",.F.,.F.,{OMODEL})
CNTA300.PRW - CN300COR() -> ACORESLEG := EXECBLOCK("CN100COR",.F.,.F.,{ACORES})
CNTA300.PRW - CN300CTRADIA() -> LRETADO := EXECBLOCK("CN100ADO",.F.,.F.)
CNTA300.PRW - CN300EXCART() -> LRET := EXECBLOCK('A300POSC',.F.,.F.,{CCTRFIL,CCODED,CNUMPRO})
CNTA300.PRW - CN300EXPRZ() -> LRET := EXECBLOCK("CN300VLP",.F.,.F.,{OMODEL})
CNTA300.PRW - CN300GETPC() -> CCN300PCF := EXECBLOCK("CN300PCF",.F.,.F.)
CNTA300.PRW - CN300GRV() -> EXECBLOCK("CNALCFLG", .F., .F., {OMODELCN9:GETVALUE("CN9_NUMERO"),OMODELCN9:GETVALUE("CN9_REVISA"),"IR"})
CNTA300.PRW - CN300GRV() -> EXECBLOCK("CNALCFLG", .F., .F., {OMODELCN9:GETVALUE("CN9_NUMERO"),OMODELCN9:GETVALUE("CN9_REVISA"),"RV"})
CNTA300.PRW - CN300GRV() -> EXECBLOCK("MTSOLICAT", .F., .F., {"IR",AFLUIGIR[NI],"CN9","CR_NUM"})
CNTA300.PRW - CN300GRV() -> LCOMMIT := EXECBLOCK("CN300PCMT",.F.,.F.,{OMODEL})
CNTA300.PRW - CN300IMPIT() -> LOK := EXECBLOCK("CN300FSC", .F., .F.)
CNTA300.PRW - CN300RETST() -> XRET := EXECBLOCK("CN300RST",.F.,.F.,{XRET,CN9->CN9_TPCTO})
CNTA300.PRW - CN300VLAT() -> LUSEROK := EXECBLOCK("C100VLAT",.F.,.F.,{CN9->CN9_SITUAC ,OMODEL})
CNTA300.PRW - CN300VLDAC() -> LUSEROK := EXECBLOCK("C100VLAT",.F.,.F.,{CN9->CN9_SITUAC,OMODEL})
CNTA300.PRW - CN300VLDPLAN() -> LRET := EXECBLOCK("A300VLSC",.F.,.F.,{OMODEL})
CNTA300.PRW - CNTA300ITF() -> BQUEBRA := EXECBLOCK("C300SCQBRA",.F.,.F.,{BQUEBRA})
CNTA300.PRW - CNTA300ITF() -> CKEY300 := EXECBLOCK("C300SCFILK",.F.,.F.,{CKEY})
CNTA300.PRW - CNTA300ITNS() -> BQUEBRA := EXECBLOCK("C300SCQBRA",.F.,.F.,{BQUEBRA})
CNTA300.PRW - CNTA300ITNS() -> CKEY300 := EXECBLOCK("C300SCFILK",.F.,.F.,{CKEY})
CNTA300.PRW - CNTA300PSS() -> LCN300EDT := EXECBLOCK("CN300EDT",.F.,.F.,{OMODEL,@CALIASCO2,AFILS,ARETORNO,LLOTE,LATA,LRATEIO,LVENDA,APRODS,CCODEDT,CNUMPRO,CCODFOR,CLOJA,CLOTE})
CNTA300.PRW - CNTA300XEFL() -> LRETORNO := EXECBLOCK("CN300VEDT",.F.,.F.,{OMODEL300,CCODEDT,CNUMPRO,CREVISA,CCODFOR,CLOJA,CITPLA,CITCNB,AFILSENV,LLOTE,CLOTE})
CNTA300.PRW - MENUDEF() -> EXECBLOCK("CTA100MNU",.F.,.F.)
CNTA300.PRW - MODELDEF() -> EXECBLOCK( "A300STRU", .F., .F., { "MODELDEF", IIF(CNTGETFUN() == "CNTA301", "V","C"), @OMODEL } )
CNTA300.PRW - VIEWDEF() -> EXECBLOCK( "A300STRU", .F., .F., { "VIEWDEF", IIF(CNTGETFUN() == "CNTA301", "V","C"), @OVIEW } )
CNTA300R.PRW - A300CHECKM() -> LRET := EXECBLOCK("CN300RCM",.F.,.F.,{CCONTRA,CQUERY})
CNTA300R.PRW - A300DIVCNB() -> EXECBLOCK("A300RDVI",.F.,.F.,{OMODEL,NLINEDST,NLINEORI,NNEWVALUE})
CNTA300R.PRW - A300REVISA() -> EXECBLOCK("A300MLDR",.F.,.F.,{CTIPREV,OMODEL})
CNTA300R.PRW - A300VLRCNB() -> AAUX := EXECBLOCK("A300BREAK", .F., .F., {LQUEBRA, OMODEL, CFIELD, NOLDVALUE, NNEWVALUE, STR0009})
CNTA300R.PRW - A300VLRCNB() -> LRET := EXECBLOCK("A300RVUN",.F.,.F.,{OMODEL,LQUEBRA,NOLDVALUE,NNEWVALUE})
CNTA300R.PRW - CN300REAJU() -> NCN300VRJ := EXECBLOCK("CN300VRJ",.F.,.F.,{OMODELCNA,OMODELCNB,NVLRIND,DDATAREF, LPRORATA, DDATAAPL, DDTRJANT, DDTPRXRJ, CINDICE})
CNTA310.PRW - CN310INC() -> CCN300QRY := EXECBLOCK("CN310QRY",.F.,.F.,{CQUERY,1,2})
CNTA310.PRW - CN310INC() -> CCN300QRY := EXECBLOCK("CN310QRY",.F.,.F.,{CQUERY,2,1})
CNTA310.PRW - CN310INC() -> CCN300QRY := EXECBLOCK("CN310QRY",.F.,.F.,{CQUERY,2,2})
CNTXFUN.PRX - CNCSTESP() -> ARET := EXECBLOCK("CNCFLDESP",.F.,.F.,{AHEADER,ACOLS})
CNTXFUN.PRX - CNTAVALGCT() -> EXECBLOCK("CNTGERSE2",.F.,.F.,{ACONTRA})
CNTXFUN.PRX - CNTPROCGCT() -> IF VALTYPE( NM103VRET := EXECBLOCK("M103VRET",.F.,.F.,{SC7->C7_CONTRA,SC7->C7_CONTREV,SC7->C7_PLANILH})) == "N"
CNTXFUN.PRX - CTAAVALGCT() -> EXECBLOCK("CNTATUSL",.F.,.F.,{CN9->CN9_NUMERO,CN9->CN9_REVISA,CPLANILHA,CITEMMED})
CNTXFUN.PRX - CTADTAVISO() -> ARETU := EXECBLOCK("CNDTAVENC",.F.,.F.,{ARET})
CNTXFUN.PRX - GCTALCENT() -> EXECBLOCK("CNALCFLG", .F., .F., {AFLUIGIR[NX],CNUMREV,CTIPDOC})
CNTXFUN.PRX - GCTALCENT() -> EXECBLOCK("CNALCFLG", .F., .F., {CNUMDOC,CNUMREV,CTIPDOC})
CNTXFUN.PRX - GCTALCENT() -> EXECBLOCK("CNALCFLG", .F., .F., {OMODELCN9:GETVALUE("CN9_NUMERO"),OMODELCN9:GETVALUE("CN9_REVISA"),"RV"})
CNTXFUN.PRX - GCTRATEIO() -> ARETAUTRAT := EXECBLOCK("CNZAUTRAT",.F.,.F.,{AHEADCNZ,ALOCALCOLS,NOPC})
CNTXFUN.PRX - VALIDTUDORAT() -> LRETVLDRAT := EXECBLOCK("CNZVLDRAT",.F.,.F.,{NOPC,OGETDADOS:AHEADER,OGETDADOS:ACOLS,OGETDADOS:NAT,OGETRATEIO:AHEADER,OGETRATEIO:ACOLS})
CNTXGS.PRW - CN100BINS() -> ADADOOSER := EXECBLOCK("C100GROS",.F.,.F.,{ACABEOSER,AITENOSER})
COMA010.PRX - COM010GRV() -> EXECBLOCK("MT010GRV",.F.,.F.,{NOPCAO,AHEADER,ACOLS})
COMA010.PRX - COM010LEG() -> ARETPE:= EXECBLOCK("CM010LEG",.F.,.F.,{ALEGENDA})
COMA010.PRX - COM010LOK() -> LRETORNO := EXECBLOCK("CM010LOK",.F.,.F.,{LRETORNO})
COMA010.PRX - COM010REJ() -> LRET := EXECBLOCK("CM010RJS",.F.,.F.)
COMA010.PRX - COM010TAB() -> CQUERY1 := EXECBLOCK("CM010FIL",.F.,.F.,{NOPC})
COMA010.PRX - COM010TAB() -> IF VALTYPE( AUSBUTTONS := EXECBLOCK( "CM010BUT", .F., .F. ) ) == "A"
COMA010.PRX - COM010TOK() -> LRETORNO := EXECBLOCK("CM010TOK",.F.,.F.,{LRETORNO})
COMA010.PRX - MAREJTABCOM() -> EXECBLOCK("CM010REJ",.F.,.F.,{NBASE, AIB->AIB_PRCCOM})
COMA010.PRX - MATABPRCOM() -> NCM010PCL:=EXECBLOCK("CM010PCL",.T.,.T.,{CFORNECE,CLOJA,CTABPRECO,CPRODUTO,CALIASAIB,NRESULT})
COMA010.PRX - MENUDEF() -> IF VALTYPE( ACM010MNU:= EXECBLOCK("CM010MNU",.F.,.F.,{AROTINA}) ) == "A"
COMA020.PRW - MAAVALTOLER() -> CGRUPOPE := EXECBLOCK("MT103APV",.F.,.F.)
COMA020.PRW - MAAVALTOLER() -> CGRUPOPE := EXECBLOCK("MT140APV",.F.,.F.,{CGRUPO})
COMA020.PRW - MAAVALTOLER() -> LCMA20BLQ := EXECBLOCK("CMA20BLQ",.F.,.F.,{LBLOQUEIO})
COMA020.PRW - MENUDEF() -> EXECBLOCK("CMA020MNU",.F.,.F.)
COMA030.PRW - C030ALTERA() -> EXECBLOCK( "CA030ALT", .F., .F. )
COMA030.PRW - C030ALTERA() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA030BUT", .F., .F., {NOPC} ) ) == "A"
COMA030.PRW - C030DELETA() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA030BUT", .F., .F., {NOPC} ) ) == "A"
COMA030.PRW - C030INCLUI() -> EXECBLOCK( "CA030INC", .F., .F.)
COMA030.PRW - C030INCLUI() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA030BUT", .F., .F., {NOPC} ) ) == "A"
COMA030.PRW - COMA030EX() -> LRET := EXECBLOCK("CA030EXC",.F.,.F.)
COMA030.PRW - MENUDEF() -> EXECBLOCK("CMA030MNU",.F.,.F.)
COMA031.PRW - C031ALTERA() -> EXECBLOCK( "CA031ALT", .F., .F. )
COMA031.PRW - C031ALTERA() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA031BUT", .F., .F., {NOPC} ) ) == "A"
COMA031.PRW - C031DELETA() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA031BUT", .F., .F., {NOPC} ) ) == "A"
COMA031.PRW - C031INCLUI() -> EXECBLOCK( "CA031INC", .F., .F.)
COMA031.PRW - C031INCLUI() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA031BUT", .F., .F., {NOPC} ) ) == "A"
COMA031.PRW - COMA031EX() -> LRET := EXECBLOCK("CA031EXC",.F.,.F.)
COMA031.PRW - MENUDEF() -> EXECBLOCK("CMA031MNU",.F.,.F.)
COMA032.PRW - C032ALTERA() -> EXECBLOCK( "CA032ALT", .F., .F. )
COMA032.PRW - C032ALTERA() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA032BUT", .F., .F., {NOPC} ) ) == "A"
COMA032.PRW - C032DELETA() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA032BUT", .F., .F., {NOPC} ) ) == "A"
COMA032.PRW - C032INCLUI() -> EXECBLOCK( "CA032INC", .F., .F.)
COMA032.PRW - C032INCLUI() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA032BUT", .F., .F., {NOPC} ) ) == "A"
COMA032.PRW - COMA032EX() -> LRET := EXECBLOCK("CA032EXC",.F.,.F.)
COMA032.PRW - MENUDEF() -> EXECBLOCK("CMA032MNU",.F.,.F.)
COMA033.PRW - C033ALTERA() -> EXECBLOCK( "CA033ALT", .F., .F. )
COMA033.PRW - C033ALTERA() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA033BUT", .F., .F., {NOPC} ) ) == "A"
COMA033.PRW - C033DELETA() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA033BUT", .F., .F., {NOPC} ) ) == "A"
COMA033.PRW - C033INCLUI() -> EXECBLOCK( "CA033INC", .F., .F.)
COMA033.PRW - C033INCLUI() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA033BUT", .F., .F., {NOPC} ) ) == "A"
COMA033.PRW - COMA033EX() -> LRET := EXECBLOCK("CA033EXC",.F.,.F.)
COMA033.PRW - MENUDEF() -> EXECBLOCK("CMA033MNU",.F.,.F.)
COMA034.PRW - C034ALTERA() -> EXECBLOCK( "CA034ALT", .F., .F. )
COMA034.PRW - C034ALTERA() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA034BUT", .F., .F., {NOPC} ) ) == "A"
COMA034.PRW - C034DELETA() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA034BUT", .F., .F., {NOPC} ) ) == "A"
COMA034.PRW - C034INCLUI() -> EXECBLOCK( "CA034INC", .F., .F.)
COMA034.PRW - C034INCLUI() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA034BUT", .F., .F., {NOPC} ) ) == "A"
COMA034.PRW - COMA034EX() -> LRET := EXECBLOCK("CA034EXC",.F.,.F.)
COMA034.PRW - MENUDEF() -> EXECBLOCK("CMA034MNU",.F.,.F.)
COMA035.PRW - C035ALTERA() -> EXECBLOCK( "CA035ALT", .F., .F. )
COMA035.PRW - C035ALTERA() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA035BUT", .F., .F., {NOPC} ) ) == "A"
COMA035.PRW - C035DELETA() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA035BUT", .F., .F., {NOPC} ) ) == "A"
COMA035.PRW - C035INCLUI() -> EXECBLOCK( "CA035INC", .F., .F.)
COMA035.PRW - C035INCLUI() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA035BUT", .F., .F., {NOPC} ) ) == "A"
COMA035.PRW - COMA035EX() -> LRET := EXECBLOCK("CA035EXC",.F.,.F.)
COMA035.PRW - MENUDEF() -> EXECBLOCK("CMA035MNU",.F.,.F.)
COMA036.PRW - C036ALTERA() -> EXECBLOCK( "CA036ALT", .F., .F. )
COMA036.PRW - C036ALTERA() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA036BUT", .F., .F., {NOPC} ) ) == "A"
COMA036.PRW - C036DELETA() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA036BUT", .F., .F., {NOPC} ) ) == "A"
COMA036.PRW - C036INCLUI() -> EXECBLOCK( "CA036INC", .F., .F.)
COMA036.PRW - C036INCLUI() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA036BUT", .F., .F., {NOPC} ) ) == "A"
COMA036.PRW - COMA036EX() -> LRET := EXECBLOCK("CA036EXC",.F.,.F.)
COMA036.PRW - MENUDEF() -> EXECBLOCK("CMA036MNU",.F.,.F.)
COMA038.PRW - C038ALTERA() -> EXECBLOCK( "CA038ALT", .F., .F. )
COMA038.PRW - C038ALTERA() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA038BUT", .F., .F., {NOPC} ) ) == "A"
COMA038.PRW - C038DELETA() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA038BUT", .F., .F., {NOPC} ) ) == "A"
COMA038.PRW - C038INCLUI() -> EXECBLOCK( "CA038INC", .F., .F.)
COMA038.PRW - C038INCLUI() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA038BUT", .F., .F., {NOPC} ) ) == "A"
COMA038.PRW - COMA038EX() -> LRET := EXECBLOCK("CA038EXC",.F.,.F.)
COMA038.PRW - MENUDEF() -> EXECBLOCK("CMA038MNU",.F.,.F.)
COMA039.PRW - C039ALTERA() -> EXECBLOCK( "CA039ALT", .F., .F. )
COMA039.PRW - C039ALTERA() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA039BUT", .F., .F., {NOPC} ) ) == "A"
COMA039.PRW - C039DELETA() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA039BUT", .F., .F., {NOPC} ) ) == "A"
COMA039.PRW - C039INCLUI() -> EXECBLOCK( "CA039INC", .F., .F.)
COMA039.PRW - C039INCLUI() -> IF VALTYPE( AUSRBUT := EXECBLOCK( "CA039BUT", .F., .F., {NOPC} ) ) == "A"
COMA039.PRW - COMA039EX() -> LRET := EXECBLOCK("CA039EXC",.F.,.F.)
COMA039.PRW - MENUDEF() -> EXECBLOCK("CMA039MNU",.F.,.F.)
COMA050.PRW - CM050MTC() -> LOCAL CVLDEXC := ".T."
COMXCOL.PRW - COLATULEG() -> ACOLSIMP := EXECBLOCK("COLDVIMP",.F.,.F.,{"COMXCOL",ACOLSIMP})
COMXCOL.PRW - COLLOADIMP() -> ACOLSIMP := EXECBLOCK("COLDVIMP",.F.,.F.,{"COMXCOL",ACOLSIMP})
COMXCOL.PRW - COLNFEAUT() -> LRET := EXECBLOCK("COMCOL2",.F.,.F.,{ACABEC,AITENS})
COMXCOL.PRW - COMCOLLEG() -> ACORESNEW := EXECBLOCK("COMXLEG",.F.,.F.,{ACORES})
COMXCOL.PRW - COMCOLTES() -> CCODTESPE := EXECBLOCK("COMCOLF4",.F.,.F.,{SDT->DT_FORNEC,SDT->DT_LOJA,SDT->DT_COD,CCODTES})
COMXCOL.PRW - COMCONDPG() -> CCONDPGPE := EXECBLOCK("A140ICOND",.F.,.F.,{ACAB[NPOSFOR,2],ACAB[NPOSLOJ,2],CCONDPG})
COMXCOL.PRW - DIRFILIAL() -> AFILEMP := EXECBLOCK("COLFILDUP",.F.,.F.,{CCGC,CINSCEST})
COMXCOL.PRW - DOCUMENTOS() -> ACAMPOS := EXECBLOCK("A140IPED",.F.,.F.,{1,{},{}})
COMXCOL.PRW - MENUDEF() -> AROTALT := EXECBLOCK("COMCOLRT",.F.,.F.,{AROTINA})
COMXCOL.PRW - MONTATELA() -> EXECBLOCK("COMCOLSD",.F.,.F.,{ACOLS,AHEADER})
COMXCOL.PRW - PEDIDOS() -> ARETPE := EXECBLOCK("A140IPED",.F.,.F.,{2,ACAMPOS,ACAMPOS})
COMXCOL.PRW - PROCDOCS() -> ARETPARA := EXECBLOCK("COMXPARA",.F.,.F.,{ NCOMCOL1, LCTECLASS })
COMXCOL.PRW - PROCDOCS() -> ARETPE := EXECBLOCK("COLF1D1",.F.,.F.,{ACABEC,AITENS})
COMXCOL.PRW - PROCDOCS() -> EXECBLOCK("COLSTTS",.F.,.F.,)
COMXCOL.PRW - PROCDOCS() -> LPROCESSA := EXECBLOCK("COMXPROC",.F.,.F.)
COMXCOL.PRW - VALIDPC() -> LRET := EXECBLOCK("COMCOLPC",.F.,.F.,{ACOLS,"TMP"})
COMXCOL2.PRW - IMPXMLNFST() -> CFILTRO := EXECBLOCK("MT140FSV",.F.,.F.,{CCODSERV, CMUNSERV, CCGCTT, CCGCTP})
COMXFUN.PRX - COMGRVSCPC() -> EXECBLOCK("SCGRVINI",.F.,.F.)
COMXFUN.PRX - F4PODER3() -> AA440VCOL:= EXECBLOCK("A440VCOL",.F.,.F.,{AHEADER,ACOLS})
COMXFUN.PRX - F4PODER3() -> ANEW := EXECBLOCK("MTPODER3", .F., .F., {CES,AHEADTRB} )
COMXFUN.PRX - F4PODER3() -> ANEWCP := EXECBLOCK("MTPDR3CP", .F., .F., {CES,ASTRUTRB} )
COMXFUN.PRX - F4PODER3() -> ARETPE:= EXECBLOCK("MTF4PD3I",.F.,.F.)
COMXFUN.PRX - F4PODER3() -> EXECBLOCK("MTFILLP3",.F.,.F.,{ASTRUTRB,CALIASTRB,CALIASSB6,CALIASSD2,CALIASSD1,CES})
COMXFUN.PRX - F4PODER3() -> LOCAL LMTF4P3UN := EXISTBLOCK("MTF4P3UN") .AND. EXECBLOCK("MTF4P3UN",.F.,.F.)
COMXFUN.PRX - F4PODER3() -> LPROCESSA := EXECBLOCK("MTPROCP3",.F.,.F.,{CALIASSB6,LQUERY})
COMXFUN.PRX - MAATUSB6() -> EXECBLOCK("SB6GRAVA",.F.,.F.)
COMXFUN.PRX - MAAVALCOT() -> ARETPO := EXECBLOCK("MT130SI",.F.,.F.,{2})
COMXFUN.PRX - MAAVALCOT() -> CGRUPO := EXECBLOCK("MT120APV",.F.,.F.,{AVENCEDOR,ASC8})
COMXFUN.PRX - MAAVALCOT() -> EXECBLOCK("AVACTFIM",.F.,.F.,{CNUMPED})
COMXFUN.PRX - MAAVALCOT() -> EXECBLOCK("AVALCOT",.F.,.F.,{NEVENTO})
COMXFUN.PRX - MAAVALCOT() -> EXECBLOCK("MT120GOK",.F.,.F.,{CNUMPED,.T.,.F.,.F.})
COMXFUN.PRX - MAAVALCOT() -> EXECBLOCK("MT150EXC",.F.,.F.)
COMXFUN.PRX - MAAVALCOT() -> EXECBLOCK("MT160GRPC",.F.,.F.,{AVENCEDOR,ASC8})
COMXFUN.PRX - MAAVALCOT() -> IF (EXISTBLOCK("AVALCOPC")) .AND. VALTYPE(ARETPE := EXECBLOCK("AVALCOPC",.F.,.F.,APEDIDOS)) == "A"
COMXFUN.PRX - MAAVALPC() -> EXECBLOCK("MT120EXC",.F.,.F.)
COMXFUN.PRX - MAAVALPC() -> LENCSC3 := EXECBLOCK("MT125ENC",.F.,.F.,{NEVENTO,CALIASSC7})
COMXFUN.PRX - MAAVCOTVEN() -> ARET := EXECBLOCK("M160COTV",.F.,.F.,{APLANILHA[NX][NCALC][NPLANOK],ASCE[NX][NCALC][NPQTDSCE]})
COMXFUN.PRX - MAAVCOTVEN() -> ARET160PLN := EXECBLOCK("M160VENC",.F.,.F.,{ASCE,APLANILHA,ACOTACAO})
COMXFUN.PRX - MAAVCOTVEN() -> LMA160PCOK:= EXECBLOCK("MA160PCOK",.F.,.F.,{ACOTACAO})
COMXFUN.PRX - MACANALTCOT() -> ARET := EXECBLOCK("MTALTCOT",.F.,.F.,{CALIASSC8,NOPC})
COMXFUN.PRX - MACANDELCOT() -> LRETORNO := EXECBLOCK( "MCANDCOT", .F., .F., { ( CALIASSC8 )->C8_NUM,;
COMXFUN.PRX - MACOMCENT() -> ACOLADIC := EXECBLOCK("MT110COMC",.F.,.F.)
COMXFUN.PRX - MACOMVIEW() -> IF VALTYPE( ARET := EXECBLOCK( "MC050CNT", .F., .F., (CPRODUTO) ) ) == "A"
COMXFUN.PRX - MACOMVIEWCT() -> ANEW := EXECBLOCK("CTADCOLH", .F., .F., AHEADCPOS)
COMXFUN.PRX - MACOMVIEWCT() -> ANEW := EXECBLOCK("CTADLINE", .F., .F., AVIEWSC8[LEN(AVIEWSC8)])
COMXFUN.PRX - MACOMVIEWCT() -> CQUERYPE := EXECBLOCK('CTADFIL', .F., .F., {CQUERY})
COMXFUN.PRX - MACOMVIEWNF() -> ARET := EXECBLOCK("MTULTNFE",.F.,.F.,{AVIEWNF,ARECSD1})
COMXFUN.PRX - MACOMVIEWPC() -> ANEW := EXECBLOCK("PCADCOLH", .F., .F., AHEADCPOS[LEN(AHEADCPOS)])
COMXFUN.PRX - MACOMVIEWPC() -> ANEW := EXECBLOCK("PCADHEAD", .F., .F., AHEADCPOS)
COMXFUN.PRX - MACOMVIEWPC() -> ANEW := EXECBLOCK("PCADLINE", .F., .F., AVIEWSC7[LEN(AVIEWSC7)])
COMXFUN.PRX - MACOMVIEWPC() -> CQUERYPE := EXECBLOCK('PCADFIL', .F., .F., {CQUERY})
COMXFUN.PRX - MAMONTACOT() -> ARETM160PL := EXECBLOCK("M160PLAN",.F.,.F.,{(CALIASSC8),APLANILHA[LEN(APLANILHA)],ACPOSC8})
COMXFUN.PRX - MAMONTACOT() -> ARETSTRU := EXECBLOCK("M160STRU",.F.,.F.,{ASTRUTMP,ACABEC[CAB_HFLD1],ACPOSC8})
COMXFUN.PRX - MAMONTACOT() -> CFILTRO := EXECBLOCK("MT160FIL",.F.,.F.,{CALIASSC8})
COMXFUN.PRX - MAMONTACOT() -> LRETORNO := EXECBLOCK("MTVLDCOT",.F.,.F.,{CNUMSC8})
COMXFUN.PRX - MAPCOMCENT() -> EXECBLOCK("MASCCENT",.F.,.F.,{XFILIAL("SC1",CFILCEN),CNUMSC})
COMXFUN.PRX - MASAPREREQ() -> ACPAGL := EXECBLOCK("MT106SCA",.F.,.F.)
COMXFUN.PRX - MASAPREREQ() -> C106QRY := EXECBLOCK("MT106QRY",.F.,.F.,{LAUTO})
COMXFUN.PRX - MASAPREREQ() -> EXECBLOCK("MASAVLOP",.F.,.F.)
COMXFUN.PRX - MASAPREREQ() -> EXECBLOCK("MT106GRV",.F.,.F.)
COMXFUN.PRX - MASAPREREQ() -> EXECBLOCK("MT106PRE",.F.,.F.,AMT106SCQ)
COMXFUN.PRX - MASAPREREQ() -> EXECBLOCK("MT106SC1",.F.,.F.,{"CND",CND->CND_NUMMED,,CND->(RECNO())})
COMXFUN.PRX - MASAPREREQ() -> EXECBLOCK("MT106SC1",.F.,.F.,{"SC1",SC1->C1_NUM,SC1->C1_ITEM,SC1->(RECNO())})
COMXFUN.PRX - MASAPREREQ() -> EXECBLOCK("MT106SC1",.F.,.F.,{"SC7",SC7->C7_NUM,SC7->C7_ITEM,SC7->(RECNO())})
COMXFUN.PRX - MASAPREREQ() -> EXECBLOCK("MT106SC1",.F.,.F.,{"SW1",SW1->W1_SI_NUM,SW1->W1_COD_I,SW1->(RECNO())})
COMXFUN.PRX - MASAPREREQ() -> IF (VALTYPE(LCONTINUA := EXECBLOCK("MT106VGR",.F.,.F.,{LAMZSA,NSALDO,LCONSEMP,LCONSSPED}))=='L') .AND. !LCONTINUA
COMXFUN.PRX - MASAPREREQ() -> LVLDPE := EXECBLOCK("MASAVLSC",.F.,.F.,{SB1->B1_COD,SB1->B1_LOCPAD,SB1->B1_CONTRAT})
COMXFUN.PRX - MASAPREREQ() -> ULOTESC := EXECBLOCK("MA106SCQ",.F.,.F.)
COMXFUN.PRX - MATGERAAE() -> AMTGERAAE := EXECBLOCK("MTGERAAE",.F.,.F.,{CPRODUTO,NNECESS})
COMXFUN.PRX - MATGERAAE() -> CNEWGRP := EXECBLOCK("MT106APV",.F.,.F.)
COMXFUN.PRX - MATGERAAE() -> EXECBLOCK("MT650C7",.F.,.F.)
COMXFUN.PRX - MATM711SC7() -> ACAMPOS := EXECBLOCK("M711SC7",.F.,.F.,ACLONE(ACAMPOS))
COMXFUN.PRX - MAVIEWSB2() -> @ 230,190 BUTTON STR0100 SIZE 045,010 FONT ODLG:OFONT ACTION (EXECBLOCK("BVIEWSB2",.F.,.F.)) OF ODLG PIXEL
COMXFUN.PRX - MAVIEWSB2() -> EXECBLOCK("MTGRDVW",.F.,.F.,{@AVIEWB2,@OLISTBOX,@ODLG})
COMXFUN.PRX - MAVIEWSB2() -> IF VALTYPE(ANEWSALDO:=EXECBLOCK("MVIEWSALDO",.F.,.F.,{(CCURSOR)->B2_COD,(CCURSOR)->B2_LOCAL,ANEWSALDO}))=="A" .AND. LEN(ANEWSALDO) > 0
COMXFUN.PRX - MAVIEWSB2() -> LRETPE:=EXECBLOCK("MTVIEWFIL",.F.,.F.,{(CCURSOR)->B2_COD,(CCURSOR)->B2_LOCAL})
COMXFUN.PRX - MAVIEWSB2() -> LVIEWSB2 := EXECBLOCK("MTVIEWB2",.F.,.F.)
COMXFUN.PRX - MAVIEWSB2() -> NTOTEXECDISP:=EXECBLOCK("MVIEWSB2SL",.F.,.F.,{(CCURSOR)->B2_COD,(CCURSOR)->B2_LOCAL,NSALDOSB2})
CONNECTADAPTERPROC.PRW - FJSONITEMPED() -> CRET := EXECBLOCK("MADPFWJ3",.F.,.F.)
CONNECTADAPTERPROC.PRW - FJSONITEMPED() -> CRET := EXECBLOCK("MADPFWJ4",.F.,.F., {CXALIAS})
CONNECTADAPTERPROC.PRW - FJSONPED() -> CRET := EXECBLOCK("MADPFWJ2",.F.,.F., {CXALIAS})
COTEPE35.PRW - CORCLIC600() -> CCGCCLI := EXECBLOCK("COTCNPJ",.F.,.F.,{CALIASSFT})
COTEPE35.PRW - PRCOTEPE() -> AREGB440 := EXECBLOCK("COTB440",.F.,.F.,@AREGB440)
COTEPE35.PRW - PRCOTEPE() -> EXECBLOCK("COTD030",.F.,.F.,{CALIAS, NRELACDOC, APARTDOC})
COTEPE35.PRW - PRCOTEPE() -> EXECBLOCK("COTD050",.F.,.F.,{CALIAS, NRELACDOC, APARTDOC, CSITUADOC})
COTEPE35.PRW - PRCOTEPE() -> EXECBLOCK("COTD200",.F.,.F.,{CALIAS, CALIASSFT, NRELACDOC, APARTDOC, CSITUADOC, CENTSAI})
COTEPE35.PRW - REGC300 () -> NREDBSICMS := EXECBLOCK("COTEPE02",.F.,.F.,{CALIASSFT,CALSSD,CESPECIE,CENTSAI,LISS,CCLASFIS,NREDBSICMS})
CO_IMPC.PRW - AICAALTERA() -> AADD(AC,{"CNUM",{15,009} ,OEMTOANSI(STR0007),"@!","EXECBLOCK('VERNOMSFB',.F.,.F.,,.T.)",,.F.})
CO_IMPC.PRW - AICAALTERA() -> CLINHAOK:="EXECBLOCK('COVERIF',.F.,.F.,,.T.)"
CO_IMPC.PRW - AICAALTERA() -> CTUDOOK :="EXECBLOCK('COVTALT',.F.,.F.,,.T.)"
CO_IMPC.PRW - AICAEXCLUI() -> AADD(AC,{"CNUM",{15,009} ,OEMTOANSI(STR0007),"@!","EXECBLOCK('VERNOMSFB',.F.,.F.,,.T.)",,.F.})
CO_IMPC.PRW - AICAINCLUI() -> CLINHAOK := "EXECBLOCK('COVERIF',.F.,.F.,,.T.)"
CO_IMPC.PRW - AICAINCLUI() -> CTUDOOK := "EXECBLOCK('COVTUDO',.F.,.F.,,.T.)"
CO_IMPC.PRW - ARFUALTERA() -> AADD(AC, {"CNUM", {15,009}, OEMTOANSI(STR0007), "@!", "EXECBLOCK('VERNOMSFB', .F., .F., , .T.)",,.F.})
CO_IMPC.PRW - ARFUALTERA() -> CLINHAOK:="EXECBLOCK('COVERIF',.F.,.F.,,.T.)"
CO_IMPC.PRW - ARFUALTERA() -> CTUDOOK :="EXECBLOCK('COVTALT',.F.,.F.,,.T.)"
CO_IMPC.PRW - ARFUEXCLUI() -> AADD(AC,{"CNUM",{15,009} ,OEMTOANSI(STR0007),"@!","EXECBLOCK('VERNOMSFB',.F.,.F.,,.T.)",,.F.})
CO_IMPC.PRW - ARFUINCLUI() -> AADD(AC,{"CNUM",{15,009} ,OEMTOANSI(STR0007),"@!","EXECBLOCK('VERNOMSFB',.F.,.F.,,.T.)",,})
CO_IMPC.PRW - ARFUINCLUI() -> CLINHAOK := "EXECBLOCK('COVERIF',.F.,.F.,,.T.)"
CO_IMPC.PRW - ARFUINCLUI() -> CTUDOOK := "EXECBLOCK('COVTUDO',.F.,.F.,,.T.)"
CO_IMPC.PRW - ARFUVISUAL() -> AADD(AC,{"CNUM",{15,009} ,OEMTOANSI(STR0007),"@!","EXECBLOCK('VERNOMSFB',.F.,.F.,,.T.)",,})
CO_IMPC.PRW - ARFUVISUAL() -> CLINHAOK := "EXECBLOCK('COVERIF',.F.,.F.,,.T.)"
CO_IMPC.PRW - ARFUVISUAL() -> CTUDOOK := "EXECBLOCK('COVTUDO',.F.,.F.,,.T.)"
CRDA010.PRW - CRC010_015() -> LRET := EXECBLOCK("CRDVFD1",.F.,.F.,{NANTIGO,NOPCX})
CRDA010.PRW - CRD010MAN() -> ABUTTONS := EXECBLOCK("CRDCRIABUT",.F.,.F.,{ABUTTONS})
CRDA010.PRW - CRDVALDELCAR() -> LRET := EXECBLOCK("CRDVDCA",.F.,.F.)
CRDA010.PRW - CRDVALDELDEP() -> LRET := EXECBLOCK("CRDVDDE",.F.,.F.)
CRDA010.PRW - CRM010_002() -> CMAD_CODEND := EXECBLOCK("GRCODNUM",.F.,.F.)
CRDA010.PRW - CRM010_002() -> EXECBLOCK("CRD010PG",.F.,.F.,{NOPCX})
CRDA010.PRW - CRM010_006() -> AFUNCUSER := EXECBLOCK( "CRDLIBCR", .F., .F. )
CRDA010.PRW - CRM010_007() -> LRET := EXECBLOCK("CRDGRAVA",.F.,.F.,{NOPCX})
CRDA010.PRW - CRM010_008() -> LRET := EXECBLOCK("CRDCAR",.F.,.F.,{COBJ, CTIPO, NOPCVAL,OGETD1:ACOLS,OGETD2:ACOLS,OGETD3:ACOLS,OGETD4:ACOLS,OGETD5:ACOLS,OGETD6:ACOLS,OGETD7:ACOLS,OGETD8:ACOLS,OGETD1:AHEADER,OGETD2:AHEADER,OGETD3:AHEADER,OGETD4:AHEADER,OGETD5:AHEADER,OGETD6:AHEADER,OGETD7:AHEADER,OGETD8:AHEADER })
CRDA010.PRW - CRM010_011() -> LRETORNO := EXECBLOCK("CRDQUEST",.F.,.F.,{LRETORNO})
CRDA080.PRW - CRA080_002() -> EXECBLOCK("CRD080GRV",.F.,.F.,{CCOMBO})
CRDA080.PRW - CRA080_002() -> EXECBLOCK("CRD080LIB",.F.,.F.,{CCOMBO})
CRDA080.PRW - CRA080_002() -> LRET := EXECBLOCK("CRD0801",.F.,.F.)
CRDA240.PRW - CRD240_002() -> EXECBLOCK("CRD240MX", .F., .F.)
CRDA240A.PRW - CRD240APON() -> LRET:=EXECBLOCK( "CRD2402", .F., .F., { AVETOR[NLINHA], AVETOR } )
CRDXFUN.PRW - CRDAIMPEX() -> EXECBLOCK( "CRD002", .F., .F., CTEXTO )
CRDXFUN.PRW - CRDCONSSTATUS() -> CMSGADIC:= EXECBLOCK("CRD003",.F.,.F.,{CCLIENTE,CLOJA})
CRDXFUN.PRW - CRDCPVFIN() -> ACOMPROV := EXECBLOCK("CRD010C",.F.,.F.,{ACOMPROV, NL4VALTOT, NDIASPAGTO, NQTDPARCEL, NVALORL4, NACRSFIN})
CRDXFUN.PRW - CRDGERACONTR() -> CNUMCONTRA := EXECBLOCK("CRDCONTR",.F.,.F.)
CRDXFUN.PRW - CRDIDENTCLI() -> CCPFDEFAULT := EXECBLOCK( "CRD004", .F., .F. )
CRDXFUN.PRW - CRDXVENDA() -> XRET := EXECBLOCK("CRDOFFLINE")
CRDXFUN.PRW - MONTAORCAM() -> EXECBLOCK("LJIMPORC", .F., .F., {NHDLECF})
CRMA020.PRW - CRMA20CLKVEND() -> LRET := EXECBLOCK("CRM20SLVD", .F., .F., { CCODVEND, "AFTER", OMODEL, OVIEW } )
CRMA020.PRW - CRMA20MRKCTA() -> URETORNO := EXECBLOCK("CRM20MKCTA", .F., .F., {OMDLGRID, LRETORNO} )
CRMA020A.PRW - CRMA20ACOMMIT() -> EXECBLOCK("CRM20ACMT", .F., .F., {"COMMITAFTER",OMODEL} )
CRMA020A.PRW - CRMA20ACOMMIT() -> EXECBLOCK("CRM20ACMT", .F., .F., {"COMMITBEFORE",OMODEL} )
CRMA020B.PRW - CRM020BGCOL() -> APECOL := EXECBLOCK("CRM020COLP",.F.,.F.,{NBROWSE,CALIASTMP,ACOLUMNS,ACPOQRY})
CRMA020B.PRW - CRM020BPAV() -> CQUERY := EXECBLOCK("CRM020QRYP",.F.,.F.,{CQUERY, CCODVEND, ANVLSTRUCT, CPESQ, LACH, LSUS, LSA1})
CRMA020B.PRW - CRM020BSLC() -> EXECBLOCK("CRM020BBRW",.F.,.F.,{BRW_CONTAS_LIB_N_LIB,OBRWCTALNL})
CRMA020B.PRW - CRM020BSLC() -> EXECBLOCK("CRM020BBRW",.F.,.F.,{BRW_DCS_CONTAS,OBRWDCS})
CRMA020B.PRW - CRM020BSLC() -> EXECBLOCK("CRM020BBRW",.F.,.F.,{BRW_SOL_CONTAS,OBRWSOL})
CRMA020B.PRW - CRM020BVLDSOL() -> URETORNO := EXECBLOCK("CRM20BSL",.F.,.F.,{ALLTRIM((CALIASPESQ)->ENTIDA),(CALIASPESQ)->CODIGO,(CALIASPESQ)->LOJA,CCODVEND,TYPE_FORM_SOL_CONTAS})
CRMA240.PRW - CA240GRAVA() -> EXECBLOCK("CRM240AGRV",.F.,.F.,{ANODESBKP, ANODES, ANODESPAR})
CRMA290.PRW - CRM290FUNCS() -> APEFUNCS := EXECBLOCK("CA290FUNC", .F., .F., { AFUNCTIONS })
CRMA290.PRW - CRM290GXML() -> CPEXML := EXECBLOCK("CA290MNUXML", .F., .F., { CXML })
CRMA290.PRW - CRM290RUN() -> EXECBLOCK("CRM290CLOS")
CRMA290.PRW - CRMA290WA() -> LCRIAMENU := EXECBLOCK("CRM290MPNL")
CRMA690.PRW - CRMA690RTVENDRESP() -> CVENDRESP := EXECBLOCK("CRM690VD",.F.,.F.,{CTYPEMEMBER,CMEMBER,OTERRITORY})
CRMA800.PRW - MENUDEF() -> UROTINA := EXECBLOCK("CRM800MNU",.F.,.F.,{AROTINA})
CRMA910.PRW - VIEWDEF() -> EXECBLOCK("CRM910VIEW",.F.,.F.,{OVIEW})
CRMA910A.PRW - CRMA910ALDTREE() -> LFALLSAFE := EXECBLOCK("CRMA910LDT", .F., .F., { OAOMGRID, NLEVEL } )
CRMA910B.PRW - CRM910BB1() -> CQUERY := EXECBLOCK("C910BQRY",.F.,.F.,{CQUERY})
CRMA980.PRW - BROWSEDEF() -> CFILUSER := EXECBLOCK("CRM980BFIL",.F.,.F.)
CRMA980.PRW - MENUDEF() -> AROTADD := EXECBLOCK("CRM980MDEF",.F., .F.)
CRMA980.PRW - MODELDEF() -> AMEMOUSER := EXECBLOCK( "CRM980MMEM", .F., .F. )
CRMXFUNPERM.PRW - CRMXCTRLENT() -> ARETORNO := EXECBLOCK("CRMXCTRENT",.F.,.F.,{ AENTCTRLPRI })
CRMXFUNPERM.PRW - CRMXUIROLE() -> CFILUSR:= EXECBLOCK("CRMXFILPAP")
CSAA090.PRW - CS090CALC() -> AGRAVA := EXECBLOCK("CSA90CCUS",.F.,.F.,{AGRAVA})
CSAA090.PRW - CS090GRRBD() -> EXECBLOCK("CSA90RBD",.F.,.F.,{RBD->RBD_FILIAL,RBD->RBD_ANOMES,RBD->RBD_CC})
CSAA090.PRW - CS090LANC() -> ABTN90:=EXECBLOCK("CSA90B02",.F.,.F.)
CSAA090.PRW - CS090ROT() -> ABTN90:=EXECBLOCK("CSA90B01",.F.,.F.)
CSAA100.PRW - CSA100VLDPE() -> IF(VALTYPE(LVLDRET := EXECBLOCK( "CSAA100VLD", .F.,.F.)) == "L")
CSAA100.PRW - CSAPOSVLDX9() -> IF VALTYPE(LVLDRET := EXECBLOCK("CSAPOSX9", .F., .F.)) == "L"
CSAM010.PRW - CS010PROCESSA() -> NNOVOSAL:=EXECBLOCK("CSASAL1",.F.,.F.,{CCLASSEDE, CCLASSEATE})
CSAM080.PRW - CS080PROCESSA() -> EXECBLOCK("CSA080GRV",.F.,.F., {NSALANT} )
CSAXRDM.PRX - CSAXCOLETA() -> EXECBLOCK( "COLETA", .F., .F. )
CSAXRDM.PRX - CSAXCSA010() -> EXECBLOCK( "CSA010", .F., .F. )
CTBA010.PRW - CT010TUDOK() -> LRET := EXECBLOCK( "CT010TOK",.F.,.F.,{NOPC})
CTBA010.PRW - CTB010ACOLS() -> EXECBLOCK("CT010ATU",.F.,.F.,{AHEADER,ACOLS,NCONT,1})
CTBA010.PRW - CTB010BLOQ() -> CHTMLPE := EXECBLOCK("CT010BWF",.F.,.F.,{ CHTML, NCONT })
CTBA010.PRW - CTB010CAL() -> EXECBLOCK("CT010BLF",.F.,.F.)
CTBA010.PRW - CTB010GRAVA() -> EXECBLOCK("CT010ATU",.F.,.F.,{AHEADER,ACOLS,NCONT,2})
CTBA010.PRW - CTB010GRAVA() -> EXECBLOCK("CT010DELLN",.F.,.F.,{CCALENDCTB,CEXERC})
CTBA010.PRW - CTB010GRAVA() -> EXECBLOCK("CT010GRV", .F., .F., {NOPC, CEXERC, CCALENDCTB, AHEADER, ACOLS})
CTBA010.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("CT010BRW",.F.,.F.,{AROTINA})
CTBA011.PRW - CTB11GRV() -> EXECBLOCK( "CTB200INC",.F.,.F.,{CCODMOEDA, CCALEND})
CTBA011.PRW - EXCCALEND() -> EXECBLOCK( "CTB200DEL",.F.,.F.,{CCODMOEDA, CCALEND})
CTBA012A.PRW - CT012XML() -> AINTEG := EXECBLOCK("CT012INTEG",.F.,.F.,{DDATAINI,DDATAFIM,CCONTADE,CCONTAATE,CCCDE,CCCATE,CMOEDA,CSALDO})
CTBA030.PRW - CT030TUDOK() -> IF EXECBLOCK("CTA030TOK",.F.,.F.,NOPC)
CTBA030.PRW - CTBA030ALT() -> EXECBLOCK("CT030GRA",.F.,.F.)
CTBA030.PRW - CTBA030ALT() -> IF !EXECBLOCK("CTB030VLD", .F., .F.,NOPC)
CTBA030.PRW - CTBA030DEL() -> EXECBLOCK("CT030GRE",.F.,.F.)
CTBA030.PRW - CTBA030DEL() -> IF !EXECBLOCK("CTB030VLD", .F., .F.,NOPC)
CTBA030.PRW - CTBA030DEL() -> LRET := EXECBLOCK("CT030ADEL", .F., .F.,NOPC)
CTBA030.PRW - CTBA030INC() -> EXECBLOCK("CT030GRI",.F.,.F.)
CTBA030.PRW - MENUDEF() -> ACTBA030 := EXECBLOCK( "CT030BUT",.F.,.F.,AROTINA)
CTBA040.PRW - CT040TUDOK() -> IF EXECBLOCK("CTA040TOK",.F.,.F.,NOPC)
CTBA040.PRW - CTBA040ALT() -> EXECBLOCK('CTB040GR',.F.,.F.,{4})
CTBA040.PRW - CTBA040DEL() -> IF EXECBLOCK("CTA40DEL",.F.,.F.,NOPC)
CTBA040.PRW - MENUDEF() -> AROTINA := EXECBLOCK("CT040MNU",.F.,.F.,{AROTINA})
CTBA060.PRW - CT060TUDOK() -> EXECBLOCK("CTA060CLV",.F.,.F.,{NOPC})
CTBA060.PRW - CT060TUDOK() -> IF !EXECBLOCK("CTA060TOK",.F.,.F.,NOPC)
CTBA060.PRW - CTBA060ALT() -> EXECBLOCK("CT060ALT",.F.,.F.,{NOPC})
CTBA060.PRW - CTBA060DEL() -> IF EXECBLOCK("CTA60DEL",.F.,.F.,NOPC)
CTBA060.PRW - MENUDEF() -> ACT060BUT := EXECBLOCK("CT060BUT",.F.,.F.,AROTINA)
CTBA070.PRW - CTB070FIL() -> CFILTRACT8 := EXECBLOCK("CTB070FPE",.F. ,.F.,{CFILTRACT8})
CTBA100.PRW - CTBARQRAT() -> ACOLSAUX := EXECBLOCK("CTARQRAT",.F.,.F.,{__CPROCPRINC,AHEADER,ACOLSAUX})
CTBA101.PRW - CTBA101LAN() -> LHIST := EXECBLOCK("CTBA101HI", .F., .F.)
CTBA101.PRW - CTBA101LAN() -> LRET := EXECBLOCK( "VDCTB101GR" , .F. , .F. , {NOPC,DDATA,CLOTE,CSUBLOTE,CDOC})
CTBA101.PRW - CTBA101OK() -> LRET := EXECBLOCK( "CT101TOK" , .F. , .F. , {CTIPO,CDEBITO,CCREDITO,CCUSTODEB,CCUSTOCRD,CITEMDEB,CITEMCRD,CCLVLDEB,CCLVLCRD,CTPSALD,NOPC,@CTEXTO } )
CTBA101.PRW - CTBA101OK() -> LRET := EXECBLOCK("CT101VLENT",.F.,.F.,{CTIPO,CDEBITO,CCREDITO, CCUSTODEB,CCUSTOCRD, CITEMDEB,CITEMCRD, CCLVLDEB,CCLVLCRD})
CTBA101.PRW - CTBCONV() -> NVALCONV := EXECBLOCK( "CTB101CNV" , .F. , .F. , {CCRITER,DDATA,CMOEDA,NVALOR,LVBLOQ,CBLOQ})
CTBA101.PRW - MONTACONV() -> NVALCONV := EXECBLOCK("CT101CNV",.F.,.F.,{NVALOR,CMOEDA,CCRITER,CDEBITO,CCREDITO,NVALCONV})
CTBA102.PRW - CT102ESTFOR() -> EXECBLOCK("ANCTB102GR",.F.,.F.,{ NOPC,CT2->CT2_DATA,CT2->CT2_LOTE,CT2->CT2_SBLOTE,CT2->CT2_DOC } )
CTBA102.PRW - CT102ESTFOR() -> EXECBLOCK("ANCTB102GR",.F.,.F.,{ NOPC,DDATAEST,CLOTEEST,CSUBLTEST,CDOCEST } )
CTBA102.PRW - CT102ESTFOR() -> EXECBLOCK("DPCTB102GR",.F.,.F.,{ NOPC,DDATAAUX,CLOTEAUX,CSUBLTAUX,CDOCAUX } )
CTBA102.PRW - CT102ESTFOR() -> EXECBLOCK("DPCTB102GR",.F.,.F.,{ NOPC,DDATAEST,CLOTEEST,CSUBLTEST,CDOCEST } )
CTBA102.PRW - CT102ESTFOR() -> LOK := EXECBLOCK("CTB102ESTL",.F.,.F.,{NOPC})
CTBA102.PRW - CT102ESTLT() -> IF ! EXECBLOCK("VCTB102EST",.F.,.F.,{DDATALANC,CLOTE,CSUBLOTE,CDOC,NTOTINF})
CTBA102.PRW - CT102ESTLT() -> LRET := EXECBLOCK("FLTESTLT",.F.,.F.)
CTBA102.PRW - CTB102CARR() -> EXECBLOCK("CT102CARR",.F.,.F.,{ NOPC,DDATALANC,CLOTE,CSUBLOTE,CDOC } )
CTBA102.PRW - CTBA102CAP() -> ACT102ACAP := EXECBLOCK( "CT102ACAP", .F., .F. )
CTBA102.PRW - CTBA102CAP() -> LCONTINUA := EXECBLOCK("CT102VLES",.F.,.F.,{DDATALANC,CLOTE,CSUBLOTE,CDOC })
CTBA102.PRW - CTBA102LAN() -> ABUTBROWSE := EXECBLOCK("CT102BTO",.F.,.F.,{ABUTTON})
CTBA102.PRW - CTBA102LAN() -> EXECBLOCK("ANCTB102GR",.F.,.F.,{ NOPC,DDATALANC,CLOTE,CSUBLOTE,CDOC } )
CTBA102.PRW - CTBA102LAN() -> EXECBLOCK("CT102DLG",.F.,.F.)
CTBA102.PRW - CTBA102LAN() -> EXECBLOCK("DPCTB102GR",.F.,.F.,{ NOPC,DDATALANC,CLOTE,CSUBLOTE,CDOC } )
CTBA102.PRW - CTBA102LAN() -> LOK := EXECBLOCK("CTB102EXC",.F.,.F.)
CTBA102.PRW - CTBESCRAT() -> IF EXECBLOCK("RATONFIL",.F.,.F.)
CTBA102.PRW - CTBESCRAT() -> NVALRAT := EXECBLOCK("CTB102RT",.F.,.F.)
CTBA102.PRW - MENUDEF() -> ACT102BUT := EXECBLOCK("CT102BUT",.F.,.F.,AROTINA)
CTBA103.PRW - C103CAPLOTE() -> LRET := EXECBLOCK("VCLOT103",.F.,.F.,{DDATALANC,CLOTE,CSUBLOTE,CDOC,NOPC})
CTBA103.PRW - CT103LOTES() -> LRET := EXECBLOCK("FLT103ST",.F.,.F.)
CTBA103.PRW - CTB103CARR() -> EXECBLOCK("CT103CARR",.F.,.F.,{ NOPC,DDATALANC,CLOTE,CSUBLOTE,CDOC } )
CTBA103.PRW - CTBA103LAN() -> ABUTBROWSE := EXECBLOCK("CT103BTO",.F.,.F.,{ABUTTON})
CTBA103.PRW - CTBA103LAN() -> EXECBLOCK("ANCTB103GR",.F.,.F.,{ NOPC,DDATALANC,CLOTE,CSUBLOTE,CDOC } )
CTBA103.PRW - CTBA103LAN() -> EXECBLOCK("DPCTB103GR",.F.,.F.,{ NOPC,DDATALANC,CLOTE,CSUBLOTE,CDOC } )
CTBA103.PRW - CTBA103LAN() -> LOK := EXECBLOCK("CTB103EXC",.F.,.F.)
CTBA103.PRW - CTM103SEL() -> IF ! EXECBLOCK("VCTB103EST",.F.,.F.,{DDATALANC,CLOTE,CSUBLOTE,CDOC,NTOTINF})
CTBA103.PRW - MENUDEF() -> ACT103BUT := EXECBLOCK("CT103BUT",.F.,.F.,AROTINA)
CTBA105.PRW - CT105LINOK() -> LRET := EXECBLOCK("CT105LOK",.F.,.F., {OPCAO , DDATALANC} )
CTBA105.PRW - CT105LINOK() -> LRET := EXECBLOCK("CT105VLENT",.F.,.F.,{CDC,CDEBITO,CCREDITO, CCONTCCD,CCONTCCC, CITEMD,CITEMC, CCLVLD,CCLVLC,;
CTBA105.PRW - CT105LINOK() -> RETURN EXECBLOCK("C105VLIN", .F., .F.,{TMP->CT2_FLAG})
CTBA105.PRW - CT105TOK() -> LRET := EXECBLOCK("CT105CHK",.F.,.F.,{LMODIFIED})
CTBA105.PRW - CT105TOK() -> LRET := EXECBLOCK("CT105POS",.F.,.F.,{LRET,LCONFIRMA})
CTBA105.PRW - CT105TOK() -> LRET := EXECBLOCK("CT105REV",.F.,.F.,{DDATALANC,CLOTE,CSUBLOTE,CDOC })
CTBA105.PRW - CT105TOK() -> LRET := EXECBLOCK("CT105TOK",.F.,.F.,{NVALDEB,NVALCRD,;
CTBA105.PRW - CT105TOK() -> LRET := EXECBLOCK("CTB105OUTM",.F.,.F.,{DDATALANC,CLOTE,CSUBLOTE,CDOC})
CTBA105.PRW - CTB105HEAD() -> EXECBLOCK("C105CESP",.F.,.F.,{})
CTBA105.PRW - CTBBY_PROC() -> EXECBLOCK("CTBGRV",.F.,.F.,{NOPC,CPROG,.T./*LPROCEDURE*/,CT2->(RECNO())/*NRECCT2*/})
CTBA105.PRW - CTB_INCL() -> ABUTTONNEW := EXECBLOCK("CT105BUT",.F.,.F.,ABUTTON)
CTBA105.PRW - CTB_INCL() -> CLOTEEXEC := EXECBLOCK("LOTECTB",.F.,.F.,{CLOTE})
CTBA105.PRW - CTB_INCL() -> CQUERY := EXECBLOCK("CT105QRY",.F.,.F.,{CQUERY,LAGLUT})
CTBA105.PRW - CTB_INCL() -> CSBLOTEEXEC := EXECBLOCK("CT105SBLOTE",.F.,.F.,{CSUBLOTE})
CTBA105.PRW - CTB_INCL() -> DDATALANC:= EXECBLOCK("ALTDATAL",.F.,.F.,{DDATA,CROTINA})
CTBA105.PRW - CTB_INCL() -> EXECBLOCK("ANTCTBGRV",.F.,.F., { NOPCX,DDATALANC,CLOTE,CSUBLOTE,CDOC} )
CTBA105.PRW - CTB_INCL() -> EXECBLOCK("ANTCTBGRV",.F.,.F.,{ NOPCX,DDATALANC,CLOTE,CSUBLOTE,CDOC} )
CTBA105.PRW - CTB_INCL() -> EXECBLOCK("CT102DLG",.F.,.F.)
CTBA105.PRW - CTB_INCL() -> EXECBLOCK("DEPCTBGRV",.F.,.F., { NOPCX,DDATALANC,CLOTE,CSUBLOTE,CDOC } )
CTBA105.PRW - CTB_INCL() -> EXECBLOCK("DEPCTBGRV",.F.,.F., {NOPCX,DDATALANC,CLOTE,CSUBLOTE,CDOC } )
CTBA110.PRW - CTBA110DLG() -> EXECBLOCK("CTB110LBC",.F.,.F.)
CTBA110.PRW - DELCRITICA() -> LOK := EXECBLOCK("CTB110EXCL" , .F. , .F. , {CCOD} )
CTBA130.PRW - C130GRAVA() -> EXECBLOCK( "CT130GRV" , .F. , .F. , {NOPC} )
CTBA130.PRW - CT130GRPOK() -> IF EXECBLOCK("CTA130TOK",.F.,.F.,NOPC)
CTBA130.PRW - CT130LINOK() -> IF EXISTBLOCK("CTB130LOK") .AND. !EXECBLOCK( "CTB130LOK", .F. , .F. )
CTBA130.PRW - CT130TUDOK() -> IF EXISTBLOCK("CTB130TOK") .AND. !EXECBLOCK( "CTB130TOK", .F. , .F. )
CTBA130.PRW - CTB130SET() -> ACTBA130 := EXECBLOCK( "CTSETBUT",.F.,.F.,AROTINA)
CTBA130.PRW - CTBBOOKALT() -> EXECBLOCK( "CTBOOKALT", .F. , .F. )
CTBA130.PRW - CTBBOOKDEL() -> EXECBLOCK( "CTBOOKDEL" , .F. , .F. )
CTBA130.PRW - CTBBOOKINC() -> EXECBLOCK( "CTBOOKINC", .F. , .F. )
CTBA130.PRW - MENUDEF() -> ACTBA130 := EXECBLOCK( "CTESTBUT",.F.,.F.,AROTINA)
CTBA140.PRW - CTB140ALT() -> EXECBLOCK( "CTB140ALT", .F. , .F. )
CTBA140.PRW - MENUDEF() -> ACT140BUT := EXECBLOCK( "CT140BUT",.F.,.F.,AROTINA)
CTBA150.PRW - CTB150GRAVA() -> EXECBLOCK( "CTB150DEL", .F. , .F. )
CTBA150.PRW - CTB150OK() -> LRET := EXECBLOCK( "CTB150TOK", .F. , .F.,{ DDATA,LINCLUI,LEXCLUI } )
CTBA150.PRW - MENUDEF() -> ACTBA150 := EXECBLOCK( "CT150BUT",.F.,.F.,AROTINA)
CTBA160.PRW - CTB160TOK() -> XRET := EXECBLOCK("CT160TOK",.F.,.F.)
CTBA160.PRW - FGRAVAGD() -> EXECBLOCK("CT160CVF",.F.,.F.)
CTBA161.PRW - CONFOPERVIS() -> EXECBLOCK("C161CTSA",.F.,.F.)
CTBA161.PRW - CONFOPERVIS() -> EXECBLOCK("C161CTSI",.F.,.F.)
CTBA161.PRW - CONFOPERVIS() -> XRET := EXECBLOCK("CT161TOK",.F.,.F.)
CTBA190.PRW - CTBA190EXEC() -> EXECBLOCK("CT190PRO", .F., .F., { ARESULT[1] } )
CTBA200.PRW - CTB200EDT() -> EXECBLOCK( "CTB200DEL",.F.,.F.,{CCODMOEDA, CCALEND})
CTBA210.PRW - CT210ATUAL() -> CCLVLLP:= EXECBLOCK("CTB210CV",.F.,.F.,{MV_PAR21})
CTBA210.PRW - CT210ATUAL() -> CITEMLP:= EXECBLOCK("CTB210IT",.F.,.F.,{MV_PAR19})
CTBA210.PRW - CT210ATUAL() -> EXECBLOCK("CTB210GR",.F.,.F.,{AARQS[NCONTADOR],AGRVLAN})
CTBA211.PRW - CTB211PROC() -> LATUSLDCT3:= EXECBLOCK("GRVCT3",.F.,.F.)
CTBA211.PRW - CTB211PROC() -> LATUSLDCT4:= EXECBLOCK("GRVCT4",.F.,.F.)
CTBA211.PRW - CTB211PROC() -> LATUSLDCTI:= EXECBLOCK("GRVCTI",.F.,.F.)
CTBA220.PRW - CT220APAGA() -> CCONDESP:= EXECBLOCK("CTB220TOP",.F.,.F.,{AALIAS[I]})
CTBA220.PRW - CT220EXECP() -> CCT220SKIP := EXECBLOCK("CT220SKIP", .F.,.F.)
CTBA220.PRW - CT220PREP() -> EXECBLOCK("CT220FPR",.F.,.F.)
CTBA220.PRW - CT220PREP() -> IF !LCT220SEL .OR. (LCT220SEL .AND. EXECBLOCK("CT220SEL",.F.,.F.,{AEMP,AQUAIS}))
CTBA220.PRW - CT220PROC() -> EXECBLOCK("CT220REL",.F.,.F.)
CTBA220.PRW - CT220SALDO() -> LRET := EXECBLOCK("CT220DOC",.F.,.F.,{CALIAS})
CTBA220.PRW - CT220SALDO() -> LRET := EXECBLOCK("CT220FLAG",.F.,.F.,{"AGLUTINA"})
CTBA220.PRW - CT220SALDO() -> LRET := EXECBLOCK("CT220FLAG",.F.,.F.,{"CT2ORIGEM"})
CTBA220.PRW - CT220SALDO() -> LRET := EXECBLOCK("CT220SKIP",.F.,.F.,{CALIAS})
CTBA220.PRW - CTBA220 () -> AEMP := EXECBLOCK("CT220EMP",.F.,.F.,{AEMP})
CTBA230.PRW - CT230RCONS() -> LRET := EXECBLOCK("CT230TRB",.F.,.F.,{CTB->CTB_CTADES,CTB->CTB_CCDES,CTB->CTB_ITEMDE,CTB->CTB_CLVLDE})
CTBA230.PRW - CT230RCONS() -> LRET := EXECBLOCK("CT230TRB",.F.,.F.,{CTB->CTB_CTADES,CTB->CTB_CCDES,CTB->CTB_ITEMDE,SPACE(LEN(CTB->CTB_CLVLDE))})
CTBA230.PRW - CT230RCONS() -> LRET := EXECBLOCK("CT230TRB",.F.,.F.,{CTB->CTB_CTADES,CTB->CTB_CCDES,SPACE(LEN(CTB->CTB_ITEMDE)),SPACE(LEN(CTB->CTB_CLVLDE))})
CTBA231.PRW - CT231EXECP() -> CSQL += EXECBLOCK("CT231ADQRY",.F.,.F.,{1})
CTBA231.PRW - CT231EXECP() -> CSQL += EXECBLOCK("CT231ADQRY",.F.,.F.,{2})
CTBA231.PRW - CT231EXECP() -> CSQLPE := EXECBLOCK( "CTB231PR", .F., .F., {CSQL,2})
CTBA231.PRW - CT231SLINP() -> CSQLPE := EXECBLOCK( "CTB231PR", .F., .F., {CSQL,1})
CTBA270.PRW - CTB270ATFPRC() -> EXECBLOCK( "CT270RFA" ,.F.,.F.,{CALIASCTQ})
CTBA270.PRW - CTB270ATFPRC() -> EXECBLOCK( "CT270RFB" ,.F.,.F.,{CALIASCTQ})
CTBA270.PRW - CTB270CAD() -> ABUTTONS:= EXECBLOCK( "CT270DLB",.F.,.F.,ABUTTONS )
CTBA270.PRW - CTB270CAD() -> ODLG := EXECBLOCK("CT270DLG",.F.,.F.,ODLG)
CTBA270.PRW - CTB270GRAVA() -> EXECBLOCK("CT270GRA",.F.,.F.)
CTBA270.PRW - CTB270GRAVA() -> EXECBLOCK("CT270GRD",.F.,.F.)
CTBA270.PRW - CTB270GRAVA() -> EXECBLOCK("CT270GRL",.F.,.F.)
CTBA270.PRW - CTB270LEG() -> ACT270CORES := EXECBLOCK("CT270LEG",.F.,.F.,{2})
CTBA270.PRW - CTB270LOK() -> LRET := EXECBLOCK( "CTB270LOK",.F.,.F.)
CTBA270.PRW - CTB270RECALC() -> EXECBLOCK( "CT270RFA" ,.F.,.F.,{"TMP"})
CTBA270.PRW - CTB270RECALC() -> EXECBLOCK( "CT270RFB" ,.F.,.F.,{"TMP"})
CTBA270.PRW - CTB270TOK() -> LRET := EXECBLOCK("CTB270TOK", .F., .F., {NOPCX,CCTQ_CTORI,CCTQ_CCORI,CCTQ_ITORI,CCTQ_CLORI,;
CTBA270.PRW - CTBA270() -> CFILESP := EXECBLOCK("C270BROW",.F.,.F.,CFILPAD)
CTBA270.PRW - CTBA270() -> CFILESP := EXECBLOCK("C270BRWT",.F.,.F.,CFILPAD)
CTBA270.PRW - MENUDEF() -> ACT270BUT := EXECBLOCK("CT270BUT",.F.,.F.,AROTINA)
CTBA276.PRW - CTB276ATFPRC() -> EXECBLOCK( "CT276RFA" ,.F.,.F.,{CALIASCW1})
CTBA276.PRW - CTB276ATFPRC() -> EXECBLOCK( "CT276RFB" ,.F.,.F.,{CALIASCW1})
CTBA276.PRW - CTB276RECALC() -> EXECBLOCK( "CT276RFA" ,.F.,.F.,{"TMP"})
CTBA276.PRW - CTB276RECALC() -> EXECBLOCK( "CT276RFB" ,.F.,.F.,{"TMP"})
CTBA276.PRW - MENUDEF() -> ACTB276BUT := EXECBLOCK("CTB276BUT",.F.,.F.,AROTINA)
CTBA276.PRW - VALIDAPERCENT() -> LCTB276CW1 := EXECBLOCK("CTB276CW1",.F.,.F.,{CTPVLD, CCW1_TIPO, CCW1_ENTIDADE, NTOTRAT, NLINRAT})
CTBA277.PRW - MENUDEF() -> ACTB277BUT := EXECBLOCK("CTB277BUT",.F.,.F.,AROTINA)
CTBA278.PRW - CTB278ATFPRC() -> EXECBLOCK( "CT278RFA" ,.F.,.F.,{CALIASCW3})
CTBA278.PRW - CTB278ATFPRC() -> EXECBLOCK( "CT278RFB" ,.F.,.F.,{CALIASCW3})
CTBA278.PRW - CTB278RECALC() -> EXECBLOCK( "CT278RFB" ,.F.,.F.,{"TMP"})
CTBA278.PRW - MENUDEF() -> ACTB278BUT := EXECBLOCK("CTB278BUT",.F.,.F.,AROTINA)
CTBA280.PRW - CT280CRTOK() -> LRET := EXECBLOCK( "CT280MVOK", .F., .F. )
CTBA280.PRW - CTB280PROC() -> CHISTORICO := EXECBLOCK("CT280HIST",.F.,.F.,{CHISTORICO})
CTBA280.PRW - CTB280PROC() -> IF ! EXECBLOCK("CT280SKIP",.F.,.F.)
CTBA280.PRW - CTB280PROC() -> IF !EXECBLOCK("CT280FILP",.F.,.F.,{"CQ3"})
CTBA280.PRW - CTB280PROC() -> IF !EXECBLOCK("CT280FILP",.F.,.F.,{"CQ5"})
CTBA280.PRW - CTB280PROC() -> IF !EXECBLOCK("CT280FILP",.F.,.F.,{"CQ7"})
CTBA281.PRW - CT281CRTOK() -> LRET := EXECBLOCK( "CT281MVOK", .F., .F. )
CTBA281.PRW - CT281GERRAT() -> CHISTCTQ := EXECBLOCK("CT281HIST",.F.,.F.,{BHISTCTQ})
CTBA281.PRW - CTB281PROC() -> IF !EXECBLOCK("CT281LOOP",.F.,.F.)
CTBA350.PRW - CT350RODA() -> EXECBLOCK("CTB350EF",.F.,.F.)
CTBA350.PRW - CT350RODA() -> EXECBLOCK("EFELANC",.F.,.F.)
CTBA390.PRW - CT390GRSLD() -> EXECBLOCK("CT390SLSQL", .F., .F.,{CWHERE})
CTBA390.PRW - CTB390APRV() -> EXECBLOCK("CTB390GRV", .F., .F.,{0,M->CV1_ORCMTO,M->CV1_CALEND,M->CV1_MOEDA,M->CV1_REVISA})
CTBA390.PRW - CTB390CAD() -> ACT390BTE := EXECBLOCK( "CT390BTE" ,.F.,.F. , ABUTTON )
CTBA390.PRW - CTB390CAD() -> EXECBLOCK("CTB390GRV", .F., .F.,{NOPCX,M->CV1_ORCMTO,M->CV1_CALEND,M->CV1_MOEDA,M->CV1_REVISA})
CTBA390.PRW - CTB390CAD() -> LRETPSW:= EXECBLOCK("CTB390PSW",.F.,.F.,{NOPCX,CUSERNAME})
CTBA390.PRW - CTB390LOK() -> IF LOK .AND. EXISTBLOCK("CTB390LOK") .AND. ! EXECBLOCK("CTB390LOK", .F., .F.)
CTBA390.PRW - CTB390OK() -> IF EXISTBLOCK("CTB390TOK") .AND. ! EXECBLOCK("CTB390TOK", .F., .F.)
CTBA390.PRW - CTBA390() -> EXECBLOCK("CT390AFIL",.F.,.F.)
CTBA390.PRW - MENUDEF() -> ACT390BUT := EXECBLOCK( "CT390BUT" ,.F.,.F. , AROTINA )
CTBA420.PRW - CTB420TXT() -> EXECBLOCK("CTB420TRS", .F., .F., {(CALIAS)->R_E_C_N_O_})
CTBA420.PRW - CTB420X3() -> APESTRUCT := EXECBLOCK("CTB420SX3",.F.,.F.,{ACLONE(ASX3STRUCT)})
CTBA500.PRW - CTB500PROC() -> CLOTE := EXECBLOCK("CT500LOT",.F.,.F.,CLOTE)
CTBA500.PRW - CTB500PROC() -> EXECBLOCK("CT500ARQ",.F.,.F.)
CTBA500.PRW - CTB500PROC() -> EXECBLOCK("CT500PRV",.F.,.F.,{NTOTAL})
CTBA500.PRW - CTB500PROC() -> LCONTINUA := EXECBLOCK("CTB500VLD",.F.,.F.)
CTBA500.PRW - CTB500PROC() -> LCT500LIN:=EXECBLOCK("CT500LIN",.F.,.F.)
CTBA500.PRW - CTBA500() -> LATUREG:=EXECBLOCK("CT500REG",.F.,.F.)
CTBA810.PRW - CRIATMPDES() -> EXECBLOCK( "CTC810CDES" , .F. , .F. , {ACAMPOS, ACHVDES})
CTBA810.PRW - CTBA810GRAVA() -> EXECBLOCK("CTB810GRV", .F., .F.,{NOPC})
CTBAFIN.PRW - CTBFINPROC() -> AMOTBX := EXECBLOCK("F370E5MBX",.F.,.F.,AMOTBX)
CTBAFIN.PRW - CTBFINPROC() -> ATAIL(ASQLSTATEMENT) := EXECBLOCK("F370E5K",.F.,.F.,ATAIL(ASQLSTATEMENT))
CTBAFIN.PRW - CTBFINPROC() -> CCONDWHILE:= EXECBLOCK("F370E1W",.F.,.F.)
CTBAFIN.PRW - CTBFINPROC() -> CPADRAO := EXECBLOCK("F370BORD",.F.,.F.,{CNUMBOR})
CTBAFIN.PRW - CTBFINPROC() -> CQUERY := EXECBLOCK("F370E1F",.F.,.F.,CQUERY)
CTBAFIN.PRW - CTBFINPROC() -> CQUERY := EXECBLOCK("F370E2F",.F.,.F.,CQUERY)
CTBAFIN.PRW - CTBFINPROC() -> CQUERY := EXECBLOCK("F370E5F",.F.,.F.,CQUERY)
CTBAFIN.PRW - CTBFINPROC() -> EXECBLOCK("CTBFPOS", .F., .F.)
CTBAFIN.PRW - CTBFINPROC() -> EXECBLOCK("F370E5P",.F.,.F.)
CTBAFIN.PRW - CTBFINPROC() -> EXECBLOCK("F370E5R",.F.,.F.)
CTBAFIN.PRW - CTBFINPROC() -> EXECBLOCK("F370NATP",.F.,.F.,{NHDLPRV,CLOTE})
CTBAFIN.PRW - CTBFINPROC() -> IF !EXECBLOCK("F370E1L",.F.,.F.)
CTBAFIN.PRW - CTBFINPROC() -> IF !EXECBLOCK("F370EUF",.F.,.F.)
CTBAFIN.PRW - CTBGRVCHEQ() -> CCHAVE := EXECBLOCK("F370EFK",.F.,.F.,CCHAVE)
CTBAFIN.PRW - CTBGRVCHEQ() -> CQUERY += EXECBLOCK("F370EFF",.F.,.F.,CQUERY)
CTBAFIN.PRW - CTBGRVMOV() -> AMOTBX := EXECBLOCK("F370E5MBX",.F.,.F.,AMOTBX)
CTBAFIN.PRW - CTBGRVMOV() -> CQUERY := EXECBLOCK("F370E5F",.F.,.F.,CQUERY)
CTBAFIN.PRW - CTBGRVPAG() -> CQUERY := EXECBLOCK("F370E2F",.F.,.F.,CQUERY)
CTBAFIN.PRW - CTBGRVREC() -> CQUERY := EXECBLOCK("F370E1F",.F.,.F.,CQUERY)
CTBAFIN.PRW - FCTBA677() -> EXECBLOCK("CTBPFO7",.F.,.F.)
CTBANFE.PRW - CTBGRVNFE() -> LRETPE:= EXECBLOCK("CTBNFEDT",.F.,.F.)
CTBANFE.PRW - MACTBNFE() -> AOPTIMIZE := EXECBLOCK("CTBNFE",.F.,.F.,AOPTIMIZE)
CTBANFE.PRW - MACTBNFE() -> AOPTIMIZE := EXECBLOCK("CTBPC",.F.,.F.,AOPTIMIZE)
CTBANFE.PRW - MACTBNFE() -> DDATABASE := EXECBLOCK("CTNFEDT",.F.,.F.)
CTBANFE.PRW - MACTBNFE() -> EXECBLOCK("CTBNFEFIM",.F.,.F.,{NTPCTB,DDATAINI,DDATAFIM,CFILDE,CFILATE,LCONTNCC,LEND})
CTBANFE.PRW - MACTBNFE() -> IF !(EXECBLOCK("CTNFEFIL",.F.,.F.,{CALIASSF1}))
CTBANFE.PRW - MACTBNFE() -> LCTNFEORD := EXECBLOCK("CTNFEORD",.F.,.F.)
CTBANFE.PRW - MACTBNFE() -> LRETPE:= EXECBLOCK("CTBNFEDT",.F.,.F.)
CTBANFS.PRW - CTBANCPS() -> AOPTIMIZE := EXECBLOCK("CTBNFS",.F.,.F.,AOPTIMIZE)
CTBANFS.PRW - CTBANCPS() -> DDATABASE := EXECBLOCK("CTNFSDT",.F.,.F.)
CTBANFS.PRW - CTBANCPS() -> IF !(EXECBLOCK("CTNFSFIL",.F.,.F.,{CALIASSF2}))
CTBANFS.PRW - MACTBNFS() -> AOPTIMIZE := EXECBLOCK("CTBNFS",.F.,.F.,AOPTIMIZE)
CTBANFS.PRW - MACTBNFS() -> DDATABASE := EXECBLOCK("CTNFSDT",.F.,.F.)
CTBANFS.PRW - MACTBNFS() -> IF !(EXECBLOCK("CTNFSFIL",.F.,.F.,{CALIASSF2}))
CTBC400.PRW - CT400CON() -> ABUTTONS:= EXECBLOCK("CT400CBT", .F.,.F.)
CTBC400.PRW - MENUDEF() -> ACT400BUT:= EXECBLOCK("CT400BUT", .F.,.F., AROTINA)
CTBC661.PRW - CRIATMPDES() -> EXECBLOCK( "CTC661CDES" , .F. , .F. , {ACAMPOS, ACHVDES})
CTBFMTCOL.PRW - CTBFMTCOL() -> CNRDOC:= EXECBLOCK("DIGVERCOL",.F.,.F.,{"CVC",CNRDOC})
CTBFMTCOL.PRW - CTBFMTCOL() -> CNRDOC:= EXECBLOCK("DIGVERCOL",.F.,.F.,{"QRYPRO",CNRDOC})
CTBFMTCOL.PRW - CTBFMTCOL() -> CNRDOC:= EXECBLOCK("DIGVERCOL",.F.,.F.,{"SRA",CNRDOC})
CTBR110.PRW - CTR110IMP() -> AVARIAVEIS := EXECBLOCK("CTR110VAR",.F.,.F.,{AVARIAVEIS,NPAGINI,NPAGFIM,NREINICIA})
CTBS011.PRW - ECDGRVDEM() -> CSE->CSE_INDDRE := EXECBLOCK("CTS11INDIC",.F.,.F.,{"CSE_INDDRE", CCODVIS ,CARQTMP->CONTA})
CTBS011.PRW - ECDGRVDEM() -> CSE->CSE_INDVAL := EXECBLOCK("CTS11INDIC",.F.,.F.,{"CSE_INDVAL", CCODVIS ,CARQTMP->CONTA})
CTBS011.PRW - PROCMOV() -> CCHAVE := EXECBLOCK( "ECDCHVMOV", .F., .F.)
CTBXATU.PRW - AUXCTBGRAVA() -> IF ! EXECBLOCK("CT105SLD")
CTBXATU.PRW - AUXCTBGRAVA() -> IF !( LCHKCTBGRV .AND. EXECBLOCK("CHKCTBGRV" , .F., .F. , {LANTCTBGRV} ) )
CTBXATU.PRW - CT2CLEARLA() -> CCPOFLAG := EXECBLOCK( "CTBCLRFLG" , .F., .F. , {CALIASORIG, NRECORIGEM} )
CTBXATU.PRW - CT2CLEARLA() -> EXECBLOCK("CTBGRVUSU",.F.,.F.,ALIAS())
CTBXATU.PRW - CTB101GRV() -> EXECBLOCK("CTBLANC",.F.,.F.,{DDATA,CLOTE,CSUBLOTE,CDOC,@CLINHA,CTIPO,CMOEDA,;
CTBXATU.PRW - CTBEFTCORR() -> EXECBLOCK("CTBSEQDIA",.F.,.F.,{ASEQDIARIO[NCTDASEQ],CCODDIA,CSEQDIARIO})
CTBXATU.PRW - CTBGRV101() -> EXECBLOCK("CTBGRV",.F.,.F.,{ NOPC,CROTINA,DDATA,CLOTE,CSUBLOTE,CDOC } )
CTBXATU.PRW - CTBGRVCT2() -> EXECBLOCK("CT105CT2", .F., .F., {__NQUANTAS, DDATALANC,CLOTE,CSUBLOTE,CDOC,LCUSTO,LITEM,LCLVL,NTOTINF,_LATSLDBASE,_LREPROC })
CTBXATU.PRW - CTBGRVCT2() -> EXECBLOCK("CTBGRV",.F.,.F.,{NOPC,CPROG})
CTBXATU.PRW - CTBINVSTATIC() -> LRETSLD := EXECBLOCK("CTBVLDSLD",.F.,.F., {_LATSLDCT7, _LATSLDCT3, _LATSLDCT4, _LATSLDCTI})
CTBXATU.PRW - CTBINVSTATIC() -> _LATSLDCT3:= EXECBLOCK("GRVCT3",.F.,.F.)
CTBXATU.PRW - CTBINVSTATIC() -> _LATSLDCT4:= EXECBLOCK("GRVCT4",.F.,.F.)
CTBXATU.PRW - CTBINVSTATIC() -> _LATSLDCTI:= EXECBLOCK("GRVCTI",.F.,.F.)
CTBXATU.PRW - CTBP101EXC() -> LPODEEXC := EXECBLOCK("CTB101EXC",.F.,.F.)
CTBXATU.PRW - CTBPCOLANC() -> LPCOLANC := EXECBLOCK("CTBPCO",.F.,.F.,{ "000082","01","CTBA105" } )
CTBXATU.PRW - CTBPCOLCT() -> LPCOLANC := EXECBLOCK("CTBPCO",.F.,.F.,{ "000082","01","CTBA101" } )
CTBXATU.PRW - NEWCTBEFTCORR() -> EXECBLOCK("CTBSEQDIA",.F.,.F.,{ASEQDIARIO[NCTDASEQ],CCODDIA,CSEQDIARIO})
CTBXATU.PRW - NEWCV3BYCTK() -> EXECBLOCK( "GRVCV3", .F., .F. )
CTBXCTB.PRW - CTBCCSUP() -> CCOD := EXECBLOCK("CTBCCSUP",.F.,.F.,CCODIGO)
CTBXCTB.PRW - CTBCLVLSUP() -> CCOD := EXECBLOCK("CTBCVSUP",.F.,.F.,CCODIGO)
CTBXCTB.PRW - CTBDIGCONT() -> NDIG := EXECBLOCK("CTBDIGCT",.F.,.F.,CCODIGO)
CTBXCTB.PRW - CTBITEMSUP() -> CCOD := EXECBLOCK("CTBITSUP",.F.,.F.,CCODIGO)
CTBXREL.PRW - CTCGCCABEC() -> ACABEC := EXECBLOCK("CTCABR3",.F.,.F.)
CTBXREL.PRW - CTCGCCABTR() -> ACABEC := EXECBLOCK("CTCABR4",.F.,.F.)
CTBXSAL.PRW - CRIASPMVT() -> CSQL := EXECBLOCK( "CTBMOVTOS", .F., .F., { CSQL } )
CTBXSAL.PRW - CTBPLGEREN() -> EXECBLOCK("PLGERARQ", .F.,.F. )
CTBXSAL.PRW - CTPLENTGER() -> ARET:= EXECBLOCK("FILTRAENT",.F.,.F.,{CHEADER,LFILTRACC,LFILTRAIT,LFILTRACV,CCCINI,CCCFIM,CITEMINI,CITEMFIM,CCLVLINI,CCLVLFIM})
CTBXSALA.PRW - CQ0COMPQRY() -> CQUERY += EXECBLOCK("CTBSLDLP", .F.,.F., { LIMPANTLP , DDATALP, AMESES , LACUM , CMOEDA , CTPSALDO , 2 } )
CTBXSALMI.PRX - _CTPLANOREF() -> EXECBLOCK("ESPPLANREF",.F.,.F.,{OMETER,OTEXT,ODLG,LEND,CPLANOREF,CCTAREFINI,CCTAREFFIN,;
CTBXSALMI.PRX - _GERINFFMT() -> CNRDOC:= EXECBLOCK("DIGVERCOL",.F.,.F.,{"CVC",CNRDOC})
CTBXSALMI.PRX - _GERINFFMT() -> CNRDOC:= EXECBLOCK("DIGVERCOL",.F.,.F.,{"QRYCTE",CNRDOC})
CTBXSALMI.PRX - _GERINFFMT() -> CNRDOC:= EXECBLOCK("DIGVERCOL",.F.,.F.,{"QRYPRO",CNRDOC})
CTBXSALMI.PRX - _GERINFFMT() -> CNRDOC:= EXECBLOCK("DIGVERCOL",.F.,.F.,{"SRA",CNRDOC})
CTBXSEM.PRW - CTBCRIACTF() -> CDOC := EXECBLOCK("CTBPRXDOC",.F.,.F.,{DDATALANC,CLOTE,CSUBLOTE})
CTBXSEM.PRW - CTBCRIACTF() -> CQUERY := EXECBLOCK( 'CTBPXDCQRY' , .F. , .F. , {CQUERY} )
CTBXSEM.PRW - CTBEXCFIL() -> __LEXCFIL := EXECBLOCK( "CTBSMEXC" , .F.,.F. )
CTBXSEM.PRW - OLDPROXDOC() -> CDOC := EXECBLOCK("CTBPRXDOC",.F.,.F.,{DDATALANC,CLOTE,CSUBLOTE})
CTBXSEM.PRW - OLDPROXDOC() -> CQUERY := EXECBLOCK( 'CTBPXDCQRY' , .F. , .F. , {CQUERY} )
CTBXVLD.PRW - VLDCAPLOTE() -> LRET := EXECBLOCK("VLCPLOTE",.F.,.F.,{DDATALANC,CLOTE,CSUBLOTE,CDOC,NOPC})
DCRE.PRW - DCRE() -> EXECBLOCK("DCRECF",.F.,.F.,{CPROD})
DIEFRJ.PRW - DIEFRJTMP() -> EXECBLOCK( "DIEFRJPG", .F., .F., { DDATAINI,DDATAFIN }, .F. )
DISXFUNA.PRW - D020TBPRC() -> ±±³DESCRI‡…O ³ EXECBLOCK, DISPARADO PELA VALIDACAO DO CAMPO DA1_COD, P/ VE- ³±±
DISXFUNA.PRW - D410VLC5CL() -> ±±³DESCRI‡…O ³ EXECBLOCK QUE RETORNA O TES A PARTIR DE PARAMETROS³±±
DISXFUNA.PRW - D410VLC6TP() -> EXECBLOCK("D410INT",.F.,.F.)
DISXFUNA.PRW - D410VLC6TP() -> ±±³DESCRI‡ÆO ³ EXECBLOCK, DISPARADO COMO GATILHO PELO DAN_MOTIVO, PARA³±±
DISXFUNB.PRW - D080VLTES() -> ±±³ DESCRICAO³ EXECBLOCK QUE MONTA A QUANTIDADE EM MASCARA PARA O SB6 ³±±
DLGA010.PRW - DLA010GRV() -> EXECBLOCK("DL010ANT",.F.,.F.,{NOPC})
DLGA010.PRW - DLA010GRV() -> EXECBLOCK("DL010GRV",.F.,.F.,{NOPC})
DLGA010.PRW - DLA010TDOK() -> LRET := EXECBLOCK("DL010TOK",.F.,.F.)
DLGA010.PRW - MENUDEF() -> EXECBLOCK("DLG010MNU",.F.,.F.)
DLGA150.PRW - AFTERMARK() -> EXECBLOCK("DLGA150M",.F.,.F.,OBROWSE:CMARK)
DLGA150.PRW - AFTERMARK() -> LRET := EXECBLOCK('DLA150MK',.F.,.F.,OBROWSE:CMARK)
DLGA150.PRW - DLA150MANUT() -> EXECBLOCK( "DL150AEX", .F., .F., {NOPCX} )
DLGA150.PRW - DLA150MANUT() -> LRETPE := EXECBLOCK( "DL150BEX", .F., .F., {NOPCX} )
DLGA150.PRW - DLA150QRY() -> IF VALTYPE(CQUERYPE:=EXECBLOCK('DL150FIL',.F.,.F.,{CQUERY,.T.})) == 'C'
DLGA150.PRW - DLA150SERV() -> CQUERY += EXECBLOCK('DL150OEX', .F., .F.)
DLGA150.PRW - DLA150STAT() -> EXECBLOCK( "DL150STA", .F., .F. )
DLGA220.PRW - MENUDEF() -> EXECBLOCK("DLG220MNU",.F.,.F.)
DLGV001.PRW - DLGVLDARM() -> LRETPE := EXECBLOCK("WMSVLARM",.F.,.F.,{CUSUARMA})
DLGV001.PRW - DLVAVALSDB() -> ARETPE := EXECBLOCK('DLGV001B', .F., .F.,{CRECHUM,CFUNCAO,SDB->DB_SERVIC,SDB->DB_TAREFA,SDB->DB_ATIVID,SDB->DB_ORDATIV,SDB->DB_DOC,LCONVOCA,CFUNEXE})
DLGV001.PRW - DLVAVALSDB() -> EXECBLOCK('DLVACONV', .F., .F., {CRECHUM, CFUNCAO, SDB->(RECNO())})
DLGV001.PRW - DLVAVALSDB() -> LCONVOCA := EXECBLOCK('DLGV001A', .F., .F.,{CRECHUM,CFUNCAO,SDB->DB_SERVIC,SDB->DB_TAREFA,SDB->DB_ATIVID,SDB->DB_ORDATIV,SDB->DB_DOC,LCONVOCA})
DLGV001.PRW - DLVCONVOCA() -> EXECBLOCK('DLGV001G', .F., .F.,{CFUNEXE})
DLGV001.PRW - DLVENDERECO() -> CENDERECO := EXECBLOCK('DVDISPEN', .F., .F., {CENDERECO})
DLGV001.PRW - DLVEXECANT() -> LRETPE := EXECBLOCK('DLGVEXAN', .F., .F., {LRET, NRECORI, LACHOU, CRECHUM})
DLGV001.PRW - QRYVALATCV() -> CQUERY += EXECBLOCK('DLV001ORD', .F., .F., {NINDSDB})
DLGV001.PRW - QRYVALATCV() -> CQUERY += EXECBLOCK('DLV001WH',.F.,.F.,{CRECHUM,CFUNCAO})
DLGV030.PRW - ALTERAQTD() -> LRETPE := EXECBLOCK("DV030SEP",.F.,.F.,{NQTDORIG,NQTDMVTO})
DLGV030.PRW - DLGV030() -> ARETPE := EXECBLOCK('DV030CON')
DLGV030.PRW - DLGV030() -> CRETPE := EXECBLOCK("DV030EN1", .F., .F.,{CENDERECO})
DLGV030.PRW - DLGV030() -> CRETPE := EXECBLOCK("DV030ENO", .F., .F.)
DLGV030.PRW - DLGV030() -> CRETPE := EXECBLOCK('DV030END', .F., .F.)
DLGV030.PRW - DLGV030() -> EXECBLOCK("DV030SDB",.F.,.F.,{LCTRLFOK})
DLGV030.PRW - DLGV030() -> EXECBLOCK('DLGV040',.F.,.F.,{SDB->DB_CARGA})
DLGV030.PRW - DLGV030() -> EXECBLOCK('DV030DOC', .F., .F., {CFUNEXE})
DLGV030.PRW - DLGV030() -> LRETPE:= EXECBLOCK('DV030CO1', .F., .F., {SDB->DB_PRODUTO, CENDERECO, LRET})
DLGV030.PRW - DLGV030() -> LRETPE:= EXECBLOCK('DV030CO3', .F., .F., {SDB->DB_PRODUTO})
DLGV030.PRW - DLGV030ALP() -> ADLESTC9 := EXECBLOCK("DLVESTC9",.F.,.F.,{LDLESTC9,{SDB->(RECNO())},NQTDORIG,NQTDMVTO,.F.})
DLGV030.PRW - DLV030END() -> CRETPE:= EXECBLOCK('DV030CO4', .F., .F., {CENDERECO})
DLGV030.PRW - DLV030END() -> LRETPE := EXECBLOCK('DV030DES',.F.,.F.)
DLGV030.PRW - DLV030UM() -> ARETPE := EXECBLOCK('DV030CO6',.F.,.F.,{NQTDTOT, NQTDE})
DLGV030.PRW - DLV030UM() -> EXECBLOCK("DV030SCR",.F.,.F.)
DLGV030.PRW - DLV030VLDEND() -> LRET := EXECBLOCK('DLVENDER',.F.,.F.,{CCONFIRMA, CENDERECO})
DLGV030.PRW - DLV30LOTE() -> EXECBLOCK("DV030SDB",.F.,.F.,{LCTRLFOK})
DLGV030.PRW - DLV30VLLOT() -> CRETPE := EXECBLOCK("DV030LOT",.F.,.F.,{SDB->DB_PRODUTO,CLOTECTL})
DLGV030.PRW - DLV30VLLOT() -> LCONSLDRF := EXECBLOCK("WMSALOT",.F.,.F.)
DLGV030.PRW - DLV30VLPRO() -> ARETPE := EXECBLOCK('DV030PRD',.F.,.F.,{CPRODUTO})
DLGV030.PRW - DLV30VLPRO() -> LRETPE:= EXECBLOCK('DLV030VL',.F.,.F.,{CPRODUTO})
DLGV030.PRW - FINALATIV() -> EXECBLOCK("DV030SDB",.F.,.F.,{LCTRLFOK})
DLGV030.PRW - FINALATIV() -> LRETPE := EXECBLOCK("DLGV030EST",.F.,.F.)
DLGV030.PRW - FINALATIV() -> LRETPE := EXECBLOCK("DV030EST",.F.,.F.)
DLGV070.PRW - DLGV070() -> LRET := EXECBLOCK('DLV070PR', .F., .F., {CPRODUTO})
DLGV070.PRW - DLV070QTD() -> ARETPE := EXECBLOCK('DV070QTD', .F., .F., {LRET, NQTDINF, CPRODUTO})
DLGV070.PRW - DLV70VLEND() -> LRET := EXECBLOCK('DLVENDER',.F.,.F.,{CARMAZEM, CENDERECO})
DLGV070.PRW - DLV70VLPRO() -> ARETPE:= EXECBLOCK('DLV070VL', .F., .F., {CPRODUTO, APRODUTOS, LDIGITA})
DLGV080.PRW - DESUMAATIV() -> LRETPE := EXECBLOCK('DV080SED', .F., .F., {LRET})
DLGV080.PRW - DLGV080() -> CRETPE := EXECBLOCK("DV080END", .F., .F.)
DLGV080.PRW - DLGV080() -> CRETPE := EXECBLOCK('DV080ENO', .F., .F.)
DLGV080.PRW - DLGV080() -> LRETPE := EXECBLOCK('DV080ORI', .F., .F., {CCONFIRMA, CENDERECO, LRET})
DLGV080.PRW - DLV080END() -> LRETPE := EXECBLOCK('DV080DST', .F., .F.)
DLGV080.PRW - DLV080OPC() -> CNEWEND := EXECBLOCK('DV080OPC', .F., .F., {CENDDEST})
DLGV080.PRW - DLV080UM() -> EXECBLOCK('DV080SCR',.F.,.F.)
DLGV080.PRW - DLV080UM() -> LRETPE := EXECBLOCK('DV080QTD', .F., .F., {CARMAZEM,CESTFIS,CENDERECO,CCODPRO,CLOTECTL,CSUBLOTE,NQTDNORMA,NQTDITEM,NQTDE})
DLGV080.PRW - DLV080VLD() -> LRET := EXECBLOCK('DLV080VL', .F., .F., {CCONFIRMA, CSISTEMA, NTIPO})
DLGV080.PRW - FINALATIV() -> LRET := EXECBLOCK('DV080DES', .F., .F.,{LRET})
DLGV080.PRW - FINALATIV() -> LRETPE := EXECBLOCK("DLGV080END",.F.,.F.)
DLGV080.PRW - FINALATIV() -> LRETPE := EXECBLOCK("DV080EST",.F.,.F.)
DLGXFUN.PRW - DLQTDNORMA() -> IF LCAMADAPE .AND. VALTYPE(NCAMADAPE:=EXECBLOCK('DLCAMADA',.F.,.F.,{CPRODUTO,CLOCAL,CESTRUFIS})) == 'N'
DLGXFUN.PRW - DLQTDNORMA() -> IF LLASTROPE .AND. LCAMADAPE .AND. (VALTYPE(NLASTROPE:=EXECBLOCK('DLLASTRO',.F.,.F.,{CPRODUTO,CLOCAL,CESTRUFIS}))=='N') .AND. (VALTYPE(NCAMADAPE:=EXECBLOCK('DLCAMADA',.F.,.F.,{CPRODUTO,CLOCAL,CESTRUFIS}))=='N')
DLGXFUN.PRW - DLQTDNORMA() -> IF LLASTROPE .AND. VALTYPE(NLASTROPE:=EXECBLOCK('DLLASTRO',.F.,.F.,{CPRODUTO,CLOCAL,CESTRUFIS})) == 'N'
DLGXFUN.PRW - DLQTDNORMA() -> IF VALTYPE(NQTDUNITPE:=EXECBLOCK('DLQTDUNI',.F.,.F.,{CPRODUTO,CLOCAL,CESTRUFIS,NQTDUNIT,LNUNIT}))=='N'
DLGXFUN.PRW - DLXEXECATI() -> EXECBLOCK('DLGEXETA',.F.,.F.,{CPRODUTO,CLOCORIG,NQUANT,CENDORIG,CNUMSERIE,CDOC,CSERIE,CCLIFOR,CLOJA,CTIPONF,CORIGLAN,DDATA,CLOTECTL,CNUMLOTE,CNUMSEQ,CTM,CITEM,CESTORIG,CSERVICO,CTAREFA,CESTDEST,CENDDEST,CHORA,CCARGA,CUNITIZ,CORDTAR})
DLGXFUN.PRW - DLXEXECATI() -> LGRAVASDB := EXECBLOCK('DLGGATV',.F.,.F.,{CPRODUTO,CLOCORIG,NQUANT,CENDORIG,CNUMSERIE,CDOC,CSERIE,CCLIFOR,CLOJA,CTIPONF,CORIGLAN,DDATA,CLOTECTL,CNUMLOTE,CNUMSEQ,CTM,CITEM,CESTORIG,CSERVICO,CTAREFA,CATIVIDADE,CESTDEST,CENDDEST,CHORA,CCARGA,CUNITIZ,CORDTAR,CORDATI,CRHUMANO,CRFISICO})
DLGXFUN.PRW - WMS250SEA() -> ARETPE := EXECBLOCK('A250WMSO', NIL, NIL, {CCODPROD, COP})
DMSSAL.INI - -> TIPONF C 002 0 IIF(EXISTBLOCK("DMSSAL01"), EXECBLOCK("DMSSAL01"), "01")
DRO001.PRW - CONSDTTP() -> ARET:= EXECBLOCK( "DROXMLQ1", .F., .F.,{} )
DRO003.PRW - GERARINV() -> EXECBLOCK("DROXMLCABE", .F., .F., {::CCNPJ, ::CCPF, ::FORMATADT(::DDTINICIO), ::FORMATADT(::DDTFIM)})
DROAXCADASTRO.PRW - DROVSNGPC(LF12, LT() -> ADROPELK9 := EXECBLOCK( "DROPELK9", .F., .F., {ACAMPOSAUX} )
DROVLDFUNCS.PRW - DROAUXANVISA( LTELA, () -> ADROPELK9 := EXECBLOCK("DROPELK9",.F.,.F.,{{}})
DROVLDFUNCS.PRW - DRORESTANVISA()() -> ADROPELK9 := EXECBLOCK("DROPELK9",.F.,.F.,{{}})
EASYPOUI.PRW - ACTIVATE() -> EXECBLOCK("EASYPOUI",.F.,.F.,{"ACTIVATE",SELF})
EASYTEC.PRW - EASYTEC() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"TELA_INICIAL"),)
EASYTEC.PRW - EASYVALMAQ() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"DEP_VALIDACAO_MAQUINA"),)
EASYTEC.PRW - EASYVALMAQ() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"VALIDACAO_MAQUINA"),)
EASYTEC.PRW - EASYVNCM() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"VALIDA_NCM_INIFIM"),)
EASYTEC.PRW - EICATUALIQ() -> EXECBLOCK("EASYTEC",.F.,.F.,"INTERF_CARREGA_ALIQUOTA")
EASYTEC.PRW - EICATUALIQ() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"ANTES_GRAVAR"),)
EASYTEC.PRW - EICATUALIQ() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"ANTES_GRAVAR_INFO"),)
EASYTEC.PRW - EICATUALIQ() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"ANTES_GRAVAR_MASTER"),)
EASYTEC.PRW - EICATUALIQ() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"ATUALIQ_ANTES_WHILE"),)
EASYTEC.PRW - EICATUALIQ() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"DEPOIS_GRAVAR"),)
EASYTEC.PRW - EICATUALIQ() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"DEPOIS_GRAVAR_INFO"),)
EASYTEC.PRW - EICATUALIQ() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"DEPOIS_GRAVAR_MASTER"),)
EASYTEC.PRW - EICATUALIQ() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"LOOP_ATU_MASTESAF"),)
EASYTEC.PRW - EICATUALIQ() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"LOOP_ATU_SYD1"),)
EASYTEC.PRW - EICATUALIQ() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"LOOP_ATU_SYD2"),)
EASYTEC.PRW - EICATUALIQ() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"LOOP_ATU_TEMP1"),)
EASYTEC.PRW - EICATUALIQ() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"LOOP_DEP_LEIT_TXT"),)
EASYTEC.PRW - EICATUALIQ() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"LOOP_DEP_WAITRUN1"),)
EASYTEC.PRW - EICATUALIQ() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"LOOP_DEP_WAITRUN2"),)
EASYTEC.PRW - EICGRAVANCM() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"ANTES_LER_NCM"),)
EASYTEC.PRW - EICGRAVANCM() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"DEPOIS_LER_NCM"),)
EASYTEC.PRW - EICGRAVANCM() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"FIN_RECUP_NCM"),)
EASYTEC.PRW - EICLERNCM() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"ANTES_LOOP_LEITURA"),)
EASYTEC.PRW - EICLERNCM() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"FIN_LOOP_LEITURA_NCM"),)
EASYTEC.PRW - EICLERNCM() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"LOOP_LEITURA_NCM"),)
EASYTEC.PRW - EICWEBGETDESC() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"DENTRO_TELA_ERRO"),)
EASYTEC.PRW - EICWEBGETDESC() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"FIM_TELA_ERRO"),)
EASYTEC.PRW - EICWEBGETDESC() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"INI_TELA_ERRO"),)
EASYTEC.PRW - EXPREADLOG() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"FIM_LER_ARQUIVO_LOG"),)
EASYTEC.PRW - EXPREADLOG() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"LER_ARQUIVO_LOG"),)
EASYTEC.PRW - EXPREADNCM() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"ANTES_LEIT_NCM"),)
EASYTEC.PRW - EXPREADNCM() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"FIN_LEIT_NCM"),)
EASYTEC.PRW - EXPREADNCM() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"LOOP_LE_NCM_ANT"),)
EASYTEC.PRW - EXPREADNCM() -> IF(EASYENTRYPOINT("EASYTEC"),EXECBLOCK("EASYTEC",.F.,.F.,"LOOP_LE_TXT"),)
ECOAP400.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("CAP402MNU",.F.,.F.)
ECOCAD00.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("CA003MNU",.F.,.F.)
ECOCR20A_RDM.PRW - CR200DES() -> EXECBLOCK("ECOCR20C",.F.,.F.)
ECOCR20A_RDM.PRW - ECOCR20A()() -> EXECBLOCK("ECOCR20B",.F.,.F.,2)})
ECOCR20A_RDM.PRW - ECOCR20A()() -> EXECBLOCK("ECOCR20B",.F.,.F.,3)})
ECOCR20A_RDM.PRW - ECOCR20A()() -> EXECBLOCK("ECOCR20B",.F.,.F.,4)})
ECOCR20A_RDM.PRW - ECOCR20A()() -> EXECBLOCK("ECOCR20B",.F.,.F.,5)})
ECOCR20A_RDM.PRW - ECOCR20A()() -> EXECBLOCK("ECOCR20B",.F.,.F.,7)})
ECOCR20A_RDM.PRW - ECOCR20A()() -> IF ! EXECBLOCK("ECOCR20B",.F.,.F.,8)
ECOCR20C_RDM.PRW - ECOCR20C()() -> EXECBLOCK("ECOCR20B",.F.,.F.,2)})
ECOCR20C_RDM.PRW - ECOCR20C()() -> EXECBLOCK("ECOCR20B",.F.,.F.,3)})
ECOCR20C_RDM.PRW - ECOCR20C()() -> EXECBLOCK("ECOCR20B",.F.,.F.,4)})
ECOCR20C_RDM.PRW - ECOCR20C()() -> EXECBLOCK("ECOCR20B",.F.,.F.,5)})
ECOCR20C_RDM.PRW - ECOCR20C()() -> EXECBLOCK("ECOCR20B",.F.,.F.,7)})
ECODI210.PRW - GRAVAECE() -> EXECBLOCK("ECODI210",.F.,.F.,"DEPOISGRAVAECE")
ECOES400.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("CES402MNU",.F.,.F.)
ECOIN100.PRW - ECOIN100() -> IF ! EXECBLOCK("ECOCR20A")
ECOPF300.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("CPF300MNU",.F.,.F.)
ECOPF300.PRW - PF300CAN() -> IF(EASYENTRYPOINT("ECOPF300"),EXECBLOCK("ECOPF300",.F.,.F.,"CANCELA_INICIO"),)
ECOPF300.PRW - PF300CONTAREG() -> IF(EASYENTRYPOINT("ECOPF300"),EXECBLOCK("ECOPF300",.F.,.F.,"GERAQUERY"),)
ECOPF999.PRW - PEXP999_PRVRAT() -> IF(EASYENTRYPOINT("ECOPF999"),EXECBLOCK("ECOPF999",.F.,.F.,"APOS_EC6"),)
ECOPF999.PRW - PE_SENDPRN() -> IF EXECBLOCK("ECOPF999",.F.,.F.,"IMP_NOME")
ECOPF999.PRW - PF999_GRVPRV() -> IF(EASYENTRYPOINT("ECOPF999"),EXECBLOCK("ECOPF999",.F.,.F.,"DESFORMATA_CONTA"),)
ECOPF999.PRW - PF999_GRVPRV() -> IF(EASYENTRYPOINT("ECOPF999"),EXECBLOCK("ECOPF999",.F.,.F.,"GRAVAR"),)
ECOPF999.PRW - PF999_GRVPRV() -> IF(EASYENTRYPOINT("ECOPF999"),EXECBLOCK("ECOPF999",.F.,.F.,"GRAVA_APOS_ECA"),)
ECOPF999.PRW - PF999_GRVPRV() -> IF(EASYENTRYPOINT("ECOPF999"),EXECBLOCK("ECOPF999",.F.,.F.,"GRAVA_ECA"),)
ECOPF999.PRW - PF999_GRVPRV() -> IF(EASYENTRYPOINT("ECOPF999"),EXECBLOCK("ECOPF999",.F.,.F.,"GRAVA_ECA_APOS_REPLACE"),)
ECOPF999.PRW - PF999_GRVPRV() -> IF(EASYENTRYPOINT("ECOPF999"),EXECBLOCK("ECOPF999",.F.,.F.,"POS_EEQ"),)
ECOPF999.PRW - PF999_GRVPRV() -> IF(EASYENTRYPOINT("ECOPF999"),EXECBLOCK("ECOPF999",.F.,.F.,"SEM_ALLTRIM"),)
ECOPF999.PRW - PF_SENDPRN() -> EXECBLOCK("ECOPF999",.F.,.F.,"TAMANHO_CONTA")
ECOPF999.PRW - PREXP999PROC() -> EXECBLOCK("ECOPF999",.F.,.F.,"ANTES_EVENTO_101")
ECOPF999.PRW - PREXP999PROC() -> IF(EASYENTRYPOINT("ECOPF999"),EXECBLOCK("ECOPF999",.F.,.F.,"VC_FRETE"),)
ECOPF999.PRW - PREXP999PROC() -> IF(EASYENTRYPOINT("ECOPF999"),EXECBLOCK("ECOPF999",.F.,.F.,"VC_SEGURO"),)
ECOPF999.PRW - PREXP999PROC() -> LRETPE := EXECBLOCK("ECOPF999",.F.,.F.,"READEEQ")
ECOPF999.PRW - PREXP999PROC() -> LRETPE := EXECBLOCK("ECOPF999",.F.,.F.,"READPAG")
ECOPF999.PRW - PREXP999TXT() -> EXECBLOCK("ECO_CTBFE")
ECOPF999.PRW - PRFIN999FUNC() -> EXECBLOCK("ECOPF999",.F.,.F.,"IMPRIME")
ECOPF999.PRW - PRFIN999FUNC() -> IF(EASYENTRYPOINT("ECOPF999"),EXECBLOCK("ECOPF999",.F.,.F.,"FIM_DOS_CALCULOS"),)
ECOPF999.PRW - PRFIN999FUNC() -> IF(EASYENTRYPOINT("ECOPF999"),EXECBLOCK("ECOPF999",.F.,.F.,"PLANPRE"),)
ECOPF999.PRW - READ_NF() -> IF(EASYENTRYPOINT("ECOPF999"),EXECBLOCK("ECOPF999",.F.,.F.,"FIM_APURACAO_ITENS_NF"),)
ECOPF999.PRW - READ_NF() -> IF(EASYENTRYPOINT("ECOPF999"),EXECBLOCK("ECOPF999",.F.,.F.,"GRV_OUTRAS_DESP"),)
ECOPF999.PRW - READ_NF() -> IF(EASYENTRYPOINT("ECOPF999"),EXECBLOCK("ECOPF999",.F.,.F.,"INICIO_GRV_OUTRAS_DESP"),)
ECOPF999.PRW - READ_NF() -> IF(EASYENTRYPOINT("ECOPF999"),EXECBLOCK("ECOPF999",.F.,.F.,"LEITURA_EEM_CC"),)
ECOPF999.PRW - READ_NF() -> IF(EASYENTRYPOINT("ECOPF999"),EXECBLOCK("ECOPF999",.F.,.F.,"OUT_DESP"),)
ECOPF999.PRW - READ_NF() -> IF(EASYENTRYPOINT("ECOPF999"),EXECBLOCK("ECOPF999",.F.,.F.,"PRE_CALC"),)
ECOPF999.PRW - READ_NF() -> LRETPE := EXECBLOCK("ECOPF999",.F.,.F.,"READNF")
ECOPR300.PRW - PR300CAN() -> IF !EXECBLOCK("ECOPPR01")
ECOPR300.PRW - PR300CAN_VCF() -> EXECBLOCK("ECOPPR02")
ECOPR999.PRW - ECOPR999() -> EXECBLOCK("ECOPR999",.F.,.F.,"RELATORIO")
ECOPR999.PRW - ER_PR999IMP() -> EXECBLOCK("ECOPR999",.F.,.F.,"ENVIA_EMAIL")
ECOPR999.PRW - GERAADIANT() -> EXECBLOCK("ECOPR999",.F.,.F.,"TX_ADIANTAMENTO")
ECOPR999.PRW - GERAADIANT() -> EXECBLOCK("ECOPR999",.F.,.F.,"TX_EMB")
ECOPR999.PRW - PR200_GRVPRV() -> EXECBLOCK("ECOPR999",.F.,.F.,"GRV_CONTA")
ECOPR999.PRW - PR999PROC() -> EXECBLOCK("ECOPR999",.F.,.F.,"EVENTO_101_1")
ECOPR999.PRW - PR999PROC() -> EXECBLOCK("ECOPR999",.F.,.F.,"EVENTO_101_2")
ECOPR999.PRW - PR999PROC() -> EXECBLOCK("ECOPR999",.F.,.F.,"LTEM_DI")
ECOPR999.PRW - PR999PROC() -> EXECBLOCK("ECOPR999",.F.,.F.,"VALOR_P_CALCULO_VC")
ECOPR999.PRW - PR999TXT() -> EXECBLOCK("ECO_CTB")
ECOPR999.PRW - PR999TXT() -> IF ! EXECBLOCK("ECORDPR1",.F.,.F.,"1")
ECOVC155.PRW - ECOVC155() -> EXECBLOCK("ECOSLFOR1",.F.,.F.,"FECHA_ARQUIVOS")
ECOVC155.PRW - VC155GRWORK() -> EXECBLOCK("ECOSLFOR1",.F.,.F.,"GERAARQ")
ECOVC155.PRW - VC155GRWORK() -> EXECBLOCK("ECOSLFOR1",.F.,.F.,"GRAVA_WORK_1")
EDCAC400.PRW - AC400APURACAO() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"TELA_FILTRO_AP_EXP_A"),)
EDCAC400.PRW - AC400ESTORNA() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"ESTORNO_ATO"),)
EDCAC400.PRW - AC400GRVADIT() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"UNIDADE_MEDIDA_IMPRESSAO"),)
EDCAC400.PRW - AC400GRVTUDO() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"GRAVACAO_ATO"),)
EDCAC400.PRW - AC400GRV_ANEXO() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"UNIDADE_MEDIDA_IMPRESSAO"),)
EDCAC400.PRW - AC400MANUT() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"MBROWSE_BOTOES"),)
EDCAC400.PRW - AC400NCMEXP() -> EXECBLOCK("EDCAC400",.F.,.F.,"ALTERA_NCM_SLD_EXP")
EDCAC400.PRW - AC400NCMIMP() -> EXECBLOCK("EDCAC400",.F.,.F.,"ALTERA_SLD_NCM_IMP")
EDCAC400.PRW - AC400PIMANUT() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"COMPARACAO"),)
EDCAC400.PRW - AC400PIMANUT() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"CPOS_IMP_ISEN"),)
EDCAC400.PRW - AC400SELDI() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"APURA_ITEM"),)
EDCAC400.PRW - AC400SELDI() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"GRV_WORKDI"),)
EDCAC400.PRW - AC400VALID() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"VALID"),)
EDCAC400.PRW - AC400WORKS() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"ASEMSX3"),)
EDCAC400.PRW - EE9_SW8ATUALIZA() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"ALTERA_VALOR"),)
EDCAC400.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("DAC400MNU",.F.,.F.)
EDCAC400.PRW - SELECTRE() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"GRV_WORKRE"),)
EDCAC400.PRW - SELECTRE() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"QUERY_APURA_RE"),)
EDCAC400.PRW - VALIDACGC() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"VALIDA"),)
EDCAC400.PRW - WORKED3ATU() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"WORKED3ATU"),)
EDCAC400.PRW - WORKED4ATU() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"NQTD1"),)
EDCAC400.PRW - WORKED4ATU() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"NQTD2"),)
EDCAC400.PRW - WORKED4ATU() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"NQTD3"),)
EDCAC400.PRW - WORKED4ATU() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"NQTD4"),)
EDCAC400.PRW - WORKED4ATU() -> IF(EASYENTRYPOINT("EDCAC400"),EXECBLOCK("EDCAC400",.F.,.F.,"NSALDOS"),)
EDCAN400.PRW - INICPOS() -> IF(EASYENTRYPOINT("EDCAN400"),EXECBLOCK("EDCAN400",.F.,.F.,"ASELCPOS"),)
EDCAN400.PRW - INICPOS() -> IF(EASYENTRYPOINT("EDCAN400"),EXECBLOCK("EDCAN400",.F.,.F.,"ASEMSX3"),)
EDCAN400.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("DAN400MNU",.F.,.F.)
EDCCE400.PRW - CE400VALID() -> IF(EASYENTRYPOINT("EDCCE400"),EXECBLOCK("EDCCE400",.F.,.F.,"VALID"),)
EDCCE400.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("DCE400MNU",.F.,.F.)
EDCCO150.PRW - CO150GRV_E() -> IF(EASYENTRYPOINT("EDCCO150"),EXECBLOCK("EDCCO150",.F.,.F.,"ALTERA_FORN_EXP"),)
EDCCO150.PRW - CO150REL() -> IF(EASYENTRYPOINT("EDCCO150"),EXECBLOCK("EDCCO150",.F.,.F.,"ABRE_ARQ"),)
EDCCO150.PRW - CO150REL() -> IF(EASYENTRYPOINT("EDCCO150"),EXECBLOCK("EDCCO150",.F.,.F.,"LER_INTERFACE?"),)
EDCCO150.PRW - CONTAREGS() -> EXECBLOCK("EDCCO150",.F.,.F.,"CONTA_REGS")
EDCCO150.PRW - GERAQUERY() -> EXECBLOCK("EDCCO150",.F.,.F.,"QUERY")
EDCCO150.PRW - GRVWORKAC() -> IF(EASYENTRYPOINT("EDCCO150"),EXECBLOCK("EDCCO150",.F.,.F.,"GRV_WORK_EXP"),)
EDCDR150.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("DCA150MNU",.F.,.F.)
EDCDR150.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("DDF150MNU",.F.,.F.)
EDCES400.PRW - AVA200CODIGO() -> LRET:=EXECBLOCK("MT200PAI",.F.,.F.,CCODIGO)
EDCES400.PRW - AVA200TUDOOK() -> LRET := IF(VALTYPE(LRETPE:=EXECBLOCK('MTA200',.F.,.F.,COPC))=='L',LRETPE,.T.)
EDCES400.PRW - AVBTN200OK() -> LRET := IF(VALTYPE(LRET:=EXECBLOCK('A200BOK',.F.,.F.,{AUNDO, C200COD}))=='L',LRET,.T.)
EDCES400.PRW - AVMA200FECHA() -> EXECBLOCK('ES400GRVE',.F.,.F.,{NOPCX})
EDCGA150.PRW - GA150CRIAWORK() -> IF(EASYENTRYPOINT("EDCGA150"),EXECBLOCK("EDCGA150",.F.,.F.,"WORK"),)
EDCGA150.PRW - GA150IMPRIME() -> IF(EASYENTRYPOINT("EDCGA150"),EXECBLOCK("EDCGA150",.F.,.F.,"FECHA_VIEW"),)
EDCGA150.PRW - GA150IMPRIME() -> IF(EASYENTRYPOINT("EDCGA150"),EXECBLOCK("EDCGA150",.F.,.F.,"GRV_MURO"),)
EDCIG400.PRW - IG400VALID() -> EXECBLOCK("EDCIG400",.F.,.F.,"INI_IG400VALID")
EDCIG400.PRW - IG400VALID() -> EXECBLOCK("EDCIG400",.F.,.F.,"VALIDA_ESTRU")
EDCIN100.PRW - EDCIN100PARAM() -> EXECBLOCK("IN100CLI",.F.,.F.,"PARAMGETEDC")
EDCIN100.PRW - EDCIN100PARAM() -> EXECBLOCK("IN100CLI",.F.,.F.,"PARAMGRAVAEDC")
EDCIN100.PRW - IN100COMPEXT() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLCE")
EDCIN100.PRW - IN100ESTPROD() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLEP")
EDCIN100.PRW - IN100GRVCE() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVCE")
EDCIN100.PRW - IN100GRVEP() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVEP")
EDCIN100.PRW - IN100GRVNR() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVNR")
EDCIN100.PRW - IN100LERCE() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERCE")
EDCIN100.PRW - IN100LERCE() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALCE")
EDCIN100.PRW - IN100LEREP() -> EXECBLOCK("IN100CLI",.F.,.F.,"LEREP")
EDCIN100.PRW - IN100LEREP() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALEP")
EDCIN100.PRW - IN100LERNR() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERNR")
EDCIN100.PRW - IN100LERNR() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALNR")
EDCIN100.PRW - IN100RE_EXTERNOS() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLNR")
EDCOR100.PRW - OR100GERATXT() -> EXECBLOCK("EDCOR100",.F.,.F.,{"DESCRICAO_PRODUTO_IMP"})
EDCPA150.PRW - ANEADITIMP() -> IF(EASYENTRYPOINT("EDCPA150"),EXECBLOCK("EDCPA150",.F.,.F.,"GRV_TOT_ANEXO"),)
EDCPA150.PRW - ANEADITIMP() -> IF(EASYENTRYPOINT("EDCPA150"),EXECBLOCK("EDCPA150",.F.,.F.,"UNIDADE_MEDIDA"),)
EDCPA150.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("DPA150MNU",.F.,.F.)
EDCPA150.PRW - PA150ANEQTD() -> IF(EASYENTRYPOINT("EDCPA150"),EXECBLOCK("EDCPA150",.F.,.F.,"GRV_DET_ANEXO"),)
EDCPA150.PRW - PA150CABEC() -> IF(EASYENTRYPOINT("EDCPA150"),EXECBLOCK("EDCPA150",.F.,.F.,"IMPRIME_CABEC"),)
EDCPA150.PRW - PA150DETRUD() -> IF(EASYENTRYPOINT("EDCPA150"),EXECBLOCK("EDCPA150",.F.,.F.,"DESCRICAO_RUD"),)
EDCPA150.PRW - PA150DETRUD() -> IF(EASYENTRYPOINT("EDCPA150"),EXECBLOCK("EDCPA150",.F.,.F.,"DETALHE_EXP"),)
EDCPA150.PRW - PA150DETRUD() -> IF(EASYENTRYPOINT("EDCPA150"),EXECBLOCK("EDCPA150",.F.,.F.,"DETALHE_IMP"),)
EDCPA150.PRW - PA150DETRUD() -> IF(EASYENTRYPOINT("EDCPA150"),EXECBLOCK("EDCPA150",.F.,.F.,"GRV_TOT_ANEXO"),)
EDCPA150.PRW - PA150DETRUD() -> IF(EASYENTRYPOINT("EDCPA150"),EXECBLOCK("EDCPA150",.F.,.F.,"MOEDARUDE"),)
EDCPA150.PRW - PA150DETRUD() -> IF(EASYENTRYPOINT("EDCPA150"),EXECBLOCK("EDCPA150",.F.,.F.,"MOEDARUDI"),)
EDCPA150.PRW - PA150DETRUD() -> IF(EASYENTRYPOINT("EDCPA150"),EXECBLOCK("EDCPA150",.F.,.F.,"UNIDADE_MEDIDA"),)
EDCPA150.PRW - PA150FIM() -> IF(EASYENTRYPOINT("EDCPA150"),EXECBLOCK("EDCPA150",.F.,.F.,"GRV_TOT_ANEXO"),)
EDCPA150.PRW - PA150GRVANEXO() -> IF(EASYENTRYPOINT("EDCPA150"),EXECBLOCK("EDCPA150",.F.,.F.,"GRV_TOT_ANEXO"),)
EDCPA150.PRW - PA150GRVANEXO() -> IF(EASYENTRYPOINT("EDCPA150"),EXECBLOCK("EDCPA150",.F.,.F.,"UNIDADE_MEDIDA"),)
EDCPA150.PRW - PA150IMPCNPJ() -> IF(EASYENTRYPOINT("EDCPA150"),EXECBLOCK("EDCPA150",.F.,.F.,"WK_MESA2"),)
EDCPA150.PRW - PAIMPRESSAO() -> IF(EASYENTRYPOINT("EDCPA150"),EXECBLOCK("EDCPA150",.F.,.F.,"ANTES_PREVIEW"),)
EDCPA150.PRW - TOTPARC() -> IF(EASYENTRYPOINT("EDCPA150"),EXECBLOCK("EDCPA150",.F.,.F.,"GRV_TOTPARC"),)
EDCPF150.PRW - GERAQUERY() -> EXECBLOCK("EDCPF150",.F.,.F.,"GRV_NOTA")
EDCPF150.PRW - PF150GERAWORK() -> EXECBLOCK("EDCPF150",.F.,.F.,"GRV_NOTA")
EDCSA150.PRW - IMPRIME() -> IF(EASYENTRYPOINT("EDCSA150"),EXECBLOCK("EDCSA150",.F.,.F.,"INCLUIR_CAMPOS_EE9"),)
EECAA100.PRW - AA101DOCS() -> EEA->EEA_RDMAKE := 'EXECBLOCK("EECPEM55",.F.,.F.)'
EECAA100.PRW - CALLFUNCTION() -> XRET := EXECBLOCK(CFUNCAO, LOPC1, LOPC2, APARAMS)
EECAA100.PRW - EECRETCAB() -> EXECBLOCK("EECAA100",.F.,.F.,{"EECRETCAB",CCAMPO})
EECAA100.PRW - GETVARSTOEMAIL() -> EXECBLOCK("AVCRW",.F.,.F.,{"AVEMAIL_CFROM"})
EECAA100.PRW - GETVARSTOEMAIL() -> IF EXECBLOCK("AVCRW",.F.,.F.,{"EMAIL",APARAM})
EECAC100.PRW - AC100ADIAN() -> EXECBLOCK("EECAC100",.F.,.F.,"ANTES_GRAVA")
EECAC100.PRW - AC100ADIAN() -> EXECBLOCK("EECAC100",.F.,.F.,"ANTES_TELA_ADIAN")
EECAC100.PRW - AC100ADIAN() -> EXECBLOCK("EECAC100",.F.,.F.,"INCLUI_BROWSE")
EECAC100.PRW - AC100ADIAN() -> IF (EASYENTRYPOINT("EECAC100"),EXECBLOCK("EECAC100",.F.,.F.,"LEGENDA"),)
EECAC100.PRW - AC100ADIMAN() -> EXECBLOCK("EECAC100",.F.,.F.,"ANTES_TELA_MANUT_PARC")
EECAC100.PRW - AC100ADIMAN() -> EXECBLOCK("EECAC100",.F.,.F.,"VALID_MAN")
EECAC100.PRW - AC100ADIMAN() -> IF VALTYPE((LRET := EXECBLOCK("AC100ADIAN",.F.,.F.,{"VALID_MAN",NTIPO}))) <> "L"
EECAC100.PRW - AC100CLPR() -> IF(EASYENTRYPOINT("EECAC100"),EXECBLOCK("EECAC100",.F.,.F.,"ATUALIZA_BOTOES"),)
EECAC100.PRW - AC100CRIT() -> EXECBLOCK("EECAC100",.F.,.F.,{"AC100CRIT_CLIENTES", CCPO})
EECAC100.PRW - AC100GRAVA() -> EXECBLOCK("EECAC100",.F.,.F.,"POS_GRAVA")
EECAC100.PRW - AC100IAEV() -> EXECBLOCK("EECAC100",.F.,.F.,{"GRAVA_EXH",CP_MODO})
EECAC100.PRW - AC100MAN() -> EXECBLOCK("EECAC100",.F.,.F.,"POSCARGA_CAMPOS_CAPA")
EECAC100.PRW - AC100MAN() -> EXECBLOCK("EECAC100",.F.,.F.,{"ANTES_DO_MSGET",NOPC})
EECAC100.PRW - AC100MAN() -> IF (EASYENTRYPOINT("EECAC100"),EXECBLOCK("EECAC100",.F.,.F.,"ANTES_SALVAR"),)
EECAC100.PRW - AC100MANE() -> EXECBLOCK("EECAC100",.F.,.F.,"AC100MANE")
EECAC100.PRW - AC100VALID() -> EXECBLOCK("EECAC100",.F.,.F.,"VALIDA_MANUT_PARC")
EECAC100.PRW - AC100VLDOK() -> EXECBLOCK("EECAC100",.F.,.F.,{"AC100VLDOK_INCALTEXC",LVALIMPCLI})
EECAC100.PRW - GRAVAADIAN() -> EXECBLOCK("EECAC100",.F.,.F.,"ALTERANDO_EEQ")
EECAC100.PRW - GRAVAADIAN() -> EXECBLOCK("EECAC100",.F.,.F.,"ANTES_DELETAR_EEQ")
EECAC100.PRW - GRAVAADIAN() -> EXECBLOCK("EECAC100",.F.,.F.,"GRAVANDO_EEQ")
EECAC100.PRW - GRAVAADIAN() -> EXECBLOCK("EECAC100",.F.,.F.,"INCLUINDO_EEQ")
EECAC100.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EAC100MNU",.F.,.F.)
EECAC110.PRW - AC110GRAVA() -> EXECBLOCK("EECAC110",.F.,.F.,{ "PE_FIM_GRV",NOPC,LGRAVA})
EECAC110.PRW - AC110MAN() -> EXECBLOCK("EECAC110",.F.,.F.,{ "PE_INI_TELA",NOPC,CALIAS})
EECAC110.PRW - AC110MANE() -> EXECBLOCK("EECAC110",.F.,.F.,{ "PE_EXCLUIR",NOPC})
EECAC110.PRW - AC110VLDOK() -> EXECBLOCK("EECAC110",.F.,.F.,{"AC110VLDOK_INCALTEXC",LVALBANCOS})
EECAC115.PRW - AC115GRAVA() -> EXECBLOCK("EECAC115",.F.,.F.,{"GRAVA",NOPC})
EECAC115.PRW - AC115MANE() -> EXECBLOCK("EECAC115",.F.,.F.,{"EXCLUI"})
EECAC115.PRW - AC115VALID() -> EXECBLOCK("EECAC115",.F.,.F.,{"VALIDA_GRAVACAO"})
EECAC120.PRW - AC120EICMP() -> EXECBLOCK("EECAC120",.F.,.F.,"PRODUTO_MODIFICADO_EMAIL")
EECAC120.PRW - AC120GRAVA() -> EXECBLOCK("EECAC120",.F.,.F.,"PRE_GRAVACAO_SB1")
EECAC120.PRW - AC120GRAVA() -> EXECBLOCK("EECAC120",.F.,.F.,"PRODUTO_MODIFICADO_EMAIL")
EECAC120.PRW - AC120GRAVA() -> EXECBLOCK("EECAC120",.F.,.F.,{"PE_GRVFINAL",NOPCROTINA})
EECAC120.PRW - AC120MAN() -> IF ! EXECBLOCK("EECAC120",.F.,.F.,{"ENCHOICE"})
EECAC120.PRW - AC120MANE() -> EXECBLOCK("EECAC120",.F.,.F.,"ANTES_CONFIRMA_EXCLUSAO")
EECAC120.PRW - AC120MANE() -> EXECBLOCK("EECAC120",.F.,.F.,"PE_EXCLUSAO")
EECAC120.PRW - AC120PEVALID() -> IF(EASYENTRYPOINT("EECAC120"),EXECBLOCK("EECAC120",.F.,.F.,{"VALID_GRAVACAO",NOPC}),)
EECAC120.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EAC120MNU",.F.,.F.)
EECAC120.PRW - TABPRECO() -> EXECBLOCK("EECAC120",.F.,.F.,ADETALHES)
EECAC170.PRW - AC170CRIT() -> LRET := EXECBLOCK("EECAC170", .F., .F., CCPO)
EECAC170.PRW - AC170GRAVA() -> IF(EASYENTRYPOINT("EECAC170"),EXECBLOCK("EECAC170",.F.,.F.,"FINAL_GRAVA"),)
EECAC170.PRW - AC170VALID() -> EXECBLOCK("EECAC170",.F.,.F.,{"AC170VALID_NAVIO", NOPC})
EECAC170.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EAC170AMNU",.F.,.F.)
EECAC175.PRW - AC175GRAVA() -> EXECBLOCK("EECAC175",.F.,.F.,{"FIM_GRV",NOPC})
EECAC175.PRW - AC175GRAVA() -> EXECBLOCK("EECAC175",.F.,.F.,{"INI_GRV",NOPC})
EECAC175.PRW - AC175MAN() -> EXECBLOCK("EECAC175",.F.,.F.,{"INI_ALT",NOPC})
EECAC175.PRW - AC175MANE() -> EXECBLOCK("EECAC175",.F.,.F.,"POS_EXCLUSAO")
EECAC175.PRW - AC175MANE() -> EXECBLOCK("EECAC175",.F.,.F.,{"AC175MANE_EXCLUIR", NOPC})
EECAC175.PRW - AC175VLDOK() -> EXECBLOCK("EECAC175",.F.,.F.,{"AC175VLDOK_INCALTEXC",LVALIDCADEMP})
EECAD101.PRW - AD101MAN() -> EXECBLOCK("EECAD101",.F.,.F.,{"GRAVA_MOV"})
EECAD101.PRW - AD101MAN() -> LRETPTO := EXECBLOCK("EECAD101",.F.,.F.,{"ANTES_ENCHOICE"})
EECAD101.PRW - AD101TRF() -> EXECBLOCK("EECAD101",.F.,.F.,{"DEFINE_MOV_DESTINO"})
EECAD101.PRW - AD101TRF() -> EXECBLOCK("EECAD101",.F.,.F.,{"DEFINE_MOV_ORIGEM"})
EECAD101.PRW - AD101TRF() -> EXECBLOCK("EECAD101",.F.,.F.,{"TELA_TRANSF_DEPOIS_DESTINO"})
EECAD101.PRW - AD101TRF() -> EXECBLOCK("EECAD101",.F.,.F.,{"TELA_TRANSF_DEPOIS_ORIGEM"})
EECAD101.PRW - AD101TRF() -> LRETPTO := EXECBLOCK("EECAD101",.F.,.F.,{"ANTES_TELA_TRANSF"})
EECAD101.PRW - AD101VLD() -> LRETPTO := EXECBLOCK("EECAD101",.F.,.F.,{"ANTES_FUNCAO_VALIDACAO"})
EECAD101.PRW - AD101VLD() -> LRETPTO := EXECBLOCK("EECAD101",.F.,.F.,{"DEPOIS_FUNCAO_VALIDACAO"})
EECAD101.PRW - EECAD101() -> EXECBLOCK("EECAD101",.F.,.F.,{"DEPOIS_MBROWSE"})
EECAD101.PRW - GETCAMPOS() -> EXECBLOCK("EECAD101",.F.,.F.,{"DEFINE_CAMPOS_NAO_MOSTRADOS"})
EECAD101.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EAD101MNU",.F.,.F.)
EECAE100.PRW - AE100BLOQIT() -> EXECBLOCK("EECAE100",.F.,.F.,{"BLOQIT_CAMPOS"})
EECAE100.PRW - AE100CAMBIO() -> EXECBLOCK("EECPFN02",.F.,.F.)
EECAE100.PRW - AE100CCGRV() -> IF(EASYENTRYPOINT("EECAE100"),EXECBLOCK("EECAE100",.F.,.F.,"ATUALIZA_OS_RATEIOS"),)
EECAE100.PRW - AE100CCGRV() -> IF(EASYENTRYPOINT("EECAE100"),EXECBLOCK("EECAE100",.F.,.F.,"GRAVA_OS_RATEIOS"),)
EECAE100.PRW - AE100CCGRV() -> IF(EASYENTRYPOINT("EECAE100"),EXECBLOCK("EECAE100",.F.,.F.,"TIPO_DE_RATEIO"),)
EECAE100.PRW - AE100DELEMB() -> EXECBLOCK("EECAE100", .F., .F., "DELEMB_ATUPEDIDO_OFFSHORE")
EECAE100.PRW - AE100DETIP() -> EXECBLOCK("EECAE100", .F., .F., "DETIP_ACTIVATE_DLG")
EECAE100.PRW - AE100DETIP() -> EXECBLOCK("EECAE100", .F., .F., {"APOS_CALC_EMBALAGEM"})
EECAE100.PRW - AE100DETIP() -> LRET := EXECBLOCK("EECAE100",.F.,.F.,{"PE_MARK"})
EECAE100.PRW - AE100DETMAN() -> EXECBLOCK("EECAE100", .F., .F., {"PE_MARK_OK"})
EECAE100.PRW - AE100DETTELA() -> EXECBLOCK("EECAE100", .F., .F.,"DIG_PESOS")
EECAE100.PRW - AE100DETTELA() -> EXECBLOCK("EECAP100",.F.,.F.,{"ROD_ITENS_EMB",APOS})
EECAE100.PRW - AE100ESTCON() -> IF(EASYENTRYPOINT("EECAE100"),EXECBLOCK("EECAE100",.F.,.F.,"ANTES_ESTORNOS_CONTABEIS"),)
EECAE100.PRW - AE100GEREMB() -> EXECBLOCK("EECAE100",.F.,.F.,{"PE_OFFSHORE_DEPOIS_EE7"})
EECAE100.PRW - AE100GEREMB() -> EXECBLOCK("EECAE100",.F.,.F.,{"PE_OFFSHORE_GERA_CAPA"})
EECAE100.PRW - AE100GRAVA() -> EXECBLOCK("EECAE100", .F., .F., {"PE_GRV_EE9"})
EECAE100.PRW - AE100GRAVA() -> EXECBLOCK("EECAE100",.F.,.F.,"AE100GRAVA_SLD_ED3")
EECAE100.PRW - AE100GRAVA() -> EXECBLOCK("EECAE100",.F.,.F.,"PE_GRAVA")
EECAE100.PRW - AE100GRAVA() -> EXECBLOCK("EECAE100",.F.,.F.,{"ANTES_PARCELA",EEC->EEC_PREEMB})
EECAE100.PRW - AE100GRAVA() -> EXECBLOCK("EECAE100",.F.,.F.,{"GRV_EMBARQUE_INI"})
EECAE100.PRW - AE100GRAVA() -> EXECBLOCK("EECPEM00",.F.,.F.)
EECAE100.PRW - AE100GRAVA() -> IF( EASYENTRYPOINT("EECAE100") , EXECBLOCK("EECAE100",.F.,.F.,{"GRV_CPOS_CUSTOM"}) , )
EECAE100.PRW - AE100GRVEEM() -> EXECBLOCK("EECAE100",.F.,.F.,{"ALT_TAXA"})
EECAE100.PRW - AE100LINOK() -> EXECBLOCK("EECAE100",.F.,.F.,{"EMB_LINOK"})
EECAE100.PRW - AE100LINOK() -> IF(EASYENTRYPOINT("EECAE100"),EXECBLOCK("EECAE100",.F.,.F.,{"EMB_RECRIAPED"}), )
EECAE100.PRW - AE100LINOK() -> LRET := EXECBLOCK("EECPEM36",.F.,.F.)
EECAE100.PRW - AE100MANE() -> EXECBLOCK("EECAE100",.F.,.F., {"AE100MANE_POS_TELA"})
EECAE100.PRW - AE100MANE() -> EXECBLOCK("EECAE100",.F.,.F.,{"DEL_MULTI_OFFSHORE"})
EECAE100.PRW - AE100MANE() -> EXECBLOCK("EECPAE01",.F.,.F.,"EXCLUINDO TUDO")
EECAE100.PRW - AE100MANE() -> EXECBLOCK("EECPAE01",.F.,.F.,{"VAL_EXCLUIR"})
EECAE100.PRW - AE100MANE() -> LRETPE := EXECBLOCK("EECAE100",.F.,.F.,{"PE_EXC",EEC->EEC_PREEMB})
EECAE100.PRW - AE100MARKIT() -> EXECBLOCK("EECAE100", .F., .F.,"ALTMARCA")
EECAE100.PRW - AE100SLPE() -> CBLOCK := EXECBLOCK("AE100SLPE",.F.,.F.)
EECAE100.PRW - AE100STATUS() -> EXECBLOCK("EECAE100", .F., .F.,{"STATUS"})
EECAE100.PRW - AE100TTELA() -> EXECBLOCK("EECAP100",.F.,.F.,{"ROD_CAPA_EMB",APOS})
EECAE100.PRW - AE100TTELA() -> IF(EASYENTRYPOINT("EECAE100"),EXECBLOCK("EECAE100",.F.,.F.,"ANTES_REFRESH_RODAPE"),)
EECAE100.PRW - AE100VALDET() -> EXECBLOCK("EECAE100",.F.,.F.,{"VALIDA_ITEM"})
EECAE100.PRW - AE100VALDET() -> EXECBLOCK("EECPEM48",.F.,.F.)
EECAE100.PRW - AE100VLDSEL() -> URET := EXECBLOCK("EECAE100",.F.,.F.,{"VLDSEL_PRCFIX",LRET})
EECAE100.PRW - AE100W() -> URET := EXECBLOCK("EECAE100",.F.,.F.,{"AE100WHEN",CCAMPOWHEN,CWHENRE,LRET})
EECAE100.PRW - AEPEDCRIT() -> LRETPE := EXECBLOCK("EECAE100",.F.,.F.,{"PE_VLDSELPED",CPEDIDO})
EECAE100.PRW - EECAE100() -> IF ! EXECBLOCK("EECPEM42",.F.,.F.,"EMBARQUE")
EECAE100.PRW - EECAE100() -> IF( EASYENTRYPOINT("EECAE100") , EXECBLOCK("EECAE100",.F.,.F.,{"FINAL"}) , )
EECAE100.PRW - IS NOT SUPPORTED IN DBF'() -> EXECBLOCK("EECAE100",.F.,.F., "MSG_ADIANT_NAO_UTILIZADO")
EECAE100.PRW - IS NOT SUPPORTED IN DBF'() -> EXECBLOCK("EECAE100",.F.,.F.,{"ANTES_TELA_PRINCIPAL",NOPC})
EECAE100.PRW - IS NOT SUPPORTED IN DBF'() -> EXECBLOCK("EECAE100",.F.,.F.,{"BUTTON_REMESSA"})
EECAE100.PRW - IS NOT SUPPORTED IN DBF'() -> EXECBLOCK("EECAE100",.F.,.F.,{"FECHAMENTO_EMBARQUE"})
EECAE100.PRW - IS NOT SUPPORTED IN DBF'() -> EXECBLOCK("EECPEM36",.F.,.F.,{"FECHA_TELA_PRINCIPAL"})
EECAE100.PRW - IS NOT SUPPORTED IN DBF'() -> EXECBLOCK("EECPEM41",.F.,.F.,{"FINAL",NOPCA})
EECAE100.PRW - IS NOT SUPPORTED IN DBF'() -> LRETPTO := EXECBLOCK("EECAE100",.F.,.F.,{"EXIBEMSG"})
EECAE100.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EAE100MNU",.F.,.F.)
EECAE100.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EAE100VCMNU",.F.,.F.)
EECAE100.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EAE100VMNU",.F.,.F.)
EECAE100.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EB2BCEMNU",.F.,.F.)
EECAE100.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EB2BEMNU",.F.,.F.)
EECAE100.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EB2BRCEMNU",.F.,.F.)
EECAE101.PRW - AE100APURACAO() -> CNEWCNPJ := EXECBLOCK("EECAE101",.F.,.F.,"TROCA_CNPJ")
EECAE101.PRW - AE100APURACAO() -> EXECBLOCK("EECAE101",.F.,.F.,"AE100APURACAO_APROPRIA")
EECAE101.PRW - AE100APURACAO() -> EXECBLOCK("EECAE101",.F.,.F.,"AE100APURACAO_EXIBEMSG")
EECAE101.PRW - AE100APURACAO() -> EXECBLOCK("EECAE101",.F.,.F.,"AE100APURACAO_OPCAPROPRIACAO")
EECAE101.PRW - AE101GRAVA() -> EXECBLOCK("EECAE101",.F.,.F.,"ANTES_GRAVA_NF")
EECAE101.PRW - AE101GRAVA() -> EXECBLOCK("EECAE101",.F.,.F.,{"PE_ANTES_GRV"})
EECAE101.PRW - AE101MAN() -> EXECBLOCK("EECPEM40",.F.,.F.,{NTIPO,NOPCA})
EECAE101.PRW - AE101MAN() -> LRETPE := EXECBLOCK("EECAE101",.F.,.F.,{"PE_TIPO",NTIPO})
EECAE101.PRW - AE101VALATO() -> CNEWCNPJ := EXECBLOCK("EECAE101",.F.,.F.,"TROCA_CNPJ")
EECAE101.PRW - AE101VALNF() -> IF VALTYPE((LRETPTO := EXECBLOCK("EECAE101",.F.,.F.,"VALIDA_NF"))) = "L" .AND. !LRETPTO
EECAE101.PRW - AEANTVAL() -> EXECBLOCK("EECAE101",.F.,.F.,"VALIDA_DESMARCA")
EECAE101.PRW - AEGRVWKANT() -> EXECBLOCK("EECAE101",.F.,.F.,"ALTERA_QTDE_CALCULADA_ED2")
EECAE101.PRW - AEGRVWKANT() -> EXECBLOCK("EECAE101",.F.,.F.,"ALT_SX3ANT")
EECAE101.PRW - AEGRVWKANT() -> EXECBLOCK("EECAE101",.F.,.F.,"LOOP_ED2")
EECAE101.PRW - AEGRVWKANT() -> EXECBLOCK("EECAE101",.F.,.F.,{"GRVWKANT_PROD",CPROD})
EECAE101.PRW - AEGRVWKANT() -> IF(EASYENTRYPOINT("EECAE101"),EXECBLOCK("EECAE101",.F.,.F.,"EXIBE_MENSAGEM"),)
EECAE101.PRW - EXIBEAPROPRIACAO() -> IF(EASYENTRYPOINT("EECAE101"),EXECBLOCK("EECAE101",.F.,.F.,"ANTESTELA_EXIBEAPROPRIACAO"),)
EECAE101.PRW - SALDOSED3() -> EXECBLOCK("EECAE101",.F.,.F.,"SALDOSED3_SOMAEE9")
EECAE101.PRW - SALDOSED3() -> EXECBLOCK("EECAE101",.F.,.F.,"SALDOSED3_SUBWORKIP")
EECAE101.PRW - VOLTASALDOED3() -> EXECBLOCK("EECAE101",.F.,.F.,"VOLTASALDO_ED3")
EECAE102.PRW - AE100CALC() -> EXECBLOCK("EECAE102",.F.,.F.,"CALC_EMB_MULTIPLA")
EECAE102.PRW - AE100CALC() -> LRETPTO := EXECBLOCK("EECAE102",.F.,.F.,"EM_PESOS")
EECAE102.PRW - AE100IMPORT() -> EXECBLOCK("EECAE102",.F.,.F.,"TP_AGNT_EMB")
EECAE102.PRW - AE100ITEMEES() -> EXECBLOCK("EECAE100",.F.,.F.,"NUMERO_NOTA")
EECAE102.PRW - AE100ITEMSD2() -> EXECBLOCK("EECAE100",.F.,.F.,"NUMERO_NOTA")
EECAE102.PRW - AE100PEDREF() -> EXECBLOCK("EECAE102", .F., .F., "PEDREF_FINAL")
EECAE102.PRW - AE100PRECOI() -> EXECBLOCK("EECAE100", .F., .F., {"PRECOI_ATU_PRECO", AVLDESPESAS[I][1]})
EECAE102.PRW - AE100PRECOI() -> EXECBLOCK("EECAE100",.F.,.F.,{"ANTES_TOTPED_PRECOI"})
EECAE102.PRW - AE100PRECOI() -> EXECBLOCK("EECAE100",.F.,.F.,{"PE_PRECOI",AAUX})
EECAE102.PRW - AE100PRECOI() -> EXECBLOCK("EECAE100",.F.,.F.,{"RATEIO_PRECOI"})
EECAE102.PRW - AE102CRIAWORK() -> EXECBLOCK("EECAE102",.F.,.F.,"EE9_ENCHOICE_ESTRU")
EECAE102.PRW - AE102CRIAWORK() -> EXECBLOCK("EECAE102",.F.,.F.,"WORKIP_ESTRU")
EECAE102.PRW - EECPME01() -> EXECBLOCK("EECAE102",.F.,.F.,"ADD_CPO_EMB")
EECAE104.PRW - AE104APURADESP() -> EXECBLOCK("EECAE104",.F.,.F.,{"GRV_WORKPRECALC"})
EECAE104.PRW - AE104DET() -> EXECBLOCK("EECAE104",.F.,.F.,{"TELA_LOTES_CONTAINER"})
EECAE104.PRW - AE104GRV_TRB() -> EXECBLOCK("EECAE104",.F.,.F.,{"CARREGA_TRB"})
EECAE104.PRW - AE104GRV_TRB() -> EXECBLOCK("EECAE104",.F.,.F.,{"INCLUI_TRB"})
EECAE104.PRW - AE104LOADARRAYS() -> EXECBLOCK("EECAE104", .F., .F., {"APOS_MONTA_HEADER"})
EECAE104.PRW - AE104LOADARRAYS() -> EXECBLOCK("EECAE104",.F.,.F.,{"ARRAY_BROWSE_ITENS"})
EECAE104.PRW - AE104MAN() -> EXECBLOCK("EECAE104",.F.,.F.,{"ANTES_ENCHOICE_PRINCIPAL"})
EECAE104.PRW - AE104MAN() -> EXECBLOCK("EECAE104",.F.,.F.,{"GRV_CONTAINER",LINCLUI,LALTERA,LEXCLUI})
EECAE104.PRW - AE104MAN() -> EXECBLOCK("EECAE104",.F.,.F.,{"ITENS_BROWSE_LOTE"})
EECAE104.PRW - AE104MAN() -> IF(EASYENTRYPOINT("EECAE104"),EXECBLOCK("EECAE104",.F.,.F.,"ALT_TELA_CONT"),)
EECAE104.PRW - AE104NFCOMPARA() -> EXECBLOCK("EECAE104",.F.,.F.,{"ANTES_COMPARAR_NF"})
EECAE104.PRW - AE104NFCOMPARA() -> EXECBLOCK("EECAE104",.F.,.F.,{"DEPOIS_COMPARAR_NF"})
EECAE104.PRW - AE104TELAIT() -> EXECBLOCK("EECAE104", .F., .F., "TELAIT_DEFCAMPOS_INI")
EECAE104.PRW - AE104TRATAVALORES() -> EXECBLOCK("EECAE104",.F.,.F.,{"RECALCULA_PRECALCULO"})
EECAE104.PRW - AE104VALID() -> LRETVAL := EXECBLOCK("EECAE104", .F., .F., {"VALIDA"})
EECAE104.PRW - EE9ATUALIZA() -> IF(EASYENTRYPOINT("EECAE104"),EXECBLOCK("EECAE104",.F.,.F.,"EXIBE_TELA_SEL_NF"),)
EECAE104.PRW - EE9ATUALIZA() -> IF(EASYENTRYPOINT("EECAE104"),EXECBLOCK("EECAE104",.F.,.F.,"MOSTRA_MSG_ATU"),)
EECAE104.PRW - NFCOMPLERNF() -> EXECBLOCK( "EECAE104", .F., .F., {"ALT_FILIAL"} )
EECAE105.PRW - ADELRECNO()() -> EXECBLOCK("EECAE105",.F.,.F.,"GRV_ADIAN")
EECAE105.PRW - ADELRECNO()() -> IF(EASYENTRYPOINT("EECAE105"),EXECBLOCK("EECAE105",.F.,.F.,"ANTES_DELETA"),)
EECAE105.PRW - ADELRECNO()() -> IF(EASYENTRYPOINT("EECAE105"),EXECBLOCK("EECAE105",.F.,.F.,"GRV_ADI_CLI_PO"),)
EECAE105.PRW - AE100ADD() -> EXECBLOCK("EECAE105",.F.,.F.,"ADD_BROWSER")
EECAE105.PRW - AE100ADD() -> EXECBLOCK("EECAE105",.F.,.F.,{"MSDIALOG_ADD_ADTO",OMARK})
EECAE105.PRW - AE100ADIAN() -> EXECBLOCK("EECAE105",.F.,.F.,"ANTES_GRAVA")
EECAE105.PRW - AE100ADIAN() -> EXECBLOCK("EECAE105",.F.,.F.,"ANTES_LER_ADIAN_PED")
EECAE105.PRW - AE100ADIAN() -> EXECBLOCK("EECAE105",.F.,.F.,"ANTES_TELA_PRINCIPAL_ADIANT")
EECAE105.PRW - AE100ADIAN() -> IF (EASYENTRYPOINT("EECAE105"),EXECBLOCK("EECAE105",.F.,.F.,"LEGENDA"),)
EECAE105.PRW - AE100MARK() -> IF VALTYPE((LRETPTO := EXECBLOCK("EECAE105",.F.,.F.,"VALID_ASSOCIA"))) = "L" .AND. !LRETPTO
EECAE105.PRW - AE105DIGDATASIS() -> EXECBLOCK("EECAE105",.F.,.F.,"AE105DIGDATASIS_ANTESTELARE")
EECAE105.PRW - AE105FIXITEM() -> EXECBLOCK("EECAE105",.F.,.F.,"GRVCSLD")
EECAE105.PRW - AE105FIXITEM() -> EXECBLOCK("EECAE105",.F.,.F.,"GRVSSLD")
EECAE105.PRW - AE105FIXPRICE() -> EXECBLOCK("EECAE105",.F.,.F.,"GRVOKFIX")
EECAE105.PRW - AE105PRICE() -> EXECBLOCK("EECAE105",.F.,.F.,"ANTES_DIALOG_PRICE")
EECAE105.PRW - AE105PRICE() -> EXECBLOCK("EECAE105",.F.,.F.,"GRV_WORK_PRICE")
EECAE105.PRW - AE105PRICE() -> EXECBLOCK("EECAE105",.F.,.F.,"MONTANDO_DIALOG_PRICE")
EECAE105.PRW - AE105VALDATASIS() -> LRETBLOCK:= EXECBLOCK("EECAE105",.F.,.F.,"VALRESD")
EECAE105.PRW - VLDPRICE() -> LRETBLOCK := EXECBLOCK("EECAE105", .F., .F., "VLDQTDEFIX")
EECAE106.PRW - AE106ALTVLD() -> IF(EASYENTRYPOINT("EECAE106"),EXECBLOCK("EECAE106",.F.,.F.,"ALTERA_PROCESSO_LIQ"),)
EECAE106.PRW - AE106VALID() -> LRET := EXECBLOCK("EECAE106",.F.,.F.,{"PE_VALIDOK"})
EECAE106.PRW - DESPINTENCHOICE() -> EXECBLOCK("EECAE106",.F.,.F.,{"GET_DESPINT"})
EECAE106.PRW - DESPINTTELA() -> EXECBLOCK("EECAE106",.F.,.F.,{"APOS_TELA_DI"})
EECAE106.PRW - DESPINTTELA() -> EXECBLOCK("EECAE106",.F.,.F.,{"CAMPOS_DESPINT"})
EECAE106.PRW - DITELAVLD() -> IF VALTYPE((LRETPTO := EXECBLOCK("EECAE106",.F.,.F.,{"VALID_TELA_DI"}))) = "L" .AND. !LRETPTO
EECAE108.PRW - AE108APDESP() -> EXECBLOCK("EECAE108", .F., .F., "RATEIO_CAPA_INI")
EECAE108.PRW - AE108APDESP() -> EXECBLOCK("EECAE108", .F., .F., "RATEIO_CAPA_LOOP")
EECAE108.PRW - AE108APDESP() -> EXECBLOCK("EECAE108", .F., .F., "RATEIO_INVOICE")
EECAE108.PRW - AE108ARMAZENS() -> EXECBLOCK("EECAE108",.F.,.F.,"GRV_ESTORNO")
EECAE108.PRW - AE108BUSCAOIC() -> EXECBLOCK("EECAE108",.F.,.F.,"BUSCA_OIC")
EECAE108.PRW - AE108CAPINV() -> EXECBLOCK("EECAE108",.F.,.F.,{"ANTES_ENCHOICE_EXP",NTIPODS})
EECAE108.PRW - AE108CAPINV() -> IF(EASYENTRYPOINT("EECAE108"),EXECBLOCK("EECAE108",.F.,.F.,"VALIDA_INVOICE"),)
EECAE108.PRW - AE108DETOIC() -> IF(EASYENTRYPOINT("EECAE108"),EXECBLOCK("EECAE108",.F.,.F.,"INCLUI_WKEXZ"),)
EECAE108.PRW - AE108INCOIC() -> EXECBLOCK("EECAE108",.F.,.F.,{"SAFRA",CGETSAFRA,CGETOIC})
EECAE108.PRW - AE108INCOIC() -> IF(EASYENTRYPOINT("EECAE108"),EXECBLOCK("EECAE108",.F.,.F.,"TELA_INCOIC"),)
EECAE108.PRW - AE108MANOIC() -> EXECBLOCK("EECAE108",.F.,.F.,{"OIC_FIM",NOPC,LOK})
EECAE108.PRW - AE108MANOIC() -> EXECBLOCK("EECAE108",.F.,.F.,{"OIC_INI",NOPC})
EECAE108.PRW - AE108MARCAC() -> CRET := EXECBLOCK("EECAE108", .F., .F., {"GRV_MARCAC"})
EECAE108.PRW - AE108MARKINV() -> LRET := EXECBLOCK("EECAE108",.F.,.F.,{"MARKINV",CTIPO})
EECAE108.PRW - AE108SEEKLASTOIC() -> EXECBLOCK("EECAE108",.F.,.F.,{"NUM_OIC",CSAFRA,COIC})
EECAE108.PRW - AE108SELITARM() -> EXECBLOCK("EECAE108", .F., .F., "ADD_MSSELECT_ITARM")
EECAE108.PRW - AE108SELITARM() -> EXECBLOCK("EECAE108", .F., .F., "ALT_DLG_ITARM")
EECAE108.PRW - AE108VALINV() -> LRET := EXECBLOCK("EECAE108",.F.,.F.,{"VALINV",NTIPO})
EECAE108.PRW - AE108VLDITDE() -> EXECBLOCK("EECAE108", .F., .F., "FIM_VLD_ITEM")
EECAE108.PRW - AE108WKOIC() -> IF(EASYENTRYPOINT("EECAE108"),EXECBLOCK("EECAE108",.F.,.F.,"ANTES_GRAVAOIC"),)
EECAE108.PRW - ARMMANVALID() -> EXECBLOCK("EECAE108", .F., .F., "ARMMANVALID")
EECAE108.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EAE108AEMNU",.F.,.F.)
EECAE108.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EAE108AMNU",.F.,.F.)
EECAE108.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EAE108ATMNU",.F.,.F.)
EECAE108.PRW - VALIDOIC() -> IF(EASYENTRYPOINT("EECAE108"),EXECBLOCK("EECAE108",.F.,.F.,"VALIDOIC"),)
EECAE109.PRW - EECSETKEEPUSRFILES() -> __KEEPUSRFILES := EXECBLOCK("EECKEEPFILES",.F.,.F.,"EECKEEPFILES")
EECAE109.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EAE109RWMNU",.F.,.F.)
EECAE110.PRW - AE110CONT() -> EXECBLOCK("EECAE110", .F., .F., "CONTAINER_ANTES_DIALOG")
EECAE110.PRW - AE110CTREE() -> EXECBLOCK("EECAE110", .F., .F., {"ESTUFAGEM_DESCRICAO_ITEM", CWORK})
EECAE110.PRW - AE110ESTUF() -> EXECBLOCK("EECAE110", .F., .F., "ESTUFAGEM_ANTES_DIALOG")
EECAE110.PRW - AE110INFO() -> EXECBLOCK("EECAE110", .F., .F., {"AE110INFO_DESCRICAO", CINFO})
EECAE110.PRW - AE110LOADEYY() -> EXECBLOCK("EECAE110", .F., .F., "BLOQ_NF_ENT")
EECAE110.PRW - AE110SD1F3() -> EXECBLOCK("EECAE110", .F., .F., "ADD_CAMPOS")
EECAE110.PRW - AE110VINCNFENT() -> EXECBLOCK("EECAE110", .F., .F., "POS_GRV_WORKNFREM")
EECAE110.PRW - RETBUTTONS() -> EXECBLOCK("EECAE110", .F., .F., "RETBUTTONS")
EECAE110.PRW - RETSD1() -> EXECBLOCK("EECAE110", .F., .F., "MUDA_QUERY")
EECAF100.PRW - AF100FLW() -> EXECBLOCK("EECPFN01",.F.,.F.,{CALIAS,NREG,NOPC})
EECAF100.PRW - AF100MAN() -> EXECBLOCK("EECAF100",.F.,.F.,{"AF100MAN_ANTES_DIALOG", NOPCA})
EECAF100.PRW - AF100MAN() -> EXECBLOCK("EECAF100",.F.,.F.,{"AF100MAN_ANTES_GRAVA", NOPCA})
EECAF100.PRW - AF100MAN() -> EXECBLOCK("EECAF100",.F.,.F.,{"GRV"})
EECAF100.PRW - AF100MAN() -> IF(EASYENTRYPOINT("EECAF100"),EXECBLOCK("EECAF100",.F.,.F.,"PERC_TOLERANCIA_01"),)
EECAF100.PRW - AF100MAN() -> IF(EASYENTRYPOINT("EECAF100"),EXECBLOCK("EECAF100",.F.,.F.,"PERC_TOLERANCIA_02"),)
EECAF200.PRW - AF200ATUALTIT() -> EXECBLOCK("EECAF200", .F., .F., "ALTERA_PARCELA")
EECAF200.PRW - AF200DETMAN() -> EXECBLOCK("EECAF200", .F., .F., {"PE_ENCHOICE_EEQ",NTIPOPC})
EECAF200.PRW - AF200DPARC() -> EXECBLOCK("EECAF200", .F., .F., "AF200DPARC_PARCELA_CAMBIO")
EECAF200.PRW - AF200GPARC() -> EXECBLOCK("EECAF200", .F., .F., "AF200GPARC_ALTDTEMBA")
EECAF200.PRW - AF200GPARC() -> EXECBLOCK("EECAF200",.F.,.F.,"AF200GPARC_DEF_COMI")
EECAF200.PRW - AF200GPARC() -> EXECBLOCK("EECAF200",.F.,.F.,"AF200GPARC_DEF_PARC")
EECAF200.PRW - AF200GPARC() -> EXECBLOCK("EECAF200",.F.,.F.,"EVENTOS_NAO_GERADOS")
EECAF200.PRW - AF200GPARC() -> EXECBLOCK("EECAF200",.F.,.F.,"INICIALIZA_EVENTOS")
EECAF200.PRW - AF200GPARC() -> EXECBLOCK("EECAF200",.F.,.F.,"PE_ALT_PARC")
EECAF200.PRW - AF200GPARC() -> EXECBLOCK("EECAF200",.F.,.F.,"PE_GERPARC")
EECAF200.PRW - AF200GPCD() -> EXECBLOCK("EECAF200",.F.,.F.,"VALIDA_PARCELA")
EECAF200.PRW - AF200MAN() -> EXECBLOCK("EECAF200", .F., .F., "ACERTA_TMP")
EECAF200.PRW - AF200MAN() -> EXECBLOCK("EECAF200", .F., .F., "GERA_MOV_MS")
EECAF200.PRW - AF200MAN() -> EXECBLOCK("EECAF200",.F.,.F.,{"PE_AF200MAN_GRVOK",NOPC})
EECAF200.PRW - AF200MAN() -> EXECBLOCK("EECAF200",.F.,.F.,{"PE_INICIO",NOPC})
EECAF200.PRW - AF200MAN() -> IF VALTYPE((LRETPTO := EXECBLOCK("EECAF200",.F.,.F.,{"VALIDA_MAN",NOPC}))) <> "L"
EECAF200.PRW - AF200REL() -> EXECBLOCK("EECPRL15",.F.,.F.,{CALIAS,NREG,NOPC})
EECAF200.PRW - AF200STATUS() -> EXECBLOCK("EECAF200", .F., .F., "AF200STATUS_ALTSTATUS")
EECAF200.PRW - AF200STATUS() -> EXECBLOCK("EECAF200", .F., .F., "PE_STATUS")
EECAF200.PRW - AF200TRATAPARC() -> EXECBLOCK("EECAF200", .F., .F., "DESVIA_AJUSTE")
EECAF200.PRW - AF200VALCAMBIO() -> XRET := EXECBLOCK("EECAF200",.F.,.F.,"PE_VLDFIM")
EECAF200.PRW - AF200VALID() -> EXECBLOCK("EECAF200", .F., .F., "AF200VALID_VALCAMPO")
EECAF200.PRW - AF200VALID() -> LDTNEGO:= EXECBLOCK("EECAF200",.F.,.F., "DTNEGO_VALID")
EECAF200.PRW - AF200VALID() -> XRET := EXECBLOCK("EECAF200",.F.,.F.,{"PE_VALIDA",NTIPODET})
EECAF200.PRW - AF200VIS() -> EXECBLOCK("EECAF200", .F., .F., "TELA_VIS_RAP")
EECAF200.PRW - GRVAF200MN() -> EXECBLOCK("EECAF200", .F., .F., "ALTERA_CSEEK_1")
EECAF200.PRW - GRVAF200MN() -> EXECBLOCK("EECAF200", .F., .F., "ALTERA_CSEEK_2")
EECAF200.PRW - GRVAF200MN() -> EXECBLOCK("EECAF200", .F., .F., "EXC_CAMBIO")
EECAF200.PRW - GRVAF200MN() -> EXECBLOCK("EECAF200", .F., .F., "GRV_ITEM_CAMBIO")
EECAF200.PRW - GRVAF200MN() -> EXECBLOCK("EECAF200", .F., .F., "INC_CAMBIO")
EECAF200.PRW - GRVAF200MN() -> EXECBLOCK("EECAF200", .F., .F., "PE_STATUS_A")
EECAF200.PRW - GRVDETMAN() -> EXECBLOCK("EECAF200", .F., .F., {"ANTES_GRV_TMP",NTIPO})
EECAF200.PRW - GRVDETMAN() -> EXECBLOCK("EECPFN03",.F.,.F.,NP_OPC)
EECAF200.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EAF200MNU",.F.,.F.)
EECAF201.PRW - AF201ADDDISCOUNT() -> EXECBLOCK("EECAF201", .F., .F., "AF201ADDDISCOUNT")
EECAF201.PRW - AF201DELDISCOUNT() -> EXECBLOCK("EECAF201", .F., .F., "AF201DELDISCOUNT")
EECAF201.PRW - AF201GRVEEQ() -> EXECBLOCK("EECAF201", .F., .F., "AF201GRVEEQ_LOOP_TMP")
EECAF227.PRW - ',"004")() -> EXECBLOCK("EECAF227",.F.,.F., "MSG_COMP_ADIANT_ALTERA_DADOS_TAGS")
EECAF300.PRW - AF300A() -> EXECBLOCK("EECAF300",.F.,.F.,{"AF300_QRY"})
EECAF300.PRW - AF300A() -> EXECBLOCK("EECAF300",.F.,.F.,{"AF300_QRY3/4"})
EECAF300.PRW - AF300A() -> EXECBLOCK("EECAF300",.F.,.F.,{"FIM_GRV_TMP"})
EECAF300.PRW - AF300B() -> EXECBLOCK("EECAF300",.F.,.F.,{"INC_FFC"})
EECAF300.PRW - AF300B() -> EXECBLOCK("EECAF300",.F.,.F.,{"PE_STATUS_B"})
EECAF300.PRW - AF300BAIXA() -> EXECBLOCK("EECAF300",.F.,.F.,{"INC_ADIANTAMENTO"})
EECAF300.PRW - AF300BAIXA() -> EXECBLOCK("EECAF300",.F.,.F.,{"PE_AF300C_FIN"})
EECAF300.PRW - AF300BAIXA() -> EXECBLOCK("EECAF300",.F.,.F.,{"PE_FIM_AF300C"})
EECAF300.PRW - AF300BAIXA() -> EXECBLOCK("EECAF300",.F.,.F.,{"PE_GRV_PARC_SEM_LIQ"})
EECAF300.PRW - AF300BAIXA() -> EXECBLOCK("EECAF300",.F.,.F.,{"PE_LIQ"})
EECAF300.PRW - AF300BAIXA() -> EXECBLOCK("EECAF300",.F.,.F.,{"PE_STATUS_C"})
EECAF300.PRW - AF300BXG() -> EXECBLOCK("EECAF300",.F.,.F., "AF300BXG_ANTES_TELA")
EECAF300.PRW - AF300BXG() -> EXECBLOCK("EECAF300",.F.,.F.,{"PE_EST_BAIXA_GERENCIAL_FIM"})
EECAF300.PRW - AF300BXG() -> EXECBLOCK("EECAF300",.F.,.F.,{"PE_EST_BAIXA_GERENCIAL_INI"})
EECAF300.PRW - AF300BXG() -> EXECBLOCK("EECAF300",.F.,.F.,{"PE_EST_BAIXA_GERENCIAL_LOOP"})
EECAF300.PRW - AF300ESTORNO() -> EXECBLOCK("EECAF300",.F.,.F.,{"PE_EST"})
EECAF300.PRW - AF300ESTORNO() -> EXECBLOCK("EECAF300",.F.,.F.,{"PE_ESTB_FIM"})
EECAF300.PRW - AF300ESTORNO() -> EXECBLOCK("EECAF300",.F.,.F.,{"PE_ESTB_INI"})
EECAF300.PRW - AF300ESTORNO() -> EXECBLOCK("EECAF300",.F.,.F.,{"PE_ESTB_LOOP"})
EECAF300.PRW - AF300GFFC() -> EXECBLOCK("EECAF300",.F.,.F.,{"SOLICITA_FFC_CARREGA"})
EECAF300.PRW - AF300GFFC() -> EXECBLOCK("EECAF300",.F.,.F.,{"SOLICITA_FFC_GRAVA"})
EECAF300.PRW - AF300MARCA() -> EXECBLOCK("EECAF300",.F.,.F.,"AF300_MARCA_TODOS")
EECAF300.PRW - AF300MSGEST() -> EXECBLOCK("EECAF300",.F.,.F.,"VALIDA_ESTORNO_BAIXA")
EECAF300.PRW - AF300REGISTRO() -> EXECBLOCK("EECAF300",.F.,.F.,{"AF300_QRY"})
EECAF300.PRW - AF300REGISTRO() -> EXECBLOCK("EECAF300",.F.,.F.,{"AF300_QRY3/4"})
EECAF300.PRW - AF300REGISTRO() -> EXECBLOCK("EECAF300",.F.,.F.,{"FIM_GRV_TMP"})
EECAF300.PRW - AF300SAL() -> EXECBLOCK("EECAF300",.F.,.F.,{"BAIXA_FFC_CARREGA"})
EECAF300.PRW - AF300SAL() -> EXECBLOCK("EECAF300",.F.,.F.,{"BAIXA_FFC_GRAVA"})
EECAF300.PRW - AF300SAL() -> EXECBLOCK("EECAF300",.F.,.F.,{"LOOP_BAIXA_FFC"})
EECAF300.PRW - AF300VAL() -> LDTNEGO:= EXECBLOCK("EECAF300",.F.,.F., "DTNEGO_VALID")
EECAF300.PRW - AF300VAL() -> XRET := EXECBLOCK("EECAF300",.F.,.F.,{"PE_VALIDA"})
EECAF300.PRW - AF300VALTELA() -> IF VALTYPE((LRET := EXECBLOCK("EECAF300",.F.,.F.,{"VALIDA_TELA"}))) <> "L"
EECAF300.PRW - EECAF300() -> EXECBLOCK("EECAF300",.F.,.F.,"AF300_TELAFFC")
EECAF300.PRW - EECAF300() -> EXECBLOCK("EECAF300",.F.,.F.,{"AF300_TELAFILTROS", ODLG})
EECAF300.PRW - VALIDBXG() -> EXECBLOCK("EECAF300",.F.,.F.,{"PE_BAIXA_GERENCIAL_FIM_VALIDACAO"})
EECAF300.PRW - VALIDBXG() -> EXECBLOCK("EECAF300",.F.,.F.,{"PE_EST_BAIXA_GERENCIAL_FIM_VALIDACAO"})
EECAF500.PRW - AF500ATUAEEQ() -> IF(EASYENTRYPOINT("EECAF500"),EXECBLOCK("EECAF500",.F.,.F.,"GRAVACA0_EEQ"),)
EECAF500.PRW - AF500ELIQ() -> IF(EASYENTRYPOINT("EECAF500"),EXECBLOCK("EECAF500",.F.,.F.,"ESTORNA_LIQUIDACAO"),)
EECAF500.PRW - AF500ELIQ() -> IF(EASYENTRYPOINT("EECAF500"),EXECBLOCK("EECAF500",.F.,.F.,"VALIDA_ESTORNA_LIQUIDACAO"),)
EECAF500.PRW - AF500ESTORNO() -> IF(EASYENTRYPOINT("EECAF500"),EXECBLOCK("EECAF500",.F.,.F.,"ESTORNO"),)
EECAF500.PRW - AF500MAN() -> IF(EASYENTRYPOINT("EECAF500"),EXECBLOCK("EECAF500",.F.,.F.,"ANTES_TELA_MANUT"),)
EECAF500.PRW - AF500MAN() -> IF(EASYENTRYPOINT("EECAF500"),EXECBLOCK("EECAF500",.F.,.F.,"APOS_TELA_MANUT"),)
EECAF500.PRW - AF500MAN() -> IF(EASYENTRYPOINT("EECAF500"),EXECBLOCK("EECAF500",.F.,.F.,"VALIDA_MANUT"),)
EECAF500.PRW - AF500TELA() -> EXECBLOCK("EECAF500",.F.,.F.,"BTN_AF500TELA")
EECAF500.PRW - AF500VIN() -> EXECBLOCK("EECAF500",.F.,.F.,"AF500VINC")
EECAF500.PRW - AF500VIN() -> EXECBLOCK("EECAF500",.F.,.F.,"AF500VINC_GRAVA_EEQ")
EECAF500.PRW - AF500VIN() -> EXECBLOCK("EECAF500",.F.,.F.,"AF500VINC_WORKEEQ")
EECAF500.PRW - EECAF500() -> EXECBLOCK("EECAF500",.F.,.F.,"FILTRO")
EECAF900.PRW - GETFIELDS() -> EXECBLOCK("AF900GETFIELDS",.F.,.F., COPC)
EECAF900.PRW - GETINTEGFIELDS() -> IF EXECBLOCK("AF900INTCP",.F.,.F., COPC)
EECAF900.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("AF900MNU", .F., .F., NIL)
EECAF900.PRW - VLDACTION() -> LRET := EXECBLOCK("AF900VLD", .F., .F., {CACTION, LBLOQUEIA, NOPC, AEEQAUTO, LRET})
EECAM100.PRW - AM100APRVAMO() -> EXECBLOCK("EECAM100",.F.,.F.,{"APROVACAO_SALDO"})
EECAM100.PRW - AM100GRAVA() -> EXECBLOCK("EECAM100",.F.,.F.,{ "GRAVACAO_FIM",NOPC})
EECAM100.PRW - AM100GRAVA() -> EXECBLOCK("EECAM100",.F.,.F.,{ "GRAVACAO_INICIO",NOPC})
EECAM100.PRW - AM100MAIL() -> EXECBLOCK("EECAM100",.F.,.F.,{"MAIL_MSG_TAB"})
EECAM100.PRW - AM100MAIL() -> EXECBLOCK("EECAM100",.F.,.F.,{"MAIL_TELA"})
EECAM100.PRW - AM100MAN() -> EXECBLOCK("EECAM100",.F.,.F.,{ "ANTES_TELA_PRINCIPAL" })
EECAM100.PRW - AM100SALDO() -> EXECBLOCK("EECAM100",.F.,.F.,{"APROVACAO_SALDO"})
EECAM100.PRW - AM100VALID() -> EXECBLOCK("EECAM100",.F.,.F.,{"GRV_STATDES"})
EECAM100.PRW - AM100VALID() -> EXECBLOCK("EECAM100",.F.,.F.,{"VAL_STATUS"})
EECAM100.PRW - AM100VALID() -> LRET := EXECBLOCK("EECAM100",.F.,.F.,{"BOK"})
EECAM100.PRW - AM100VLDEMB() -> EXECBLOCK("EECAM100",.F.,.F.,{"ANTES_VALID"})
EECAM100.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EAM100MNU",.F.,.F.)
EECAP100.PRW - AP100BLOQCPOS() -> EXECBLOCK("EECAP100",.F.,.F.,{"AP100BLOQCPOS_ADDCPOS"})
EECAP100.PRW - AP100COPYFROM() -> EXECBLOCK("EECAP100",.F.,.F.,{"PE_COPYPED",LCAPA,LITENS})
EECAP100.PRW - AP100DEL() -> EXECBLOCK("EECAP100",.F.,.F.,{"PE_DEL_WORK",AARQ})
EECAP100.PRW - AP100DELPED() -> EXECBLOCK("EECAP100",.F.,.F.,{ "ESTORNO_PEDIDO" })
EECAP100.PRW - AP100DELPED() -> EXECBLOCK("EECAP100",.F.,.F.,{ "ESTORNO_PEDIDO_EXT"} )
EECAP100.PRW - AP100DELPED() -> EXECBLOCK("EECAP100",.F.,.F.,{"PE_EXC"})
EECAP100.PRW - AP100DETTELA() -> EXECBLOCK("EECAP100",.F.,.F.,{"ROD_ITENS_PED",APOS})
EECAP100.PRW - AP100GERPED() -> EXECBLOCK("EECAP100",.F.,.F.,{"PE_OFFSHORE_GERA_CAPA"})
EECAP100.PRW - AP100GRAVA() -> EXECBLOCK("EECAP100", .F., .F., {"PE_GRV"})
EECAP100.PRW - AP100GRAVA() -> EXECBLOCK("EECAP100", .F., .F., {"PE_GRV_EE8"})
EECAP100.PRW - AP100GRAVA() -> EXECBLOCK("EECAP100",.F.,.F.,{ "ESTORNO_ITEM" })
EECAP100.PRW - AP100GRAVA() -> EXECBLOCK("EECAP100",.F.,.F.,{ "GRV_PED" })
EECAP100.PRW - AP100LINOK() -> EXECBLOCK("EECAP100",.F.,.F.,{ "PE_LINOK"})
EECAP100.PRW - AP100LINOK() -> LRET := EXECBLOCK("EECPEM44",.F.,.F.)
EECAP100.PRW - AP100MAN() -> EXECBLOCK("EECAP100",.F.,.F.,{ "ANTES_TELA_PRINCIPAL" })
EECAP100.PRW - AP100MAN() -> EXECBLOCK("EECAP100",.F.,.F.,{"AP100MAN_INICIO"})
EECAP100.PRW - AP100MAN() -> EXECBLOCK("EECAP100",.F.,.F.,{"CAN_MODIFY"})
EECAP100.PRW - AP100MAN() -> EXECBLOCK("EECAP100",.F.,.F.,{"FECHA_TELA_PRINCIPAL"})
EECAP100.PRW - AP100MAN() -> EXECBLOCK("EECPPE04",.F.,.F.)
EECAP100.PRW - AP100MANE() -> LRETPE := EXECBLOCK("EECAP100",.F.,.F.,{ "CANCELA"})
EECAP100.PRW - AP100MANE() -> LRETPE := EXECBLOCK("EECPPE09",.F.,.F.,EE7->EE7_PEDIDO)
EECAP100.PRW - AP100SELPROC() -> EXECBLOCK("EECAP100",.F.,.F.,{"COPYPED_TELA"})
EECAP100.PRW - AP100TTELA() -> EXECBLOCK("EECAP100",.F.,.F.,{"ROD_CAPA_PED",APOS})
EECAP100.PRW - AP100TTELA() -> IF(EASYENTRYPOINT("EECAP100"),EXECBLOCK("EECAP100",.F.,.F.,"ANTES_REFRESH_RODAPE"),)
EECAP100.PRW - AP100VALDET() -> EXECBLOCK("EECAP100",.F.,.F.,{"DEL_WORKIT"})
EECAP100.PRW - AP100VALDET() -> LRET := EXECBLOCK("EECAP100",.F.,.F.,{"DEL_ITEM"})
EECAP100.PRW - AP100VALDET() -> LRET := EXECBLOCK("EECPPE08",.F.,.F.)
EECAP100.PRW - EECAP100() -> ARET_PE := EXECBLOCK("EECAP100",.F.,.F.,{ "ANTES_GRAVA_CAPA_AUTO" })
EECAP100.PRW - EECAP100() -> EXECBLOCK("EECPPE06",.F.,.F.)
EECAP100.PRW - EECGETPESOS() -> EXECBLOCK("EECAP100",.F.,.F.,{"GETPESOS",NPESLC,NPESBC})
EECAP100.PRW - EECGETPESOS() -> LRET := EXECBLOCK("EECAP100",.F.,.F.,{"GETPESOS_OK"})
EECAP100.PRW - IS NOT SUPPORTED IN DBF'() -> EXECBLOCK("EECPPE09",.F.,.F.,"PE_GERPED_IT")
EECAP100.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EAP100MNU",.F.,.F.)
EECAP100.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EPB2BCMNU",.F.,.F.)
EECAP100.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EPB2BRGMNU",.F.,.F.)
EECAP100.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EPREMMNU",.F.,.F.)
EECAP100.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EPVNDCNSMNU",.F.,.F.)
EECAP100.PRW - PARA ABRIR A TELA DE OPCINAIS() -> EXECBLOCK("EECAP100", .F., .F., "DETMAN_ANTES_DIALOG")
EECAP100.PRW - PARA ABRIR A TELA DE OPCINAIS() -> EXECBLOCK("EECAP100",.F.,.F.,{ "PE_GRVDET",NTIPO})
EECAP100.PRW - SUMFOBIT() -> EXECBLOCK("EECAP100",.F.,.F.,{ "CALC_FOBTOT",WORKIT->EE8_CODAGE })
EECAP101.PRW - ADDTAREFA() -> EXECBLOCK("EECAP101",.F.,.F.,{"AP101_ADDTAREFA",CIMPPAIS,CCODLJIMP,LPEDIDO})
EECAP101.PRW - AP100AGEN() -> EXECBLOCK("EECAP101",.F.,.F.,"FIM_BROWSE_AG")
EECAP101.PRW - AP100AGEN() -> IF(EASYENTRYPOINT("EECAP101"),EXECBLOCK("EECAP101",.F.,.F.,"ALT_TITULO_FIN"),)
EECAP101.PRW - AP100AGMAN() -> EXECBLOCK("EECAP101",.F.,.F.,"AG_DIALOG")
EECAP101.PRW - AP100DEAG() -> IF VALTYPE((LRETPTO := EXECBLOCK("EECAP101",.F.,.F.,"VALID_AG_COM"))) = "L" .AND. !LRETPTO
EECAP101.PRW - AP100DSGRAVA() -> EXECBLOCK("EECAP101",.F.,.F.,"PE_ATU_WORKDE")
EECAP101.PRW - AP100DSGRAVA() -> EXECBLOCK("EECAP101",.F.,.F.,"PE_DEL_EET")
EECAP101.PRW - AP100DSGRAVA() -> EXECBLOCK("EECAP101",.F.,.F.,{"PE_GRV_EET",WORKDE->EET_RECNO})
EECAP101.PRW - AP100DSMAN() -> EXECBLOCK("EECAP101",.F.,.F.,"PE_GRV_MEM_TELA")
EECAP101.PRW - AP100MAN() -> EXECBLOCK("EECAP101",.F.,.F.,"F3_VIA")
EECAP101.PRW - AP100NOMAN() -> EXECBLOCK("EECAP101",.F.,.F.,"AP101NOMAN_INICIO")
EECAP101.PRW - AP100NOMAN() -> EXECBLOCK("EECAP101",.F.,.F.,"NOT_DIALOG")
EECAP101.PRW - AP100VALDP() -> LRET := EXECBLOCK("EECAP101",.F.,.F.,{"VALDP",NTIPO,NRECNO})
EECAP101.PRW - AP101CALCPSBR() -> EXECBLOCK("EECAP101",.F.,.F.,"CALC_EMB_MULTIPLA")
EECAP101.PRW - AP101CALCPSBR() -> EXECBLOCK("EECAP101",.F.,.F.,"PESOBR")
EECAP101.PRW - AP101FILNF() -> IF(EXISTBLOCK("EECAP101"),EXECBLOCK("EECAP101",.F.,.F.,"TROCA_FILIAL_NOTA"),)
EECAP101.PRW - AP101GETCOM() -> EXECBLOCK("EECAP101",.F.,.F.,"FIM_TELA_GET_COM_ITEM")
EECAP101.PRW - EECAGCOMS() -> EXECBLOCK("EECAP101",.F.,.F.,"COM_DIALOG")
EECAP101.PRW - EECRESCOM() -> EXECBLOCK("EECAP101",.F.,.F.,{"RESCOM",AAGENTE})
EECAP101.PRW - EECTOTCOM() -> EXECBLOCK("EECAP101", .F., .F., {"PE_COMIS_IT", (CALIASIT)->&(CALIAS+"_CODAGE")})
EECAP101.PRW - EECTOTCOM() -> EXECBLOCK("EECAP101",.F.,.F.,{"COMIS_TOT",CALIAS,CALIASIT})
EECAP101.PRW - EECTOTCOM() -> IF(EXISTBLOCK("EECAP101"),EXECBLOCK("EECAP101",.F.,.F.,"TROCA_PERCOM_VLCOM"),)
EECAP101.PRW - EECTRATAIT() -> EXECBLOCK("EECAP101",.F.,.F.,{"COMIS_IT",CALIAS,CALIASIT})
EECAP101.PRW - EECVERIFYAG() -> EXECBLOCK("EECAP101", .F., .F., "EECVERIFYAG_MSGAGENTE")
EECAP101.PRW - EECVERIFYAG() -> IF VALTYPE(XRETPTO := EXECBLOCK("EECAP101", .F., .F., "VERIFYAG_CHECAITEM")) == "L" .AND. XRETPTO
EECAP101.PRW - SETMBROWSE() -> EXECBLOCK("EECAP101",.F.,.F.,"PE_SETMBROWSE")
EECAP102.PRW - AP100CRIT() -> EXECBLOCK("EECAP102",.F.,.F.,{"AP100CRIT",CCAMPO})
EECAP102.PRW - AP100IMPORT() -> EXECBLOCK("EECAP102",.F.,.F.,{"TP_AGNT_PED"})
EECAP102.PRW - AP100PRECOI() -> EXECBLOCK("EECAP100", .F., .F., {"PRECOI_ATU_PRECO", AVLDESPESAS[I][1]})
EECAP102.PRW - AP100PRECOI() -> EXECBLOCK("EECAP102",.F.,.F.,{"ANTES_TOTPED_PRECOI"})
EECAP102.PRW - AP100PRECOI() -> EXECBLOCK("EECAP102",.F.,.F.,{"PE_PRECOI",AAUX})
EECAP102.PRW - AP100PRECOI() -> EXECBLOCK("EECAP102",.F.,.F.,{"RATEIO_PRECOI"})
EECAP102.PRW - AP102CRIAWORK() -> IF(EASYENTRYPOINT("EECAP102"),EXECBLOCK("EECAP102",.F.,.F.,"CAMPO_EE8"),)
EECAP102.PRW - EECPPE07() -> EXECBLOCK("EECPPE07",.F.,.F.,"PSBRUN")
EECAP102.PRW - EECPPE07() -> LRETPTO := EXECBLOCK("EECAP102",.F.,.F.,{"PE_PESOS"})
EECAP102.PRW - EECVLEE8() -> EXECBLOCK("EECAP102",.F.,.F.,{"EECVLEE8_CALC_EMB", CCAMPO})
EECAP102.PRW - EECVLEE8() -> LALTEROUDESC:= EXECBLOCK("EECAP102", .F., .F., "DESC_PROD")
EECAP103.PRW - DESPNACDMAN() -> EXECBLOCK("EECAP103",.F.,.F.,"ENCHOICE_DESPESA_NASC")
EECAP103.PRW - DESPNACDVLD() -> EXECBLOCK("EECAP103",.F.,.F.,"VALIDA_DESPESA_NASC")
EECAP103.PRW - DESPNACDVLD() -> EXECBLOCK("EECAP103",.F.,.F.,{"VAL_DESPNASC",NOPC})
EECAP103.PRW - DESPNACEMAN() -> EXECBLOCK("EECAP103",.F.,.F.,"ANTES_TELA_EMP")
EECAP103.PRW - DESPNACEROD() -> LRET:= EXECBLOCK("EECAP103",.F.,.F.,"PE_RODAPE_ADIAN")
EECAP103.PRW - DESPNACEVLD() -> IF VALTYPE((LRETPTO := EXECBLOCK("EECAP103",.F.,.F.,"VALIDA_EMPRESA"))) = "L" .AND. !LRETPTO
EECAP103.PRW - DESPNACTELA() -> EXECBLOCK("EECAP103",.F.,.F.,"DEPOIS_TELA_DESPESAS")
EECAP103.PRW - DESPNACTELA() -> EXECBLOCK("EECAP103",.F.,.F.,"TELA_DESPESAS")
EECAP103.PRW - DESPNACTOT() -> EXECBLOCK("EECAP103",.F.,.F.,"POS_TOTAIS")
EECAP104.PRW - AP104ATUFIL() -> EXECBLOCK("EECAP100",.F.,.F.,{"GRV_OFFSHORE"})
EECAP104.PRW - AP104CALCLOT() -> EXECBLOCK("EECAP104", .F., .F., "AP104CALCLOT")
EECAP104.PRW - AP104TRTCAMPOS() -> EXECBLOCK("EECAP104", .F., .F., "ARRAY_BROWSE_ITENS")
EECAP104.PRW - E_RVATUPED() -> EXECBLOCK("EECAP104", .F., .F., "ESTRV")
EECAP104.PRW - V_RVATUPED() -> EXECBLOCK("EECAP105", .F., .F., "GRVVCRV")
EECAP105.PRW - AP100ADD() -> EXECBLOCK("EECAP105", .F., .F., {"MSDIALOG_ADD_ADTO",OMARKADD})
EECAP105.PRW - AP100ADD() -> IF VALTYPE((LRET := EXECBLOCK("EECAP105",.F.,.F.,"BROWSE_ADD_ADTO"))) <> "L"
EECAP105.PRW - AP100ADIAN() -> EXECBLOCK("EECAP105",.F.,.F.,"ANTES_GRAVA")
EECAP105.PRW - AP100ADIAN() -> IF (EASYENTRYPOINT("EECAP105"),EXECBLOCK("EECAP105",.F.,.F.,"LEGENDA"),)
EECAP105.PRW - AP100ADIMAN() -> EXECBLOCK("EECAP105",.F.,.F.,"ANTES_TELA_MANUT_PARC")
EECAP105.PRW - AP100ADIMAN() -> EXECBLOCK("EECAP105",.F.,.F.,{"ADIMAN_FINAL", NTIPO})
EECAP105.PRW - AP100ADIMAN() -> IF VALTYPE((LRET := EXECBLOCK("EECAP105",.F.,.F.,"BROWSE_MANUT_ADTO"))) <> "L"
EECAP105.PRW - AP100FIXPRICE() -> EXECBLOCK("EECAP105", .F., .F., "GRVOK")
EECAP105.PRW - AP100FIXPRICE() -> EXECBLOCK("EECAP105", .F., .F., "WORKFIX")
EECAP105.PRW - AP100PRICE() -> EXECBLOCK("EECAP105",.F.,.F.,"GRVBRA")
EECAP105.PRW - AP100PRICE() -> EXECBLOCK("EECAP105",.F.,.F.,"MONTANDO_DIALOG_PRICE")
EECAP105.PRW - AP100PRICE() -> EXECBLOCK("EECAP105",.F.,.F.,"PICT")
EECAP105.PRW - AP100RECADIAN() -> EXECBLOCK("EECAP105",.F.,.F.,"ALTERANDO_EEQ")
EECAP105.PRW - AP100RECADIAN() -> EXECBLOCK("EECAP105",.F.,.F.,"ANTES_DELETA")
EECAP105.PRW - AP100RECADIAN() -> EXECBLOCK("EECAP105",.F.,.F.,"EXC_ADIANTAMENTO")
EECAP105.PRW - AP100RECADIAN() -> EXECBLOCK("EECAP105",.F.,.F.,"INCLUINDO_EEQ")
EECAP105.PRW - AP100RECADIAN() -> EXECBLOCK("EECAP105",.F.,.F.,"INC_ADIANTAMENTO")
EECAP105.PRW - AP100VALADIAN() -> EXECBLOCK("EECAP105",.F.,.F.,"VALIDA_MANUT_PARC")
EECAP105.PRW - AP100VALFIX() -> EXECBLOCK("EECAP105",.F.,.F.,"VALIDFIX")
EECAP105.PRW - AP105CALLPRECOI() -> EXECBLOCK("EECAP105",.F.,.F.,"PE_ANTES_CRIAR_WORKIT")
EECAP105.PRW - AP105CLEARFIX() -> LCLEARMESDIF := EXECBLOCK("EECAP105",.F.,.F.,"CLEARFIX")
EECAP105.PRW - AP105FIXITEM() -> EXECBLOCK("EECAP105",.F.,.F.,"FIXITEM_INICIO")
EECAP105.PRW - AP105FIXITEM() -> EXECBLOCK("EECAP105",.F.,.F.,"GRVCSLD")
EECAP105.PRW - AP105FIXITEM() -> EXECBLOCK("EECAP105",.F.,.F.,"GRVSSLD")
EECAP105.PRW - APPRICECONV() -> NRET := EXECBLOCK("EECAP105",.F.,.F.,"PRICECONV")
EECAP105.PRW - E_PRICEATUPED() -> EXECBLOCK("EECAP105",.F.,.F.,"ESTFIX")
EECAP105.PRW - VLDPRICE() -> EXECBLOCK("EECAP105",.F.,.F.,"CALC_QTDENAEMB")
EECAP105.PRW - VLDPRICE() -> LRETBLOCK := EXECBLOCK("EECAP105", .F., .F., "VLDQTDEFIX")
EECAP106.PRW - AP106COMPRAFOB() -> LRET := EXECBLOCK("EECAP106",.F.,.F.,{"VAL_INI_CMPFOB"})
EECAP106.PRW - AP106DADOS() -> EXECBLOCK("EECAP106",.F.,.F.,{ "ANTES_CARREGAR" })
EECAS120.PRW - AS120MAN() -> IF(EASYENTRYPOINT("EECAS120"),EXECBLOCK("EECAS120",.F.,.F.,"HABILITA_BOTAO"),)
EECAS120.PRW - AS120MANE() -> EXECBLOCK("EECAS120",.F.,.F.,"PE_EXC_FIM")
EECAS120.PRW - AS120MANE() -> EXECBLOCK("EECAS120",.F.,.F.,"PE_EXC_INI")
EECAS120.PRW - AS120PEVALID() -> IF(EASYENTRYPOINT("EECAS120"),EXECBLOCK("EECAS120",.F.,.F.,{"VALID_GRAVACAO",NOPC}),)
EECAS145.PRW - AS145NCC() -> EXECBLOCK("AS145NCC",.F.,.F.,"ANTES_AXCADASTRO")
EECAT115.PRW - AT115MAN() -> EXECBLOCK("EECAT115",.F.,.F.,{"PE_GRV_MENS",NOPC})
EECAT115.PRW - AT115MAN() -> IF(EASYENTRYPOINT("EECAT115"),EXECBLOCK("EECAT115",.F.,.F.,"GRAVA_MSG"),)
EECAT130.PRW - AT130MAN() -> EXECBLOCK("EECAT130",.F.,.F.,{"ANTES_DO_MSGET",NOPC})
EECAT130.PRW - AT130MANE() -> EXECBLOCK("EECAT130",.F.,.F.,{"ANTES_EXCFINAL",NOPC})
EECAT130.PRW - AT130MANE() -> EXECBLOCK("EECAT130",.F.,.F.,{"APOS_EXCFINAL",NOPC})
EECAT130.PRW - AT130PEVALID() -> IF(EASYENTRYPOINT("EECAT130"),EXECBLOCK("EECAT130",.F.,.F.,{"VALID_GRAVACAO",NOPC}),)
EECAT145.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("E145FAMMNU",.F.,.F.)
EECAT145.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("E145GRUMNU",.F.,.F.)
EECAT170.PRW - AT170MAN() -> EXECBLOCK("EECAT170", .F., .F., {"VALID_EXCLUSAO"})
EECAX100.PRW - AX100GRVRPL() -> EXECBLOCK("EECAX100",.F.,.F.,{"GRV_REPL_INICIO"})
EECAX100.PRW - AXCHANGES() -> EXECBLOCK("EECAX100",.F.,.F.,{"AXCHANGES_VERIFY_CAPA"})
EECAX100.PRW - AXCHANGES() -> LRETPONTO := EXECBLOCK("EECAX100",.F.,.F.,{"FILTRO_COMPLEMENTO_ALTERAR",CALIAS,K,AAUX[J],CWORK,CFASE})
EECAX100.PRW - AXCHANGES() -> LRETPONTO := EXECBLOCK("EECAX100",.F.,.F.,{"FILTRO_COMPLEMENTO_EXCLUIR",CALIAS,K,CWORK,CFASE})
EECAX100.PRW - AXCHANGES() -> LRETPONTO := EXECBLOCK("EECAX100",.F.,.F.,{"FILTRO_COMPLEMENTO_INCLUIR",CALIAS,K,CWORK,CFASE})
EECAX100.PRW - AXLOADARRAY() -> EXECBLOCK("EECAX100",.F.,.F.,"AXLOADARRAY")
EECCAD00.PRW - := "EECFAT2"() -> IF(EASYENTRYPOINT("EECCAD00"),EXECBLOCK("EECCAD00", .F., .F.,"INTEG_FAT"),)
EECCAD00.PRW - := "EECFAT2"() -> LRET := EXECBLOCK("EECFAT", .F., .F., {NOPC,CTIPO})
EECCAD00.PRW - := "EECFAT2"() -> LRET := EXECBLOCK(CBLOCKINT,.F.,.F.,{NOPC,CTIPO})
EECCAD00.PRW - := "EECFAT2"() -> LRET := EXECBLOCK(CROTINA, .F., .F., {NOPC,CTIPO})
EECCAD00.PRW - APPENDEX1() -> LRETPONTO := EXECBLOCK("EECCAD00",.F.,.F.,{"APPENDEX1",CP_MODELO,AP_ITEM})
EECCAD00.PRW - AVBAR() -> EXECBLOCK("EECCAD00",.F.,.F.,"AVBAR")
EECCAD00.PRW - CODET() -> EXECBLOCK("EECCAD00",.F.,.F.,{"PE_EDITDET",CP_PONTOE})
EECCAD00.PRW - CODET() -> EXECBLOCK(CP_PONTOE,.F.,.F.)
EECCAD00.PRW - CODET() -> EXECBLOCK(CP_PONTOE,.F.,.F.,"CONTINUACAO")
EECCAD00.PRW - CODET() -> EXECBLOCK(CP_PONTOE,.F.,.F.,ARECNO[TMP->(RECNO())])
EECCAD00.PRW - COIMP() -> ARETPE:= EXECBLOCK(CP_PONTOE,.F.,.F.,Z)
EECCAD00.PRW - COIMP() -> EXECBLOCK("EECCAD00",.F.,.F.,{"PE_ANTESCOIMP",CP_PONTOE})
EECCAD00.PRW - COTELAGETS() -> EXECBLOCK("EECCAD00", .F., .F., {"ALTERA_COFIG"})
EECCAD00.PRW - COTELAGETS() -> EXECBLOCK("EECCAD00",.F.,.F.,{"COTELAGETS",CP_MODELO})
EECCAD00.PRW - COTELAGETS() -> EXECBLOCK("EECCAD00",.F.,.F.,{"GRAVAEX0",CP_MODELO})
EECCAD00.PRW - EE2MANUT() -> EXECBLOCK("EECCAD00",.F.,.F.,{"OPCOES_BOTOES"})
EECCAD00.PRW - EE2MANUT() -> EXECBLOCK("EECCAD00",.F.,.F.,{"WORK_EE2"})
EECCAD00.PRW - EE2MDET() -> EXECBLOCK("EE2MDET",.F.,.F.)
EECCAD00.PRW - EE3MANUT() -> EXECBLOCK("EECCAD00",.F.,.F.,{"BOTOES"})
EECCAD00.PRW - EE3MANUT() -> EXECBLOCK("EECCAD00",.F.,.F.,{"WORK_EE3"})
EECCAD00.PRW - EECATGRV() -> EXECBLOCK("EECCAD00",.F.,.F.,"ATUALIZA_SM2")
EECCAD00.PRW - EECATVALID() -> EXECBLOCK("EECCAD00",.F.,.F.,{"VALID_GRV_SYE", NOPC})
EECCAD00.PRW - EECMARKS() -> AKEYCLI := EXECBLOCK("EECPEM38",.F.,.F.)
EECCAD00.PRW - EECMARKS() -> EXECBLOCK("EECCAD00",.F.,.F.,"MARKS")
EECCAD00.PRW - LE_EX012() -> EXECBLOCK("EECCAD00",.F.,.F.,{"LEEX0",CP_MODELO})
EECCAD00.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EAF400MNU",.F.,.F.)
EECCAD00.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EAT150MNU",.F.,.F.)
EECCAD00.PRW - RECDOCIMP() -> EXECBLOCK("EECCAD00", .F., .F., {"ANTES_DO_CASE"})
EECCAD01.PRW - AVTELAGETS() -> EXECBLOCK(CPTOENTRADA,.F.,.F.,{"PE_GRV",CDOC})
EECCAD01.PRW - AVTELAGETS() -> EXECBLOCK(CPTOENTRADA,.F.,.F.,{"PE_INI_TELA",CDOC})
EECCAD01.PRW - AVTELAGETS() -> EXECBLOCK(CPTOENTRADA,.F.,.F.,{"PE_TELA",CDOC})
EECCAD01.PRW - AVTELAGETS() -> LGRAVOU := EXECBLOCK(CPTOENTRADA,.F.,.F.,{"PE_GRAVAWORK",CDOC})
EECCAD01.PRW - AVTELAGETS() -> LGRAVOUTUDO := EXECBLOCK(CPTOENTRADA,.F.,.F.,{"PE_GRAVATUDO",CDOC})
EECCAD01.PRW - AVTELAGETS() -> LRET := EXECBLOCK(CPTOENTRADA,.F.,.F.,{"PE_INI",CDOC})
EECCAD01.PRW - AVTELAVALID() -> LRET := EXECBLOCK(CPTOENTRADA,.F.,.F.,{"PE_VLDFINAL",CDOC})
EECCAD01.PRW - EECDICLINOK() -> LRET := EXECBLOCK(CPTOENTRADA,.F.,.F.,{"PE_LINOK",CDOC})
EECCAD01.PRW - EECHIST() -> EXECBLOCK(CPTOENTRADA,.F.,.F.,{"PE_HISTORICO",CDOC,AAVGCAPA,AAVGITEM})
EECCAD01.PRW - EECHIST() -> XRETPOS := EXECBLOCK(CPTOENTRADA,.F.,.F.,{"PE_POSICIONA_HIST",CDOC,AAVGCAPA,AAVGITEM})
EECCAD01.PRW - EECVALSETUP() -> LRET := EXECBLOCK(CPTOVAL,.F.,.F.)
EECCAD02.PRW - AT150MAN() -> EXECBLOCK("EECCAD02",.F.,.F.,"FIM_GRV_COTACAO")
EECCAD02.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EECCAD02MNU",.F.,.F.)
EECCV100.PRW - CV100VALID() -> EXECBLOCK("EECCV100",.F.,.F.,{"CV100VALID_VIATRANSP", NOPC})
EECCV100.PRW - EECCV100MANUT() -> EXECBLOCK("EECPEM43",.F.,.F.)
EECCV100.PRW - EECCV100MANUT() -> IF(EASYENTRYPOINT("EECCV100"),EXECBLOCK("EECCV100",.F.,.F.,"APOS_GRV_EX4"),)
EECDN400.PRW - COMMITDATA() -> EXECBLOCK("DN400INTEMB", .F., .F., {OEEB, OEET, OEMB, I})
EECDN400.PRW - GETDEFS() -> EXECBLOCK("DN400DEFS", .F., .F., CID)
EECDU100.PRW - EECDU100GRV() -> EXECBLOCK("EECDU100",.F.,.F.,"ALTERA_ITEM")
EECDU100.PRW - GEREKS() -> EXECBLOCK("EECDU100",.F.,.F.,"GEREKS")
EECDU400.PRW - =SENDDUE"+ ENTER() -> EXECBLOCK("EECDU400",.F.,.F.,"GERAARQINI")
EECDU400.PRW - DU400DSCITEM() -> EXECBLOCK("EECDU400",.F.,.F.,"DESC_ITEM")
EECDU400.PRW - DU400DSCPRD() -> EXECBLOCK("EECDU400",.F.,.F.,"DESC_PRODUTO")
EECDU400.PRW - DU400GETNFSREM() -> ANFSITEM := EXECBLOCK("DU400NFREM", .F., .F., {CNFORI, CSERORI, CIMPORT, CIMLOJA, CFATSEQ})
EECDU400.PRW - DU400OBSEMB() -> EXECBLOCK("EECDU400",.F.,.F.,"OBS_EMBARQUE")
EECDU400.PRW - DU400SETVAL() -> EXECBLOCK("EECDU400",.F.,.F.,"APURA_VALORES_ITEM")
EECDU400.PRW - EECDU400() -> EXECBLOCK("EECDU400",.F.,.F.,"FIM")
EECEI100.PRW - FIERGSDADOS() -> EXECBLOCK("EECEI100", .F., .F., "ALTERA_ARRAY_AITEM")
EECEI100.PRW - FIERGSDADOS() -> EXECBLOCK("EECEI100", .F., .F., "ALTERA_ARRAY_ARETORNO")
EECEI200.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EECEI200MNU",.F.,.F.)
EECEI201.PRW - BUSCAEEQ() -> EXECBLOCK("EECEI201", .F., .F., "ANTES_SQL")
EECEI201.PRW - CRIAWORK() -> EXECBLOCK("EECEI201", .F., .F., "CRIAWORK")
EECEI201.PRW - CRIAXMLEI201() -> EXECBLOCK("EECEI201", .F., .F., "CRIA_XML")
EECEI201.PRW - EI201EXECPARC() -> EXECBLOCK("EECEI201", .F., .F., "AEEQCAMPOS_ALTERACAO")
EECEI201.PRW - EI201IMPARQ() -> EXECBLOCK("EECEI201", .F., .F., "AEEQCAMPOS_ALTERACAO")
EECEI201.PRW - EI201IMPARQ() -> EXECBLOCK("EECEI201", .F., .F., "AEEQCAMPOS_CHECAATUALIZACAO")
EECEI201.PRW - EI201IMPARQ() -> EXECBLOCK("EECEI201", .F., .F., "IMPARQ_FINAL")
EECEI201.PRW - GERACOLEI201() -> EXECBLOCK("EECEI201", .F., .F., "ALTERA_ARRAY")
EECEI201.PRW - INSEREEJA() -> EXECBLOCK("EECEI201", .F., .F., "INSERE_EJA")
EECEI201.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EECEI201MNU",.F.,.F.)
EECEI201.PRW - SELPARCCAMBIO() -> EXECBLOCK("EECEI201", .F., .F., "SELPARCCAMBIO")
EECEI300.PRW - PROCRETRE() -> EXECBLOCK("EECEI300",.F.,.F.,{"PE_RE_DT"})
EECFAT2.PRW - AVCHKSTDESP() -> EXECBLOCK("EECFAT2",.F.,.F.,{"LIB_PEDFAT",CPEDEXP})
EECFAT2.PRW - EECFAT2FRETEEMB() -> EXECBLOCK("EECFAT2", .F., .F., {"FAT2FRETEEMB_ATU_SC5"})
EECFAT2.PRW - GRAVADELITENS() -> EXECBLOCK("EECFAT2",.F.,.F.,{"PE_DELITEM"})
EECFAT2.PRW - GRAVAFAT() -> EXECBLOCK("EECFAT2",.F.,.F.,{"PE_FIM"})
EECFAT2.PRW - GRAVAITENS() -> EXECBLOCK("EECFAT2",.F.,.F.,{"PE_GRVITEM"})
EECFAT2.PRW - ISFATURADO() -> IF(EASYENTRYPOINT("EECFAT2"),EXECBLOCK("EECFAT2",.F.,.F.,"VALID_FATU"),)
EECFAT3.PRW - FAT3GRAVAPV() -> EXECBLOCK("EECFAT3",.F.,.F.,{"FIM_GRVPV",NOPC})
EECFAT3.PRW - FAT3GRAVAPV() -> EXECBLOCK("EECFAT3",.F.,.F.,{"PE_ANTES_INT",NOPC})
EECFAT3.PRW - FAT3GRAVAPV() -> EXECBLOCK("EECFAT3",.F.,.F.,{"PE_DELITEM",NOPC})
EECFAT3.PRW - FAT3GRAVAPV() -> EXECBLOCK("EECFAT3",.F.,.F.,{"PE_GRVCAPA",NOPC})
EECFAT3.PRW - FAT3GRAVAPV() -> EXECBLOCK("EECFAT3",.F.,.F.,{"PE_GRVITEM",NOPC})
EECFAT3.PRW - FAT3INTFAT() -> LRET := EXECBLOCK("EECFAT3",.F.,.F.,{"INTFAT",NOPC})
EECFAT3.PRW - FAT3VALPV() -> EXECBLOCK("EECFAT3",.F.,.F.,{"PE_VALID"})
EECFATCC.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("EFATCPMNU",.F.,.F.)
EECFATCP_RDM.PRW - FATCPNFC(CP_A() -> EXECBLOCK("EECFATNF",.F.,.F.,{ADADOS,3})
EECFATCP_RDM.PRW - GERANFCAMBIAL() -> EXECBLOCK("EECFATNF",.F.,.F.,{ADADOS,3})
EECFATCP_RDM.PRW - GERANFCAMBIAL() -> EXECBLOCK("EECFATNF",.F.,.F.,{ADADOS,5})
EECIN100.PRW - EECIN100IPE() -> EXECBLOCK("IN100CLI",.F.,.F.,"ALTPE")
EECIN100.PRW - EECIN100PARAM() -> EXECBLOCK("IN100CLI",.F.,.F.,"PARAMGET")
EECIN100.PRW - EECIN100PARAM() -> EXECBLOCK("IN100CLI",.F.,.F.,"PARAMGRAVA")
EECIN100.PRW - EECIN100VALPE() -> EXECBLOCK("EECIN100", .F., .F., "FIM_IN100VALPE")
EECIN100.PRW - IN100CABIT() -> EXECBLOCK("IN100CLI",.F.,.F.,"IMPCABIDITENS")
EECIN100.PRW - IN100CABIT() -> EXECBLOCK("IN100CLI",.F.,.F.,"IMPCAPAIT1")
EECIN100.PRW - IN100CABPE() -> EXECBLOCK("IN100CLI",.F.,.F.,"IMPCABPDITENS")
EECIN100.PRW - IN100CABPE() -> EXECBLOCK("IN100CLI",.F.,.F.,"IMPCAPAPE0")
EECIN100.PRW - IN100CABPE() -> EXECBLOCK("IN100CLI",.F.,.F.,"IMPCAPAPE1")
EECIN100.PRW - IN100CL() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLCL")
EECIN100.PRW - IN100DETID() -> EXECBLOCK("IN100CLI",.F.,.F.,"IMPISITENS")
EECIN100.PRW - IN100DETPE() -> EXECBLOCK("IN100CLI",.F.,.F.,"IMPPDITENS")
EECIN100.PRW - IN100FF() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLFF")
EECIN100.PRW - IN100GRVCL() -> EXECBLOCK("IN100CLI",.F.,.F.,"ANT_DEL_SA1")
EECIN100.PRW - IN100GRVCL() -> EXECBLOCK("IN100CLI",.F.,.F.,"EXCCL")
EECIN100.PRW - IN100GRVCL() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVCL")
EECIN100.PRW - IN100GRVFF() -> EXECBLOCK("IN100CLI",.F.,.F.,"EXCFF")
EECIN100.PRW - IN100GRVFF() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVFF")
EECIN100.PRW - IN100GRVIT() -> EXECBLOCK("IN100CLI",.F.,.F.,"ANT_DEL_SB1")
EECIN100.PRW - IN100GRVIT() -> EXECBLOCK("IN100CLI",.F.,.F.,"EXCIT")
EECIN100.PRW - IN100GRVIT() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVID")
EECIN100.PRW - IN100GRVIT() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVIT")
EECIN100.PRW - IN100GRVIT() -> EXECBLOCK("IN100CLI",.F.,.F.,"PRODUTO_MODIFICADO_EMAIL")
EECIN100.PRW - IN100GRVLK() -> EXECBLOCK("IN100CLI",.F.,.F.,"EXCLK")
EECIN100.PRW - IN100GRVLK() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVLK")
EECIN100.PRW - IN100GRVNC() -> EXECBLOCK("IN100CLI",.F.,.F.,"DELNC")
EECIN100.PRW - IN100GRVNC() -> EXECBLOCK("IN100CLI",.F.,.F.,"DELND")
EECIN100.PRW - IN100GRVNC() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVNC")
EECIN100.PRW - IN100GRVNC() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVND")
EECIN100.PRW - IN100GRVNS() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVNS")
EECIN100.PRW - IN100GRVPE() -> EXECBLOCK("IN100CLI",.F.,.F.,"DELPD")
EECIN100.PRW - IN100GRVPE() -> EXECBLOCK("IN100CLI",.F.,.F.,"DELPE")
EECIN100.PRW - IN100GRVPE() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVPD")
EECIN100.PRW - IN100GRVPE() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVPE")
EECIN100.PRW - IN100GRVPE() -> EXECBLOCK("IN100CLI",.F.,.F.,"ICALCPESO")
EECIN100.PRW - IN100GRVPE() -> EXECBLOCK("IN100CLI",.F.,.F.,"INICIO_GRVPE")
EECIN100.PRW - IN100GRVTP() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVTP_EX5")
EECIN100.PRW - IN100GRVTP() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVTP_EX6")
EECIN100.PRW - IN100IT() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLIT")
EECIN100.PRW - IN100ITID() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLID")
EECIN100.PRW - IN100LERCL() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERCL")
EECIN100.PRW - IN100LERCL() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALCL")
EECIN100.PRW - IN100LERFF() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERFF")
EECIN100.PRW - IN100LERFF() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALFF")
EECIN100.PRW - IN100LERIT() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERIT")
EECIN100.PRW - IN100LERIT() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALIT")
EECIN100.PRW - IN100LERLK() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERLK")
EECIN100.PRW - IN100LERLK() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALLK")
EECIN100.PRW - IN100LERNC() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERNC")
EECIN100.PRW - IN100LERNC() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERND")
EECIN100.PRW - IN100LERNC() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERND_EXCLUSAO_CANCELAMENTO")
EECIN100.PRW - IN100LERNC() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALNC")
EECIN100.PRW - IN100LERNC() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALND")
EECIN100.PRW - IN100LERNC() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALND_EXCLUSAO_CANCELAMENTO")
EECIN100.PRW - IN100LERNS() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERNS")
EECIN100.PRW - IN100LERNS() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALNS")
EECIN100.PRW - IN100LERPE() -> EXECBLOCK("IN100CLI",.F.,.F.,"FINAL_LERPE")
EECIN100.PRW - IN100LERPE() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERPD")
EECIN100.PRW - IN100LERPE() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERPE")
EECIN100.PRW - IN100LERPE() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALPD")
EECIN100.PRW - IN100LERPE() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALPE")
EECIN100.PRW - IN100LERTP() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERTP")
EECIN100.PRW - IN100LERTP() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALTP")
EECIN100.PRW - IN100LK() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLLK")
EECIN100.PRW - IN100NC() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLNC")
EECIN100.PRW - IN100NC() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLND")
EECIN100.PRW - IN100NS() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLNS")
EECIN100.PRW - IN100PE() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLPD")
EECIN100.PRW - IN100PE() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLPE")
EECIN100.PRW - IN100PE_ID() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERID")
EECIN100.PRW - IN100PE_ID() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALID")
EECIN100.PRW - IN100PRECO() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLTP")
EECNU400.PRW - EECNU400CA() -> EXECBLOCK("EECPNU01",.F.,.F.,"CANC_EFETIV")
EECNU400.PRW - EECNU400EF() -> EXECBLOCK("EECPNU01",.F.,.F.,"EFETIVOU")
EECNU400.PRW - EECNU400EF() -> EXECBLOCK("EECPNU01",.F.,.F.,"GRAVOU_ADI")
EECNU400.PRW - EECNU400EF() -> EXECBLOCK("EECPNU01",.F.,.F.,"GRAVOU_SWD")
EECNU400.PRW - EECNUCAN() -> EXECBLOCK("EECNU400",.F.,.F.,"CANCEL_EFETI")
EECNU400.PRW - EECNUIAE() -> EXECBLOCK("EECPNU01",.F.,.F.,"MANUT_DESP")
EECNU400.PRW - EECNUIAE() -> EXECBLOCK("EECPNU01",.F.,.F.,"MANUT_DESP_INICIO")
EECNU400.PRW - EECNUMAN() -> EXECBLOCK("EECPNU01",.F.,.F.,"BROW_EEU")
EECNU400.PRW - EECNUMAN() -> EXECBLOCK("EECPNU01",.F.,.F.,"ENCHOICE_BAR")
EECNU400.PRW - EECNUMAN() -> EXECBLOCK("EECPNU01",.F.,.F.,"GRAVOU_DESP")
EECNU400.PRW - EECNUMAN() -> EXECBLOCK("EECPNU01",.F.,.F.,"GRAVOU_EEU")
EECNU400.PRW - EECNUMAN() -> EXECBLOCK("EECPNU01",.F.,.F.,"INICIA_VARIAVEIS")
EECNU400.PRW - EECNUMAN() -> EXECBLOCK("EECPNU01",.F.,.F.,"TELA_MANUT")
EECNU400.PRW - EECNUMAN() -> LLOOP := EXECBLOCK("EECPNU01",.F.,.F.,"PE_INI_GRV_TRB")
EECNU400.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("ENU400MNU",.F.,.F.)
EECNU400.PRW - NU400BANCOSE5() -> IF( EASYENTRYPOINT("EECNU400") , EXECBLOCK("EECNU400",.F.,.F.,{"CARREGA_BANCO"}) , )
EECNU400.PRW - NU400VAL() -> EXECBLOCK("EECPNU01",.F.,.F.,"VALID")
EECPC100.PRW - CALCDESP() -> LRETBLOCK := EXECBLOCK("EECPC100",.F.,.F.,{"PE_CALCDESP",LPEDIDO,LMEMORIA})
EECPC150.PRW - EECPC150() -> LRET := EXECBLOCK("EECPC150",.F.,.F.,{"PE_FIM",ADESPESAS,ACOMISSAO,LISPEDIDO})
EECPEM33_RDM.PRW - -> EXECBLOCK("EECPEM33",.F.,.F.,{"C",TIPO} )
EECPEM71_RDM.PRW - -> EXECBLOCK("EECPEM71",.F.,.F.,{"C",TIPO} )
EECPV150.PRW - IMPRIME() -> IF(EASYENTRYPOINT("EECPV150"),EXECBLOCK("EECPV150",.F.,.F.,"FECHA_VIEW"),)
EECRI100.PRW - EECRI103() -> IF(EASYENTRYPOINT("EECRI100"),EXECBLOCK("EECRI100",.F.,.F.,"TELA_SELECAO"),)
EECRI100.PRW - RICRIATRB() -> IF(EASYENTRYPOINT("EECRI100"),EXECBLOCK("EECRI100",.F.,.F.,"CRIA_INDICE_TRB"),)
EECRI100.PRW - RICRIATRB() -> IF(EASYENTRYPOINT("EECRI100"),EXECBLOCK("EECRI100",.F.,.F.,"CRIA_TRB"),)
EECRI100.PRW - RICRIATRB() -> IF(EASYENTRYPOINT("EECRI100"),EXECBLOCK("EECRI100",.F.,.F.,"GRAVA_TRB"),)
EECRI100.PRW - RICRIATRB() -> IF(EASYENTRYPOINT("EECRI100"),EXECBLOCK("EECRI100",.F.,.F.,"LOOP_TRB"),)
EECRI100.PRW - RICRIATRB() -> IF(EASYENTRYPOINT("EECRI100"),EXECBLOCK("EECRI100",.F.,.F.,"LOOP_WK_RIEX"),)
EECRI100.PRW - RICRIATRB() -> IF(EASYENTRYPOINT("EECRI100"),EXECBLOCK("EECRI100",.F.,.F.,"QRY_CONDICAO"),)
EECRI100.PRW - RIEX_ENVIO() -> EXECBLOCK("EECRI100",.F.,.F.,"ANTES_GRAVA_XML")
EECRI100.PRW - RIEX_ENVIO() -> EXECBLOCK("EECRI100",.F.,.F.,"NF_ENTRADA")
EECRI100.PRW - RIEX_ENVIO() -> IF(EASYENTRYPOINT("EECRI100"),EXECBLOCK("EECRI100",.F.,.F.,"ENVIO_ERRO"),)
EECRI100.PRW - RIEX_ENVIO() -> IF(EASYENTRYPOINT("EECRI100"),EXECBLOCK("EECRI100",.F.,.F.,"GRAVA_XML"),)
EECRI100.PRW - RITELAMARCA() -> IF(EASYENTRYPOINT("EECRI100"),EXECBLOCK("EECRI100",.F.,.F.,"TELA_MARCA"),)
EECRI100.PRW - RITELAMARCA() -> IF(EASYENTRYPOINT("EECRI100"),EXECBLOCK("EECRI100",.F.,.F.,STR0025),)
EECSI100.PRW - EECSI100() -> EXECBLOCK("EECPSI00",.F.,.F.,{"DEPOIS_TELA",{},NOPCAO})
EECSI100.PRW - SI100ATURE() -> EXECBLOCK("EECPSI01",.F.,.F.,{CLINE,"PE_GRV"})
EECSI100.PRW - SI100CRIATXT() -> EXECBLOCK ("EECSI100", .F., .F., {"SI100_ALTERA_EYU"})
EECSI100.PRW - SI100CRIATXT() -> EXECBLOCK("EECPSI00",.F.,.F.,{"PE_CA",{},NAGRUPA})
EECSI100.PRW - SI100CRIATXT() -> EXECBLOCK("EECPSI00",.F.,.F.,{"PE_IT",{},NAGRUPA})
EECSI100.PRW - SI100CRIATXT() -> EXECBLOCK("EECPSI00",.F.,.F.,{"WD",{},NAGRUPA})
EECSI100.PRW - SI100CRIATXT() -> EXECBLOCK("EECPSI00",.F.,.F.,{"WX",{},NAGRUPA})
EECSI100.PRW - SI100CRIATXT() -> EXECBLOCK("EECSI100",.F.,.F.,"ALTERA_FORNEXP")
EECSI100.PRW - SI100CRIATXT() -> EXECBLOCK("EECSI100",.F.,.F.,"CALC_ANTECIPADO")
EECSI100.PRW - SI100CRIATXT() -> EXECBLOCK("EECSI100",.F.,.F.,"CONTROLE_QUEBRA")
EECSI100.PRW - SI100CRIATXT() -> EXECBLOCK("EECSI100",.F.,.F.,"FABRICANTE")
EECSI100.PRW - SI100CRIATXT() -> EXECBLOCK("EECSI100",.F.,.F.,"MERCADORIA")
EECSI100.PRW - SI100CRIATXT() -> EXECBLOCK("EECSI100",.F.,.F.,"SI100CRIATXT_EXPFABR")
EECSI100.PRW - SI100EDITIT() -> EXECBLOCK("EECPSI00",.F.,.F.,{"EA",{},0})
EECSI100.PRW - SI100EDITIT() -> EXECBLOCK("EECPSI00",.F.,.F.,{"ED",{},0})
EECSI100.PRW - SI100EDITIT() -> EXECBLOCK("EECPSI00",.F.,.F.,{"EG",{},0})
EECSI100.PRW - SI100GERATXT() -> EXECBLOCK("EECPSI00",.F.,.F.,{"WA",{},NAGRUPA})
EECSI100.PRW - SI100GERATXT() -> EXECBLOCK("EECSI100",.F.,.F.,"UNIDADE")
EECSI100.PRW - SI100GRVRES() -> EXECBLOCK ("EECSI100", .F., .F., {"SI100_GRAVA_TAB"})
EECSI100.PRW - SI100GRVTEMP() -> (LPE .AND. EXECBLOCK("EECPSI00",.F.,.F.,{"QB",AREGAGRU,NAGRUPA})) .OR.;
EECSI100.PRW - SI100GRVTEMP() -> CDESCTEMP := EXECBLOCK("EECPSI00",.F.,.F.,{"GR_DSC_SISC",AREGAGRU,NAGRUPA,"2"})
EECSI100.PRW - SI100GRVTEMP() -> EXECBLOCK("EECPSI00",.F.,.F.,{"GR",AREGAGRU,NAGRUPA,"1"})
EECSI100.PRW - SI100GRVTEMP() -> EXECBLOCK("EECPSI00",.F.,.F.,{"GR",AREGAGRU,NAGRUPA,"2"})
EECSI100.PRW - SI100GRVTEMP() -> EXECBLOCK("EECPSI00",.F.,.F.,{"GR_DSC_SISC",AREGAGRU,NAGRUPA,"1"})
EECSI100.PRW - SI100GRVTEMP() -> EXECBLOCK("EECSI100",.F.,.F.,"ALTERA_DESCRI")
EECSI100.PRW - SI100LOADTXT() -> EXECBLOCK("EECPSI01",.F.,.F.,{"","PE_ENDGRV"})
EECSI100.PRW - SI100MAIN() -> EXECBLOCK("EECPSI00",.F.,.F.,{"PE_INICIO",{},0})
EECSI100.PRW - SI100MAIN() -> IF !(EASYENTRYPOINT("EECKEEPFILES") .AND. EXECBLOCK("EECKEEPFILES",.F.,.F.,"EECKEEPFILES")) .OR. MSGYESNO("DESEJA VERIFICAR SE EXISTEM PROCESSOS DISPONÍVEIS PARA A GERAÇÃO DO RE?", "AVISO")
EECSI100.PRW - SI100SELAGRU() -> EXECBLOCK("EECPSI00",.F.,.F.,{"TA",{},0})
EECSI100.PRW - SI100TABAGR() -> EXECBLOCK("EECPSI00",.F.,.F.,{"AG",{},NAGRUPA})
EECSI100.PRW - VALPROC() -> EXECBLOCK ("EECSI100", .F., .F., {"VALPROC", CPEDIDO})
EECSI101.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("ESI101MMNU",.F.,.F.)
EECSI200.PRW - LERRETSIS() -> EXECBLOCK("EECSI200",.F.,.F.,{"PE_RET",EEC->EEC_PREEMB})
EECSI300.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("ESI300MNU",.F.,.F.)
EECSI300.PRW - SI300GERA() -> EXECBLOCK("EECSI300",.F.,.F.,{"GR_TXT_EEY",NP_OPC})
EECSI300.PRW - SI300GERA() -> EXECBLOCK("EECSI300",.F.,.F.,{"GR_TXT_EEY"})
EECSI300.PRW - SI300PREP() -> EXECBLOCK("EECSI300",.F.,.F.,{"GR_TXT_EEY"})
EECSI300.PRW - SI300RVD() -> EXECBLOCK("EECSI300",.F.,.F.,{"INI_GERA_RV"})
EECSI400.PRW - DSERETORNO() -> EXECBLOCK("EECSI400", .F., .F., {"PE_FIM_RET_DSE"})
EECSI400.PRW - DSERETORNO() -> EXECBLOCK("EECSI400", .F., .F., {"RETORNO_DDE2"})
EECSI400.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("ESI400MNU",.F.,.F.)
EECSI400.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("ESI40AMNU",.F.,.F.)
EECSI400.PRW - MENUDEF() -> EXECBLOCK("EECSI400", .F., .F.,{"AROTINA"})
EECSI400.PRW - SI400ESTORNO() -> EXECBLOCK("EECSI400", .F., .F., {"PE_EST"})
EECSI400.PRW - SI400FWRITE() -> EXECBLOCK("EECSI400", .F., .F., {"PE_FWRITE", CID})
EECSI400.PRW - SI400GERA() -> EXECBLOCK("EECSI400",.F.,.F.,"DESC_ITEM_DSE")
EECSI400.PRW - SI400LERTXT() -> EXECBLOCK("EECSI400", .F., .F., {"PE_FIM_LERTXT"})
EECSI400.PRW - SI400LERTXT() -> EXECBLOCK("EECSI400", .F., .F., {"PE_LOOP_LERTXT",NX})
EECSI400.PRW - SI400LERTXT() -> EXECBLOCK("EECSI400", .F., .F., {"RETORNO_DDE1"})
EECSI400.PRW - SI400MAN() -> EXECBLOCK("EECSI400", .F., .F., {"ANTES_CARREGA"})
EECSI400.PRW - SI400MAN() -> EXECBLOCK("EECSI400", .F., .F., {"PRE_DSE"})
EECSI400.PRW - SI400PREP() -> EXECBLOCK("EECSI400",.F.,.F.,"PE_PREP")
EECSI400.PRW - SI400RET() -> EXECBLOCK("EECSI400", .F., .F., {"PE_FIM_RET_DDE"})
EFFAF200.PRW - VALFINA() -> IF(EASYENTRYPOINT("EECAF200"),EXECBLOCK("EECAF200", .F., .F., "VALIDA_VINCULACAO"),)
EFFAF200.PRW - VALFINA() -> IF(EASYENTRYPOINT("EECAF200"),EXECBLOCK("EECAF200",.F.,.F.,"VALFINANC"),)
EFFBA160.PRW - EFFBAGRAVAWORK() -> EXECBLOCK("EFFBA160", .F., .F.,"GRAVA_WORK_ANALITICO")
EFFBA160.PRW - EFFBAGRAVAWORK() -> EXECBLOCK("EFFBA160", .F., .F.,"GRAVA_WORK_SINTETICO")
EFFCAD00.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("FAC130MNU",.F.,.F.)
EFFCAD00.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("FAT140MNU",.F.,.F.)
EFFCAD00.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("FFI100MNU",.F.,.F.)
EFFCAD00.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("FLC100MNU",.F.,.F.)
EFFCAD00.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("FRO100MNU",.F.,.F.)
EFFEX400.PRW - ATUEEQ() -> IIF(EASYENTRYPOINT("EFFEX400"),EXECBLOCK("EFFEX400",.F.,.F.,"APOS_ATU_EEQ"),)
EFFEX400.PRW - BAIXAJUROS() -> EXECBLOCK("EFFEX400",.F.,.F.,"ANTES_DIALOG")
EFFEX400.PRW - BROWSEINV() -> IF(EASYENTRYPOINT("EFFEX400"),EXECBLOCK("EFFEX400",.F.,.F.,"BROWSE_INVOICES"),)
EFFEX400.PRW - EX400ATUSALDOS() -> EXECBLOCK("EFFEX400",.F.,.F.,"EXC_PARCELA_2")
EFFEX400.PRW - EX400ESTORNA() -> EXECBLOCK("EFFEX400A",.F.,.F.,"EXC_PARCELAS")
EFFEX400.PRW - EX400ESTORNA() -> IF(EASYENTRYPOINT("EFFEX400"),EXECBLOCK("EFFEX400",.F.,.F.,"FIM_ESTORNO"),)
EFFEX400.PRW - EX400EVESTORNO() -> EXECBLOCK("EFFEX400",.F.,.F.,"APOS_GRV_520")
EFFEX400.PRW - EX400EVMANUT() -> IF(EASYENTRYPOINT("EFFEX400"),EXECBLOCK("EFFEX400",.F.,.F.,"BROWSE_EF3"),)
EFFEX400.PRW - EX400FLTIV() -> IF(EASYENTRYPOINT("EFFEX400"),EXECBLOCK("EFFEX400",.F.,.F.,"TELA_FILTRO_INVOICES"),)
EFFEX400.PRW - EX400GERAVC() -> EXECBLOCK("EFFEX400",.F.,.F.,"APOS_GRV_520")
EFFEX400.PRW - EX400GRVTRANS() -> EXECBLOCK("EFFEX400",.F.,.F.,"APOS_GRV_520")
EFFEX400.PRW - EX400GRVTRANS() -> EXECBLOCK("EFFEX400",.F.,.F.,"GRV_EVENTO_EFF")
EFFEX400.PRW - EX400GRVTRANS() -> IIF(EASYENTRYPOINT("EFFEX400"),EXECBLOCK("EFFEX400",.F.,.F.,"ANTES_GRAVA_EVENTOS"),)
EFFEX400.PRW - EX400GRVTUDO() -> EXECBLOCK("EFFEX400",.F.,.F.,"ANTES_GRAVA_EF3")
EFFEX400.PRW - EX400GRVTUDO() -> EXECBLOCK("EFFEX400A",.F.,.F.,"EXC_PARCELAS")
EFFEX400.PRW - EX400GRVTUDO() -> EXECBLOCK("EFFEX400A",.F.,.F.,"GRAVANDO_EF3")
EFFEX400.PRW - EX400GRVTUDO() -> EXECBLOCK("EFFEX400A",.F.,.F.,"INC_EF3")
EFFEX400.PRW - EX400GRVTUDO() -> EXECBLOCK("EFFEX400A",.F.,.F.,"INC_PARCELAS")
EFFEX400.PRW - EX400INVOICES() -> IF(EASYENTRYPOINT("EFFEX400"),EXECBLOCK("EFFEX400",.F.,.F.,"CAMPOS_QUERY_INVOICES"),)
EFFEX400.PRW - EX400INVOICES() -> IF(EASYENTRYPOINT("EFFEX400"),EXECBLOCK("EFFEX400",.F.,.F.,"CONDICAO_VINCULACAO_TOP"),)
EFFEX400.PRW - EX400INVOICES() -> IF(EASYENTRYPOINT("EFFEX400"),EXECBLOCK("EFFEX400",.F.,.F.,"TRANSF_CAMPOS_QUERY_INVOICES"),)
EFFEX400.PRW - EX400LIQUIDA() -> EXECBLOCK("EFFEX400",.F.,.F.,"APOS_GRV_520")
EFFEX400.PRW - EX400LIQUIDA() -> EXECBLOCK("EFFEX400",.F.,.F.,"APOS_GRV_630")
EFFEX400.PRW - EX400LIQUIDA() -> EXECBLOCK("EFFEX400",.F.,.F.,"APOS_GRV_640")
EFFEX400.PRW - EX400LIQUIDA() -> EXECBLOCK("EFFEX400",.F.,.F.,"LIQUIDACAO FINANCIAMENTO")
EFFEX400.PRW - EX400MANUT() -> EXECBLOCK("EFFEX400A",.F.,.F.,"BROWSE_EF1")
EFFEX400.PRW - EX400MANUT() -> IF(EASYENTRYPOINT("EFFEX400"),EXECBLOCK("EFFEX400",.F.,.F.,"BOTOES1"),)
EFFEX400.PRW - EX400MOTHIS() -> IF(EASYENTRYPOINT("EFFEX400A"),EXECBLOCK("EFFEX400A",.F.,.F.,"TELA_MOTIVO_ESTORNO"),)
EFFEX400.PRW - EX400PEMANUT() -> IF(EASYENTRYPOINT("EFFEX400"),EXECBLOCK("EFFEX400",.F.,.F.,"OK_MANUT_PERIODO"),)
EFFEX400.PRW - EX400VALID() -> IF(EASYENTRYPOINT("EFFEX400"),EXECBLOCK("EFFEX400",.F.,.F.,"EX400VALID"),)
EFFEX400.PRW - EX400WORKS() -> IF(EASYENTRYPOINT("EFFEX400"),EXECBLOCK("EFFEX400",.F.,.F.,"ASEMSX3"),)
EFFEX400.PRW - EX400WORKS() -> IF(EASYENTRYPOINT("EFFEX400"),EXECBLOCK("EFFEX400",.F.,.F.,"WORK_INVOICES"),)
EFFEX400.PRW - GRAVACAPA() -> IF(EASYENTRYPOINT("EFFEX400"),EXECBLOCK("EFFEX400",.F.,.F.,"VALIDA_CAPA_EF1"),)
EFFEX400.PRW - INVMARCA() -> IF(EASYENTRYPOINT("EFFEX400"),EXECBLOCK("EFFEX400",.F.,.F.,"VALIDA_MARCA_INVOICE"),)
EFFEX400.PRW - INVMARCA() -> IF(EASYENTRYPOINT("EFFEX400"),EXECBLOCK("EFFEX400",.F.,.F.,"VALIDA_MARCA_TODAS_INVOICES"),)
EFFEX400.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("FEX400MNU",.F.,.F.)
EFFEX400.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("FEX401MNU",.F.,.F.)
EFFEX401.PRW - BXFRCVALID() -> IF(EASYENTRYPOINT("EFFEX401"),EXECBLOCK("EFFEX401",.F.,.F.,"BXFORCVALID"),)
EFFEX401.PRW - EX401BXENC() -> IF(EASYENTRYPOINT("EFFEX401"),EXECBLOCK("EFFEX401",.F.,.F.,"TELA_BAIXA_VINCULAÇÃO2"),)
EFFEX401.PRW - EX401BXENC() -> IF(EASYENTRYPOINT("EFFEX401"),EXECBLOCK("EFFEX401",.F.,.F.,"TELA_BAIXA_VINCULAÇÃO3"),)
EFFEX401.PRW - EX401BXFORC() -> IF(EASYENTRYPOINT("EFFEX401"),EXECBLOCK("EFFEX401",.F.,.F.,"ANTES_BAIXA_VINCULAÇÃO"),)
EFFEX401.PRW - EX401BXFORC() -> IF(EASYENTRYPOINT("EFFEX401"),EXECBLOCK("EFFEX401",.F.,.F.,"GRAVA_BAIXA_VINCULAÇÃO_ENCARGO"),)
EFFEX401.PRW - EX401BXFORC() -> IF(EASYENTRYPOINT("EFFEX401"),EXECBLOCK("EFFEX401",.F.,.F.,"TELA_BAIXA_VINCULAÇÃO1"),)
EFFEX401.PRW - EX401BXFORC() -> IF(EASYENTRYPOINT("EFFEX401"),EXECBLOCK("EFFEX401",.F.,.F.,"TELA_BAIXA_VINCULAÇÃO2"),)
EFFEX401.PRW - EX401BXFORC() -> IF(EASYENTRYPOINT("EFFEX401"),EXECBLOCK("EFFEX401",.F.,.F.,"TELA_BAIXA_VINCULAÇÃO3"),)
EFFEX401.PRW - EX401BXFORC() -> IF(EASYENTRYPOINT("EFFEX401"),EXECBLOCK("EFFEX401",.F.,.F.,"TELA_BAIXA_VINCULAÇÃO4"),)
EFFIN150.PRW - CRIAWORK() -> EXECBLOCK("EFFIN150", .F., .F.,"WORK_ESTRUTURA")
EFFIN150.PRW - GERAREL() -> EXECBLOCK("EFFIN150", .F., .F.,"COL_REL_ANALITICO")
EFFIN150.PRW - GERAREL() -> EXECBLOCK("EFFIN150", .F., .F.,"COL_REL_SINTETICO")
EFFIN150.PRW - GRAVASWB() -> EXECBLOCK("EFFIN150", .F., .F.,"WORK_GRAVA_ANALITICO")
EFFIN150.PRW - GRAVASWB() -> EXECBLOCK("EFFIN150", .F., .F.,"WORK_GRAVA_SINTETICO")
EFFMV160.PRW - EFFCRIAWORK() -> EXECBLOCK("EFFMV160", .F., .F.,"ADD_WORK_STRU")
EFFMV160.PRW - EFFGERADADOS() -> EXECBLOCK("EFFMV160", .F., .F.,"ADD_MSSELECT_COL")
EFFMV160.PRW - EFFGRAVAWORK() -> EXECBLOCK("EFFMV160", .F., .F.,"GRAVA_WORK")
EFFMV160.PRW - EFFGRAVAWORK() -> EXECBLOCK("EFFMV160", .F., .F.,"VALID_PERGUNT_EF1")
EFFMV160.PRW - EFFGRAVAWORK() -> EXECBLOCK("EFFMV160", .F., .F.,"VALID_PERGUNT_EF3")
EFFMV160.PRW - EFFGRVTOTAL() -> EXECBLOCK("EFFMV160", .F., .F.,"CAPA_CONTRATO_ITENS")
EFFMV160.PRW - WORK_EXPORT() -> EXECBLOCK("EFFMV160", .F., .F.,"ADD_COLUNA_ARQUIVO")
EFFPO150.PRW - EFFPO150CAB() -> EXECBLOCK("EFFPO150", .F., .F.,"CONTRATO_ANALIT_CABEC")
EFFPO150.PRW - EFFPO150CAB() -> EXECBLOCK("EFFPO150", .F., .F.,"CONTRATO_SINTETICO_CABEC")
EFFPO150.PRW - EFFPO150IMPRIME() -> EXECBLOCK("EFFPO150", .F., .F.,"CONTRATO_ANALIT")
EFFPO150.PRW - EFFPO150IMPRIME() -> EXECBLOCK("EFFPO150", .F., .F.,"GRAVA_WORK_ANALIT_LIQ")
EFFPO150.PRW - EFFPO150IMPRIME() -> EXECBLOCK("EFFPO150", .F., .F.,"GRAVA_WORK_ANALIT_VINC")
EFFPO150.PRW - EFFPO150IMPRIME() -> EXECBLOCK("EFFPO150", .F., .F.,"GRAVA_WORK_SINTETICO")
EFFPO150.PRW - EFFPO150IMPRIME() -> EXECBLOCK("EFFPO150", .F., .F.,"RODAPE_TOTAL_CONTRATO")
EFFPO150.PRW - EFFPO150IMPRIME() -> EXECBLOCK("EFFPO150", .F., .F.,"VALIDA_INVOICE")
EFFPO150.PRW - EFFPO150IMPRIME() -> EXECBLOCK("EFFPO150", .F., .F.,"WORK_ESTRU")
EFFPO150.PRW - QUEBRATOTAL() -> EXECBLOCK("EFFPO150", .F., .F.,"CONTRATO_ANALIT_CABEC")
EFFPO150.PRW - QUEBRATOTAL() -> EXECBLOCK("EFFPO150", .F., .F.,"CONTRATO_SINTETICO_CABEC")
EFFPV150.PRW - PV150CABEC() -> EXECBLOCK("EFFPV150", .F., .F.,"IMPRESSAOCABEC")
EFFPV150.PRW - PV150CRARQ() -> EXECBLOCK("EFFPV150", .F., .F.,"CRIAWORK")
EFFPV150.PRW - PV150IMPR() -> EXECBLOCK("EFFPV150", .F., .F.,"IMPRESSAODET")
EFFPV150.PRW - PV150QUERY() -> EXECBLOCK("EFFPV150", .F., .F.,"GRAVAQUERY")
EFFPV400.PRW - CRIAWORK() -> EXECBLOCK("EFFPV400",.F.,.F.,"ANTES_CRIAWORK")
EFFPV400.PRW - GRAVAWORK() -> EXECBLOCK("EFFPV400",.F.,.F.,"FILTRA_EFETIVA")
EFFPV400.PRW - GRAVAWORK() -> EXECBLOCK("EFFPV400",.F.,.F.,"GRV_WORK_EFETIVA")
EFFPV400.PRW - PV400ALTERA() -> EXECBLOCK("EFFPV400",.F.,.F.,"GRV_ACOLS_EF6")
EFFPV400.PRW - PV400FIELDOK() -> EXECBLOCK("EFFPV400",.F.,.F.,"QUEBRA_ACOLS")
EFFPV400.PRW - PV400FLTINV() -> EXECBLOCK("EFFPV400",.F.,.F.,"FILTRA_INV")
EFFPV400.PRW - PV400INVOICES() -> EXECBLOCK("EFFPV400",.F.,.F.,"GRV_ACOLS_INV")
EFFPV400.PRW - PV400INVOICES() -> EXECBLOCK("EFFPV400",.F.,.F.,"QRY_FILTRA_INV")
EFFPV400.PRW - PV400MANUT() -> EXECBLOCK("EFFPV400",.F.,.F.,"ANTES_GERADADOS")
EFFPV400.PRW - PV400MARCA() -> EXECBLOCK("EFFPV400",.F.,.F.,"ANTES_MARCA")
EFFPV400.PRW - PV400SEMINV() -> EXECBLOCK("EFFPV400",.F.,.F.,"GRV_ACOLS_PROC")
EFFPV400.PRW - PV400SEMINV() -> EXECBLOCK("EFFPV400",.F.,.F.,"QRY_FILTRA_PRV")
EFFRC150.PRW - RC150DADOS() -> IF(EASYENTRYPOINT("EFFRC150"),EXECBLOCK("EFFRC150",.F.,.F.,"ADD_DADOS_ACE"),)
EFFRC150.PRW - RC150DADOS() -> IF(EASYENTRYPOINT("EFFRC150"),EXECBLOCK("EFFRC150",.F.,.F.,"ADD_DADOS_PROV_JUROS"),)
EFFRC150.PRW - RC150DBFIMP() -> IF(EASYENTRYPOINT("EFFRC150"),EXECBLOCK("EFFRC150",.F.,.F.,"ADD_COLUNAS"),)
EIC.PRW - ALCADA_EIC() -> IF(EASYENTRYPOINT("EIC"),EXECBLOCK("EIC",.F.,.F.,"ALT_GRUPO_APROV"),)
EIC.PRW - AVGRAVASC7() -> IF(EASYENTRYPOINT("EIC"),EXECBLOCK("EIC",.F.,.F.,"INICIO_GRV_SC7"),)
EIC.PRW - AVGRAVASC7() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"GRAVA_SC7"),)
EIC.PRW - B1PESO() -> IF(EASYENTRYPOINT("EIC"),EXECBLOCK("EIC",.F.,.F.,"ANTES_CALC_B1PESO"),)
EIC.PRW - B1PESO() -> IF(EASYENTRYPOINT("EIC"),EXECBLOCK("EIC",.F.,.F.,"DEPOIS_CALC_B1PESO"),)
EIC.PRW - DI400GRVDDI() -> IF(EASYENTRYPOINT("EIC"),EXECBLOCK("EIC",.F.,.F.,"ATUALIZA_DESPESAS_GRVDDI"),)
EIC.PRW - GI_GRAVA() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"ACAPALI_ACUMULA"),)
EIC.PRW - GI_GRAVA() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"ACAPALI_GRV_SWP"),)
EIC.PRW - GI_GRAVA() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"FIM_GI_GRAVA"),)
EIC.PRW - GI_GRAVA() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"GRAVASW4"),)
EIC.PRW - GI_GRAVA() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"GRAVAW5"),)
EIC.PRW - GI_GRAVA() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"GRAVAW5_GI"),)
EIC.PRW - GI_GRAVA() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"INICIO_GI_GRAVA"),)
EIC.PRW - GI_GRAVA() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"SALDO"),)
EIC.PRW - GI_GRAVA() -> IF(EASYENTRYPOINT("ICPADGI2"),EXECBLOCK("ICPADGI2",.F.,.F.,"GRAVAB1"),.F.)
EIC.PRW - GI_GRAVA() -> IF(EASYENTRYPOINT("ICPADGI2"),EXECBLOCK("ICPADGI2",.F.,.F.,"GRAVAW5"),)
EIC.PRW - PO420GRVIG() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"GRAVAW5"),)
EIC.PRW - PO420GRVIG() -> IF(EASYENTRYPOINT("ICPADGI2"),EXECBLOCK("ICPADGI2",.F.,.F.,"GRAVAW5"),)
EIC.PRW - PO420GRVIP() -> EXECBLOCK(CARQNESTLE,.F.,.F.,"7")
EIC.PRW - PO420GRVIP() -> IF(LSEAL,EXECBLOCK("IC193PO1",.F.,.F.,"8"),)
EIC.PRW - PO420GRVPO000() -> EXECBLOCK(CPOINT2)
EIC.PRW - PO420GRVPO000() -> IF(EASYENTRYPOINT("EIC"),EXECBLOCK("EIC",.F.,.F.,"ALTERA_CAMPO_CAPA"),)
EIC.PRW - PO420GRVPO000() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"ANTESMAALCDOC"),)
EIC.PRW - PO420_IGPOS() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"DESPESA_SW5"),)
EIC.PRW - PO_GRAVA() -> EXECBLOCK(CARQNESTLE,.F.,.F.,"7")
EIC.PRW - PO_GRAVA() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"GRAVA_DESPESAS"),)
EIC.PRW - PO_GRAVA() -> WORK->(EXECBLOCK("EICPPO02",.F.,.F.,"23"))
EICAP100.PRW - AP100ARQSYS() -> EXECBLOCK("EICAP100",.F.,.F.,"CALCULO_SYS")
EICAP100.PRW - AP100ARQSYS() -> IF(EASYENTRYPOINT("EICAP100"),EXECBLOCK("EICAP100",.F.,.F.,"ANTES_GRV_SYS"),)
EICAP100.PRW - AP100CRIAPARC() -> IF(EASYENTRYPOINT("EICAP100"),EXECBLOCK("EICAP100",.F.,.F.,"GRV_TRB_CRIAPARC"),)
EICAP100.PRW - AP100FIELDOK() -> IF(EASYENTRYPOINT("EICAP100"),EXECBLOCK("EICAP100",.F.,.F.,"FIELDOK"),)
EICAP100.PRW - AP100GERADI() -> IF(EASYENTRYPOINT("EICAP100"),EXECBLOCK("EICAP100",.F.,.F.,"GRV_TRB_ADIANTAMENTO"),)
EICAP100.PRW - AP100GRVWORK() -> IF(EASYENTRYPOINT("EICAP100"),EXECBLOCK("EICAP100",.F.,.F.,"GRV_WORK"),)
EICAP100.PRW - AP100POSADTO() -> IF(EASYENTRYPOINT("EICAP100"),EXECBLOCK("EICAP100",.F.,.F.,"ANTES_ADTO"),)
EICAP100.PRW - AP100TRATAPARC() -> EXECBLOCK("EICAP100",.F.,.F.,"SELECAO_PARCELA_QUEBRA")
EICAP100.PRW - AP200GERA() -> EXECBLOCK("EICAP100",.F.,.F.,"AP200GERPD")
EICAP100.PRW - AP200GERA() -> IF(EASYENTRYPOINT("EICAP100"),EXECBLOCK("EICAP100",.F.,.F.,"INIVAR"),)
EICAP100.PRW - APE100CRIT() -> IF(EASYENTRYPOINT("EICAP100"),EXECBLOCK("EICAP100",.F.,.F.,"ANT_VALID_SWB"),)
EICAP100.PRW - APE100CRIT() -> IF(EASYENTRYPOINT("EICAP100"),EXECBLOCK("EICAP100",.F.,.F.,"APOS_VALID_SWB"),)
EICAP100.PRW - APE100GRAVA() -> EXECBLOCK("EICAP100",.F.,.F.,"APE100GRAVA_ALTERACAO_INC_CBO_WORK_AVINT")
EICAP100.PRW - APE100GRAVA() -> EXECBLOCK("EICAP100",.F.,.F.,"APE100GRAVA_ALTERACAO_INC_PAGANT_WORK_AVINT")
EICAP100.PRW - APE100GRAVA() -> EXECBLOCK("EICAP100",.F.,.F.,"APE100GRAVA_INCLUSAO_EXC_INVANT_WORK_AVINT")
EICAP100.PRW - APE100GRAVA() -> EXECBLOCK("EICAP100",.F.,.F.,"APE100GRAVA_INCLUSAO_EXC_INV_WORK_AVINT")
EICAP100.PRW - APE100GRAVA() -> EXECBLOCK("EICAP100",.F.,.F.,"APE100GRAVA_INCLUSAO_INC_CBO_WORK_AVINT")
EICAP100.PRW - APE100GRAVA() -> EXECBLOCK("EICAP100",.F.,.F.,"APE100GRAVA_INCLUSAO_INC_PAGANT_WORK_AVINT")
EICAP100.PRW - APE100GRAVA() -> EXECBLOCK("EICAP100",.F.,.F.,"APE100GRAVA_LIQUIDACAO_CBO_WORK_AVINT")
EICAP100.PRW - APE100GRAVA() -> EXECBLOCK("EICAP100",.F.,.F.,"APE100GRAVA_LIQUIDACAO_PAGANT_WORK_AVINT")
EICAP100.PRW - APE100GRAVA() -> EXECBLOCK("EICAP100",.F.,.F.,"APOS GRAVAR SWB")
EICAP100.PRW - APE100GRAVA() -> EXECBLOCK("EICAP100",.F.,.F.,"EXCLUINDO ITENS")
EICAP100.PRW - APE100GRAVA() -> EXECBLOCK("EICAP100",.F.,.F.,"GRAVA SWB")
EICAP100.PRW - APE100GRAVA() -> EXECBLOCK("ICPAP001",.F.,.F.,"EXCLUINDO ITENS")
EICAP100.PRW - APE100GRAVA() -> EXECBLOCK("ICPAP001",.F.,.F.,"GRAVA SWB")
EICAP100.PRW - APE100GRAVA() -> IF(EASYENTRYPOINT("EICAP100"),EXECBLOCK("EICAP100",.F.,.F.,"ANTES_GRAVA_SWB"),)
EICAP100.PRW - APE100GRAVA() -> IF(EASYENTRYPOINT("EICAP100"),EXECBLOCK("EICAP100",.F.,.F.,"MOVI_LIMITE_FIN"),)
EICAP100.PRW - APE100GRTRB() -> EXECBLOCK("EICAP100",.F.,.F.,"GRAVA_TRB")
EICAP100.PRW - APE100GRTRB() -> IF(EASYENTRYPOINT("EICAP100"),EXECBLOCK("EICAP100",.F.,.F.,"INIMEMO"),)
EICAP100.PRW - APEDEL() -> EXECBLOCK("EICAP100",.F.,.F.,"CONFIRMA_EXCLUIR")
EICAP100.PRW - APEDEL() -> EXECBLOCK("EICAP100",.F.,.F.,"EXCLUINDO TUDO")
EICAP100.PRW - APEDEL() -> EXECBLOCK("ICPAP001",.F.,.F.,"EXCLUINDO TUDO")
EICAP100.PRW - APEDELINTF() -> EXECBLOCK("EICAP100",.F.,.F.,"APEDELINTF_ESTORNO_EXC_CBO_D_WORK_AVINT")
EICAP100.PRW - APEDELINTF() -> EXECBLOCK("EICAP100",.F.,.F.,"APEDELINTF_ESTORNO_EXC_PA_WORK_AVINT")
EICAP100.PRW - APEDELINTF() -> EXECBLOCK("EICAP100",.F.,.F.,"APEDELINTF_ESTORNO_INC_INVANT_WORK_AVINT")
EICAP100.PRW - APEDELINTF() -> EXECBLOCK("EICAP100",.F.,.F.,"APEDELINTF_ESTORNO_INC_INV_WORK_AVINT")
EICAP100.PRW - APEMANSWA() -> EXECBLOCK("EICAP100",.F.,.F., "EXIBE_MSG_ADTO")
EICAP100.PRW - APEMANSWA() -> EXECBLOCK("EICAP100",.F.,.F.,"ALTERA_COLUNA")
EICAP100.PRW - APEMANSWA() -> EXECBLOCK("EICAP100",.F.,.F.,"APOS_GRAVA")
EICAP100.PRW - APEMANSWA() -> EXECBLOCK("EICAP100",.F.,.F.,"APOS_INCLUI_TRB")
EICAP100.PRW - APEMANSWA() -> EXECBLOCK("EICAP100",.F.,.F.,"BTINCLUI")
EICAP100.PRW - APEMANSWA() -> EXECBLOCK("EICAP100",.F.,.F.,"CONF_GRAVA")
EICAP100.PRW - APEMANSWA() -> EXECBLOCK("EICAP100",.F.,.F.,"MANUT_SWA")
EICAP100.PRW - APEMANSWB() -> LRET:= EXECBLOCK("EICAP100",.F.,.F.,"BOTAO_LIQUIDA_OK")
EICAP100.PRW - APEMANUTSWB() -> EXECBLOCK("EICAP100",.F.,.F.,"ARRAYSWB")
EICAP100.PRW - APEMANUTSWB() -> IF(EASYENTRYPOINT("EICAP100"),EXECBLOCK("EICAP100",.F.,.F.,"ANTES_ESTORNO_BAIXA"),)
EICAP100.PRW - APEMANUTSWB() -> IF(EASYENTRYPOINT("EICAP100"),EXECBLOCK("EICAP100",.F.,.F.,"ANTES_TELA_SWB"),)
EICAP100.PRW - APEMANUTSWB() -> IF(EASYENTRYPOINT("EICAP100"),EXECBLOCK("EICAP100",.F.,.F.,"ESTORNO_BAIXA"),)
EICAP100.PRW - APEMANUTSWB() -> IF(EASYENTRYPOINT("EICAP100"),EXECBLOCK("EICAP100",.F.,.F.,"LIQUIDA"),)
EICAP100.PRW - APESWALINOK() -> EXECBLOCK("EICAP100",.F.,.F.,"ADICIONA_PARCELA")
EICAP100.PRW - APESWALINOK() -> EXECBLOCK("EICAP100",.F.,.F.,"VALIDA_HAWB")
EICAP100.PRW - APESWALINOK() -> IF(EASYENTRYPOINT("EICAP100"),EXECBLOCK("EICAP100",.F.,.F.,"VALIDA_TELA_CAMBIO"),)
EICAP100.PRW - APESWBLINOK() -> EXECBLOCK("EICAP100",.F.,.F.,"VALIDA_SWB")
EICAP100.PRW - APEVAL_HOUSE() -> EXECBLOCK("EICAP100",.F.,.F.,"INCLUIR_HAWB")
EICAP100.PRW - APEVAL_HOUSE() -> IF(LNESTLE,EXECBLOCK("IF209FI0",.F.,.F.,"1"),)
EICAP100.PRW - APE_VENCTOS() -> EXECBLOCK("EICAP100",.F.,.F.,"ANTES_INCLUI_TRB")
EICAP100.PRW - APE_VENCTOS() -> EXECBLOCK("EICAP100",.F.,.F.,"INCLUI_TRB")
EICAP100.PRW - APE_VENCTOS() -> EXECBLOCK("EICAP100",.F.,.F.,"VENCTO_SW9")
EICAP100.PRW - APE_VENCTOS() -> IF(LAGFA,EXECBLOCK("IF140CA1",.F.,.F.,"GRAVA_TRB"),)
EICAP100.PRW - APE_VENCTOS() -> VALOR_INV:=IF(LAGFA,EXECBLOCK("IF140CA1",.F.,.F.,"INVOICE"),DI500RETVAL("TOT_INV", "TAB", .T.))
EICAP100.PRW - APE_VENCTOS() -> _SMAUX += TFOBMOE +IF(LAGFA,EXECBLOCK("IF140CA1",.F.,.F.,"TFRETE") ,0)
EICAP100.PRW - DEFVLDVINC() -> IF(EASYENTRYPOINT("EICAP100"),EXECBLOCK("EICAP100",.F.,.F.,'VALID_VINCULACAO'),)
EICAP100.PRW - EICAP100R3() -> EXECBLOCK("EICAP100",.F.,.F.,"CAMPO_TRB")
EICAP100.PRW - EICAP100R3() -> EXECBLOCK("EICAP100",.F.,.F.,"MBROWSE")
EICAP100.PRW - EICCALCPAGTO() -> EXECBLOCK("EICAP100", .F., .F., "FINAL_EICCALCPAGTO")
EICAP100.PRW - EICCALCPAGTO() -> EXECBLOCK("EICAP100",.F.,.F.,"COND_PAG")
EICAP100.PRW - EICCALCPAGTO() -> EXECBLOCK("EICAP100",.F.,.F.,"TABINV")
EICAP100.PRW - ELIMINAROP() -> IF(EASYENTRYPOINT("EICAP100"),EXECBLOCK("EICAP100",.F.,.F.,"ELIMINAR_SALDO_MOTBX"),)
EICAP100.PRW - GRAVAINTE17() -> EXECBLOCK("EICAP100",.F.,.F.,"GRAVAINTE17_LOOP_WORK_AVINT_ANTES_EI17")
EICAP100.PRW - GRAVAINTE17() -> EXECBLOCK("EICAP100",.F.,.F.,"GRAVAINTE17_LOOP_WORK_AVINT_DEPOIS_EI17")
EICAP100.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IAP100MNU",.F.,.F.)
EICAP100.PRW - MENUDEF() -> EXECBLOCK("EICAP100",.F.,.F.,"MBROWSE")
EICAP100.PRW - POSADTEXBLOCK() -> EXECBLOCK("EICAP100", .F., .F., "POSADTO_VALID")
EICAP100.PRW - VALORPED() -> IF(EASYENTRYPOINT("EICAP100"),EXECBLOCK("EICAP100",.F.,.F.,"SKIP_LOOP_SW3"),)
EICAP180.PRW - CALCVLREAL() -> IF(EASYENTRYPOINT("EICAP180"),EXECBLOCK("EICAP180",.F.,.F.,"ALTERA_VLREAL"),)
EICCA150.PRW - CA150CONS() -> IF (EASYENTRYPOINT("EICCA150"),EXECBLOCK("EICCA150",.F.,.F.,"DEP_GRV_WORK"),)
EICCA150.PRW - CA150CONS() -> IF(EASYENTRYPOINT("EICCA150"),EXECBLOCK("EICCA150",.F.,.F., "EICCA150_MENU"),)
EICCA150.PRW - CA150CONS() -> IF(EASYENTRYPOINT("EICCA150"),EXECBLOCK("EICCA150",.F.,.F.,"ALTERA_TABELAS"),)
EICCA150.PRW - CA150CONS() -> IF(EASYENTRYPOINT("EICCA150"),EXECBLOCK("EICCA150",.F.,.F.,"ALTERA_TITULO"),)
EICCA150.PRW - CA150GRVWK() -> IF(EASYENTRYPOINT("EICCA150"),EXECBLOCK("EICCA150",.F.,.F.,"GRV_WORK"),)
EICCA150.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("ICA150MNU",.F.,.F.)
EICCAD00.PRW - AX130ALTERA() -> IF(EASYENTRYPOINT("EICCAD00"),EXECBLOCK("EICCAD00",.F.,.F.,"ALTERACAO"),)
EICCAD00.PRW - AX130GRVCPO() -> IF(EASYENTRYPOINT("EICA130"),EXECBLOCK("EICA130",.F.,.F.,"GRV_CPOS"),)
EICCAD00.PRW - AX130INCLUI() -> IF(EASYENTRYPOINT("EICCAD00"),EXECBLOCK("EICCAD00",.F.,.F.,"INCLUSAO"),)
EICCAD00.PRW - AX130INCLUI() -> IF(EASYENTRYPOINT("EICCAD00"),EXECBLOCK("EICCAD00",.F.,.F.,"VALIDA_TUDO_OK"),)
EICCAD00.PRW - AX130VAL() -> IF(EASYENTRYPOINT("EICCAD00"),EXECBLOCK("EICCAD00",.F.,.F.,"ALTERACAO_TUDO_OK"),)
EICCAD00.PRW - EA110MANUT() -> IF(EASYENTRYPOINT("EICCAD00"),EXECBLOCK("EICCAD00",.F.,.F.,"ANTES_ALTERA_CAD_DESPESAS"),)
EICCAD00.PRW - EA110MANUT() -> IF(EASYENTRYPOINT("EICCAD00"),EXECBLOCK("EICCAD00",.F.,.F.,"DEPOIS_ALTERA_CAD_DESPESAS"),)
EICCAD00.PRW - EICA130() -> IF(EASYENTRYPOINT("EICA130"),EXECBLOCK("EICA130",.F.,.F.,"MENU"),)
EICCAD00.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IA050MNU",.F.,.F.)
EICCAD00.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IA070MNU",.F.,.F.)
EICCAD00.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IA110MNU",.F.,.F.)
EICCAD00.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IA130MNU",.F.,.F.)
EICCAD00.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IA200MNU",.F.,.F.)
EICCAD00.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("ICA210MNU",.F.,.F.)
EICCADGE.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("ETU100MNU",.F.,.F.)
EICCADGE.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("ISJGMNU",.F.,.F.)
EICCADGE.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("ISJKMNU",.F.,.F.)
EICCADGE.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("ISJLMNU",.F.,.F.)
EICCADGE.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("ITE110MNU",.F.,.F.)
EICCADGE.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("ITU100MNU",.F.,.F.)
EICCD100.PRW - CD100INTORG() -> IF(EASYENTRYPOINT("EICCD100"),EXECBLOCK("EICCD100",.F.,.F.,"INTEGRACAO_ORGAO"),)
EICCD100.PRW - CD100PROCEXNCM() -> IF(EASYENTRYPOINT("EICCD100"),EXECBLOCK("EICCD100",.F.,.F.,"INTEGRACAO_EX"),)
EICCD100.PRW - CD100PROCNCM() -> IF(EASYENTRYPOINT("EICCD100"),EXECBLOCK("EICCD100",.F.,.F.,"INTEGRACAO_NCM"),)
EICCD100.PRW - GRAVARET() -> IF(EASYENTRYPOINT("EICCD100"),EXECBLOCK("EICCD100",.F.,.F.,"GRAVA_RET"),)
EICCD100.PRW - PROCESSARET() -> IF(EASYENTRYPOINT("EICCD100"),EXECBLOCK("EICCD100",.F.,.F.,"PROCESSA_RET"),)
EICCO100.PRW - E_RESET_554() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,'DELETAWORK'),)
EICCO100.PRW - PCOCALCIMPOSTO() -> EXECBLOCK("EICCO100",.F.,.F.,"PCOCALCIMPOSTO")
EICCO100.PRW - PCOGERAR() -> IF(EASYENTRYPOINT("EICCO100"),EXECBLOCK("EICCO100",.F.,.F.,"RATEIO"),)
EICCO100.PRW - PCOGETNOTA() -> IF(EASYENTRYPOINT("EICCO100"),EXECBLOCK("EICCO100",.F.,.F.,'NOTA_SERIE'),)
EICCO100.PRW - PCOGRVHEADER() -> EXECBLOCK("EICCO100",.F.,.F.,"PCOGRVHEADER")
EICCO100.PRW - PCOLEGRAVA() -> EXECBLOCK("EICCO100",.F.,.F.,"PCOLEGRAVA_LEITURA")
EICCO100.PRW - PCOTELA() -> EXECBLOCK("EICCO100",.F.,.F.,"PCOTELA_INICIO")
EICCO100.PRW - PCOTELA() -> IF(EASYENTRYPOINT("EICCO100"),EXECBLOCK("EICCO100",.F.,.F.,"ABOTOES"),)
EICCO100.PRW - PCOTELA() -> IF(EASYENTRYPOINT("EICCO100"),EXECBLOCK("EICCO100",.F.,.F.,"TELA_INC_ALT"),)
EICCV100.PRW - AVBARCV() -> IF(EASYENTRYPOINT("EICCV100"),EXECBLOCK("EICCV100",.F.,.F.,"AVBARCV"),)
EICCV100.PRW - CV100ALTERA() -> IF(EASYENTRYPOINT("EICCV100"),EXECBLOCK("EICCV100",.F.,.F.,"ATU_TRB"),)
EICCV100.PRW - CV100ALTERA() -> IF(EASYENTRYPOINT("EICCV100"),EXECBLOCK("EICCV100",.F.,.F.,"NOHERADERA"),)
EICCV100.PRW - CV100DELETA() -> IF(EASYENTRYPOINT("EICCV100"),EXECBLOCK("EICCV100",.F.,.F.,"CV100DELETA"),)
EICCV100.PRW - CV100DELETA() -> IF(EASYENTRYPOINT("EICCV100"),EXECBLOCK("EICCV100",.F.,.F.,"NOHERADERE"),)
EICCV100.PRW - CV100GERA_TRB() -> EXECBLOCK("ICPADCA1",.F.,.F.,"INDICE")
EICCV100.PRW - CV100GERA_TRB() -> IF(EASYENTRYPOINT("EICCV100"),EXECBLOCK("EICCV100",.F.,.F.,"CRIA_TRB"),)
EICCV100.PRW - CV100GRAVA() -> IF(EASYENTRYPOINT("EICCV100"),EXECBLOCK("EICCV100",.F.,.F.,"CV100GRAVA"),)
EICCV100.PRW - CV100INCLUI() -> IF(EASYENTRYPOINT("EICCV100"),EXECBLOCK("EICCV100",.F.,.F.,"NOHERADERI"),)
EICCV100.PRW - CV100LINOK() -> IF !EXECBLOCK("ICPADCA1",.F.,.F.,"VALID")
EICCV100.PRW - CV100VALIDSYR() -> IF !EXECBLOCK("ICPADCA1",.F.,.F.,"VALID")
EICCV100.PRW - CV100VISUAL() -> IF(EASYENTRYPOINT("EICCV100"),EXECBLOCK("EICCV100",.F.,.F.,"NOHERADERV"),)
EICCV100.PRW - CV100_DEL_TRB() -> IF(EASYENTRYPOINT("EICCV100"),EXECBLOCK("EICCV100",.F.,.F.,"DEL_TRB"),)
EICCV100.PRW - CVMANSYR() -> IF(EASYENTRYPOINT("EICCV100"),EXECBLOCK("EICCV100",.F.,.F.,"CVMANSYR"),)
EICCV100.PRW - CVMANSYR() -> IF(EASYENTRYPOINT("EICCV100"),EXECBLOCK("EICCV100",.F.,.F.,"DEFINE_VAR"),)
EICCV100.PRW - CVMANSYR() -> IF(EASYENTRYPOINT("EICCV100"),EXECBLOCK("EICCV100",.F.,.F.,"GRAVA_TRB"),)
EICCV100.PRW - EICCV100() -> EXECBLOCK("ICPADCA1",.F.,.F.,"VARIAVEIS")
EICCV100.PRW - EICCV100() -> IF(EASYENTRYPOINT("EICCV100"),EXECBLOCK("EICCV100",.F.,.F.,"CRIA_CAMPOS"),)
EICCV100.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("ICV100MNU",.F.,.F.)
EICCV100.PRW - MENUDEF() -> IF(EASYENTRYPOINT("EICCV100"),EXECBLOCK("EICCV100",.F.,.F.,"AROTINA"),)
EICDA150.PRW - DA150GRVWORK() -> IF(EASYENTRYPOINT("EICDA150"),EXECBLOCK("EICDA150",.F.,.F.,"ORGANI_WORK"),)
EICDA150.PRW - DA150GRVWORK() -> IF(EASYENTRYPOINT("EICDA150"),EXECBLOCK("EICDA150",.F.,.F.,"PONTO_COND"),)
EICDA150.PRW - EICDA150() -> IF(EASYENTRYPOINT("EICDA150"),EXECBLOCK("EICDA150",.F.,.F.,"FILTRO_QUEBRA"),)
EICDA150.PRW - EICDA150() -> IF(EASYENTRYPOINT("EICDA150"),EXECBLOCK("EICDA150",.F.,.F.,"POS_GER_TRB"),)
EICDI100.PRW - GERACAOARQ() -> IF(EASYENTRYPOINT("EICDI100"),EXECBLOCK("EICDI100",.F.,.F.,"ALTERA_NUMERACAO"),)
EICDI100.PRW - GERACAOARQ() -> IF(EASYENTRYPOINT("EICDI100"),EXECBLOCK("EICDI100",.F.,.F.,"DESCRICAO_ITEM"),)
EICDI100.PRW - GERACAOARQ() -> IF(EASYENTRYPOINT("EICDI100"),EXECBLOCK("EICDI100",.F.,.F.,"GERA_ARQUIVO"),)
EICDI100.PRW - GERAINI() -> IF(EASYENTRYPOINT("EICDI100"),EXECBLOCK("EICDI100",.F.,.F.,"GERA_INI"),)
EICDI100.PRW - GRAVAEV0() -> IF(EASYENTRYPOINT("EICDI100"),EXECBLOCK("EICDI100",.F.,.F.,"GRAVA_EV0"),)
EICDI100.PRW - GRAVAEVC() -> IF(EASYENTRYPOINT("EICDI100"),EXECBLOCK("EICDI100",.F.,.F.,"GRAVA_EVC"),)
EICDI100.PRW - GRAVASW6() -> IF(EASYENTRYPOINT("EICDI100"),EXECBLOCK("EICDI100",.F.,.F.,"GRAVA_SW6"),)
EICDI100.PRW - GRAVASWP() -> IF(EASYENTRYPOINT("EICDI100"),EXECBLOCK("EICDI100",.F.,.F.,"GRAVA_SWP"),)
EICDI100.PRW - MONTAMSG() -> IF(EASYENTRYPOINT("EICDI100"),EXECBLOCK("EICDI100",.F.,.F.,"MONTA_MENSAGEM"),)
EICDI100.PRW - RETORNOARQ() -> EXECBLOCK("EICDI100",.F.,.F.,"LEITURA_RETORNO")
EICDI100.PRW - TELAGETS() -> IF(EASYENTRYPOINT("EICDI100"),EXECBLOCK("EICDI100",.F.,.F.,"CONSULTA_PROCESSOS"),)
EICDI100.PRW - VALIDAREG() -> IF(EASYENTRYPOINT("EICDI100"),EXECBLOCK("EICDI100",.F.,.F.,"VALIDA_REGISTRO"),)
EICDI154.PRW - DI154ALTERA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"ALTERA_IMPOSTOS"),)
EICDI154.PRW - DI154ALTERA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'ALTEROU_IMPOSTOS'),)
EICDI154.PRW - DI154ALTERA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'TELA_IMPOSTOS'),)
EICDI154.PRW - DI154ALTERA() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,'ALTERA_IMPOSTOS'),)
EICDI154.PRW - DI154ALTERA() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,'ALTEROU_IMPOSTOS'),)
EICDI154.PRW - DI154ALTERA() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,'TELA_IMPOSTOS'),)
EICDI154.PRW - DI154CAPNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"ANTES_GRV_SF1"),)
EICDI154.PRW - DI154CAPNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"GRAVACAO_SF1"),)
EICDI154.PRW - DI154CAPNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"GRAVA_SF1_EI1"),)
EICDI154.PRW - DI154CAPNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"GRV_EI1"),)
EICDI154.PRW - DI154CAPNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"GRV_SF1"),)
EICDI154.PRW - DI154CAPNF() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,"ANTES_GRV_SF1"),)
EICDI154.PRW - DI154CAPNF() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,"GRAVA_SF1_EI1"),)
EICDI154.PRW - DI154CAPNF() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,"GRV_EI1"),)
EICDI154.PRW - DI154CAPNF() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,"GRV_SF1"),)
EICDI154.PRW - DI154CAPQUEBROU() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'OUTRA_QUEBRA'),)
EICDI154.PRW - DI154CAPQUEBROU() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,'OUTRA_QUEBRA'),)
EICDI154.PRW - DI154DELET() -> EXECBLOCK("EICDI154",.F.,.F.,"ESTORNO_NF")
EICDI154.PRW - DI154DELET() -> EXECBLOCK("EICDI154",.F.,.F.,"FIM_ESTORNO")
EICDI154.PRW - DI154DELET() -> IF !EXECBLOCK("EICPDI01",.F.,.F.,"ESTORNO NA NOTA")
EICDI154.PRW - DI154DELET() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"LIMPA_SWD"),)
EICDI154.PRW - DI154DELET() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"WHILE_SWD"),)
EICDI154.PRW - DI154DELET() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'ANTES_ESTORNO_NOTA'),)
EICDI154.PRW - DI154DELET() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'APOS_ESTORNO'),)
EICDI154.PRW - DI154DELET() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'ESTORNO NA NOTA'),)
EICDI154.PRW - DI154DELET() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,'ANTES_ESTORNO_NOTA'),)
EICDI154.PRW - DI154DESPTELA() -> EXECBLOCK("EICDI154",.F.,.F.,"DESP_TELA")
EICDI154.PRW - DI154FILHA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"ACOES_RELACIONADAS_PERSON"),)
EICDI154.PRW - DI154FORDESP() -> IF (EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'DI154FORDESP'),)
EICDI154.PRW - DI154GERACUSTO() -> IF (EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,"GRVWORK_1A"),)
EICDI154.PRW - DI154GERACUSTO() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,"FINALGRAVA"),)
EICDI154.PRW - DI154GERACUSTO() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,"GRVWORK_4"),)
EICDI154.PRW - DI154GERNF() -> EXECBLOCK("EICDI154",.F.,.F.,'VALNFE')
EICDI154.PRW - DI154GERNF() -> EXECBLOCK("EICPDI01",.F.,.F.,"2")
EICDI154.PRW - DI154GERNF() -> EXECBLOCK("EICPDI01",.F.,.F.,"4")
EICDI154.PRW - DI154GERNF() -> EXECBLOCK("EICPDI01",.F.,.F.,"5")
EICDI154.PRW - DI154GERNF() -> EXECBLOCK("EICPNF02",.F.,.F.)
EICDI154.PRW - DI154GERNF() -> IF ! EXECBLOCK("EICPDI01",.F.,.F.,"1")
EICDI154.PRW - DI154GERNF() -> IF !EXECBLOCK("EICPDI01",.F.,.F.,"6")
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"ACUMULA_SD1_EI3"),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"ANTES_GRAVA_SWN"),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"FINAL_GRAVA_NF"),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"GRAVA_SD1_EI3"),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"GRAVA_SWD"),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"GRAVA_SWN_EI2"),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"GRAVA_SWW"),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'DIFERE'),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'GRAVAR'),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'GRAVA_WN'),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'INICIAVAR2'),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'INICIAVAR3'),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'INICIAVAR4'),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'INICIAVAR5'),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'INICIAVARIAVEL'),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'QUEBRA_CUSTO'),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'QUEBRA_NF'),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("EIFPNF01"),EXECBLOCK("EIFPNF01",.F.,.F.),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,"ACUMULA_SD1_EI3"),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,"GRAVA_SD1_EI3"),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,"GRAVA_SWN_EI2"),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,"GRAVA_SWW"),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,"GRV_SD1"),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,'INICIAVAR2'),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,'INICIAVAR3'),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,'INICIAVAR4'),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,'INICIAVAR5'),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,'INICIAVARIAVEL'),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,'QUEBRA_CUSTO'),)
EICDI154.PRW - DI154GERNF() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"GRV_SD1"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"ANTES_RATEIO"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"ANTES_WHILE_SW8"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"FINALGRAVA"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"GRVWORK_1"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"GRVWORK_1A"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"GRVWORK_3"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"GRVWORK_4"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"INICIO_DI154GRAVA"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"PESONEW"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"POS_GRV_DESP"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"RATEIO_ACRESCIMO"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"VAL_COMPOE_CIF"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"WHILE_1_WORK2"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"WHILE_SW8_ANTES_SOMATORIA"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"WHILE_SW8_MIDIA"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"WHILE_SW9"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("EICLOTE"),EXECBLOCK("EICLOTE",.F.,.F.,"NF"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,"FINALGRAVA"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,"GRVWORK_1"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,"GRVWORK_1A"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,"GRVWORK_4"),)
EICDI154.PRW - DI154GRAVA() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,"PESONEW"),)
EICDI154.PRW - DI154GRVDESPESA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"ANTES_GRAVA_WORK4"),)
EICDI154.PRW - DI154GRVDESPESA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"GRAVA_WOKR4"),)
EICDI154.PRW - DI154GRVSD1() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"ANTES_GRAVA_SD1"),)
EICDI154.PRW - DI154GRVSD1() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"ANTES_GRV_SD1"),)
EICDI154.PRW - DI154GRVSD1() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'GRAVACAO_SD1'),)
EICDI154.PRW - DI154GRWORKS() -> IF (EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'LEREI2'),)
EICDI154.PRW - DI154GRWORKS() -> IF (EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'LER_SF1_SWN'),)
EICDI154.PRW - DI154GRWORKS() -> IF (EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,'LEREI2'),)
EICDI154.PRW - DI154GRWORKS() -> IF (EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,'LER_SF1_SWN'),)
EICDI154.PRW - DI154GRWORKS() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"ITEM_NF"),)
EICDI154.PRW - DI154IMPOSTOS() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"ALTERA_CALC_IMPOSTOS_WK2"),)
EICDI154.PRW - DI154ITENS() -> EXECBLOCK("ICPADDI0",.F.,.F.,"BOTAO")
EICDI154.PRW - DI154ITENS() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"ALTERA_INDICE"),)
EICDI154.PRW - DI154ITENS() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"BOTAO_ITENS"),)
EICDI154.PRW - DI154ITENS() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"ITEM_NF"),)
EICDI154.PRW - DI154IT_ALT() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'ANTES_ITEM_ALTERA'),)
EICDI154.PRW - DI154IT_ALT() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'DEPOIS_ITEM_ALTERA'),)
EICDI154.PRW - DI154IT_ALT() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'TELA_ITEM_ALTERA'),)
EICDI154.PRW - DI154NFE() -> (EASYENTRYPOINT("EICDI154") .AND. EXECBLOCK("EICDI154",.F.,.F.,"ESTORNO")==.F.) ,,;
EICDI154.PRW - DI154NFE() -> EXECBLOCK("EICDI154",.F.,.F.,"GERA_MAINWND")
EICDI154.PRW - DI154NFE() -> EXECBLOCK("EICDI154",.F.,.F.,"NF_CUSTOM")
EICDI154.PRW - DI154NFE() -> EXECBLOCK("EICDI154",.F.,.F.,"PRIMEIRA_NOTA")
EICDI154.PRW - DI154NFE() -> IF (EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"INDICE"),)
EICDI154.PRW - DI154NFE() -> IF( (EASYENTRYPOINT("EICPDI01") .AND. EXECBLOCK("EICPDI01",.F.,.F.,"7")==.F.) .OR.;
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("EICDI154"), EXECBLOCK("EICDI154",.F.,.F.,"NFE_INICIO"),)
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"ADD_ESTRU_WORK1"),)
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"CRIA_INDICE"),)
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"DEDUCAO_FRETE"),)
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"DT_DESEMBARACO"),)
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"EXEC_554"),)
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"FIM_TELA1"),)
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"GRV_WORKNF"),)
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"INICIA_VARIAVEIS"),)
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"INICIA_VARIAVEIS_1"),)
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"OUTROS_INDICES"),)
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"TELA1"),)
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"VER_COMPLEMENTAR"),)
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"VER_NOTA_SF1"),)
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"WORK3"),)
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"WORK4"),)
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'WORK_BROWSES'),)
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("IC023PO1"),EXECBLOCK("IC023PO1",.F.,.F.,"WORK3"),)
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,"TELA1"),)
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,'OUTROS_INDICES'),)
EICDI154.PRW - DI154NFE() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,'WORK_BROWSES'),)
EICDI154.PRW - DI154NFFILHA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"WORK1_NFFILHA"),)
EICDI154.PRW - DI154PRTXT() -> IF(EASYENTRYPOINT("IC023PO1"),EXECBLOCK("IC023PO1",.F.,.F.,"GRVAS400"),)
EICDI154.PRW - DI154QUEBROU() -> IF (EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'QUEBROU_NF'),)
EICDI154.PRW - DI154QUEBROU() -> IF (EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'TEM_OUTRA_QUEBRA'),)
EICDI154.PRW - DI154QUEBROU() -> IF (EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,'QUEBROU_NF'),)
EICDI154.PRW - DI154QUEBROU() -> IF (EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,'TEM_OUTRA_QUEBRA'),)
EICDI154.PRW - DI154RATEIO() -> EXECBLOCK("EICDI154",.F.,.F.,"RATEIO_ACRESCIMOS")
EICDI154.PRW - DI154RATEIO() -> EXECBLOCK("EICDI154",.F.,.F.,"RATEIO_FRETE")
EICDI154.PRW - DI154RATEIO() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"ALTERA_CALC_IMPOSTOS"),)
EICDI154.PRW - DI154RATEIO() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"ALTERA_CALC_IMPOSTOS_2"),)
EICDI154.PRW - DI154RATEIO() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"ALT_CRIT_RAT_DSPICM"),)
EICDI154.PRW - DI154RATEIO() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"WHILE_SOMA_ACERTO"),)
EICDI154.PRW - DI154RATEIO() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"WHILE_WORK1_RATEIO"),)
EICDI154.PRW - DI154RATLOTE() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"GRV_WORK1"),)
EICDI154.PRW - DI154SOMATOTAIS() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"TOTAIS_1"),)
EICDI154.PRW - DI154SOMATOTAIS() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"TOTAIS_2"),)
EICDI154.PRW - DI154SOMATOTAIS() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"TOTAIS_3"),)
EICDI154.PRW - DI154TABDES() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"TAB_DESPESAS"),)
EICDI154.PRW - DI154TABDES() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,"TAB_DESPESAS"),)
EICDI154.PRW - DI154TAXAFOB() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"DI154TAXAS"),)
EICDI154.PRW - DI154VALID() -> EXECBLOCK("EICDI154",.F.,.F.,"VALID_NFE")
EICDI154.PRW - DI154WORK3GRV() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"GRVWORK3"),)
EICDI154.PRW - DI154WORK3GRV() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"GRVWORK_2"),)
EICDI154.PRW - DI154WORK3GRV() -> IF(EASYENTRYPOINT("IC023PO1"),EXECBLOCK("IC023PO1",.F.,.F.,"ACERTOWORK3"),)
EICDI154.PRW - DI154WORK3GRV() -> IF(EASYENTRYPOINT("IC023PO1"),EXECBLOCK("IC023PO1",.F.,.F.,"GRVWORK3"),)
EICDI154.PRW - DI154WORK3GRV() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,"GRVWORK3"),)
EICDI154.PRW - DI154_SWDVAL() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"DI154_SWDVAL"),)
EICDI154.PRW - DIGRAVAALT() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"GRV_MARCADOS"),)
EICDI154.PRW - DIMARCADOS() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"DESVIO_MSDIALOG"),)
EICDI154.PRW - DIMARCADOS() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"DLG_MARCADOS"),)
EICDI154.PRW - DIMOSTRATOTAIS() -> EXECBLOCK("EICDI154",.F.,.F.,'TELA_TOTAIS')
EICDI154.PRW - DIMOSTRATOTAIS() -> EXECBLOCK("ICPADDI0",.F.,.F.,'TELA_TOTAIS')
EICDI154.PRW - EICDI154() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"MBROWSE"),)
EICDI154.PRW - E_RESET_AREA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,'DELETAWORK'),)
EICDI154.PRW - E_RESET_AREA() -> IF(EASYENTRYPOINT("ICPADDI0"),EXECBLOCK("ICPADDI0",.F.,.F.,'DELETAWORK'),)
EICDI154.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IDI154MNU",.F.,.F.)
EICDI154.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("SUPORTE_TRADE",.F.,.F.,"GERA_TXT_NFE")
EICDI155.PRW - DI155CABREL() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"CAB_RELATORIO"),)
EICDI155.PRW - DI155CRIAARQ() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"APOS_GRV_WORK"),)
EICDI155.PRW - DI155DETREL() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"IMPRIMINDO_NOTA_FISCAL"),)
EICDI155.PRW - DI155NFE() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"TITULO"),)
EICDI155.PRW - ICPADFI3()() -> EXECBLOCK("EICDI155",.F.,.F.,NRELTIPO)
EICDI155.PRW - ICPADFI3()() -> EXECBLOCK("ICPADFI3",.F.,.F.,NRELTIPO)
EICDI155.PRW - ICUS_CABEC() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"COMPLEMENTO_NOTA"),)
EICDI155.PRW - ICUS_CUSITEM() -> IF(EASYENTRYPOINT("DI155COFINS"),EXECBLOCK("DI155COFINS",.F.,.F.,"TOTAIS 3"),)
EICDI155.PRW - ICUS_CUSITEM() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"IMPRIME_COLUNA"),)
EICDI155.PRW - ICUS_CUSITEM() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"IMPRIME_CUSTO_ITEM"),)
EICDI155.PRW - ICUS_CUSITEM() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"IMPRIME_DET_CUSTO_ITEM"),)
EICDI155.PRW - ICUS_CUSITEM() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"IMPRIME_TOTAL_ITEM"),)
EICDI155.PRW - ICUS_CUSITEM() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"QUEBRA_PAGINA_ITENS"),)
EICDI155.PRW - ICUS_CUSPO() -> IF(EASYENTRYPOINT("DI155COFINS"),EXECBLOCK("DI155COFINS",.F.,.F.,"TOTAIS 2"),)
EICDI155.PRW - ICUS_CUSPO() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"IMPRIME_COLUNA"),)
EICDI155.PRW - ICUS_CUSPO() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"IMPRIME_CUSTO_PO"),)
EICDI155.PRW - ICUS_CUSPO() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"IMPRIME_DET_CUSTO_PO"),)
EICDI155.PRW - ICUS_CUSPO() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"IMPRIME_TOTAL_PO"),)
EICDI155.PRW - ICUS_CUSTO() -> IF(EASYENTRYPOINT("DI155COFINS"),EXECBLOCK("DI155COFINS",.F.,.F.,"TOTAIS"),)
EICDI155.PRW - ICUS_DETDESP() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"IMPRIME_CABECALHO"),)
EICDI155.PRW - ICUS_DETDESP() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"IMPRIME_COLUNA"),)
EICDI155.PRW - ICUS_DETDESP() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"IMPRIME_DETALHE"),)
EICDI155.PRW - ICUS_DETDESP() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"TRATA_PRECO_FOB"),)
EICDI155.PRW - ICUS_DETPO() -> IF(EASYENTRYPOINT("DI155COFINS"),EXECBLOCK("DI155COFINS",.F.,.F.,"TOTAIS 4"),)
EICDI155.PRW - ICUS_DETPO() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"IMPRIME_DET_DETALHE_PO"),)
EICDI155.PRW - ICUS_IMPCAB() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"IMPRIME_COLUNA"),)
EICDI155.PRW - ICUS_IMPCAB() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"IMPRIME_DETALHE_PO"),)
EICDI155.PRW - ICUS_RESUMO() -> IF(EASYENTRYPOINT("DI155COFINS"),EXECBLOCK("DI155COFINS",.F.,.F.,"TOTAL_CC"),)
EICDI155.PRW - ICUS_RESUMO() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"IMPRIME_DET_RESUMO"),)
EICDI155.PRW - ICUS_RESUMO() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"IMPRIME_RESUMO"),)
EICDI155.PRW - MONTATRBA() -> IF(EASYENTRYPOINT("DI155COFINS"),EXECBLOCK("DI155COFINS",.F.,.F.,"6"),)
EICDI155.PRW - MONTATRBA() -> IF(EASYENTRYPOINT("DI155COFINS"),EXECBLOCK("DI155COFINS",.F.,.F.,"7"),)
EICDI155.PRW - MONTATRBA() -> IF(EASYENTRYPOINT("DI155COFINS"),EXECBLOCK("DI155COFINS",.F.,.F.,"8"),)
EICDI155.PRW - MONTATRBA() -> IF(EASYENTRYPOINT("EICDI155"),EXECBLOCK("EICDI155",.F.,.F.,"MONTA_TRB_A"),)
EICDI156.PRW - DI156ALTERA() -> EXECBLOCK('EICDI156',.F.,.F.,'ALTERA_IMPOSTOS')
EICDI156.PRW - DI156ALTERA() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,'ALTEROU_IMPOSTOS'),)
EICDI156.PRW - DI156CAPNF() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"GRAVACAO_SF1"),)
EICDI156.PRW - DI156CAPNF() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"GRAVA_SF1_EI1"),)
EICDI156.PRW - DI156CAPQUEBROU() -> IF (EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,'OUTRA_QUEBRA'),)
EICDI156.PRW - DI156COND() -> IF(EASYENTRYPOINT("EICDI156"),EXECBLOCK("EICDI156",.F.,.F.,"ALTERA_STATUS_1"),)
EICDI156.PRW - DI156COND() -> IF(EASYENTRYPOINT("EICDI156"),EXECBLOCK("EICDI156",.F.,.F.,"ALTERA_STATUS_2"),)
EICDI156.PRW - DI156CRIAWORK() -> EXECBLOCK("EICDI156",.F.,.F.,"CRIA_WORK")
EICDI156.PRW - DI156CRIAWORK() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,'ESTRUTURA_WORK'),)
EICDI156.PRW - DI156CRIAWORK() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,'INDICES_WORKS'),)
EICDI156.PRW - DI156DELET() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"ESTORNO_NA_NOTA"),)
EICDI156.PRW - DI156FINAL() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,'DELETAWORK'),)
EICDI156.PRW - DI156GERNF() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"ACUMULA_SD1_EI3"),)
EICDI156.PRW - DI156GERNF() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"FINAL_GRV_NF"),)
EICDI156.PRW - DI156GERNF() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"GRAVACAO_SWN"),)
EICDI156.PRW - DI156GERNF() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"GRAVA_CAPA_SW6"),)
EICDI156.PRW - DI156GERNF() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"GRAVA_CPO_DIGITADA_CLASSIFICACAO"),)
EICDI156.PRW - DI156GERNF() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"GRAVA_SD1_EI3"),)
EICDI156.PRW - DI156GERNF() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"GRAVA_SWN_EI2"),)
EICDI156.PRW - DI156GERNF() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"GRAVA_SWW"),)
EICDI156.PRW - DI156GERNF() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"GRVSD1_NF"),)
EICDI156.PRW - DI156GERNF() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"LEWORK1_GERNF"),)
EICDI156.PRW - DI156GERNF() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,'GET_NOTA'),)
EICDI156.PRW - DI156GERNF() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,'INICIAVAR2'),)
EICDI156.PRW - DI156GERNF() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,'INICIAVARIAVEL'),)
EICDI156.PRW - DI156GERNF() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,'QUEBRA_CUSTO'),)
EICDI156.PRW - DI156GRAVA() -> EXECBLOCK("EICDI156",.F.,.F.,"GRAVA_WORK1")
EICDI156.PRW - DI156GRAVA() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"BASE_SEGURO"),)
EICDI156.PRW - DI156GRAVA() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"FINALGRAVA1"),)
EICDI156.PRW - DI156GRAVA() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"FINALGRAVA2"),)
EICDI156.PRW - DI156GRAVA() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"FINALGRAVA3"),)
EICDI156.PRW - DI156GRAVA() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"GRVWORK_1"),)
EICDI156.PRW - DI156GRAVA() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"GRVWORK_2"),)
EICDI156.PRW - DI156GRVDESPESA() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"GRV_WORK4"),)
EICDI156.PRW - DI156GRVIMPOSTOS() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"GRV_IMP_SD1"),)
EICDI156.PRW - DI156GRVSD1() -> IF(EASYENTRYPOINT("EICDI156"),EXECBLOCK("EICDI156",.F.,.F.,'GRAVACAO_SD1'),)
EICDI156.PRW - DI156GRVWORK1() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"GRVWORK_1A"),)
EICDI156.PRW - DI156GRVWORK1() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"GRVWORK_4"),)
EICDI156.PRW - DI156GRVWORK1() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"PESONEW"),)
EICDI156.PRW - DI156GRWORKS() -> IF (EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,'LEREI2'),)
EICDI156.PRW - DI156GRWORKS() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"LE_BASE_SEGURO"),)
EICDI156.PRW - DI156GRWORKS() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,'LER_SF1_SWN'),)
EICDI156.PRW - DI156ITENS() -> IF (EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"BOTAO"),)
EICDI156.PRW - DI156LERGRVIMPOSTOS() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"LE_IMP_WORKTES"),)
EICDI156.PRW - DI156LERGRVIMPOSTOS() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"LE_WORKTES"),)
EICDI156.PRW - DI156MOSTRATOTAIS() -> EXECBLOCK('EICDI156',.F.,.F.,'TELA_TOTAIS')
EICDI156.PRW - DI156NFE() -> EXECBLOCK("EICDI156",.F.,.F.,"ALT_TAXA")
EICDI156.PRW - DI156NFE() -> EXECBLOCK("EICDI156",.F.,.F.,"TB_CAMPOS2")
EICDI156.PRW - DI156NFE() -> IF (EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,'ESTORNA'),)
EICDI156.PRW - DI156NFE() -> IF (EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,'TELA1'),)
EICDI156.PRW - DI156PESQUISA() -> EXECBLOCK("EICDI156",.F.,.F.,"SAY_GETS")
EICDI156.PRW - DI156PESQUISA() -> EXECBLOCK("EICDI156",.F.,.F.,"TELA_PESQ")
EICDI156.PRW - DI156QUEBROU() -> IF (EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,'TEM_OUTRA_QUEBRA'),)
EICDI156.PRW - DI156TABDES() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"TAB_DESPESAS"),)
EICDI156.PRW - DI156TIPONF() -> EXECBLOCK("EICDI156",.F.,.F.,"OPCOES")
EICDI156.PRW - DI156TOTAIS() -> EXECBLOCK('EICDI156',.F.,.F.,'TELA_TOTAIS')
EICDI156.PRW - DI156WORK3GRV() -> IF(EASYENTRYPOINT('EICDI156'),EXECBLOCK('EICDI156',.F.,.F.,"GRVWORK3"),)
EICDI158.PRW - DI158NFDGERA() -> IF(EASYENTRYPOINT("EICDI158"),EXECBLOCK("EICDI158",.F.,.F.,"DI158NFDGERA_ADDSF1"),)
EICDI158.PRW - DI158NFDGERA() -> IF(EASYENTRYPOINT("EICDI158"),EXECBLOCK("EICDI158",.F.,.F.,"DI158NFDGERA_ANFDCAPA"),)
EICDI158.PRW - DI158NFDGERA() -> IF(EASYENTRYPOINT("EICDI158"),EXECBLOCK("EICDI158",.F.,.F.,"DI158NFDGERA_ANFDITEM"),)
EICDI158.PRW - DI158NFDGERA() -> IF(EASYENTRYPOINT("EICDI158"),EXECBLOCK("EICDI158",.F.,.F.,"DI158NFDGERA_WHILESD1"),)
EICDI158.PRW - DI158NFDVAL() -> EXECBLOCK("EICDI158",.F.,.F.,"DI158_NFVAL_FIM")
EICDI160.PRW - EDI160RELATORIO() -> EXECBLOCK("IC195DI1",.F.,.F.,LINHA)
EICDI161.PRW - DI161EXECAUTO() -> IF(EASYENTRYPOINT("EICDI161"),EXECBLOCK("EICDI161",.F.,.F.,"DI161EXECAUTO"),)
EICDI410.PRW - DI410REL() -> IF(EASYENTRYPOINT("EICDI450"),EXECBLOCK("EICDI450",.F.,.F.),EICDI450())
EICDI410.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IDI410MNU",.F.,.F.)
EICDI410.PRW - VALDI410() -> LRET := IF(EASYENTRYPOINT("EICDI410"),EXECBLOCK("EICDI410",.F.,.F.,CPROGRAMA),DI410_DEVO('JD_DEVOLUC'))
EICDI410.PRW - VALDI410() -> LRET := IF(EASYENTRYPOINT("EICDI410"),EXECBLOCK("EICDI410",.F.,.F.,CPROGRAMA),DI410_DEVO('JD_DTPREVI'))
EICDI410.PRW - VALDI410() -> LRET := IF(EASYENTRYPOINT("EICDI410"),EXECBLOCK("EICDI410",.F.,.F.,CPROGRAMA),DI410_EXCHAVE())
EICDI410.PRW - VALDI410() -> LRET := IF(EASYENTRYPOINT("EICDI410"),EXECBLOCK("EICDI410",.F.,.F.,CPROGRAMA),DI410_SALDO()) .AND. POSITIVO()
EICDI410.PRW - VALDI410() -> LRET := PERTENCE("1234") .AND. IF(EASYENTRYPOINT("EICDI410"),EXECBLOCK("EICDI410",.F.,.F.,CPROGRAMA),DI410_VAL())
EICDI500.PRW - DI500ADICOES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ANT_GERA_ADICAO"),)
EICDI500.PRW - DI500ADICOES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"BROWSE_WORK_EIJ"),)
EICDI500.PRW - DI500ADICOES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"POS_GERA_ADICAO"),)
EICDI500.PRW - DI500ADISOMA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"SOMA_ADITOTAIS"),)
EICDI500.PRW - DI500ADITOTAIS() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DI500ADITOTAIS"),)
EICDI500.PRW - DI500ADITOTAIS() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"INICIA_VAL_ADITOTAIS"),)
EICDI500.PRW - DI500ALTERVALID() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ALTERVALID"),)
EICDI500.PRW - DI500ALTERVALID() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"INICIO_ALTERVALID"),)
EICDI500.PRW - DI500APLICAMOD() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"APLICAMOD"),)
EICDI500.PRW - DI500BASEICMSCALC() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"WHILE_CALC_IMPOSTOS_2"),)
EICDI500.PRW - DI500BROWSEEI() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"BROWSE_EI"),)
EICDI500.PRW - DI500BUSCA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"BUSCA_1"),)
EICDI500.PRW - DI500BUSCA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"BUSCA_2"),)
EICDI500.PRW - DI500CALCEIJ() -> EXECBLOCK("EICDI500",.F.,.F.,"RATEIO_ACRESCIMOS")
EICDI500.PRW - DI500CALCEIJ() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"WHILE_CALC_IMPOSTOS"),)
EICDI500.PRW - DI500CARREGAWORK() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRV_WORK_ITEM"),)
EICDI500.PRW - DI500CHQRY() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"LOOP_WORK_SW8_ADICAO"),)
EICDI500.PRW - DI500COMPLE() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ANTES_TROCA_TEXTO"),)
EICDI500.PRW - DI500COMPLE() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"COMPLEMENTO_1"),)
EICDI500.PRW - DI500COMPLE() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"COMPLEMENTO_2"),)
EICDI500.PRW - DI500COMPLE() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"COMPLEMENTO_3"),)
EICDI500.PRW - DI500COMPLE() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DEPOIS_TROCA_TEXTO"),)
EICDI500.PRW - DI500COMPLE() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"FOR_TROCA_TEXTO"),)
EICDI500.PRW - DI500COMPLE() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"SOMATORIA_TROCA_TEXTO"),)
EICDI500.PRW - DI500CONFERENCIA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ADD_BROWSE_CONF"),)
EICDI500.PRW - DI500CONFERENCIA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"BROWSE_CONFERENCIA"),)
EICDI500.PRW - DI500CRIAWORK() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ALT_INDICE"),)
EICDI500.PRW - DI500CRIAWORK() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"IND_ESTRU_EXTRA"),)
EICDI500.PRW - DI500CRIAWORK() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"STRU_WORKS"),)
EICDI500.PRW - DI500CUSTO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"VALIDA_OK"),)
EICDI500.PRW - DI500EIJITENS() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ANTES_MSDIALOG_ITENS_ADICAO"),)
EICDI500.PRW - DI500EIJMANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ANTES_TELA_EIJ"),)
EICDI500.PRW - DI500EIJMANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"MOD_ADICAO"),)
EICDI500.PRW - DI500EIVALID() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"VALID_ARQ_F3"),)
EICDI500.PRW - DI500EIVALID() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"VALID_LINHA_F3"),)
EICDI500.PRW - DI500EIVALID() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"VALID_TUDO_F3"),)
EICDI500.PRW - DI500FIL() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"FILTRO"),)
EICDI500.PRW - DI500FINAL() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DI500FINAL"),)
EICDI500.PRW - DI500GERAADICOES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ANT_CALCEIJ"),)
EICDI500.PRW - DI500GERAADICOES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"APOS_GERAR_ADICAO"),)
EICDI500.PRW - DI500GERAADICOES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"FIM_GERA_ADICOES"),)
EICDI500.PRW - DI500GERAADICOES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GERA_EIJ_QUEBRA"),)
EICDI500.PRW - DI500GERAADICOES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GERA_EIJ_RATEIO"),)
EICDI500.PRW - DI500GERAADICOES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_ADICAO_SW8"),)
EICDI500.PRW - DI500GERAADICOES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ZERA_CAMPOS_ADICAO"),)
EICDI500.PRW - DI500GETDESC() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ALTERA_DESCR_ITEM"),)
EICDI500.PRW - DI500GRVCAPA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ANTES_CONF_CAPA"),)
EICDI500.PRW - DI500GRVCAPA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ANT_GRAVA_CAPA"),)
EICDI500.PRW - DI500GRVCAPA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"POS_GRAVA_CAPA"),)
EICDI500.PRW - DI500GRVCPOVISUAL() -> EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_MEMOS")
EICDI500.PRW - DI500GRVEI() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_EII_SW6"),)
EICDI500.PRW - DI500GRVEI() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_EI_MODELO"),)
EICDI500.PRW - DI500GRVTRB() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_TRB"),)
EICDI500.PRW - DI500GRVW7W8W9() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRV_WORK_INVOICE"),)
EICDI500.PRW - DI500ICMSCALC() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,CORIGEM_2),)
EICDI500.PRW - DI500INICIACAPA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ANTES_INICIA_SW6_SW9"),)
EICDI500.PRW - DI500INICIACAPA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"INICIA_SW6_SW9"),)
EICDI500.PRW - DI500INVCARREGA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"INV_CARREGA_INI_VAL"),)
EICDI500.PRW - DI500INVCARREGA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"INV_CARREGA_SW8"),)
EICDI500.PRW - DI500INVCARREGA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"INV_CARREGA_SW9"),)
EICDI500.PRW - DI500INVCARREGA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"INV_SOMA_SW8_GRV_SW9"),)
EICDI500.PRW - DI500INVCONF() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"CONFERE_DESP_INV"),)
EICDI500.PRW - DI500INVCONF() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"WHILE_CONFERE_DESP_INV"),)
EICDI500.PRW - DI500INVMARCA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"MARCA_DESMARCA_ITEM_INVOICE"),)
EICDI500.PRW - DI500INVOICES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"BROWSE_WORK_SW9"),)
EICDI500.PRW - DI500INVOICES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"VALIDA_MANUT_INV"),)
EICDI500.PRW - DI500INVTOTAIS() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"RATEIA_DESC_INV"),)
EICDI500.PRW - DI500INVTOTAIS() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"RATEIA_DESP_INV"),)
EICDI500.PRW - DI500INVTOTAIS() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"SOMA_DESP_INV"),)
EICDI500.PRW - DI500INVVALID() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DESPREZA_INVOICE_EMISSAO"),)
EICDI500.PRW - DI500INVVALID() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"INVOICE_VALID_OK"),)
EICDI500.PRW - DI500INVVALID() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"INVVALID_CPOS_SW8_SW9"),)
EICDI500.PRW - DI500INVVALID() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"VALIDA_SW9_FORN"),)
EICDI500.PRW - DI500ITENS() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"AADD_BROWSE_ITEM"),)
EICDI500.PRW - DI500ITENS() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"BROWSE_SELECIONA"),)
EICDI500.PRW - DI500ITENS() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ENCHOICE_ITENS"),)
EICDI500.PRW - DI500MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ADD_TB_CAMPOS"),)
EICDI500.PRW - DI500MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ALTERA"),)
EICDI500.PRW - DI500MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ANTES_TELA"),)
EICDI500.PRW - DI500MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"CRIA_VAR_MEM"),)
EICDI500.PRW - DI500MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ESTORNO"),)
EICDI500.PRW - DI500MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ESTORNO_CAMPOS"),)
EICDI500.PRW - DI500MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ESTORNO_DEPOIS_GRVTRB"),)
EICDI500.PRW - DI500MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ESTORNO_INDICE_COLUNAS"),)
EICDI500.PRW - DI500MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"E_INITVAR"),)
EICDI500.PRW - DI500MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"FINAL_OPCAO"),)
EICDI500.PRW - DI500MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"INICIO_DI500MANUT"),)
EICDI500.PRW - DI500MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"INICIO_OPCAO"),)
EICDI500.PRW - DI500MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"VISUAL_CAMPOS"),)
EICDI500.PRW - DI500MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"VISUAL_DEPOIS_GRVTRB"),)
EICDI500.PRW - DI500MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"VISUAL_INDICE_COLUNAS"),)
EICDI500.PRW - DI500MARCAALL() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"2_DESMARCA_ALL_ITEM_SW7"),)
EICDI500.PRW - DI500MARCAALL() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DESMARCA_ALL_ITEM_SW7"),)
EICDI500.PRW - DI500MARCAALL() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"MARCA_ALL_ITEM_SW7"),)
EICDI500.PRW - DI500MARKITEM() -> IF (EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ALTERA_PESO"),)
EICDI500.PRW - DI500MARKITEM() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"2_DESMARCA_ITEM_SW7"),)
EICDI500.PRW - DI500MARKITEM() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DESMARCA_ITEM_SW7"),)
EICDI500.PRW - DI500MARKITEM() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRV_ALT_SW8"),)
EICDI500.PRW - DI500MARKITEM() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"MARCA_ITEM_COM_CAMBIO"),)
EICDI500.PRW - DI500MARKITEM() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"MARCA_ITEM_SW7"),)
EICDI500.PRW - DI500MARKITEM() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"SEL_ITEM"),)
EICDI500.PRW - DI500MARKITEM() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"TELA_MARCA_ITEM"),)
EICDI500.PRW - DI500PISCALC() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DI500PISCALC"),)
EICDI500.PRW - DI500POPLIVALID() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"VALID_OK_PEDIDO_PLI"),)
EICDI500.PRW - DI500POPLIVALID() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"VALID_PEDIDO_PLI"),)
EICDI500.PRW - DI500PROCGI() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"CARREGA_WORK"),)
EICDI500.PRW - DI500PROCGI() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"CARREGA_WORK_FINAL"),)
EICDI500.PRW - DI500PROCGI() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"SKIP_ITEM_SW5"),)
EICDI500.PRW - DI500PROG() -> EXECBLOCK("EICDI500",.F.,.F.,"VALIDA_ALT_EST")
EICDI500.PRW - DI500QTDEESTA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"QUANTIDADE_ESTATISTICA"),)
EICDI500.PRW - DI500SAIR() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DI500SAIR"),)
EICDI500.PRW - DI500SELECAO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"CARGA_PO_PLI"),)
EICDI500.PRW - DI500SELECAO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"TELA_SELECAO"),)
EICDI500.PRW - DI500SELPO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_MEMO_EM_VAR"),)
EICDI500.PRW - DI500SELPO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"SELPO_TELA"),)
EICDI500.PRW - DI500SOMATOTAIS() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"SOMA_TOTAIS_SW8"),)
EICDI500.PRW - DI500SOMATOTAIS() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"TOTAIS_1"),)
EICDI500.PRW - DI500SOMATOTAIS() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"TOTAIS_2"),)
EICDI500.PRW - DI500SOMATOTAIS() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"TOTAIS_3"),)
EICDI500.PRW - DI500SOMATOTAIS() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"TOTAIS_4"),)
EICDI500.PRW - DI500SOMATOTAIS() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"TOTAIS_5"),)
EICDI500.PRW - DI500SW8GET() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GET_ITEM_INVOICE"),)
EICDI500.PRW - DI500SW8GET() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_GET_ITEM_INVOICE"),)
EICDI500.PRW - DI500SW8GET() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"INICIA_GET_ITEM_INVOICE"),)
EICDI500.PRW - DI500SW8GET() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ITEM_GET_INVOICE"),)
EICDI500.PRW - DI500TELAEI() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"TELA_EI"),)
EICDI500.PRW - DI500TOTAIS() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"TELA_TOTAIS"),)
EICDI500.PRW - DI500W9MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ANTES_DELETA_INV"),)
EICDI500.PRW - DI500W9MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"APPEND_INVOICES"),)
EICDI500.PRW - DI500W9MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"BROWSE_WORK_SW8"),)
EICDI500.PRW - DI500W9MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DELETA_INVOICES"),)
EICDI500.PRW - DI500W9MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"FIM_W9MANUT"),)
EICDI500.PRW - DI500W9MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"MANUT_SW9"),)
EICDI500.PRW - DI500W9MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"MANUT_W9_INC"),)
EICDI500.PRW - DI500W9MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"SELECT_INVOICES"),)
EICDI500.PRW - DI500W9MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"SW9_NAOCARREGA"),)
EICDI500.PRW - DI500W9MANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"TELA_INVOICES"),)
EICDI500.PRW - DI500W9MANUT() -> LDELINVOICE := EXECBLOCK("IDI500INV",.F.,.F.,"PE_EXCLUSAO_INVOICE")
EICDI500.PRW - DI500WORKEIJ() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GERA_EIJ_CAPA"),)
EICDI500.PRW - DI500WORKEIJ() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GERA_EIJ_ITEM"),)
EICDI500.PRW - DI500WORKSW8() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_WORK_SW8"),)
EICDI500.PRW - DI500WORKSW8() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"SKIP_ITEM_SW8"),)
EICDI500.PRW - DI500_GRAVA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ANTES_CONF_GRAVA"),)
EICDI500.PRW - DI500_GRAVA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ANT_GRAVA_TUDO"),)
EICDI500.PRW - DI500_GRAVA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"CTRL_DI"),)
EICDI500.PRW - DI500_GRAVA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_TUDO"),)
EICDI500.PRW - DI500_GRAVA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"POS_GRAVA_TUDO"),)
EICDI500.PRW - DI_VALID() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ANT_VALID_SW6"),)
EICDI500.PRW - DI_VALID() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DEPOIS_VALID_SW6"),)
EICDI500.PRW - DI_VALID() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"VALIDACAO_TAXA"),)
EICDI500.PRW - DI_VAL_EIJ() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ANT_VALID_EIJ"),)
EICDI500.PRW - DI_VAL_EIJ() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DEPOIS_VALID_EIJ"),)
EICDI500.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IDI500MNU",.F.,.F.,)
EICDI500.PRW - MENUDEF() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"AROTINA"),)
EICDI500.PRW - VALIDCAMBIO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"RET_VALID_CAMB"),)
EICDI500.PRW - VALIDCOURRIER() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"VALID_COURIER"),)
EICDI501.PRW - DI501ACERTASW9() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ALTERA_SW9"),)
EICDI501.PRW - DI501ACERTASW9() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DELETA_SW9_A"),)
EICDI501.PRW - DI501ACERTASW9() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"WHILE_ACERTO_INVOICE"),)
EICDI501.PRW - DI501AEMB() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ALTERA_AEMBARQUE"),)
EICDI501.PRW - DI501ATUDI() -> IF(EASYENTRYPOINT("EICDI501"),EXECBLOCK("EICDI501",.F.,.F.,"501VALDI"),)
EICDI501.PRW - DI501CONDREL() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"COND_REL"),)
EICDI501.PRW - DI501DESPES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ANTES_TELA_DESP"),)
EICDI501.PRW - DI501DESPES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"CAMPOS_WD"),)
EICDI501.PRW - DI501DESPES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"CONFIRMA"),)
EICDI501.PRW - DI501DESPES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DESPESA"),)
EICDI501.PRW - DI501DESPES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"MANUT_DESP"),)
EICDI501.PRW - DI501DESPES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"TELA_DESP"),)
EICDI501.PRW - DI501DESPES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,IF(NOPCAO == 0, "CANCELA_DESPESA", "CONFIRMA_DESPESA")),)
EICDI501.PRW - DI501DESPMANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DESP_ALTERA1"),)
EICDI501.PRW - DI501DESPMANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DESP_EXCLUI1"),)
EICDI501.PRW - DI501D_DEL() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DEL_DESP"),)
EICDI501.PRW - DI501D_DEL() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DES_EXCLUI2"),)
EICDI501.PRW - DI501D_DEL() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"VALOR_NEGATIVO"),)
EICDI501.PRW - DI501D_EDI() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ANTES_TELA_DESP_MANUT"),)
EICDI501.PRW - DI501D_EDI() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DESPESA_OK"),)
EICDI501.PRW - DI501D_EDI() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DESP_ALTERA2"),)
EICDI501.PRW - DI501D_EDI() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"VALOR_NEGATIVO"),)
EICDI501.PRW - DI501D_TELA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"INICIA_VAR_SOMA_TRB_DESP"),)
EICDI501.PRW - DI501D_TELA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"SOMANDO_TOTAIS"),)
EICDI501.PRW - DI501D_TELA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"TELA_TOTAIS_DESP"),)
EICDI501.PRW - DI501D_TELA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"WHILE_SOMA_TRB_DESP"),)
EICDI501.PRW - DI501EIGRAVA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_EI"),)
EICDI501.PRW - DI501EIGRAVA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"INICIO_EIGRAVA"),)
EICDI501.PRW - DI501ENVSIS() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ADICBUTTON"),)
EICDI501.PRW - DI501ESTORNO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"CORR_SEEK_SW9_01"),)
EICDI501.PRW - DI501ESTORNO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ESTORNA_SYS_A"),)
EICDI501.PRW - DI501ESTORNO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"EXEC_ESTORNO_A"),)
EICDI501.PRW - DI501ESTORNO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"EXEC_ESTORNO_B"),)
EICDI501.PRW - DI501ESTORNO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"EXEC_ESTORNO_C"),)
EICDI501.PRW - DI501ESTORNO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"EXEC_ESTORNO_D"),)
EICDI501.PRW - DI501ESTORNO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"EXEC_ESTORNO_E"),)
EICDI501.PRW - DI501ESTORNO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"EXEC_ESTORNO_F"),)
EICDI501.PRW - DI501ESTORNO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"EXEC_ESTORNO_G"),)
EICDI501.PRW - DI501ESTORNO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"EXEC_ESTORNO_H"),)
EICDI501.PRW - DI501GERNF() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"CAMBIO_AUTOMATICO"),)
EICDI501.PRW - DI501GERNF() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"FIM_GRAVA_CAPA"),)
EICDI501.PRW - DI501GERNF() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_FOB"),)
EICDI501.PRW - DI501GRAVATUDO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DELETA_SW3_SW5"),)
EICDI501.PRW - DI501GRAVATUDO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_ALTERA_SW7"),)
EICDI501.PRW - DI501GRAVATUDO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_ANTES_LOOP_FLAG"),)
EICDI501.PRW - DI501GRAVATUDO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_ANTES_SW6"),)
EICDI501.PRW - DI501GRAVATUDO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_DEPOIS_SW6"),)
EICDI501.PRW - DI501GRAVATUDO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_FINAL"),)
EICDI501.PRW - DI501GRAVATUDO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_INCLUI_SW5"),)
EICDI501.PRW - DI501GRAVATUDO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_INCLUI_SW7"),)
EICDI501.PRW - DI501GRAVATUDO() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"RATEIO_DESPESA_ENTREPOSTO"),)
EICDI501.PRW - DI501GRVINVOICE() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DELETA_SW8"),)
EICDI501.PRW - DI501GRVINVOICE() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DELETA_SW9"),)
EICDI501.PRW - DI501GRVINVOICE() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ESTORNA_SYS_B"),)
EICDI501.PRW - DI501GRVINVOICE() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"FIM_DELETA_SW8"),)
EICDI501.PRW - DI501GRVINVOICE() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_SW8_A"),)
EICDI501.PRW - DI501GRVINVOICE() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_SW9_A"),)
EICDI501.PRW - DI501GRVINVOICE() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRAVA_SW9_B"),)
EICDI501.PRW - DI501NVE() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"COLUNAS_BOTOES_NVES"),)
EICDI501.PRW - DI501NVE() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"WHILE_SW8_NVES"),)
EICDI501.PRW - DI501RATFRETE() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"RATEIO_SEGURO"),)
EICDI501.PRW - DI501RELDESP() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DELETA_IND"),)
EICDI501.PRW - DI501RELDESP() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"INCACAMPOS"),)
EICDI501.PRW - DI501RELDESP() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"WOR_ESTR1"),)
EICDI501.PRW - DI501RELDESP() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"WOR_GRAV1"),)
EICDI501.PRW - DI501RELDESP() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"WOR_INDICE"),)
EICDI501.PRW - DI501RETVAL() -> EXECBLOCK("EICDI500",.F.,.F.,"FIM_DI500RETVAL")
EICDI501.PRW - DI501RETVAL() -> EXECBLOCK("EICDI500",.F.,.F.,"INI_DI500RETVAL")
EICDI501.PRW - DI501SW7DEL() -> EXECBLOCK("EICDI500",.F.,.F.,"DESVIA_DELET")
EICDI501.PRW - DI501SW7DEL() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ESTORNO_ANTES"),)
EICDI501.PRW - DI501SW7DEL() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ESTORNO_DEPOIS"),)
EICDI501.PRW - DI501SW7DEL() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ESTORNO_ITEM"),)
EICDI501.PRW - DI501SW7DEL() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ESTORNO_MEIO"),)
EICDI501.PRW - DI501SW7DEL() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"RATEIO_ESTORNO_PARCIAL"),)
EICDI501.PRW - DI501SW8DEL() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DELETA_SW8DEL"),)
EICDI501.PRW - DI501TAXA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ALTERA_SW9_A"),)
EICDI501.PRW - DI501TAXA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DEPOIS_GET_DATA"),)
EICDI501.PRW - DI501VALGERTXT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"VALIDAPRCARGA"),)
EICDI501.PRW - DI501VALGERTXT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"VALID_EIJ_ENVIO_SISC"),)
EICDI501.PRW - DI501VALGERTXT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"VALID_SW6_ENVIO_SISC"),)
EICDI501.PRW - DI501VALGERTXT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"VALID_SW8_ENVIO_SISC"),)
EICDI505.PRW - DI500ABREWORK() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ALT_STRU_DSI"),)
EICDI505.PRW - DI500DSIMANUT() -> EXECBLOCK("EICDI505",.F.,.F.,"ALT_PIS_COF_ESPEC")
EICDI505.PRW - DI500DSIMANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"BROWSE_WORK_DSI"),)
EICDI505.PRW - DI500DSIMANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"SELECT_DSI"),)
EICDI505.PRW - DI500DSIMANUT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"TELA_DSI"),)
EICDI505.PRW - DI500D_ORIFIN() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ALTERA_WHEN"),)
EICDI505.PRW - DI500GERATXT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DEPOIS_CALC_PESO_TOTAL"),)
EICDI505.PRW - DI500GERATXT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ENVIO_COMPLE"),)
EICDI505.PRW - DI500GERATXT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GERATXT_10_PC"),)
EICDI505.PRW - DI500GERATXT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GERATXT_MERCODI_ALT"),)
EICDI505.PRW - DI500GERATXT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GERATXT_REG10_01"),)
EICDI505.PRW - DI500GERATXT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GERATXT_REG10_02"),)
EICDI505.PRW - DI500GERATXT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GERA_NOME_SISC"),)
EICDI505.PRW - DI500GERATXT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"INF_GERAIS_DI_SISCOMEX"),)
EICDI505.PRW - DI500GERATXT() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"WHILESW8_TIPO_19"),)
EICDI505.PRW - DI500GETQTDE() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"TELA_GET_QTDE"),)
EICDI505.PRW - DI500GRVDESP() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ALTERA_DESP"),)
EICDI505.PRW - DI500GRVDESP() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DELETA_DESP"),)
EICDI505.PRW - DI500GRVDESP() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"INCLUI_DESP"),)
EICDI505.PRW - DI500GRVDSI() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DSI_BENS_PC"),)
EICDI505.PRW - DI500GRVDSI() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRV_SW8_DSI"),)
EICDI505.PRW - DI500GRVLOTE() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DI500GRVLOTE_ATU_WORKSWV"),)
EICDI505.PRW - DI500IMPREL() -> EXECBLOCK("EICDI505",.F.,.F.,"ALT_MEMO")
EICDI505.PRW - DI500IMPREL() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ANTES_INFO_COMPL"),)
EICDI505.PRW - DI500IMPREL() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"FINAL_IMPR_ADI"),)
EICDI505.PRW - DI500IMPREL() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"IMP_COMPLE"),)
EICDI505.PRW - DI500IMPREL() -> IF(EASYENTRYPOINT("EICDI505"),EXECBLOCK("EICDI505",.F.,.F.,"UN_MEDIDA_COMERCIALIZADA"),)
EICDI505.PRW - DI500IMPREL() -> IF(EASYENTRYPOINT("EICDI505"),EXECBLOCK("EICDI505",.F.,.F.,{"IMPRESSAO_ITEM_ADICAO",@NLIN,AITEMADI,I}),)
EICDI505.PRW - DI500LOTES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"COLUNAS_BOTOES_LOTES"),)
EICDI505.PRW - DI500LOTES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DI500LOTES_ALT_CPOSENC"),)
EICDI505.PRW - DI500LOTEVAL() -> EXECBLOCK("EICDI500",.F.,.F.,"DI500LOTEVAL_VALLOTE")
EICDI505.PRW - DI500MARKREG() -> IF ! LEXECBLOCK
EICDI505.PRW - DI500MARKREG() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"TELAREGIME"),)
EICDI505.PRW - DI500MARKREG() -> LEXECBLOCK:=.T.
EICDI505.PRW - DI500REGPESQ() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"AADD_ACAMPOS_SW8"),)
EICDI505.PRW - DI500REGPESQ() -> PRIVATE LEXECBLOCK := .T.
EICDI505.PRW - DI500SIMPLES() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"BROWSE_TELA_DSI"),)
EICDI505.PRW - DI500SW8TWVGRV() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"DI500SW8TWVGRV_GRV_WORKTWV"),)
EICDI505.PRW - DI500VALDESP() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"ALTERA_GATILHO"),)
EICDI505.PRW - MONTACAPA() -> EXECBLOCK("EICDI500",.F.,.F.,"INTSIS_MONTACAPA_PAS")
EICDI505.PRW - MONTAITENS() -> EXECBLOCK("EICDI505",.F.,.F.,"INTSIS_MONTAITENS_PAS")
EICDI505.PRW - VALNEGATIVO () -> IF(EASYENTRYPOINT("EICDI505"),EXECBLOCK("EICDI505",.F.,.F.,"VAL_NEGATIVO"),)
EICDI554.PRW - DI554CAPNF() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"ANTES_GRV_SF1"),)
EICDI554.PRW - DI554CAPNF() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"GRAVACAO_SF1"),)
EICDI554.PRW - DI554CAPNF() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"GRAVA_SF1_EI1"),)
EICDI554.PRW - DI554CAPNF() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"GRV_EI1"),)
EICDI554.PRW - DI554CAPNF() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"GRV_SF1"),)
EICDI554.PRW - DI554CAPQUEBROU() -> IF (EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,'OUTRA_QUEBRA'),)
EICDI554.PRW - DI554ESTORNA() -> IF !EXECBLOCK("EICPDI01",.F.,.F.,"ESTORNO NA NOTA")
EICDI554.PRW - DI554ESTORNA() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,'ANTES_ESTORNO_NOTA'),)
EICDI554.PRW - DI554ESTORNA() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,'ESTORNO NA NOTA'),)
EICDI554.PRW - DI554GERACUSTO() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"FINALGRAVA"),)
EICDI554.PRW - DI554GERACUSTO() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"GRVWORK3"),)
EICDI554.PRW - DI554GERACUSTO() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"GRVWORK_1A"),)
EICDI554.PRW - DI554GERACUSTO() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"GRVWORK_2"),)
EICDI554.PRW - DI554GERACUSTO() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"GRVWORK_4"),)
EICDI554.PRW - DI554GERACUSTO() -> IF(EASYENTRYPOINT("IC023PO1"),EXECBLOCK("IC023PO1",.F.,.F.,"GRVWORK3"),)
EICDI554.PRW - DI554GERNF() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"ACUMULA_SD1_EI3"),)
EICDI554.PRW - DI554GERNF() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"ANTES_GRAVA_SWN"),)
EICDI554.PRW - DI554GERNF() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"GRAVA_SD1_EI3"),)
EICDI554.PRW - DI554GERNF() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"GRAVA_SWD"),)
EICDI554.PRW - DI554GERNF() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"GRAVA_SWN_EI2"),)
EICDI554.PRW - DI554GERNF() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"GRAVA_SWW"),)
EICDI554.PRW - DI554GERNF() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,'FINAL_GRAVA_NOTA'),)
EICDI554.PRW - DI554GERNF() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,'GRAVAR'),)
EICDI554.PRW - DI554GERNF() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,'GRAVA_WN'),)
EICDI554.PRW - DI554GERNF() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,'INICIAVAR2'),)
EICDI554.PRW - DI554GERNF() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,'INICIAVARIAVEL'),)
EICDI554.PRW - DI554GERNF() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,'NOVO_NUMERO_NF'),)
EICDI554.PRW - DI554GERNF() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,'QUEBRA_CUSTO'),)
EICDI554.PRW - DI554GRAVA() -> IF (EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"GRVWORK_1"),)
EICDI554.PRW - DI554GRAVA() -> IF (EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"GRVWORK_2"),)
EICDI554.PRW - DI554GRAVA() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"ACERTA_SEEK3"),)
EICDI554.PRW - DI554GRAVA() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"FINALGRAVA"),)
EICDI554.PRW - DI554GRAVA() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"GRVWORK3"),)
EICDI554.PRW - DI554GRAVA() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"GRVWORK_1A"),)
EICDI554.PRW - DI554GRAVA() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"GRVWORK_4"),)
EICDI554.PRW - DI554GRAVA() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"PESONEW"),)
EICDI554.PRW - DI554GRVDESPESA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"ANTES_GRAVA_WOKR4"),)
EICDI554.PRW - DI554GRVDESPESA() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"GRAVA_WOKR4"),)
EICDI554.PRW - DI554GRVSD1() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"ANTES_GRAVA_SD1"),)
EICDI554.PRW - DI554GRVSD1() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,'GRAVACAO_SD1'),)
EICDI554.PRW - DI554GRWORKS() -> IF (EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,'LEREI2'),)
EICDI554.PRW - DI554GRWORKS() -> IF (EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,'LER_SF1_SWN'),)
EICDI554.PRW - DI554ITENS() -> EXECBLOCK("ICPADDI0",.F.,.F.,"BOTAO")
EICDI554.PRW - DI554ITENS() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"BOTAO"),)
EICDI554.PRW - DI554NFE() -> IF (EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"TELA1"),)
EICDI554.PRW - DI554NFE() -> IF (EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,'OUTROS_INDICES'),)
EICDI554.PRW - DI554NFE() -> IF(EASYENTRYPOINT("EICDI154"),EXECBLOCK("EICDI154",.F.,.F.,"DT_DESEMBARACO"),)
EICDI554.PRW - DI554NFE() -> IF(EASYENTRYPOINT("EICDI554"), EXECBLOCK("EICDI554",.F.,.F.,"NFE_INICIO"),)
EICDI554.PRW - DI554NFE() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"INICIA_VARIAVEIS"),)
EICDI554.PRW - DI554NFE() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"VALIDA_PROCESSO"),)
EICDI554.PRW - DI554NFE() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"WORK4"),)
EICDI554.PRW - DI554NFE() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,'DEPOIS_ESTORNO_NOTA'),)
EICDI554.PRW - DI554NFE() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,'WORK_BROWSES'),)
EICDI554.PRW - DI554QUEBROU() -> IF (EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,'TEM_OUTRA_QUEBRA'),)
EICDI554.PRW - DI554SOMATOTAIS() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"ACERTA_SEEK1"),)
EICDI554.PRW - DI554SOMATOTAIS() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"TOTAIS_1"),)
EICDI554.PRW - DI554SOMATOTAIS() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"TOTAIS_2"),)
EICDI554.PRW - DI554SOMATOTAIS() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"TOTAIS_3"),)
EICDI554.PRW - DI554TABDES() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,"TAB_DESPESAS"),)
EICDI554.PRW - DIMOSTRATOTAIS() -> EXECBLOCK("EICDI554",.F.,.F.,'TELA_TOTAIS')
EICDI554.PRW - E_RESET_AREA() -> IF(EASYENTRYPOINT("EICDI554"),EXECBLOCK("EICDI554",.F.,.F.,'DELETAWORK'),)
EICDI554.PRW - VALESTORNO() -> EXECBLOCK("EICDI554", .F., .F., "VALIDA_ESTORNO")
EICDI600.PRW - DI600ACERTASW9() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"DELETA_SW9_A"),)
EICDI600.PRW - DI600AEMB() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"ALTERA_AEMBARQUE"),)
EICDI600.PRW - DI600BROWSEEI() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"BROWSE_EI"),)
EICDI600.PRW - DI600CARREGAWORK() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"GRV_WORK_ITEM"),)
EICDI600.PRW - DI600COMPLE() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"ANTES_TROCA_TEXTO"),)
EICDI600.PRW - DI600COMPLE() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"DEPOIS_TROCA_TEXTO"),)
EICDI600.PRW - DI600CONFERENCIA() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"BROWSE_CONFERENCIA"),)
EICDI600.PRW - DI600CRIAWORK() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"IND_ESTRU_EXTRA"),)
EICDI600.PRW - DI600CRIAWORK() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"STRU_WORKS"),)
EICDI600.PRW - DI600DESP2() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"CAMPOS_WD"),)
EICDI600.PRW - DI600DESP2() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"DESPESA"),)
EICDI600.PRW - DI600DESP2() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"MANUT_DESP"),)
EICDI600.PRW - DI600DESP3() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"TELA"),)
EICDI600.PRW - DI600DESPES() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"CAMPOS_WD"),)
EICDI600.PRW - DI600DESPES() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"CONFIRMA"),)
EICDI600.PRW - DI600DESPES() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"DESPESA"),)
EICDI600.PRW - DI600DESPES() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"MANUT_DESP"),)
EICDI600.PRW - DI600DESPES() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,IF(NOPCAO == 0, "CANCELA_DESPESA", "CONFIRMA_DESPESA")),)
EICDI600.PRW - DI600DESPMANUT() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"DESP_ALTERA1"),)
EICDI600.PRW - DI600DESPMANUT() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"DESP_EXCLUI1"),)
EICDI600.PRW - DI600D_DEL() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"DES_EXCLUI2"),)
EICDI600.PRW - DI600D_EDI() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"DESP_ALTERA2"),)
EICDI600.PRW - DI600EIGRAVA() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"GRAVA_EI"),)
EICDI600.PRW - DI600ESTORNO() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"EXEC_ESTORNO_A"),)
EICDI600.PRW - DI600ESTORNO() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"EXEC_ESTORNO_B"),)
EICDI600.PRW - DI600ESTORNO() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"EXEC_ESTORNO_C"),)
EICDI600.PRW - DI600ESTORNO() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"EXEC_ESTORNO_D"),)
EICDI600.PRW - DI600ESTORNO() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"EXEC_ESTORNO_E"),)
EICDI600.PRW - DI600ESTORNO() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"EXEC_ESTORNO_F"),)
EICDI600.PRW - DI600FIL() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"FILTRO"),)
EICDI600.PRW - DI600FINAL() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"DI600FINAL"),)
EICDI600.PRW - DI600GETDESC() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"ALTERA_DESCR_ITEM"),)
EICDI600.PRW - DI600GRAVATUDO() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"GRAVA_ALTERA_SW7"),)
EICDI600.PRW - DI600GRAVATUDO() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"GRAVA_ANTES_LOOP_FLAG"),)
EICDI600.PRW - DI600GRAVATUDO() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"GRAVA_ANTES_SW6"),)
EICDI600.PRW - DI600GRAVATUDO() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"GRAVA_DEPOIS_SW6"),)
EICDI600.PRW - DI600GRAVATUDO() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"GRAVA_FINAL"),)
EICDI600.PRW - DI600GRAVATUDO() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"GRAVA_INCLUI_SW5"),)
EICDI600.PRW - DI600GRAVATUDO() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"GRAVA_INCLUI_SW7"),)
EICDI600.PRW - DI600GRVCAPA() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"ANTES_CONF_CAPA"),)
EICDI600.PRW - DI600GRVCAPA() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"ANT_GRAVA_CAPA"),)
EICDI600.PRW - DI600GRVCAPA() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"POS_GRAVA_CAPA"),)
EICDI600.PRW - DI600GRVCPOVISUAL() -> EXECBLOCK("EICDI600",.F.,.F.,"GRAVA_MEMOS")
EICDI600.PRW - DI600GRVINVOICE() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"DELETA_SW8"),)
EICDI600.PRW - DI600GRVINVOICE() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"DELETA_SW9"),)
EICDI600.PRW - DI600GRVINVOICE() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"FIM_DELETA_SW8"),)
EICDI600.PRW - DI600GRVINVOICE() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"GRAVA_SW8_A"),)
EICDI600.PRW - DI600GRVINVOICE() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"GRAVA_SW9_A"),)
EICDI600.PRW - DI600GRVSW6() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"FIM_GRAVA_CAPA"),)
EICDI600.PRW - DI600GRVTRB() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"GRAVA_TRB"),)
EICDI600.PRW - DI600INVOICES() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"BROWSE_WORK_SW9"),)
EICDI600.PRW - DI600INVTOTAIS() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"RATEIA_DESP_INV"),)
EICDI600.PRW - DI600INVTOTAIS() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"SOMA_DESP_INV"),)
EICDI600.PRW - DI600ITENS() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"BROWSE_SELECIONA"),)
EICDI600.PRW - DI600LOTES() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"COLUNAS_BOTOES_LOTES"),)
EICDI600.PRW - DI600MANUT() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"ALTERA"),)
EICDI600.PRW - DI600MANUT() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"ANTES_TELA"),)
EICDI600.PRW - DI600MANUT() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"ESTORNO"),)
EICDI600.PRW - DI600MANUT() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"ESTORNO_CAMPOS"),)
EICDI600.PRW - DI600MANUT() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"ESTORNO_INDICE_COLUNAS"),)
EICDI600.PRW - DI600MANUT() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"E_INITVAR"),)
EICDI600.PRW - DI600MANUT() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"FINAL_OPCAO"),)
EICDI600.PRW - DI600MANUT() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"INICIO_OPCAO"),)
EICDI600.PRW - DI600MANUT() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"VISUAL_CAMPOS"),)
EICDI600.PRW - DI600MANUT() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"VISUAL_INDICE_COLUNAS"),)
EICDI600.PRW - DI600MARCAALL() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"DESMARCA_ALL_ITEM_SW7"),)
EICDI600.PRW - DI600MARCAALL() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"MARCA_ALL_ITEM_SW7"),)
EICDI600.PRW - DI600MARKITEM() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"DESMARCA_ITEM_SW7"),)
EICDI600.PRW - DI600MARKITEM() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"GRV_ALT_SW8"),)
EICDI600.PRW - DI600MARKITEM() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"MARCA_ITEM_COM_CAMBIO"),)
EICDI600.PRW - DI600MARKITEM() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"MARCA_ITEM_SW7"),)
EICDI600.PRW - DI600MARKITEM() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"TELA_GET_ITEM"),)
EICDI600.PRW - DI600MARKITEM() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"TELA_MARCA_ITEM"),)
EICDI600.PRW - DI600POPLIVALID() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"VALID_OK_PEDIDO_PLI"),)
EICDI600.PRW - DI600POPLIVALID() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"VALID_PEDIDO_PLI"),)
EICDI600.PRW - DI600PROCGI() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"CARREGA_WORK"),)
EICDI600.PRW - DI600PROCGI() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"SKIP_ITEM_SW5"),)
EICDI600.PRW - DI600RELDESP() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"INCACAMPOS"),)
EICDI600.PRW - DI600RELDESP() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"WOR_ESTR1"),)
EICDI600.PRW - DI600RELDESP() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"WOR_GRAV1"),)
EICDI600.PRW - DI600SELECAO() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"TELA_SELECAO"),)
EICDI600.PRW - DI600SOMATOTAIS() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"TOTAIS_1"),)
EICDI600.PRW - DI600SOMATOTAIS() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"TOTAIS_2"),)
EICDI600.PRW - DI600SOMATOTAIS() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"TOTAIS_3"),)
EICDI600.PRW - DI600SOMATOTAIS() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"TOTAIS_4"),)
EICDI600.PRW - DI600SW7DEL() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"ESTORNO_ANTES"),)
EICDI600.PRW - DI600SW7DEL() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"ESTORNO_DEPOIS"),)
EICDI600.PRW - DI600SW7DEL() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"ESTORNO_ITEM"),)
EICDI600.PRW - DI600SW7DEL() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"ESTORNO_MEIO"),)
EICDI600.PRW - DI600SW8DEL() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"DELETA_SW8DEL"),)
EICDI600.PRW - DI600TAXA() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"ALTERA_SW9_A"),)
EICDI600.PRW - DI600VALID() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"ANT_DI_VALID"),)
EICDI600.PRW - DI600VALID() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"DEPOIS_DI_VALID"),)
EICDI600.PRW - DI600W9MANUT() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"BROWSE_WORK_SW8"),)
EICDI600.PRW - DI600W9MANUT() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"SELECT_INVOICES"),)
EICDI600.PRW - DI600W9MANUT() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"TELA_INVOICES"),)
EICDI600.PRW - DI600WORKSW8() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"SKIP_ITEM_SW8"),)
EICDI600.PRW - DI600_GRAVA() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"CTRL_DI"),)
EICDI600.PRW - DI600_GRAVA() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"ANT_GRAVA_TUDO"),)
EICDI600.PRW - DI600_GRAVA() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"GRAVA_TUDO"),)
EICDI600.PRW - DI600_GRAVA() -> IF(EASYENTRYPOINT("EICDI600"),EXECBLOCK("EICDI600",.F.,.F.,"POS_GRAVA_TUDO"),)
EICDUPL.PRW - CONTABEIC() -> EXECBLOCK("EICDUPL",.F.,.F.,"CONTAB_DETAIL")
EICDUPL.PRW - CONTABEIC() -> IF(EASYENTRYPOINT("EICDUPL"),EXECBLOCK("EICDUPL",.F.,.F.,"CONTAB_FOOTER"),)
EICDUPL.PRW - DELETASE2() -> EXECBLOCK("CHQGFIN",.F.,.F.,2)
EICDUPL.PRW - GERADUPEIC() -> EXECBLOCK("CHQGFIN",.F.,.F.,1)
EICDUPL.PRW - GERADUPEIC() -> EXECBLOCK("EICDUPL", .F., .F., {"GERADUPEIC",CNUM,NVALDUP,DEMISSAO,DDATAVENC,CSIMBMOEDA,CPREFIXO,CTIPO,NPARCELA,CFORNECE,CLOJA,CORIGEM,CHISTOR,NTAXA,LSWD,CHAWB,CPONUM})
EICDUPL.PRW - GERADUPEIC() -> IF(EASYENTRYPOINT("EICDUPL"),EXECBLOCK("EICDUPL",.F.,.F.,"GRAVA_SE2_1"),)
EICDUPL.PRW - GERADUPEIC() -> IF(EASYENTRYPOINT("EICDUPL"),EXECBLOCK("EICDUPL",.F.,.F.,"GRAVA_SE2_2"),)
EICEI100.PRW - ENVIAREMAIL() -> EXECBLOCK("EICEI100",.F.,.F.,"ENVIAREMAIL")
EICEI100.PRW - ENVIAREMAIL() -> IF(EASYENTRYPOINT("EICEI100"),EXECBLOCK("EICEI100",.F.,.F.,"ADICIONA_ASSUNTO"),)
EICEV100.PRW - EICEV100() -> EXECBLOCK("EICEV100",.F.,.F.,"AJUSTA_BROWSE")
EICEV100.PRW - EV100APPEND() -> IF(EASYENTRYPOINT("EICEV100"),EXECBLOCK("EICEV100",.F.,.F.,"ALTERA_WORK"),)
EICEV100.PRW - EV100GRAVA() -> EXECBLOCK("EICEV100",.F.,.F.,"DEPOIS_GRAVA_EW5")
EICEV100.PRW - EV100GRVEW5() -> EXECBLOCK("EICEV100",.F.,.F.,"ANTES_GRAVA_EW5")
EICEV100.PRW - EV100GRVWORK() -> IF(EASYENTRYPOINT("EICEV100"),EXECBLOCK("EICEV100",.F.,.F.,"GRVWORK"),)
EICEV100.PRW - EV100MANUT() -> EXECBLOCK("EICEV100",.F.,.F.,"ANTES_GRAVA_EW4")
EICEV100.PRW - EV100MANUT() -> EXECBLOCK("EICEV100",.F.,.F.,"DEPOIS_GRAVA_EW4")
EICEV100.PRW - EV100VALID() -> EXECBLOCK("EICEV100",.F.,.F.,"VALIDA_CAMPOS")
EICEV100.PRW - MENUDEF() -> EXECBLOCK("EICSI400",.F.,.F.,"AROTINA")
EICFI400.PRW - EICFI400() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"ANTES_DEL_DUP_PA"),)
EICFI400.PRW - EICFI400() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"GERA_PRE"),)
EICFI400.PRW - EICFI400() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"VAL_PARC_EXCLUI_001"),)
EICFI400.PRW - EICFI400() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'ALTERA_SE2'),)
EICFI400.PRW - EICFI400() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,CPARAMIXB),)
EICFI400.PRW - F INA050(A() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"APOS_GRAVACAO_TIT"),)
EICFI400.PRW - FI400ANT_DI() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"FI400ANT_DI_001"),)
EICFI400.PRW - FI400ANT_DI() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'ANT_DEL_SWB'),)
EICFI400.PRW - FI400ANT_DI() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'FI400ANT_DI'),)
EICFI400.PRW - FI400ANT_DI() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'FI400ANT_DI_2'),)
EICFI400.PRW - FI400ANT_DI() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'POS_VER_LIQ'),)
EICFI400.PRW - FI400ANT_PO() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"FI400ANT_PO_001"),)
EICFI400.PRW - FI400ANT_PO() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'FI400ANT_PO'),)
EICFI400.PRW - FI400BAIXAPA() -> EXECBLOCK("EICFI400",.F.,.F.,"FI400BAIXAPA_ALTCPO")
EICFI400.PRW - FI400BAIXAPA() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,{"FI400_POS_BAIXA_PA_OK", ADESPESAS}),)
EICFI400.PRW - FI400COMP() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"FI400COMP_DDTBXCMP"),)
EICFI400.PRW - FI400COMP() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,{"MUDA_TAXA",NTAXAPE}),)
EICFI400.PRW - FI400DIALTEROU() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"FI400DIALTEROU"),)
EICFI400.PRW - FI400DIALTEROU() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'ARRAY_AALTINVOICE'),)
EICFI400.PRW - FI400ESTBXPA() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"FI400EST_DESP"),)
EICFI400.PRW - FI400ESTBXPA() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,{"FI400_ESTORNO_BAIXA_PA", ADESP_EST}),)
EICFI400.PRW - FI400EXCPA() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'EXC_PA'),)
EICFI400.PRW - FI400INCPA() -> EXECBLOCK("EICFI400",.F.,.F.,"FI400INCPA_ALTCPO")
EICFI400.PRW - FI400INCTIT() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"FI400INCTIT"),)
EICFI400.PRW - FI400INIVALPA() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"ANTES_VAL_TIPO_PA"),)
EICFI400.PRW - FI400INIVALPA() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"FI400INIVALPA"),)
EICFI400.PRW - FI400LERSWD() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"ANTES_LER_SWD_PA"),)
EICFI400.PRW - FI400MANUTCAMBIO() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"GERA_CAMBIO"),)
EICFI400.PRW - FI400MOVCONT() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'DEL_CONTABIL'),)
EICFI400.PRW - FI400MOVCONT() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'GRV_CONTABIL'),)
EICFI400.PRW - FI400MOVCONT() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'INVOICE2'),)
EICFI400.PRW - FI400POALTEROU() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'FI400POALTEROU'),)
EICFI400.PRW - FI400POS_DI() -> IF(EASYENTRYPOINT("EICDI500"),EXECBLOCK("EICDI500",.F.,.F.,"GRV_CAMBIO_PRINCIPAL"),)
EICFI400.PRW - FI400POS_DI() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"ANTES_INC_TIT_INV"),)
EICFI400.PRW - FI400POS_DI() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"FI400POS_DI_001"),)
EICFI400.PRW - FI400POS_DI() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"FI400POS_DI_INICIO"),)
EICFI400.PRW - FI400POS_DI() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"GRV_CAMBIO_PRINCIPAL"),)
EICFI400.PRW - FI400POS_DI() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'ALTERA_TABINV'),)
EICFI400.PRW - FI400POS_DI() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'FI400DEPOCAMB'),)
EICFI400.PRW - FI400POS_DI() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'FI400POS_DI_0'),)
EICFI400.PRW - FI400POS_DI() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'FI400POS_DI_1'),)
EICFI400.PRW - FI400POS_DI() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'FI400POS_DI_2'),)
EICFI400.PRW - FI400POS_DI() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'FI400POS_DI_3'),)
EICFI400.PRW - FI400POS_DI() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'FI400POS_DI_DDTEMB'),)
EICFI400.PRW - FI400POS_PO() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"FI400POS_PO_001"),)
EICFI400.PRW - FI400POS_PO() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'FI400POS_PO'),)
EICFI400.PRW - FI400POS_PO() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'FI400POS_PO_1'),)
EICFI400.PRW - FI400POS_PO() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'FI400POS_PO_2'),)
EICFI400.PRW - FI400TITFIN() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"ADIANT"),)
EICFI400.PRW - FI400TITFIN() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"ANTES_GRAVACAO_TIT"),)
EICFI400.PRW - FI400TITFIN() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"DEP_GRAVACAO_TIT"),)
EICFI400.PRW - FI400TITFIN() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"EXECUTA_INTEGRACAO"),)
EICFI400.PRW - FI400TITFIN() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"FI400TITFIN_EXCLUSAO"),)
EICFI400.PRW - FI400TITFIN() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,CORIGEM),)
EICFI400.PRW - FI400TITULO() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"EXCLUI_TITULO_001"),)
EICFI400.PRW - FI400TITULO() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"FI400TITULO_001"),)
EICFI400.PRW - FI400TITULO() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"FI400TITULO_002"),)
EICFI400.PRW - FI400TITULO() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'FI400ARRAY_BAIXA'),)
EICFI400.PRW - FI400TITULO() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,'FI400_BAIXAOK'),)
EICFI400.PRW - FI400VALFIN() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"FI400VALFIN_1"),)
EICFI400.PRW - FI400VALTPO() -> EXECBLOCK("EICFI400",.F.,.F.,"VAL_TIPO_PA")
EICFI400.PRW - FI400VERDESP901() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"FI400GERAPA"),)
EICFI400.PRW - GERATITCAMB() -> IF(EASYENTRYPOINT("EICFI400"),EXECBLOCK("EICFI400",.F.,.F.,"FI400EDIT_ATIT"),)
EICFI400.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IPA400MNU",.F.,.F.)
EICGI210.PRW - EICGI210() -> EXECBLOCK("EICGI210",.F.,.F.)
EICGI210.PRW - VLDSWVQTDE() -> LRET := EXECBLOCK("EICGI21A",.F.,.F.,"WV_QTDE")
EICGI400.PRW - := {||IF(GI400A() -> .AND. IIF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"VALIDA_ALTERA"),.T.) }
EICGI400.PRW - := {||IF(GI400A() -> EXECBLOCK("EICGI333",.F.,.F.,"FECHAR")
EICGI400.PRW - := {||IF(GI400A() -> IF !EXECBLOCK("EICGI333",.F.,.F.,"ABRIR")
EICGI400.PRW - := {||IF(GI400A() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"FIM_GI400ALTERA"),)
EICGI400.PRW - := {||IF(GI400A() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"VALID_ALTERACAO"),.T.)
EICGI400.PRW - AFTERHEADER() -> IIF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"BROWSE_VISUALIZAR"),)
EICGI400.PRW - AFTERHEADER() -> IIF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"16"),)
EICGI400.PRW - AVECRIATRAB() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"BROWSE_VISUALIZAR"),)
EICGI400.PRW - AVECRIATRAB() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"16"),)
EICGI400.PRW - BUSCAMOD() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"CPOS_SW5"),)
EICGI400.PRW - CONFIRMAAC() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,{"AJUSTA_SALDO_LI",NQTDELI}),)
EICGI400.PRW - DBUGI400B() -> ELSEIF LPOINTE .AND. !EXECBLOCK(CPOINTE)
EICGI400.PRW - DBUGI400B() -> IF !EXECBLOCK("EICGI400",.F.,.F.,"VALIDA_PLI")
EICGI400.PRW - DBUGI400B() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"GI_GRAVA"),)
EICGI400.PRW - DBUGI400B() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"VERIFICA_SALDO"),)
EICGI400.PRW - DBUGI400B() -> IF(LPOINTS,EXECBLOCK(CPOINTS),)
EICGI400.PRW - EICGI400DESC() -> EXECBLOCK("EICGI400",.F.,.F.,"MEMO_ITEM")
EICGI400.PRW - GI400ALTAC() -> EXECBLOCK("EICGI400",.F.,.F.,"MSG_AC")
EICGI400.PRW - GI400APURAAC() -> EXECBLOCK("EICGI400",.F.,.F.,"MSG_AC")
EICGI400.PRW - GI400ATU() -> IF LPOINTE .AND. !EXECBLOCK(CPOINTE)
EICGI400.PRW - GI400ATU() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"VALIDA_ALTERA"),)
EICGI400.PRW - GI400ATU() -> IF(LPOINTS,EXECBLOCK(CPOINTS),)
EICGI400.PRW - GI400BROWSEEI() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"ADD_WORK_TMP"),)
EICGI400.PRW - GI400CRIAEIT() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"ADD_WORK_EIT"),)
EICGI400.PRW - GI400CRIAEIT() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"CARREGA_WORK_EIT1"),)
EICGI400.PRW - GI400ESTORNO() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"BROWSE"),)
EICGI400.PRW - GI400ESTORNO() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"STRU"),)
EICGI400.PRW - GI400ESTORNO() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"20"),)
EICGI400.PRW - GI400ESTORNO() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"8LI"),)
EICGI400.PRW - GI400GRVTEMP() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"CARREGA_WORK_EIT2"),)
EICGI400.PRW - GI400GRVTEMP() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"CARREGA_WORK_TMP"),)
EICGI400.PRW - GI400GRZOOM() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"WORK_ZOOM"),)
EICGI400.PRW - GI400INCLUI() -> EXECBLOCK("EICGI333",.F.,.F.,"FECHAR")
EICGI400.PRW - GI400INCLUI() -> IF !EXECBLOCK("EICGI333",.F.,.F.,"ABRIR")
EICGI400.PRW - GI400INCLUI() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"FIM_GI400INCLUI"),)
EICGI400.PRW - GI400INCLUI() -> {||E_VALID(AGETS,{|CAMPO| GI400VAL(CAMPO)}).AND.(IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"VALIDA"),.T.))},;
EICGI400.PRW - GI400MARCALL() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"DESMARCA_ITEM"),)
EICGI400.PRW - GI400MARCALL() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"DESPREZA_ITENS_ALL"),)
EICGI400.PRW - GI400MARCALL() -> IF(EASYENTRYPOINT("ICPADGI2"),EXECBLOCK("ICPADGI2",.F.,.F.,"GRAVAWORKITEM_ALL"),)
EICGI400.PRW - GI400MARKVALID() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"DESVIA_VALIDACAO"),)
EICGI400.PRW - GI400MARKVALID() -> IF(EASYENTRYPOINT("ICPADSUF"),EXECBLOCK("ICPADSUF",.F.,.F.,"MENSAGEM"),)
EICGI400.PRW - GI400NCM() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"GRAVA_TRB"),)
EICGI400.PRW - GI400NCM() -> IF(EASYENTRYPOINT("ICPADGI2"),EXECBLOCK("ICPADGI2",.F.,.F.,"PESO"),)
EICGI400.PRW - GI400NCM() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"17"),)
EICGI400.PRW - GI400NVE() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"COLUNAS_BOTOES_NVES"),)
EICGI400.PRW - GI400NVE() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"WHILE_SW8_NVES"),)
EICGI400.PRW - GI400PO() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"VALIDA_PO"),)
EICGI400.PRW - GI400POREF() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"PO_REF"),)
EICGI400.PRW - GI400QUEBRALI() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"QUEBRAESPECIAL"),)
EICGI400.PRW - GI400VAL() -> EXECBLOCK("EICGI400",.F.,.F.,"VAL_ITEM")
EICGI400.PRW - GI400VAL() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"RECALC_DT_ENTREGA"),)
EICGI400.PRW - GI400VISUAL() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"ANTES_TELA_VISUAL"),)
EICGI400.PRW - GI400WORKESTORNO() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"WKDESPESAS"),.F.)
EICGI400.PRW - GI400WORKESTORNO() -> IF(EASYENTRYPOINT("ICPADGI2"),EXECBLOCK("ICPADGI2",.F.,.F.,"PESO_L"),.F.)
EICGI400.PRW - GI400WORKESTORNO() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"19"),)
EICGI400.PRW - GI400_LIS() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"GRAVA_VARIAVEIS"),)
EICGI400.PRW - GI400_LIS() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"QUEBRA"),)
EICGI400.PRW - GI400_LIS() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"RETURN_GI400_LIS"),)
EICGI400.PRW - GI400_LIS() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"VARIAVEIS"),)
EICGI400.PRW - GI401ALTERA() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"ANTES_ALTERA_LI"),.T.)
EICGI400.PRW - GI401GRAVASWP() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"GRAVASWP"),.T.)
EICGI400.PRW - GI410ESTORNO() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"GI_ESTORNO"),)
EICGI400.PRW - GI410ESTORNO() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"VALID_ITENS_INV"),)
EICGI400.PRW - GI_ALTERA() -> EXECBLOCK("EICGI333",.F.,.F.,"ATUALIZA")
EICGI400.PRW - GI_ALTERA() -> IF !EXECBLOCK("EICGI333",.F.,.F.,"ALTERA")
EICGI400.PRW - GI_ESTORNO() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"ANTES_DELET"),)
EICGI400.PRW - GI_ESTORNO() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"ESTORNO"),)
EICGI400.PRW - GI_ESTORNO() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"SOMAFOB"),)
EICGI400.PRW - GI_FINAL() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"INDICE_DELETAR"),)
EICGI400.PRW - GI_GRAVAITENS() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"GRAVA_DESPESAS"),)
EICGI400.PRW - GI_GRAVAITENS() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"JA_ITEM_WORK"),)
EICGI400.PRW - GI_GRAVAITENS() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"SKIP_LOOP_SW3"),)
EICGI400.PRW - GI_GRAVAITENS() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"VAL_ITEM_WORK"),)
EICGI400.PRW - GI_GRAVAITENS() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"21"),)
EICGI400.PRW - GI_GRAVAWORK() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"SKIP_LOOP_SW5"),)
EICGI400.PRW - GI_GRAVAWORK() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"WKDESPESAS"),)
EICGI400.PRW - GI_GRAVAWORK() -> IF(EASYENTRYPOINT("ICPADGI2"),EXECBLOCK("ICPADGI2",.F.,.F.,"PESO_L"),.F.)
EICGI400.PRW - GI_INITWORK() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"CARREGA_EIT"),)
EICGI400.PRW - GI_INITWORK() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"INDICE"),)
EICGI400.PRW - GI_INITWORK() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"WORK"),)
EICGI400.PRW - GI_INITWORK() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"18"),)
EICGI400.PRW - GI_VALIDPO() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"VALID_GET_PO"),)
EICGI400.PRW - GRAVAGI400() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"GRAVAGI400_SW5"),)
EICGI400.PRW - GRAVAGI400() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"GRAVAGI400_SWP"),)
EICGI400.PRW - G_TELA2() -> EXECBLOCK("EICGI400",.F.,.F.,"APROPRIAAC")
EICGI400.PRW - G_TELA2() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"ALTERA_TELA_ITEM"),)
EICGI400.PRW - G_TELA2() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"ALT_BOTAO"),)
EICGI400.PRW - G_TELA2() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"BASE_DA_PLI"),)
EICGI400.PRW - G_TELA2() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"BAVAL"),)
EICGI400.PRW - G_TELA2() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"BROWSE"),)
EICGI400.PRW - G_TELA2() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"INICIA_VARIAVEIS"),)
EICGI400.PRW - G_TELA2() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"PESQUI"),)
EICGI400.PRW - G_TELA2() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"TELA_GET_PO"),)
EICGI400.PRW - G_TELA2() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"VALID_ITENS_INV"),)
EICGI400.PRW - G_TELA2() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"VALID_MUDA_PO"),)
EICGI400.PRW - G_TELA2() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"20"),)
EICGI400.PRW - G_TELA2() -> IF(LSUFRAMA .AND. EASYENTRYPOINT("EICGI333").AND.NQUAL # 4,EXECBLOCK("EICGI333",.F.,.F.,"BOTAO"),)
EICGI400.PRW - G_TELA3() -> EXECBLOCK("EICGI400",.F.,.F.,"MSG_AC")
EICGI400.PRW - G_TELA3() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"DADOS_ITENS"),)
EICGI400.PRW - G_TELA3() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"DADOS_ITENS_1"),)
EICGI400.PRW - G_TELA3() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"DESMARCA_ITEM"),)
EICGI400.PRW - G_TELA3() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"GRAVAWORKITEM"),)
EICGI400.PRW - G_TELA3() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"TELA_ITENS"),)
EICGI400.PRW - G_TELA3() -> IF(EASYENTRYPOINT("ICPADGI2"),EXECBLOCK("ICPADGI2",.F.,.F.,"GRAVAWORKITEM"),)
EICGI400.PRW - G_TELA4() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"ANTES_MSSELECT"),)
EICGI400.PRW - G_TELA4() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"BROWSE"),)
EICGI400.PRW - G_TELA4() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"FIM_TELA4"),)
EICGI400.PRW - G_TELA4() -> IF(EASYENTRYPOINT("EICGI400"),EXECBLOCK("EICGI400",.F.,.F.,"TELA CONFERENCIA FINAL"),)
EICGI400.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IGI400MNU",.F.,.F.)
EICGI400.PRW - MENUDEF() -> EXECBLOCK("EICGI400",.F.,.F.,"AROTINA")
EICGI400.PRW - VALIDAAC() -> EXECBLOCK("EICGI400",.F.,.F.,"VALIDAC")
EICGI600.PRW - GI600ATU() -> IF(EASYENTRYPOINT("EICGI600"),EXECBLOCK("EICGI600",.F.,.F.,"ANTES_ATU_WORK"),)
EICGI600.PRW - GI600ATU() -> IF(EASYENTRYPOINT("EICGI600"),EXECBLOCK("EICGI600",.F.,.F.,"GRV_TELA_WORK"),)
EICGI600.PRW - GI600ATU() -> IF(EASYENTRYPOINT("EICGI600"),EXECBLOCK("EICGI600",.F.,.F.,"GRV_WORK"),)
EICGI600.PRW - GI600ATUDATAS() -> IF(EASYENTRYPOINT("EICGI600"),EXECBLOCK("EICGI600",.F.,.F.,"GRV_WORK_SW3"),)
EICGI600.PRW - GI600ATUDATAS() -> IF(EASYENTRYPOINT("EICGI600"),EXECBLOCK("EICGI600",.F.,.F.,"GRV_WORK_SW5"),)
EICGI600.PRW - GI600ATUDATAS() -> IF(EASYENTRYPOINT("EICGI600"),EXECBLOCK("EICGI600",.F.,.F.,"POS_GRV_SW3_SW5"),)
EICGI600.PRW - GI600GETPO() -> IF(EASYENTRYPOINT("EICGI600"),EXECBLOCK("EICGI600",.F.,.F.,"PONTO_08"),)
EICGI600.PRW - GI600GETPO() -> IF(EASYENTRYPOINT("EICGI600"),EXECBLOCK("EICGI600",.F.,.F.,"PONTO_09"),)
EICGI600.PRW - GI600GETPO() -> IF(EASYENTRYPOINT("EICGI600"),EXECBLOCK("EICGI600",.F.,.F.,"PONTO_TITULO"),)
EICGI600.PRW - GI600GRVWK() -> IF(EASYENTRYPOINT("EICGI600"),EXECBLOCK("EICGI600",.F.,.F.,"GRV_SW5_WORK"),)
EICGI600.PRW - GI600GRVWK() -> IF(EASYENTRYPOINT("ICPADGI2"),EXECBLOCK("ICPADGI2",.F.,.F.,"WORK"),)
EICGI600.PRW - GI600MAIN() -> IF(EASYENTRYPOINT("EICGI600"),EXECBLOCK("EICGI600",.F.,.F.,"COND_COLUNA"),)
EICGI600.PRW - GI600MAIN() -> IF(EASYENTRYPOINT("EICGI600"),EXECBLOCK("EICGI600",.F.,.F.,"COND_MOSTRA_PO"),)
EICGI600.PRW - GI600MAIN() -> IF(EASYENTRYPOINT("EICGI600"),EXECBLOCK("EICGI600",.F.,.F.,"COND_REFRESH"),)
EICGI600.PRW - GI600MAIN() -> IF(EASYENTRYPOINT("EICGI600"),EXECBLOCK("EICGI600",.F.,.F.,"INIT_VAR"),)
EICGI600.PRW - GI600VAL() -> EXECBLOCK("EICTGI01",.F.,.F.,"1")
EICGI600.PRW - GI600VAL() -> IF(EASYENTRYPOINT("EICGI600"),EXECBLOCK("EICGI600",.F.,.F.,"RECALC_DT_ENTREGA"),)
EICGI600.PRW - GI600VALPO() -> IF(EASYENTRYPOINT("EICGI600"),EXECBLOCK("EICGI600",.F.,.F.,"VERIFICA_VAL_PO"),)
EICGI600.PRW - GI600WORK() -> IF(EASYENTRYPOINT("EICGI600"),EXECBLOCK("EICGI600",.F.,.F.,"GRAVA_WORK"),)
EICGI600.PRW - GI600_ALT() -> IF(EASYENTRYPOINT("EICGI600"),EXECBLOCK("EICGI600",.F.,.F.,"DT_ENTREGA"),)
EICGI600.PRW - GI600_ALT() -> IF(EASYENTRYPOINT("EICGI600"),EXECBLOCK("EICGI600",.F.,.F.,"GET_VAL_TELA"),)
EICHC150.PRW - EICHC150() -> IF(EASYENTRYPOINT("EICHC150"),EXECBLOCK("EICHC150",.F.,.F.,"LPADRAO"),)
EICHC150.PRW - EICHC150() -> IF(EASYENTRYPOINT("EICHC150"),EXECBLOCK("EICHC150",.F.,.F.,"TELA_01"),)
EICHC150.PRW - HC150GRVWORK() -> IF(EASYENTRYPOINT("EICHC150"),EXECBLOCK("EICHC150",.F.,.F.,"GRVCUSTO"),)
EICHC150.PRW - HC150GRVWORK() -> IF(EASYENTRYPOINT("EICHC150"),EXECBLOCK("EICHC150",.F.,.F.,"LOOP"),)
EICIC150.PRW - IC150GRVWORK() -> IF(EASYENTRYPOINT("EICIC150"), EXECBLOCK("EICIC150",.F.,.F.,"FECHA_VIEW"), )
EICIN100.PRW - EICIN100() -> EXECBLOCK("IN100CLI",.F.,.F.,"1BROWSE")
EICIN100.PRW - EICIN100() -> EXECBLOCK("IN100CLI",.F.,.F.,"ANTES_ABRE_ARQ")
EICIN100.PRW - EICIN100() -> EXECBLOCK("IN100CLI",.F.,.F.,"ANTES_MARKBRW")
EICIN100.PRW - EICIN100() -> EXECBLOCK("IN100CLI",.F.,.F.,"APOS_SELECAO_MENU")
EICIN100.PRW - EICIN100() -> EXECBLOCK("IN100CLI",.F.,.F.,"BOTAO ITENS")
EICIN100.PRW - EICIN100() -> EXECBLOCK("IN100CLI",.F.,.F.,"EXTRA")
EICIN100.PRW - EICIN100() -> EXECBLOCK("IN100CLI",.F.,.F.,"PREVIANTES")
EICIN100.PRW - IN100APPEND() -> EXECBLOCK("IN100CLI",.F.,.F.,"DEL_TXT")
EICIN100.PRW - IN100BROWIT() -> EXECBLOCK("IN100CLI",.F.,.F.,"BOTAO_DET_PO")
EICIN100.PRW - IN100BROWIT() -> EXECBLOCK("IN100CLI",.F.,.F.,"BROWITEM")
EICIN100.PRW - IN100BROWIT() -> EXECBLOCK("IN100CLI",.F.,.F.,"BROWITEMCOND")
EICIN100.PRW - IN100CABNU() -> EXECBLOCK("IN100CLI",.F.,.F.,"IMPCABDN")
EICIN100.PRW - IN100CABNU() -> EXECBLOCK("IN100CLI",.F.,.F.,"IMPCAPANU")
EICIN100.PRW - IN100CABPO() -> EXECBLOCK("IN100CLI",.F.,.F.,"IMPCABIPITENS")
EICIN100.PRW - IN100CABPO() -> EXECBLOCK("IN100CLI",.F.,.F.,"IMPCAPAPO1")
EICIN100.PRW - IN100CABSI() -> EXECBLOCK("IN100CLI",.F.,.F.,"IMPCABISITENS")
EICIN100.PRW - IN100CABSI() -> EXECBLOCK("IN100CLI",.F.,.F.,"IMPCAPASI1")
EICIN100.PRW - IN100CADASTRA() -> EXECBLOCK("IN100CLI",.F.,.F.,"IN100CADASTRA")
EICIN100.PRW - IN100CC() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLCC")
EICIN100.PRW - IN100CONVUM() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLUC")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"CC")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"CE")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"CI")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"CL")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"DD")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"DE")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"DH")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"DI")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"DN")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"EP")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"FB")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"FD")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"FE")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"FF")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"FG")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"FP")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"ID")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"IP")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"IS")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"IT")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"LI")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"LK")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"NB")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"NC")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"ND")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"NG")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"NR")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"NS")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"NU")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"NU_EST")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"PA")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"PD")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"PE")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"PO")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"SI")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"TC")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"TP")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"TX")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,"UC")
EICIN100.PRW - IN100DEFESTRU() -> EXECBLOCK("IN100CLI",.F.,.F.,CARQ)
EICIN100.PRW - IN100DELITEM() -> IF(EASYENTRYPOINT("IN100CLI"),EXECBLOCK("IN100CLI",.F.,.F.,"DELETAR_ITEM"),)
EICIN100.PRW - IN100DELITEM() -> IF(EASYENTRYPOINT("IN100CLI"),EXECBLOCK("IN100CLI",.F.,.F.,"DEL_ITEM_PO"),)
EICIN100.PRW - IN100DELPO() -> IF(EASYENTRYPOINT("IN100CLI"),EXECBLOCK("IN100CLI",.F.,.F.,"ANTES_DEL_PO"),)
EICIN100.PRW - IN100DELPO() -> IF(EASYENTRYPOINT("IN100CLI"),EXECBLOCK("IN100CLI",.F.,.F.,"DEL_PO"),)
EICIN100.PRW - IN100DESPDESPACHANTE() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLDE")
EICIN100.PRW - IN100DESPESAS() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLDESP")
EICIN100.PRW - IN100DESPESAS() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRV_TMP_DESP")
EICIN100.PRW - IN100DETAXAS() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLDETX")
EICIN100.PRW - IN100DETNU() -> EXECBLOCK("IN100CLI",.F.,.F.,"IMPDNDESP")
EICIN100.PRW - IN100DETPO() -> EXECBLOCK("IN100CLI",.F.,.F.,"IMPIPITENS")
EICIN100.PRW - IN100DETSI() -> EXECBLOCK("IN100CLI",.F.,.F.,"IMPISITENS")
EICIN100.PRW - IN100DI() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLDI")
EICIN100.PRW - IN100FABFOR() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLFB")
EICIN100.PRW - IN100FAMILIA() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLFP")
EICIN100.PRW - IN100GERAL() -> EXECBLOCK("IN100CLI",.F.,.F.,"GERAL")
EICIN100.PRW - IN100GRA() -> IF(EASYENTRYPOINT("IN100CLI"),EXECBLOCK("IN100CLI",.F.,.F.,"ANTES_GRAVA_IN100GRA"),)
EICIN100.PRW - IN100GRVCC() -> EXECBLOCK("IN100CLI",.F.,.F.,"EXCCC")
EICIN100.PRW - IN100GRVCC() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVCC")
EICIN100.PRW - IN100GRVCI() -> EXECBLOCK("IN100CLI",.F.,.F.,"ANTES_EXCLUIR_SB1")
EICIN100.PRW - IN100GRVCI() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVCI")
EICIN100.PRW - IN100GRVCI() -> EXECBLOCK("IN100CLI",.F.,.F.,"ITEM_MODIFICADO_EMAIL")
EICIN100.PRW - IN100GRVDE() -> EXECBLOCK("IC086IN1",.F.,.F.,2)
EICIN100.PRW - IN100GRVDE() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVDE")
EICIN100.PRW - IN100GRVDE() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVDESP")
EICIN100.PRW - IN100GRVDE() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVDESP_CIF")
EICIN100.PRW - IN100GRVDE() -> EXECBLOCK("IN100CLI",.F.,.F.,"INT_DESP_GRAVA_SW6")
EICIN100.PRW - IN100GRVDE() -> IF VALTYPE(LRETBLOCK := EXECBLOCK("IN100CLI",.F.,.F.,"INT_DESP_ANTES_SWD")) == "L" .AND. !LRETBLOCK
EICIN100.PRW - IN100GRVDE() -> IF(EASYENTRYPOINT("IN100CLI"),EXECBLOCK("IN100CLI",.F.,.F.,"DELDESP"),)
EICIN100.PRW - IN100GRVDI() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVDI")
EICIN100.PRW - IN100GRVFB() -> EXECBLOCK("IN100CLI",.F.,.F.,"EXCFB")
EICIN100.PRW - IN100GRVFB() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVFB")
EICIN100.PRW - IN100GRVFE() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVFD")
EICIN100.PRW - IN100GRVFE() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVFD1")
EICIN100.PRW - IN100GRVFE() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVFEFIM")
EICIN100.PRW - IN100GRVFE() -> EXECBLOCK("IN100CLI",.F.,.F.,"POS_GRVFEFIM")
EICIN100.PRW - IN100GRVFP() -> EXECBLOCK("IN100CLI",.F.,.F.,"EXCFP")
EICIN100.PRW - IN100GRVFP() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVFP")
EICIN100.PRW - IN100GRVLI() -> EXECBLOCK("IN100CLI",.F.,.F.,"EXCLI")
EICIN100.PRW - IN100GRVLI() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVLI")
EICIN100.PRW - IN100GRVNB() -> EXECBLOCK("IN100CLI",.F.,.F.,"EXCNB")
EICIN100.PRW - IN100GRVNB() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVNB")
EICIN100.PRW - IN100GRVNU() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVDN")
EICIN100.PRW - IN100GRVNU() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVNU")
EICIN100.PRW - IN100GRVNU() -> EXECBLOCK("IN100CLI",.F.,.F.,"WORKFLOW")
EICIN100.PRW - IN100GRVPO() -> EXECBLOCK("IN100CLI",.F.,.F.,"ANTES_GRVIP")
EICIN100.PRW - IN100GRVPO() -> EXECBLOCK("IN100CLI",.F.,.F.,"ENTRE_PO_E_IP")
EICIN100.PRW - IN100GRVPO() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVPO")
EICIN100.PRW - IN100GRVPO() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVTOTPO")
EICIN100.PRW - IN100GRVPO() -> EXECBLOCK("IN100CLI",.F.,.F.,"PREPARAGRVPO")
EICIN100.PRW - IN100GRVRD() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVRD")
EICIN100.PRW - IN100GRVSF1() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVFE")
EICIN100.PRW - IN100GRVSI() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVSI")
EICIN100.PRW - IN100GRVSI() -> IF(EASYENTRYPOINT("IN100CLI"),EXECBLOCK("IN100CLI",.F.,.F.,"ANTES_GRV_IS"),)
EICIN100.PRW - IN100GRVSI() -> IF(EASYENTRYPOINT("IN100CLI"),EXECBLOCK("IN100CLI",.F.,.F.,"LOOP_GRV_IS"),)
EICIN100.PRW - IN100GRVTC() -> EXECBLOCK("IC086IN1",.F.,.F., 1)
EICIN100.PRW - IN100GRVTC() -> EXECBLOCK("IN100CLI",.F.,.F.,"EXCTC")
EICIN100.PRW - IN100GRVTC() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVTC")
EICIN100.PRW - IN100GRVTC() -> IF(EASYENTRYPOINT("IN100CLI"),EXECBLOCK("IN100CLI",.F.,.F.,"ANTES_GRAVA_TC"),)
EICIN100.PRW - IN100GRVUC() -> EXECBLOCK("IN100CLI",.F.,.F.,"EXCUC")
EICIN100.PRW - IN100GRVUC() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVUC")
EICIN100.PRW - IN100INDRG() -> IF(EASYENTRYPOINT("EICIN100"),EXECBLOCK("EICIN100",.F.,.F.,{"CRIA_INDICE", AIND[I]}),)
EICIN100.PRW - IN100INICIO_PRINT() -> EXECBLOCK("IN100CLI",.F.,.F.,"RELATO")
EICIN100.PRW - IN100INTEG() -> EXECBLOCK("EICIN100",.F.,.F.,"PE_FIM_EFETIVA")
EICIN100.PRW - IN100INTEG() -> EXECBLOCK("EICIN100",.F.,.F.,"PE_FIM_PREVIA")
EICIN100.PRW - IN100INTEG() -> EXECBLOCK("IN100CLI",.F.,.F.,"APPEND")
EICIN100.PRW - IN100INTEG() -> EXECBLOCK("IN100CLI",.F.,.F.,"ARQTXT")
EICIN100.PRW - IN100INTEG() -> EXECBLOCK("IN100CLI",.F.,.F.,"FIM")
EICIN100.PRW - IN100INTEG() -> EXECBLOCK("IN100CLI",.F.,.F.,"FIMAPPEND")
EICIN100.PRW - IN100INTEG() -> EXECBLOCK(CPOINTE)
EICIN100.PRW - IN100INTEG() -> IF(EASYENTRYPOINT("IN100CLI"),EXECBLOCK("IN100CLI",.F.,.F.,"DEPOIS_IN100LER"),)
EICIN100.PRW - IN100INTEG() -> IF(EASYENTRYPOINT("IN100CLI"),EXECBLOCK("IN100CLI",.F.,.F.,"EXISTE_ARQ"),)
EICIN100.PRW - IN100ITEM() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLCI")
EICIN100.PRW - IN100ITEMFABRFOR() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLLI")
EICIN100.PRW - IN100LERCC() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERCC")
EICIN100.PRW - IN100LERCC() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALCC")
EICIN100.PRW - IN100LERCI() -> EXECBLOCK("IC050IN1",.F.,.F.,STR0546)
EICIN100.PRW - IN100LERCI() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERCI")
EICIN100.PRW - IN100LERCI() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALCI")
EICIN100.PRW - IN100LERCI() -> IF(EASYENTRYPOINT("IN100CLI"),EXECBLOCK("IN100CLI",.F.,.F.,"VAL_CI"),)
EICIN100.PRW - IN100LERDE() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERDE")
EICIN100.PRW - IN100LERDE() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERTX")
EICIN100.PRW - IN100LERDE() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALTX")
EICIN100.PRW - IN100LERDI() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERDI")
EICIN100.PRW - IN100LERDI() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALDI")
EICIN100.PRW - IN100LERFB() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERFB")
EICIN100.PRW - IN100LERFB() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALFB")
EICIN100.PRW - IN100LERFE() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERFD")
EICIN100.PRW - IN100LERFE() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERFE")
EICIN100.PRW - IN100LERFE() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALFD")
EICIN100.PRW - IN100LERFE() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALFE")
EICIN100.PRW - IN100LERFE() -> IF !SX5->(DBSEEK(IF(EASYENTRYPOINT("CHGX5FIL"),EXECBLOCK("CHGX5FIL"),XFILIAL("SX5"))+"01"+AVKEY(CSERIE,"X5_CHAVE")))
EICIN100.PRW - IN100LERFP() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERFP")
EICIN100.PRW - IN100LERFP() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALFP")
EICIN100.PRW - IN100LERLI() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERLI")
EICIN100.PRW - IN100LERLI() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALLI")
EICIN100.PRW - IN100LERNB() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERNB")
EICIN100.PRW - IN100LERNB() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALNB")
EICIN100.PRW - IN100LERNU() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERDN")
EICIN100.PRW - IN100LERNU() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERNU")
EICIN100.PRW - IN100LERNU() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALDN")
EICIN100.PRW - IN100LERNU() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALNU")
EICIN100.PRW - IN100LERPO() -> EXECBLOCK("ICPADIN1",.F.,.F.)
EICIN100.PRW - IN100LERPO() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERIP")
EICIN100.PRW - IN100LERPO() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERPO")
EICIN100.PRW - IN100LERPO() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALIP")
EICIN100.PRW - IN100LERPO() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALPO")
EICIN100.PRW - IN100LERPO() -> EXECBLOCK("IN100CLI",.F.,.F.,"VAL_DE_SI")
EICIN100.PRW - IN100LERPO() -> EXECBLOCK("IN100CLI",.F.,.F.,"VER_ERRO_IP")
EICIN100.PRW - IN100LERPO() -> EXECBLOCK("IN100CLI",.F.,.F.,"VER_PO_IP")
EICIN100.PRW - IN100LERRD() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERRD")
EICIN100.PRW - IN100LERSI() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERIS")
EICIN100.PRW - IN100LERSI() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERSI")
EICIN100.PRW - IN100LERSI() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALIS")
EICIN100.PRW - IN100LERSI() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALIS2")
EICIN100.PRW - IN100LERSI() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALSI")
EICIN100.PRW - IN100LERTC() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERTC")
EICIN100.PRW - IN100LERTC() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALTC")
EICIN100.PRW - IN100LERUC() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERUC")
EICIN100.PRW - IN100LERUC() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALUC")
EICIN100.PRW - IN100NBM() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLNB")
EICIN100.PRW - IN100NFE() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLFD")
EICIN100.PRW - IN100NFE() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLFE")
EICIN100.PRW - IN100NU() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLNU")
EICIN100.PRW - IN100PO() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLIP")
EICIN100.PRW - IN100PO() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLPO")
EICIN100.PRW - IN100REL() -> IF VALTYPE(LRETBLOCK := EXECBLOCK("IN100CLI",.F.,.F.,"IMPRESAO")) == "L" .AND. !LRETBLOCK
EICIN100.PRW - IN100SI() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLIS")
EICIN100.PRW - IN100SI() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLSI")
EICIN100.PRW - IN100SI_PO() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVIP")
EICIN100.PRW - IN100SI_PO() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVIS")
EICIN100.PRW - IN100SI_PO() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVPO")
EICIN100.PRW - IN100SI_PO() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVSI")
EICIN100.PRW - IN100SI_PO() -> EXECBLOCK("IN100CLI",.F.,.F.,"GRVSW5")
EICIN100.PRW - IN100SI_PO() -> IF(EASYENTRYPOINT("IN100CLI"),EXECBLOCK("IN100CLI",.F.,.F.,"INCLUI_ITEM"),)
EICIN100.PRW - IN100TAXAS() -> EXECBLOCK("IN100CLI",.F.,.F.,"COLTC")
EICIN100.PRW - IN100VERDD() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERDD")
EICIN100.PRW - IN100VERDD() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALDD")
EICIN100.PRW - IN100VERDH() -> EXECBLOCK("EICIN100",.F.,.F.,"ANTES_VALID")
EICIN100.PRW - IN100VERDH() -> EXECBLOCK("IN100CLI",.F.,.F.,"LERDH")
EICIN100.PRW - IN100VERDH() -> EXECBLOCK("IN100CLI",.F.,.F.,"VALDH")
EICIN100.PRW - IN100VERERRO() -> EXECBLOCK("IN100CLI",.F.,.F.,"VER_ERRO")
EICIN100.PRW - IN100_ABRE() -> EXECBLOCK("IN100CLI",.F.,.F.,"ABRIR")
EICIN100.PRW - IN100_FECHA() -> EXECBLOCK("IN100CLI",.F.,.F.,"FECHAR")
EICIN100.PRW - INRATLOTE() -> EXECBLOCK("IN100CLI",.F.,.F.,"ATUALIZA_FD")
EICIN100.PRW - QUEBRALOTE() -> EXECBLOCK("IN100CLI",.F.,.F.,"CARGA_AVALOR")
EICIP150.PRW - GRAVA_ID000() -> IF EXECBLOCK("ICPAD150",.F.,.F.,"8")
EICIP150.PRW - GRAVA_ID000() -> IF LPOINT .AND. !EXECBLOCK(CPOINT)
EICIP150.PRW - GRAVA_ID000() -> IF(EASYENTRYPOINT("EICIP150"),EXECBLOCK("EICIP150",.F.,.F.,"GRVDI"),)
EICIP150.PRW - GRAVA_ID000() -> IF(EASYENTRYPOINT("EICIP150"),EXECBLOCK("EICIP150",.F.,.F.,"LOOPDI"),)
EICIP150.PRW - GRAVA_ID000() -> IF(LEXISTERD,EXECBLOCK("ICPAD150",.F.,.F.,"9"),)
EICIP150.PRW - GRAVA_IG000() -> IF EXECBLOCK("ICPAD150",.F.,.F.,"6")
EICIP150.PRW - GRAVA_IG000() -> IF LPOINT .AND. !EXECBLOCK(CPOINT)
EICIP150.PRW - GRAVA_IG000() -> IF(EASYENTRYPOINT("EICIP150"),EXECBLOCK("EICIP150",.F.,.F.,"GRVGI"),)
EICIP150.PRW - GRAVA_IG000() -> IF(EASYENTRYPOINT("EICIP150"),EXECBLOCK("EICIP150",.F.,.F.,"LOOPGI"),)
EICIP150.PRW - GRAVA_IG000() -> IF(LEXISTERD,EXECBLOCK("ICPAD150",.F.,.F.,"7"),)
EICIP150.PRW - GRAVA_IP000() -> IF EXECBLOCK("ICPAD150",.F.,.F.,"4")
EICIP150.PRW - GRAVA_IP000() -> IF LPOINT .AND. !EXECBLOCK(CPOINT)
EICIP150.PRW - GRAVA_IP000() -> IF(EASYENTRYPOINT("EICIP150"),EXECBLOCK("EICIP150",.F.,.F.,"GRVPO"),)
EICIP150.PRW - GRAVA_IP000() -> IF(EASYENTRYPOINT("EICIP150"),EXECBLOCK("EICIP150",.F.,.F.,"LOOPPO"),)
EICIP150.PRW - GRAVA_IP000() -> IF(LEXISTERD,EXECBLOCK("ICPAD150",.F.,.F.,"5"),)
EICIP150.PRW - GRAVA_IS000() -> IF EXECBLOCK("ICPAD150",.F.,.F.,"2")
EICIP150.PRW - GRAVA_IS000() -> IF LPOINT .AND. !EXECBLOCK(CPOINT)
EICIP150.PRW - GRAVA_IS000() -> IF(EASYENTRYPOINT("EICIP150"),EXECBLOCK("EICIP150",.F.,.F.,"GRVSI"),)
EICIP150.PRW - GRAVA_IS000() -> IF(EASYENTRYPOINT("EICIP150"),EXECBLOCK("EICIP150",.F.,.F.,"LOOPSI"),)
EICIP150.PRW - GRAVA_IS000() -> IF(LEXISTERD,EXECBLOCK("ICPAD150",.F.,.F.,"3"),)
EICIP150.PRW - IP150GET() -> IF(EASYENTRYPOINT("EICIP150"),EXECBLOCK("EICIP150",.F.,.F.,"POSOPCAO"),)
EICIP150.PRW - IP150PROCESSA() -> IF(EASYENTRYPOINT("EICIP150"),EXECBLOCK("EICIP150",.F.,.F.,"ANTESTELA"),)
EICIP150.PRW - IP150PROCESSA() -> IF(EASYENTRYPOINT("EICIP150"),EXECBLOCK("EICIP150",.F.,.F.,"TELACUSTO"),)
EICIP150.PRW - MONTACAMPOS() -> IF(EASYENTRYPOINT("EICIP150"),EXECBLOCK("EICIP150",.F.,.F.,"SEMSX3"),)
EICIP150.PRW - MONTACAMPOS() -> IF(LEXISTERD,EXECBLOCK("ICPAD150",.F.,.F.,"1"),)
EICIP160.PRW - EICIP160() -> EXECBLOCK("EICIP160",.F.,.F.,"ANTPARAM")
EICIP160.PRW - EICIP160() -> EXECBLOCK("EICIP160",.F.,.F.,"GERTELA")
EICIP160.PRW - IP160CABECALHO() -> EXECBLOCK("EICIP160",.F.,.F.,"CABSEC2")
EICIP160.PRW - IP160GR_ID000() -> EXECBLOCK("EICIP160",.F.,.F.,"GRVDI")
EICIP160.PRW - IP160GR_ID000() -> EXECBLOCK("EICIP160",.F.,.F.,"LOOPDI")
EICIP160.PRW - IP160GR_IG000() -> EXECBLOCK("EICIP160",.F.,.F.,"GRVGI")
EICIP160.PRW - IP160GR_IG000() -> EXECBLOCK("EICIP160",.F.,.F.,"LOOPGI")
EICIP160.PRW - IP160GR_IP000() -> EXECBLOCK("EICIP160",.F.,.F.,"GRVPO")
EICIP160.PRW - IP160GR_IP000() -> EXECBLOCK("EICIP160",.F.,.F.,"LOOPPO")
EICIP160.PRW - IP160GR_IS000() -> EXECBLOCK("EICIP160",.F.,.F.,"GRVSI")
EICIP160.PRW - IP160GR_IS000() -> EXECBLOCK("EICIP160",.F.,.F.,"LOOPSI")
EICIP160.PRW - IP160RELATORIO() -> EXECBLOCK("EICIP160",.F.,.F.,"ITEMSEC2")
EICIP170.PRW - A170MAIN() -> EXECBLOCK("EICIP170",.F.,.F.,"13")
EICIP170.PRW - A170MAIN() -> EXECBLOCK("EICIP170",.F.,.F.,"BROWPO")
EICIP170.PRW - A170MAIN() -> EXECBLOCK("EICIP170",.F.,.F.,"LPADRAO")
EICIP170.PRW - A170MAIN() -> EXECBLOCK("EICIP170",.F.,.F.,"NAOPADRAO")
EICIP170.PRW - A170MAIN() -> EXECBLOCK("EICIP170",.F.,.F.,"ODLG")
EICIP170.PRW - A170MAIN() -> EXECBLOCK("EICIP170",.F.,.F.,"SAY_ITEM")
EICIP170.PRW - A170MAIN() -> EXECBLOCK("EICIP170",.F.,.F.,"TITULO")
EICIP170.PRW - A170MAIN() -> EXECBLOCK("EICIP170",.F.,.F.,"WORK_REL")
EICIP170.PRW - A170MAIN() -> IF(LEXISTERD,EXECBLOCK("ICPAD170",.F.,.F.,"1"),)
EICIP170.PRW - A170MAIN() -> IF(LEXISTERD,EXECBLOCK("ICPAD170",.F.,.F.,"12"),)
EICIP170.PRW - A170MAIN() -> IF(LEXISTERD,EXECBLOCK("ICPAD170",.F.,.F.,"13"),)
EICIP170.PRW - EICIP175R3() -> EXECBLOCK("EICIP170",.F.,.F.,"CHAMADA_ROT_PRINC")
EICIP170.PRW - GV170_ID000() -> EXECBLOCK("EICIP170",.F.,.F.,"APPEND_SW7")
EICIP170.PRW - GV170_ID000() -> EXECBLOCK("EICIP170",.F.,.F.,"LOOPSW7")
EICIP170.PRW - GV170_ID000() -> IF(LEXISTERD,EXECBLOCK("ICPAD170",.F.,.F.,"5"),)
EICIP170.PRW - GV170_ID000() -> LRET:=EXECBLOCK("ICPAD170",.F.,.F.,"10")
EICIP170.PRW - GV170_IG000() -> EXECBLOCK("EICIP170",.F.,.F.,"APPEND_SW5")
EICIP170.PRW - GV170_IG000() -> EXECBLOCK("EICIP170",.F.,.F.,"LOOPSW5")
EICIP170.PRW - GV170_IG000() -> IF(LEXISTERD,EXECBLOCK("ICPAD170",.F.,.F.,"4"),)
EICIP170.PRW - GV170_IG000() -> LRET:=EXECBLOCK("ICPAD170",.F.,.F.,"9")
EICIP170.PRW - GV170_IP000() -> EXECBLOCK("EICIP170",.F.,.F.,"APPEND_SW3")
EICIP170.PRW - GV170_IP000() -> EXECBLOCK("EICIP170",.F.,.F.,"LOOPSW3")
EICIP170.PRW - GV170_IP000() -> IF(LEXISTERD,EXECBLOCK("ICPAD170",.F.,.F.,"3"),)
EICIP170.PRW - GV170_IP000() -> LRET:=EXECBLOCK("ICPAD170",.F.,.F.,"8")
EICIP170.PRW - GV170_IS000() -> EXECBLOCK("EICIP170",.F.,.F.,"APPEND_SW1")
EICIP170.PRW - GV170_IS000() -> IF(LEXISTERD,EXECBLOCK("ICPAD170",.F.,.F.,"2"),)
EICIP170.PRW - GV170_IS000() -> LRET:=EXECBLOCK("ICPAD170",.F.,.F.,"7")
EICIP170.PRW - IP170IMPCPOS() -> IF(LEXISTERD,EXECBLOCK("ICPAD170",.F.,.F.,"6"),)
EICIP170.PRW - IP170VALITEM() -> IF(LEXISTERD,EXECBLOCK("ICPAD170",.F.,.F.,"11"),)
EICIP170.PRW - IP170ZOOM() -> EXECBLOCK("EICIP170",.F.,.F.,"BLOAD")
EICIP170.PRW - IP170ZOOM() -> EXECBLOCK("EICIP170",.F.,.F.,"GET_TELA")
EICIP170.PRW - IP170ZOOM() -> IF(LEXISTERD,EXECBLOCK("ICPAD170",.F.,.F.,"LOAD"),)
EICIP170.PRW - IP170ZOOM() -> IF(LEXISTERD,EXECBLOCK("ICPAD170",.F.,.F.,"SAY"),)
EICIP170.PRW - REPORTDEF() -> EXECBLOCK("EICIP170",.F.,.F.,"ANTES_PERGUNTE")
EICIV110.PRW - IV110CAMBI() -> EXECBLOCK("EICIV110",.F.,.F.,"CAMPOS_BROWSE")
EICIV110.PRW - IV110DETALHE() -> EXECBLOCK("EICIV110",.F.,.F.,"ITENS_BROWSE")
EICIV110.PRW - IV110VISUA() -> EXECBLOCK("EICPIV01",.F.,.F.)
EICIV110.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IIV110MNU",.F.,.F.)
EICLC100.PRW - LC100ALTER() -> IF(EASYENTRYPOINT("EICLC100"),EXECBLOCK("EICLC100",.F.,.F.,"ALTERA_BOTAO"),)
EICLC100.PRW - LC100ALTER() -> IF(EASYENTRYPOINT("EICLC100"),EXECBLOCK("EICLC100",.F.,.F.,"ALTERA_TELA"),)
EICLC100.PRW - LC100ALTER() -> LGRVRDMALT:= IF(EASYENTRYPOINT("EICLC100"),EXECBLOCK("EICLC100",.F.,.F.,"ALTERA_VALID"),.T.)
EICLC100.PRW - LC100APPENDWORK() -> IF(EASYENTRYPOINT("EICLC100"),EXECBLOCK("EICLC100",.F.,.F.,"GRAVA_TRB"),)
EICLC100.PRW - LC100COLUNAS() -> IF(EASYENTRYPOINT("EICLC100"),EXECBLOCK("EICLC100",.F.,.F.,"COLUNAS"),)
EICLC100.PRW - LC100CRITICA() -> IF(EASYENTRYPOINT("EICLC100"),EXECBLOCK("EICLC100",.F.,.F.,"VALIDA_PO"),)
EICLC100.PRW - LC100CRITICA() -> IF(EASYENTRYPOINT("EICLC100"),EXECBLOCK("EICLC100",.F.,.F.,CODIGO),)
EICLC100.PRW - LC100DELET() -> IF(EASYENTRYPOINT("EICLC100"),EXECBLOCK("EICLC100",.F.,.F.,"EXCLUI_BOTAO"),)
EICLC100.PRW - LC100DELET() -> IF(EASYENTRYPOINT("EICLC100"),EXECBLOCK("EICLC100",.F.,.F.,"EXCLUI_TELA"),)
EICLC100.PRW - LC100DELLIN() -> IIF(EASYENTRYPOINT("EICLC100"),EXECBLOCK("EICLC100",.F.,.F.,"EXEC_CALC_ESTORNO"),)
EICLC100.PRW - LC100GRAVA() -> IF(EASYENTRYPOINT("EICLC100"),EXECBLOCK("EICLC100",.F.,.F.,"GRAVA_CARTA"),)
EICLC100.PRW - LC100INCLU() -> IF(EASYENTRYPOINT("EICLC100"),EXECBLOCK("EICLC100",.F.,.F.,"INCLUI_BOTAO"),)
EICLC100.PRW - LC100INCLU() -> IF(EASYENTRYPOINT("EICLC100"),EXECBLOCK("EICLC100",.F.,.F.,"INCLUI_TELA"),)
EICLC100.PRW - LC100INCLU() -> LGRVRDMINC:= IF(EASYENTRYPOINT("EICLC100"),EXECBLOCK("EICLC100",.F.,.F.,"INCLUI_VALID"),.T.)
EICLC100.PRW - LC100VISUA() -> IF(EASYENTRYPOINT("EICLC100"),EXECBLOCK("EICLC100",.F.,.F.,"VISUAL_BOTAO"),)
EICLC100.PRW - LC100VISUA() -> IF(EASYENTRYPOINT("EICLC100"),EXECBLOCK("EICLC100",.F.,.F.,"VISUAL_TELA"),)
EICLC100.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("ILC100MNU",.F.,.F.)
EICLO100.PRW - EICLO100() -> EXECBLOCK("EICLO100",.F.,.F.,"ATUALIZA")
EICLO100.PRW - EICLO100() -> EXECBLOCK("EICLO100",.F.,.F.,"BMARCA")
EICLO100.PRW - EICLO100() -> EXECBLOCK("EICLO100",.F.,.F.,"BWHILE_1A")
EICLO100.PRW - EICLO100() -> EXECBLOCK("EICLO100",.F.,.F.,"BWHILE_1B")
EICLO100.PRW - EICLO100() -> EXECBLOCK("EICLO100",.F.,.F.,"BWHILE_2")
EICLO100.PRW - EICLO100() -> EXECBLOCK("EICLO100",.F.,.F.,"BWHILE_3")
EICLO100.PRW - EICLO100() -> EXECBLOCK("EICLO100",.F.,.F.,"DIALOG01")
EICLO100.PRW - EICLO100() -> EXECBLOCK("EICLO100",.F.,.F.,"FECHA")
EICLO100.PRW - EICLO100() -> EXECBLOCK("EICLO100",.F.,.F.,"ORDEMLO")
EICLO100.PRW - EICLO100() -> EXECBLOCK("EICLO100",.F.,.F.,"SETORDLO")
EICLO100.PRW - EICLO100() -> EXECBLOCK("EICLO100",.F.,.F.,"TELAFFC1")
EICLO100.PRW - EICLO100() -> EXECBLOCK("EICPFFC1",.F.,.F.,"FECHA")
EICLO100.PRW - EICLO100() -> IF !(EXECBLOCK("EICPFFC1",.F.,.F.,"ATUALIZA"))
EICLO100.PRW - LO100ALLMARK() -> EXECBLOCK("EICLO100",.F.,.F.,"BMARCA1")
EICLO100.PRW - LO100BAIXA() -> EXECBLOCK("EICLO100",.F.,.F.,"GET_BAIXA")
EICLO100.PRW - LO100BAIXA() -> EXECBLOCK("EICLO100",.F.,.F.,IF(BAI_EST, "MENSAGEM_SAP_FECHAMENTO", "MENSAGEM_SAP_ESTORNO"))
EICLO100.PRW - LO100BAIXA() -> IF(EASYENTRYPOINT("EICLO100"), EXECBLOCK("EICLO100",.F.,.F.,"VALFECHA_EST"),)
EICLO100.PRW - LO100EEQGRV() -> EXECBLOCK("EICLO100",.F.,.F.,"APOSGRAVA")
EICLO100.PRW - LO100EEQGRV() -> IF !EXECBLOCK("EICLO100",.F.,.F.,"MODALID")
EICLO100.PRW - LO100FFCS() -> EXECBLOCK("EICLO100",.F.,.F.,"TELAFFC")
EICLO100.PRW - LO100FFCS() -> IF !EXECBLOCK("EICLO100",.F.,.F.,"VAL_SCPE1")
EICLO100.PRW - LO100FFCS() -> IF !EXECBLOCK("EICLO100",.F.,.F.,"VAL_SCPE2")
EICLO100.PRW - LO100FIM() -> EXECBLOCK("IF140CA1",.F.,.F.,"TOTAL FOB")
EICLO100.PRW - LO100FIM() -> IF(LAGFA,EXECBLOCK("IF140CA1",.F.,.F.,"IMPRIME CIF"),)
EICLO100.PRW - LO100FIM() -> IF(LAGFA,EXECBLOCK("IF140CA1",.F.,.F.,"IMPRIME TOTAL"),)
EICLO100.PRW - LO100FIM() -> IF(LAGFA,EXECBLOCK("IF140CA1",.F.,.F.,"TRACINHO"),)
EICLO100.PRW - LO100GET() -> EXECBLOCK("EICLO100",.F.,.F.,"DIALOGET")
EICLO100.PRW - LO100GETFFCS() -> IF(EASYENTRYPOINT("EICLO100"),EXECBLOCK("EICLO100",.F.,.F.,"ANTES_PROCESSA"),)
EICLO100.PRW - LO100GRVBAIXA() -> EXECBLOCK("EICLO100",.F.,.F.,"BAIXA_LOTE")
EICLO100.PRW - LO100GRVBAIXA() -> EXECBLOCK("EICLO100",.F.,.F.,IF(BAI_EST, "ANTES_FECHAMTO", "ANTES_ESTORNO"))
EICLO100.PRW - LO100GRVBAIXA() -> EXECBLOCK("EICLO100",.F.,.F.,IF(BAI_EST, "ANTES_GRAVA_FECHAMENTO", "ANTES_GRAVA_ESTORNO"))
EICLO100.PRW - LO100GRVBAIXA() -> EXECBLOCK("EICLO100",.F.,.F.,IF(BAI_EST, "ANTES_GRAVA_FECHAMENTO_EEQ", "ANTES_GRAVA_ESTORNO_EEQ"))
EICLO100.PRW - LO100GRVBAIXA() -> EXECBLOCK("EICLO100",.F.,.F.,IF(BAI_EST, "FECHAMENTO", "ESTORNA"))
EICLO100.PRW - LO100GRVBAIXA() -> EXECBLOCK("EICLO100",.F.,.F.,IF(BAI_EST, "FECHAMENTO_EEQ", "ESTORNA_EEQ"))
EICLO100.PRW - LO100GRVBAIXA() -> EXECBLOCK("EICLO100",.F.,.F.,IF(BAI_EST,"FIM_GRAVA_FECHAMENTO", "FIM_GRAVA_ESTORNO"))
EICLO100.PRW - LO100GRVBAIXA() -> EXECBLOCK("EICPFFC1",.F.,.F.,IF(BAI_EST, "FECHAMENTO", "ESTORNA"))
EICLO100.PRW - LO100GRVFFC() -> EXECBLOCK("EICLO100",.F.,.F.,"APOSGRVEEQ")
EICLO100.PRW - LO100GRVFFC() -> EXECBLOCK("EICLO100",.F.,.F.,"APOSGRVSWB")
EICLO100.PRW - LO100IMP() -> EXECBLOCK("EICLO100",.F.,.F.,"QUEBRA_CABEC")
EICLO100.PRW - LO100IMP() -> EXECBLOCK("IF140CA1",.F.,.F.,"IMPRIME LOTE1")
EICLO100.PRW - LO100IMP() -> IF(EASYENTRYPOINT("EICLO100"),EXECBLOCK("EICLO100",.F.,.F.,"ANTES_RETIDO"),)
EICLO100.PRW - LO100IMP() -> IF(EASYENTRYPOINT("EICLO100"),EXECBLOCK("EICLO100",.F.,.F.,"APOS_PROCESSO"),)
EICLO100.PRW - LO100SAY() -> EXECBLOCK("EICLO100",.F.,.F.,"DIALOSAY")
EICLO100.PRW - LO100TIRAFFC() -> EXECBLOCK("EICLO100",.F.,.F.,"ANTES_TIRA_FFC")
EICLO100.PRW - LO100TIRAFFC() -> EXECBLOCK("EICLO100",.F.,.F.,"TIRA_FFC")
EICLO100.PRW - LO100TIRAFFC() -> EXECBLOCK("EICPFFC1",.F.,.F.,"TIRA_FFC")
EICLO100.PRW - LO100VAL() -> EXECBLOCK("EICLO100",.F.,.F.,"ANTES_VALID")
EICLO100.PRW - LO100VAL() -> EXECBLOCK("EICLO100",.F.,.F.,"DIALOGE2")
EICLO100.PRW - LO100VAL() -> EXECBLOCK("EICLO100",.F.,.F.,"VALID")
EICLO100.PRW - LO100VAL() -> IF !(EXECBLOCK("EICLO100",.F.,.F.,"LOVAL_FORN"))
EICLO100.PRW - LO100VAL() -> IF !(EXECBLOCK("EICLO100",.F.,.F.,"LOVAL_MOEDA"))
EICLO100.PRW - LO100WK1GRV() -> EXECBLOCK("EICLO100",.F.,.F.,"APOSGRAVA")
EICLO100.PRW - LO100WK1GRV() -> IF !EXECBLOCK("EICLO100",.F.,.F.,"MODALID")
EICLO100.PRW - LO100WK1GRV() -> IF (EXECBLOCK("EICLO100",.F.,.F.,"VALIDAVENC"))
EICLO100.PRW - LO100WK2GRV() -> EXECBLOCK("EICLO100", .F., .F., "QUEBRA_LOTE")
EICLO150.PRW - LO150GRV() -> EXECBLOCK("EICLO150",.F.,.F.,"WHILE_SWB")
EICNA400.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("INA400MNU",.F.,.F.)
EICNA400.PRW - NA400GRVPONAC() -> EXECBLOCK("EICNA400", .F., .F., "GRAVA_SW3")
EICNA400.PRW - NA400GRVTRB() -> EXECBLOCK("EICNA400", .F., .F., "GRAVA_TRB")
EICNA400.PRW - NA400NACIO() -> EXECBLOCK("EICNA400", .F., .F., "ENCHOICESW2")
EICNF100.PRW - NF100SEND() -> EXECBLOCK("EICNF100",.F.,.F.,"NF100SEND_FIM_NF")
EICNU400.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("INU400MNU",.F.,.F.)
EICNU400.PRW - MENUDEF() -> EXECBLOCK("EICNU400",.F.,.F.,"AROTINA")
EICNU400.PRW - NU100VALID() -> EXECBLOCK("EICPNU01",.F.,.F.,"VALID")
EICNU400.PRW - NU100VALID() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"VALID"),)
EICNU400.PRW - NU400CANCEFE() -> EXECBLOCK("EICNU400",.F.,.F.,"CANCEFE")
EICNU400.PRW - NU400CANCEFE() -> EXECBLOCK("EICNU400",.F.,.F.,"CBODY2_CANC_EFET")
EICNU400.PRW - NU400CANCEFE() -> EXECBLOCK("EICNU400",.F.,.F.,"CBODY_CANC_EFET")
EICNU400.PRW - NU400CANCEFE() -> EXECBLOCK("EICNU400",.F.,.F.,"EMAIL_CANCELA")
EICNU400.PRW - NU400CANCEFE() -> EXECBLOCK("EICPNU01",.F.,.F.,"CANC_EFETIV")
EICNU400.PRW - NU400CANCEFE() -> EXECBLOCK("EICPNU01",.F.,.F.,"DELETA_ADI")
EICNU400.PRW - NU400CANCEFE() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"CANC_EFETIV"),)
EICNU400.PRW - NU400CANCEFE() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"DELETA_SWD"),)
EICNU400.PRW - NU400CANCEFE() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"VALIDA_CANCELA_EFETIV"),)
EICNU400.PRW - NU400EFETIVA() -> EXECBLOCK("EICNU400",.F.,.F.,"CBODY2_EFETIVA")
EICNU400.PRW - NU400EFETIVA() -> EXECBLOCK("EICNU400",.F.,.F.,"CBODY_EFETIVA")
EICNU400.PRW - NU400EFETIVA() -> EXECBLOCK("EICNU400",.F.,.F.,"EMAIL")
EICNU400.PRW - NU400EFETIVA() -> EXECBLOCK("EICPNU01",.F.,.F.,"EFETIVOU")
EICNU400.PRW - NU400EFETIVA() -> EXECBLOCK("EICPNU01",.F.,.F.,"GRAVOU_ADI")
EICNU400.PRW - NU400EFETIVA() -> EXECBLOCK("EICPNU01",.F.,.F.,"GRAVOU_SWD")
EICNU400.PRW - NU400EFETIVA() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"EFETIVOU"),)
EICNU400.PRW - NU400EFETIVA() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"EMAIL_LIBERA_ADI"),)
EICNU400.PRW - NU400EFETIVA() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"GRAVOU_ADI"),)
EICNU400.PRW - NU400EFETIVA() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"GRAVOU_SWD"),)
EICNU400.PRW - NU400EFETIVA() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"GRAVOU_TUDO"),)
EICNU400.PRW - NU400EFETIVA() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"GRAVO_EIC"),)
EICNU400.PRW - NU400EFETIVA() -> LRETPE := EXECBLOCK("EICNU400",.F.,.F.,"VALIDA_DESPESAS")
EICNU400.PRW - NU400EMAILFORN() -> EXECBLOCK("EICNU400",.F.,.F.,"CBODY2_EMAILFORN")
EICNU400.PRW - NU400EMAILFORN() -> EXECBLOCK("EICNU400",.F.,.F.,"CBODY_EMAILFORN")
EICNU400.PRW - NU400EMAILFORN() -> EXECBLOCK("EICNU400",.F.,.F.,"EMAIL2")
EICNU400.PRW - NU400ENCHOICE() -> EXECBLOCK("EICNU400",.F.,.F.,"ANTES_ENCHOICE")
EICNU400.PRW - NU400ENCHOICE() -> EXECBLOCK("EICNU400",.F.,.F.,"GRAVA_MEMO")
EICNU400.PRW - NU400ENCHOICE() -> EXECBLOCK("EICPNU01",.F.,.F.,"MANUT_DESP")
EICNU400.PRW - NU400ENCHOICE() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"MANUT_DESP"),)
EICNU400.PRW - NU400MANUT() -> EXECBLOCK("EICNU400",.F.,.F.,"CARREGA_CAMPO")
EICNU400.PRW - NU400MANUT() -> EXECBLOCK("EICPNU01",.F.,.F.,"BROW_EIC")
EICNU400.PRW - NU400MANUT() -> EXECBLOCK("EICPNU01",.F.,.F.,"GRAVOU_DESP")
EICNU400.PRW - NU400MANUT() -> EXECBLOCK("EICPNU01",.F.,.F.,"GRAVOU_EIC")
EICNU400.PRW - NU400MANUT() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"BROW_EIC"),)
EICNU400.PRW - NU400MANUT() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"FINAL"),)
EICNU400.PRW - NU400MANUT() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"GRAVA_EIC"),)
EICNU400.PRW - NU400MANUT() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"GRAVA_TRB"),)
EICNU400.PRW - NU400MANUT() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"GRAVOU_DESP"),)
EICNU400.PRW - NU400MANUT() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"GRAVOU_EIC"),)
EICNU400.PRW - NU400MANUT() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"INICIA_VARIAVEIS"),)
EICNU400.PRW - NU400MANUT() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"LOOP_TELA_MANUT"),)
EICNU400.PRW - NU400MANUT() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"TELA_MANUT"),)
EICNU400.PRW - NU400MANUT() -> IF(EASYENTRYPOINT("EICNU400"),EXECBLOCK("EICNU400",.F.,.F.,"VALORES_TELA"),)
EICNU400.PRW - NU400PRECALC() -> EXECBLOCK("EICNU400",.F.,.F.,"NU400PRECALC_DESP")
EICNU400.PRW - NU400REENVIOMAIL() -> EXECBLOCK("EICNU400",.F.,.F.,"CBODY2_REEVIOEMAIL")
EICNU400.PRW - NU400REENVIOMAIL() -> EXECBLOCK("EICNU400",.F.,.F.,"CBODY_REEVIOEMAIL")
EICNU400.PRW - NU400REENVIOMAIL() -> EXECBLOCK("EICNU400",.F.,.F.,"EMAIL")
EICOP100.PRW - OP100ALTERA() -> EXECBLOCK("EICPTA01",.F.,.F.,{6,NIL},)
EICOP100.PRW - OP100ALTERA() -> IF(EASYENTRYPOINT("EICOP100"), EXECBLOCK("EICOP100",.F.,.F.,6),)
EICOP100.PRW - OP100DELETA() -> EXECBLOCK("EICPTA01",.F.,.F.,{8,NIL},)
EICOP100.PRW - OP100DELETA() -> IF(EASYENTRYPOINT("EICOP100"), EXECBLOCK("EICOP100",.F.,.F.,8),)
EICOP100.PRW - OP100DELETA() -> PRIVATE BBROCK:={||IF(EASYENTRYPOINT("EICPTA01"),EXECBLOCK("EICPTA01",.F.,.F.,{3,NIL}),.T.)}
EICOP100.PRW - OP100GRTRB(C() -> EXECBLOCK("EICPTA01",.F.,.F.,{1,CALIAS},)
EICOP100.PRW - OP100GRTRB(C() -> IF(EASYENTRYPOINT("EICOP100"), EXECBLOCK("EICOP100",.F.,.F.,1),)
EICOP100.PRW - OP100INCLUI() -> EXECBLOCK("EICPTA01",.F.,.F.,{5,NIL},)
EICOP100.PRW - OP100INCLUI() -> IF(EASYENTRYPOINT("EICOP100"), EXECBLOCK("EICOP100",.F.,.F.,5),)
EICOP100.PRW - OP100LINOK() -> EXECBLOCK("EICPTA01",.F.,.F.,{2,NIL},)
EICOP100.PRW - OP100LINOK() -> IF(EASYENTRYPOINT("EICOP100"), EXECBLOCK("EICOP100",.F.,.F.,2),)
EICOP100.PRW - OP100VALID() -> IF !(LRET := IF(EASYENTRYPOINT("EICPTA01"),EXECBLOCK("EICPTA01",.F.,.F.,{4,TRB->(RECNO())},),.T.))
EICOP100.PRW - OP100VALID() -> IF(EASYENTRYPOINT("EICOP100"),EXECBLOCK("EICOP100",.F.,.F.,4),)
EICOP100.PRW - OP100VISUAL() -> EXECBLOCK("EICPTA01",.F.,.F.,{7,NIL},)
EICOP100.PRW - OP100VISUAL() -> IF(EASYENTRYPOINT("EICOP100"), EXECBLOCK("EICOP100",.F.,.F.,7),)
EICOP100.PRW - OP100VISUAL() -> PRIVATE BBROCK:={||IF(EASYENTRYPOINT("EICPTA01"),EXECBLOCK("EICPTA01",.F.,.F.,{3,NIL}),.T.)}
EICOP110.PRW - EICOP110() -> EXECBLOCK("EICOP110",.F.,.F.,"APOS_WORK_ESTRU")
EICOP110.PRW - EICOP110() -> EXECBLOCK("EICOP110",.F.,.F.,"APROPRIA_CFO")
EICOP110.PRW - EICOP110() -> EXECBLOCK("EICOP110",.F.,.F.,"WORK_ESTRU")
EICOP110.PRW - EICOP110() -> IF(EASYENTRYPOINT("EICOP110"),EXECBLOCK("EICOP110",.F.,.F.,"GRAVA_SW7"),),;
EICOP110.PRW - EICOP110() -> IF(EASYENTRYPOINT("EICOP110"),EXECBLOCK("EICOP110",.F.,.F.,"ORDENA_CFO"),)
EICOP110.PRW - OP110EDITA() -> (EVAL(BALTERA),IF(EASYENTRYPOINT("IC086DI2"),EXECBLOCK("IC086DI2",.F.,.F.,{2,COPERACAO}),),;
EICOP110.PRW - OP110EDITA() -> @ NLIN,6.0 MSGET OGETOPERACAO VAR COPERACAO F3 "SWZ" VALID( EVAL(BOP_DESCR), OP110CHKOP(COPERACAO,.F.,OGETOPERACAO),IF(EASYENTRYPOINT("IC086DI2"),EXECBLOCK("IC086DI2",.F.,.F.,{5,COPERACAO}),.T.) ) ;
EICOP110.PRW - OP110EDITA() -> EXECBLOCK("EICOP110",.F.,.F.,"TELA_WORK")
EICOP110.PRW - OP110EDITA() -> EXECBLOCK("IC086DI2",.F.,.F.,{3,COPERACAO})
EICOP110.PRW - OP110EDITA() -> IF(EASYENTRYPOINT("EICOP110"),EXECBLOCK("EICOP110",.F.,.F.,"GRAVA_WORK"),),;
EICOP110.PRW - OP110GRAVA() -> EXECBLOCK("EICOP110",.F.,.F.,"GRAVA_WORK")
EICOP110.PRW - OP110GRAVA() -> EXECBLOCK("IC086DI2",.F.,.F.,{2,WORK->WKOPERACA})
EICOP110.PRW - OP110VLDOK() -> EXECBLOCK("EICOP110",.F.,.F.,"OP110VLDOK_CFO")
EICOR100.PRW - ATUCAD() -> EXECBLOCK("EICOR100",.F.,.F.,"ATUCAD")
EICOR100.PRW - ATUCAD() -> EXECBLOCK("EICOR100",.F.,.F.,"CARGA_ATUCAD")
EICOR100.PRW - ATUCAPALI() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"CHAVE_SWP"),)
EICOR100.PRW - ATUCAPALI() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"EXIBEMSG"),)
EICOR100.PRW - ATUCAPALI() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"GRV_WORK_SWP"),)
EICOR100.PRW - GERAGIPLIT() -> EXECBLOCK("EICOR100",.F.,.F.,"DESC_IT_NVE")
EICOR100.PRW - OR100ATUSWP() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"GRAVA_SWP"),)
EICOR100.PRW - OR100GRVLSI() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"LENDO_DADOS_PARA_GRAVACAO_DA_LSI"),)
EICOR100.PRW - OR100GRVTAXA() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"GRAVA_TAXA"),)
EICOR100.PRW - ORI100ENV() -> EXECBLOCK("EICOR100",.F.,.F.,"ANTES_CRIA_ARQ")
EICOR100.PRW - ORI100ENV() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"ADICAO"),)
EICOR100.PRW - ORI100ENV() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"ANTES_CRIA_GIP_LITE"),)
EICOR100.PRW - ORI100ENV() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"TAM_REG"),)
EICOR100.PRW - ORI100ENV() -> IF(LEICPOR01,EXECBLOCK(CRDPAD01,.F.,.F.,"TAM_REG"),)
EICOR100.PRW - ORI100GETDATA() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"ANTES_PERG_GETDATA"),)
EICOR100.PRW - ORI100GETDATA() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"FIM_GETDATA"),)
EICOR100.PRW - ORI100GRV() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"ALTERAL_BLOCK_PESO"),)
EICOR100.PRW - ORI100GRV() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"CAP2"),)
EICOR100.PRW - ORI100GRV() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"CAP3"),)
EICOR100.PRW - ORI100GRV() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"CAPI"),)
EICOR100.PRW - ORI100GRV() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"CAPZ"),)
EICOR100.PRW - ORI100GRV() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"DESC_LI_SISC"),)
EICOR100.PRW - ORI100GRV() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"DESPESAS"),)
EICOR100.PRW - ORI100GRV() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"ENVIO_CAPALI"),)
EICOR100.PRW - ORI100GRV() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"FAB_FOR_LINAZUL"),)
EICOR100.PRW - ORI100GRV() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"FOB"),)
EICOR100.PRW - ORI100GRV() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"GRAVA_SWP"),)
EICOR100.PRW - ORI100GRV() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"ITDI"),)
EICOR100.PRW - ORI100GRV() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"WHILE_SW5_A"),)
EICOR100.PRW - ORI100GRV() -> IF(EASYENTRYPOINT("ICPADSUF"),EXECBLOCK("ICPADSUF",.F.,.F.,"PESOITEM"),)
EICOR100.PRW - ORI100GRV() -> IF(EASYENTRYPOINT("ICPADSUF"),EXECBLOCK("ICPADSUF",.F.,.F.,"PESTOTITEM"),)
EICOR100.PRW - ORI100GRV() -> IF(EXISTBLOCK("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"ALTERA_PROCESSO"),)
EICOR100.PRW - ORI100GRV() -> IF(LEICPOR01,EXECBLOCK(CRDPAD01,.F.,.F.,"AG4A"),)
EICOR100.PRW - ORI100GRV() -> IF(LEICPOR01,EXECBLOCK(CRDPAD01,.F.,.F.,"AG4B"),)
EICOR100.PRW - ORI100GRV() -> IF(LEICPOR01,EXECBLOCK(CRDPAD01,.F.,.F.,"CAP2"),)
EICOR100.PRW - ORI100GRV() -> IF(LEICPOR01,EXECBLOCK(CRDPAD01,.F.,.F.,"CAP3"),)
EICOR100.PRW - ORI100GRV() -> IF(LEICPOR01,EXECBLOCK(CRDPAD01,.F.,.F.,"CAPI"),)
EICOR100.PRW - ORI100GRV() -> IF(LEICPOR01,EXECBLOCK(CRDPAD01,.F.,.F.,"CAPZ"),)
EICOR100.PRW - ORI100GRV() -> IF(LEICPOR01,EXECBLOCK(CRDPAD01,.F.,.F.,"ITDI"),)
EICOR100.PRW - ORI100GRV() -> IF(LHUNTER,EXECBLOCK("IC010DI1",.F.,.F.,"10"),)
EICOR100.PRW - ORI100GRV() -> IF(LHUNTER,EXECBLOCK("IC010DI1",.F.,.F.,"7"),)
EICOR100.PRW - ORI100GRV() -> IF(LHUNTER,EXECBLOCK("IC010DI1",.F.,.F.,"8"),)
EICOR100.PRW - ORI100GRV() -> IF(LHUNTER,EXECBLOCK("IC010DI1",.F.,.F.,"9"),)
EICOR100.PRW - ORI100MAIN() -> EXECBLOCK("EICOR10E",.F.,.F.)
EICOR100.PRW - ORI100MAIN() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"ALTERA_BPRINT_1"),)
EICOR100.PRW - ORI100MAIN() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"ALTERA_BPRINT_2"),)
EICOR100.PRW - ORI100MAIN() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"IMPRIME_RET"),)
EICOR100.PRW - ORI100MARCA() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"MARCADESMA"),)
EICOR100.PRW - PROCESSA_ITENS() -> EXECBLOCK("IC010DI1",.F.,.F.,"13")
EICOR100.PRW - PROCESSA_ITENS() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"ANTES_ITEA"),)
EICOR100.PRW - PROCESSA_ITENS() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"DESC_LI_GIP"),)
EICOR100.PRW - PROCESSA_ITENS() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"DPNN"),)
EICOR100.PRW - PROCESSA_ITENS() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"ITEA"),)
EICOR100.PRW - PROCESSA_ITENS() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"ITEA_VALORES"),)
EICOR100.PRW - PROCESSA_ITENS() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"ITEB"),)
EICOR100.PRW - PROCESSA_ITENS() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"ITEC"),)
EICOR100.PRW - PROCESSA_ITENS() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"ITED_FINAL"),)
EICOR100.PRW - PROCESSA_ITENS() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"ITEZ"),)
EICOR100.PRW - PROCESSA_ITENS() -> IF(EASYENTRYPOINT("EICOR100"),EXECBLOCK("EICOR100",.F.,.F.,"VAL_FOB"),)
EICOR100.PRW - PROCESSA_ITENS() -> IF(EASYENTRYPOINT("ICPADSUF"),EXECBLOCK("ICPADSUF",.F.,.F.,"PESOIT_W3"),)
EICOR100.PRW - PROCESSA_ITENS() -> IF(LEICPOR01,EXECBLOCK(CRDPAD01,.F.,.F.,"DPNN"),)
EICOR100.PRW - PROCESSA_ITENS() -> IF(LEICPOR01,EXECBLOCK(CRDPAD01,.F.,.F.,"ITEA"),)
EICOR100.PRW - PROCESSA_ITENS() -> IF(LEICPOR01,EXECBLOCK(CRDPAD01,.F.,.F.,"ITEB"),)
EICOR100.PRW - PROCESSA_ITENS() -> IF(LEICPOR01,EXECBLOCK(CRDPAD01,.F.,.F.,"ITEC"),)
EICOR100.PRW - PROCESSA_ITENS() -> IF(LEICPOR01,EXECBLOCK(CRDPAD01,.F.,.F.,"ITEZ"),)
EICOR100.PRW - PROCESSA_ITENS() -> IF(LEICPOR01,EXECBLOCK(CRDPAD01,.F.,.F.,"POS_GRV_DPNN"),)
EICOR100.PRW - PROCESSA_ITENS() -> IF(LHUNTER,EXECBLOCK("IC010DI1",.F.,.F.,"12"),)
EICOR150.PRW - FINAL_ITEM() -> EXECBLOCK("IC010DI1",.F.,.F.,"16")
EICOR150.PRW - FINAL_ITEM() -> IF(EASYENTRYPOINT("EICOR150"),EXECBLOCK("EICOR150",.F.,.F.,"DESCRICAO_ITEM"),)
EICOR150.PRW - ORI100DET() -> IF(EASYENTRYPOINT("EICOR150"),EXECBLOCK("EICOR150",.F.,.F.,"TOTALIZADOR"),)
EICOR150.PRW - ORI100DET() -> IF(EASYENTRYPOINT("ICPADSUF"),EXECBLOCK("ICPADSUF",.F.,.F.,"PESOITEM"),)
EICOR150.PRW - ORI100DET() -> IF(LHUNTER,EXECBLOCK("IC010DI1",.F.,.F.,"7"),)
EICOR150.PRW - ORI100IMP() -> EXECBLOCK("IC010DI1",.F.,.F.,"14")
EICOR150.PRW - ORI100IMP() -> IF(EASYENTRYPOINT("EICOR150"),EXECBLOCK("EICOR150",.F.,.F.,"DESC_ITEM_REL"),)
EICOR150.PRW - ORI100IMP() -> IF(EASYENTRYPOINT("EICOR150"),EXECBLOCK("EICOR150",.F.,.F.,"DESC_LI_REL"),)
EICOR150.PRW - ORI100IMP() -> IF(EASYENTRYPOINT("ICPADSUF"),EXECBLOCK("ICPADSUF",.F.,.F.,"PESOIT_W3"),)
EICOR150.PRW - ORI100IMP() -> IF(LHUNTER,EXECBLOCK("IC010DI1",.F.,.F.,"11"),)
EICOR150.PRW - ORI100INVPREPRO() -> IF(EASYENTRYPOINT("EICOR150"),EXECBLOCK("EICOR150",.F.,.F.,"GRV_WORK_INV"),)
EICOR150.PRW - ORI100INVPREPRO() -> IF(EASYENTRYPOINT("ICPADSUF"),EXECBLOCK("ICPADSUF",.F.,.F.,"PESOIT_W3"),)
EICOR150.PRW - ORI100PODISUBCAB() -> IF(EASYENTRYPOINT("EICOR150"),EXECBLOCK("EICOR150",.F.,.F.,"IMPOSTOS"),)
EICOR150.PRW - ORI100PREPRO() -> IF(EASYENTRYPOINT("EICOR150"),EXECBLOCK("EICOR150",.F.,.F.,"GRAVA_WORK"),)
EICOR150.PRW - ORI100PREPRO() -> IF(EASYENTRYPOINT("ICPADSUF"),EXECBLOCK("ICPADSUF",.F.,.F.,"PESOIT_W3"),)
EICOR150.PRW - ORI100PREPRO() -> IF(LHUNTER,EXECBLOCK("IC010DI1",.F.,.F.,"10"),)
EICOR150.PRW - ORI100PREPRO() -> IF(LHUNTER,EXECBLOCK("IC010DI1",.F.,.F.,"15"),)
EICOR150.PRW - ORI100REL() -> IF(EASYENTRYPOINT("EICOR150"),EXECBLOCK("EICOR150",.F.,.F.,"ADICIONA_CAMPO"),)
EICOR150.PRW - ORI100RET() -> IF(EASYENTRYPOINT("EICOR150"),EXECBLOCK("EICOR150",.F.,.F.,"IMPRIME_EST_MUN"),)
EICOR150.PRW - ORI100RET() -> IF(EASYENTRYPOINT("EICOR150"),EXECBLOCK("EICOR150",.F.,.F.,"TOTALIZADOR"),)
EICPO150.PRW - EICPO150() -> EXECBLOCK( CPOINT1P,.F.,.F.,"1" )
EICPO150.PRW - EICPO150() -> EXECBLOCK( CPOINT2P ,.F.,.F. )
EICPO150.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IPO150MNU",.F.,.F.)
EICPO150.PRW - PO150CABEC() -> EXECBLOCK("PO150LGO",.F.,.F.,{LINHA})
EICPO150.PRW - PO150ITEM() -> EXECBLOCK(CPOINTS,.F.,.F.)
EICPO150.PRW - PO150ITEM() -> IF(LPOINT1P,EXECBLOCK(CPOINT1P,.F.,.F.,"2"),)
EICPO150_RDM.PRW - PO150RDM()() -> EXECBLOCK( CPOINT2P ,.F.,.F. )
EICPO400.PRW - DBUPO420B() -> ELSEIF LPOINTE .AND. !EXECBLOCK(CPOINTE)
EICPO400.PRW - DBUPO420B() -> IF EXECBLOCK("IC086PO1",.F.,.F.,2)
EICPO400.PRW - DBUPO420B() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ALT_DATA_TITULO"),)
EICPO400.PRW - DBUPO420B() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ANTES_GRAVAR"),)
EICPO400.PRW - DBUPO420B() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ANTES_GRAVA_PO"),)
EICPO400.PRW - DBUPO420B() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"GRAVA_PO_PC"),)
EICPO400.PRW - DBUPO420B() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"INICIO_GRAVA"),)
EICPO400.PRW - DBUPO420B() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"VAL_GRAVA_PO"),)
EICPO400.PRW - DBUPO420B() -> IF(LPOINTS,EXECBLOCK(CPOINTS),)
EICPO400.PRW - DBUPO420B() -> IF(LRDMAKE,EXECBLOCK("EICPPO02",.F.,.F.,"NUMSEQPO"),)
EICPO400.PRW - EICPO400() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"WORK_SI"),)
EICPO400.PRW - EICPO400() -> IF(EASYENTRYPOINT("EICPOITE"),EXECBLOCK("EICPOITE",.F.,.F.,"MENU"),)
EICPO400.PRW - EICPO420(LENVIO,NOPC,ACAB,CALIAS,LWK,CPO_NUM) DO LOGIX() -> EXECBLOCK("EICPPO02",.F.,.F.,"16")
EICPO400.PRW - EICPO420(LENVIO,NOPC,ACAB,CALIAS,LWK,CPO_NUM) DO LOGIX() -> EXECBLOCK(CARQNESTLE,.F.,.F.,"8")
EICPO400.PRW - EICPO420(LENVIO,NOPC,ACAB,CALIAS,LWK,CPO_NUM) DO LOGIX() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"BROWSE_ESTORNO"),)
EICPO400.PRW - EICPO420(LENVIO,NOPC,ACAB,CALIAS,LWK,CPO_NUM) DO LOGIX() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"7"),)
EICPO400.PRW - EICPO420(LENVIO,NOPC,ACAB,CALIAS,LWK,CPO_NUM) DO LOGIX() -> IF(LSEAL,EXECBLOCK("IC193PO1",.F.,.F.,"1"),)
EICPO400.PRW - EICPO420(LENVIO,NOPC,ACAB,CALIAS,LWK,CPO_NUM)() -> EXECBLOCK("EICPO400",.F.,.F.,"REPLACE")
EICPO400.PRW - EICPO420(LENVIO,NOPC,ACAB,CALIAS,LWK,CPO_NUM)() -> EXECBLOCK("EICPPO02",.F.,.F.,"18")
EICPO400.PRW - EICPO420(LENVIO,NOPC,ACAB,CALIAS,LWK,CPO_NUM)() -> EXECBLOCK("IC086PO1",.F.,.F.,3)
EICPO400.PRW - EICPO420(LENVIO,NOPC,ACAB,CALIAS,LWK,CPO_NUM)() -> EXECBLOCK(CARQNESTLE,.F.,.F.,"2")
EICPO400.PRW - EICPO420(LENVIO,NOPC,ACAB,CALIAS,LWK,CPO_NUM)() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ANTES_GRAVA_WORK_SW3"),)
EICPO400.PRW - EICPO420(LENVIO,NOPC,ACAB,CALIAS,LWK,CPO_NUM)() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"WORK_DESPESAS"),)
EICPO400.PRW - EICPO420(LENVIO,NOPC,ACAB,CALIAS,LWK,CPO_NUM)() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"9"),)
EICPO400.PRW - EICPO420(LENVIO,NOPC,ACAB,CALIAS,LWK,CPO_NUM)() -> IF(LSEAL,EXECBLOCK("IC193PO1",.F.,.F.,"3"),)
EICPO400.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IPO400MNU",.F.,.F.)
EICPO400.PRW - PO400ALTER() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ALTERAR"),)
EICPO400.PRW - PO400ALTER() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ANTES_ALTERA_TELA_PO"),)
EICPO400.PRW - PO400ALTER() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"DEPOIS_ALTERA_INC_PO"),)
EICPO400.PRW - PO400ALTER() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"VAL_ALCADA_ALTERA_TELA_PO"),)
EICPO400.PRW - PO400ALTER() -> {||E_VALID(AGETS,{|CAMPO| PO420VAL(CAMPO)}).AND.PO420VAL("TUDO").AND.IF(LRDMAKE,EXECBLOCK("EICPPO02",.F.,.F.,"14"),.T.)},;
EICPO400.PRW - PO400ATU() -> IF LPOINTE .AND. !EXECBLOCK(CPOINTE)
EICPO400.PRW - PO400ATU() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"DEPOIS_GRAVA_ALT_PO"),)
EICPO400.PRW - PO400ATU() -> IF(LPOINTS,EXECBLOCK(CPOINTS),)
EICPO400.PRW - PO400COPIAGRV() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ANTES_COPIA_LOOPSW2"),)
EICPO400.PRW - PO400COPIAGRV() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"COPIA_LOOPSW2"),)
EICPO400.PRW - PO400CRIATEMP() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"CRIA_TEMP"),)
EICPO400.PRW - PO400CRIATEMP() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"8"),)
EICPO400.PRW - PO400CRIATEMP() -> IF(LSEAL,EXECBLOCK("IC193PO1",.F.,.F.,"2"),)
EICPO400.PRW - PO400ESTOR() -> IF(EASYENTRYPOINT("EICPO400"), EXECBLOCK("EICPO400",.F.,.F.,"PO400ESTOR_VERIFICA_PAG_ANT"),)
EICPO400.PRW - PO400ESTOR() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ANTES_ESTORNA"),)
EICPO400.PRW - PO400GERAWORK() -> EXECBLOCK("EICPPO02",.F.,.F.,"17")
EICPO400.PRW - PO400GERAWORK() -> EXECBLOCK("EICPPO02",.F.,.F.,"26")
EICPO400.PRW - PO400GERAWORK() -> EXECBLOCK(CARQNESTLE,.F.,.F.,"1")
EICPO400.PRW - PO400GERAWORK() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"AADD_WORK"),)
EICPO400.PRW - PO400GERAWORK() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"8"),)
EICPO400.PRW - PO400GERAWORK() -> IF(LSEAL,EXECBLOCK("IC193PO1",.F.,.F.,"2"),)
EICPO400.PRW - PO400GRAVAPC() -> EXECBLOCK("EICPO400",.F.,.F.,"PO400GRAVAPC_CAPA")
EICPO400.PRW - PO400GRAVAPC() -> EXECBLOCK("EICPO400",.F.,.F.,"PO400GRAVAPC_ITEM")
EICPO400.PRW - PO400GRVPOSICAO() -> EXECBLOCK("EICPPO02",.F.,.F.,"11")
EICPO400.PRW - PO400GRVPOSICAO() -> EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICPO400.PRW - PO400GRVPOSICAO() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ANTES_GRV_POSICAO"),)
EICPO400.PRW - PO400GRW0HLP() -> EXECBLOCK("EICPO400", .F., .F., "GRAVA_WORK_SI")
EICPO400.PRW - PO400GRW0HLP() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"DESVIA_WORK_SI"),)
EICPO400.PRW - PO400HLPW0() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"TB_CAMPOS_SI"),)
EICPO400.PRW - PO400INCLU() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"DEPOIS_GRAVA_INC_PO"),)
EICPO400.PRW - PO400INCLU() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"INCLUIR"),.T.)
EICPO400.PRW - PO400INCLU() -> {|| E_VALID(AGETS,{|CAMPO| PO420VAL(CAMPO)}).AND.PO420VAL("TUDO").AND.IF(LRDMAKE,EXECBLOCK("EICPPO02",.F.,.F.,"14"),.T.) },;
EICPO400.PRW - PO400ITENS() -> EXECBLOCK("EICPPO02",.F.,.F.,"15")
EICPO400.PRW - PO400ITENS() -> EXECBLOCK("EICPPO02",.F.,.F.,"18")
EICPO400.PRW - PO400ITENS() -> EXECBLOCK("IC086PO1",.F.,.F.,3)
EICPO400.PRW - PO400ITENS() -> EXECBLOCK(CARQNESTLE,.F.,.F.,"2")
EICPO400.PRW - PO400ITENS() -> EXECBLOCK(CARQNESTLE,.F.,.F.,"8")
EICPO400.PRW - PO400ITENS() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"BROWSE_VISUALIZAR"),)
EICPO400.PRW - PO400ITENS() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"WORK_DESPESAS"),)
EICPO400.PRW - PO400ITENS() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"7"),)
EICPO400.PRW - PO400ITENS() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"9"),)
EICPO400.PRW - PO400ITENS() -> IF(LSEAL,EXECBLOCK("IC193PO1",.F.,.F.,"3"),)
EICPO400.PRW - PO400MARCA() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"MARCATODOSESTORNO"),)
EICPO400.PRW - PO400MARITEM() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"MARCAESTORNO"),)
EICPO400.PRW - PO400RATFRSG() -> EXECBLOCK("EICPO400", .F., .F., "PO400RAT_DESPESAS")
EICPO400.PRW - PO400REGMANUT() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"MANUT_REG_TRIB"),)
EICPO400.PRW - PO400SELPO() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"BROWSE_COPIA"),)
EICPO400.PRW - PO400SELPO() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"FIM_COPIA"),)
EICPO400.PRW - PO400SELPO() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"TELA_COPIA"),)
EICPO400.PRW - PO400SIAUTO() -> EXECBLOCK("EICPO400",.F.,.F.,"GRAVATRB_SI_AUTO")
EICPO400.PRW - PO400SIAUTO() -> EXECBLOCK("EICPO400",.F.,.F.,"GRAVA_SICOPIA")
EICPO400.PRW - PO400SIREF() -> EXECBLOCK("EICPO400",.F.,.F.,"SI_REF")
EICPO400.PRW - PO400SIREF() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"FILTRACC"),)
EICPO400.PRW - PO400VALDT() -> EXECBLOCK("EICPO400", .F., .F., "VALIDA_DATA_" + CCAMPO)
EICPO400.PRW - PO400VALPO() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"APOS_MARCA_ITEM"),)
EICPO400.PRW - PO400VALSWB() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"PO400VALSWB_VALID_PAG_ANT"),)
EICPO400.PRW - PO400VISUA() -> EXECBLOCK("EICPPO02",.F.,.F.,"15")
EICPO400.PRW - PO400VISUA() -> EXECBLOCK(CARQNESTLE,.F.,.F.,"8")
EICPO400.PRW - PO400VISUA() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"BROWSE_VISUALIZAR"),)
EICPO400.PRW - PO400VISUA() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"FIM_VISUALIZACAO"),)
EICPO400.PRW - PO400VISUA() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"7"),)
EICPO400.PRW - PO400VISUA() -> IF(LSEAL,EXECBLOCK("IC193PO1",.F.,.F.,"1"),)
EICPO400.PRW - PO400ZERA() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ANTES_ELIMINA"),)
EICPO400.PRW - PO410ESTORNO() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ANTES_ESTORNO_PO"),)
EICPO400.PRW - PO410ESTORNO() -> IF(LRET .AND. EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"DEPOIS_ESTORNO_PO"),)
EICPO400.PRW - PO420ALTERADATAS() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ALTERA_DATA"),)
EICPO400.PRW - PO420ALTERADATAS() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"VALIDA_DATAS"),)
EICPO400.PRW - PO420ALTWORK() -> EXECBLOCK("EICPO400",.F.,.F.,"ALT_DT_ENTREGA")
EICPO400.PRW - PO420CHA() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"WHEN_ALTERA"),)
EICPO400.PRW - PO420VAL() -> EXECBLOCK("EICPO400",.F.,.F.,"VALID")
EICPO400.PRW - PO420VAL() -> IF !EXECBLOCK("IC086PO1",.F.,.F.,1)
EICPO400.PRW - PO420VAL() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"MUDA_DT_ENTREGA"),)
EICPO400.PRW - PO420VAL() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"RECALC_DT_ENTREGA"),)
EICPO400.PRW - PO420VAL() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"VALIDA_COTACAO"),)
EICPO400.PRW - PO420VAL() -> LRETFUNC:=EXECBLOCK("EICPPO02",.F.,.F.,"24")
EICPO400.PRW - POZERASLDMANUT() -> EXECBLOCK("EICPO400",.F.,.F.,"ANTESZERASLD")
EICPO400.PRW - POZERASLDMANUT() -> EXECBLOCK("EICPO400",.F.,.F.,"SLDZERADO")
EICPO400.PRW - PO_CREATE() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ANTES_P_TE_2"),)
EICPO400.PRW - PO_ESTORNO() -> EXECBLOCK("EICPPO02",.T.,.T.,"25")
EICPO400.PRW - PO_ESTORNO() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ANTES_ESTONA_CAPA"),)
EICPO400.PRW - PO_ESTORNO() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ESTORNO"),)
EICPO400.PRW - PO_ESTORNO() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ESTORNOCAPA"),)
EICPO400.PRW - PO_EXISTE() -> EXECBLOCK("EICPO400",.F.,.F.,"APPEND")
EICPO400.PRW - PO_EXISTE() -> EXECBLOCK("IC086PO1",.F.,.F.,3)
EICPO400.PRW - PO_EXISTE() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"WORK_DESPESAS"),)
EICPO400.PRW - PO_EXISTE() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"9"),)
EICPO400.PRW - PO_EXISTE() -> IF(LNESTLE,WORK->(EXECBLOCK(CARQNESTLE,.F.,.F.,"2")),)
EICPO400.PRW - PO_EXISTE() -> IF(LSEAL,EXECBLOCK("IC193PO1",.F.,.F.,"3"),)
EICPO400.PRW - PO_EXISTE() -> WORK->(EXECBLOCK("EICPPO02",.F.,.F.,"1"))
EICPO400.PRW - PO_EXISTE() -> WORK->(EXECBLOCK(CARQRDMAKE,.F.,.F.))
EICPO400.PRW - PO_FILTER() -> EXECBLOCK("EICPO400",.F.,.F.,"USUARIOS")
EICPO400.PRW - PO_FILTER() -> EXECBLOCK("EICPPO01",.F.,.F.,"FILTRO")
EICPO400.PRW - PO_INITWORK() -> EXECBLOCK("EICPPO02",.F.,.F.,"12")
EICPO400.PRW - PO_INITWORK() -> EXECBLOCK("EICPPO02",.F.,.F.,"13")
EICPO400.PRW - PO_INITWORK() -> EXECBLOCK(CARQNESTLE,.F.,.F.,"1")
EICPO400.PRW - PO_INITWORK() -> EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICPO400.PRW - PO_INITWORK() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ADICIONA_WORK"),)
EICPO400.PRW - PO_INITWORK() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"8"),)
EICPO400.PRW - PO_INITWORK() -> IF(LSEAL,EXECBLOCK("IC193PO1",.F.,.F.,"2"),)
EICPO400.PRW - PO_PESQSI() -> EXECBLOCK("EICPO400",.F.,.F.,"GRV_WORK_COM_SW1")
EICPO400.PRW - PO_PESQSI() -> EXECBLOCK("EICPPO02",.F.,.F.,"10")
EICPO400.PRW - PO_PESQSI() -> EXECBLOCK("EICPPO02",.F.,.F.,"9")
EICPO400.PRW - PO_PESQSI() -> EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICPO400.PRW - PO_PESQSI() -> IF !EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICPO400.PRW - PO_PESQSI() -> IF (EASYENTRYPOINT("EICPO400"), EXECBLOCK("EICPO400",.F.,.F.,"PO_PESQSI_SEL"),)
EICPO400.PRW - PO_PESQSI() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ANTES_MARCA_ITEM"),)
EICPO400.PRW - PO_PESQSI() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"12"),)
EICPO400.PRW - PO_PESQSI() -> IF(LNOBEL, EXECBLOCK("IC163PO1",.F.,.F.),)
EICPO400.PRW - PO_VALIDSI() -> EXECBLOCK("EICPO400",.F.,.F.,"VALIDA")
EICPO400.PRW - PO_VALIDSI() -> EXECBLOCK("EICPPO02",.F.,.F.,"8")
EICPO400.PRW - PO_VALIDSI() -> IF !EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICPO400.PRW - P_TE_2() -> EXECBLOCK("EICPO400",.F.,.F.,"FILTRA_SI")
EICPO400.PRW - P_TE_2() -> EXECBLOCK("EICPPO02",.F.,.F.,"2")
EICPO400.PRW - P_TE_2() -> EXECBLOCK("EICPPO02",.F.,.F.,"28")
EICPO400.PRW - P_TE_2() -> EXECBLOCK("EICPPO02",.F.,.F.,"3")
EICPO400.PRW - P_TE_2() -> EXECBLOCK("EICPPO02",.F.,.F.,"4")
EICPO400.PRW - P_TE_2() -> EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICPO400.PRW - P_TE_2() -> IF !EXECBLOCK("EICPPO02",.F.,.F.,"22")
EICPO400.PRW - P_TE_2() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ANTES_GET_SI"),)
EICPO400.PRW - P_TE_2() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ANTES_TELA_ITEM"),)
EICPO400.PRW - P_TE_2() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"APOS_GET_SI"),)
EICPO400.PRW - P_TE_2() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"BROWSE_INCLUIR_ALTERAR"),)
EICPO400.PRW - P_TE_2() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"TELA_SELECAO_SI"),)
EICPO400.PRW - P_TE_2() -> IF(EASYENTRYPOINT("EICPO400"),LTELASI := EXECBLOCK("EICPO400",.F.,.F.,"SELECIONASI"),)
EICPO400.PRW - P_TE_2() -> IF(EXECBLOCK(CARQRDMAKE,.F.,.F.),;
EICPO400.PRW - P_TE_2() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"10"),)
EICPO400.PRW - P_TE_2() -> IF(LSEAL,EXECBLOCK("IC193PO1",.F.,.F.,"4"),)
EICPO400.PRW - P_TE_2() -> LFILTSI:=EXECBLOCK("EICPPO02",.F.,.F.,"SEMFILTRO")
EICPO400.PRW - P_TE_2() -> LSELECAO:=EXECBLOCK("EICPPO02",.F.,.F.,"ALTERACAO")
EICPO400.PRW - P_TE_3() -> EXECBLOCK("EICPO400",.F.,.F.,"DESMARCA_ITEM")
EICPO400.PRW - P_TE_3() -> EXECBLOCK("EICPO400",.F.,.F.,"GRAVA_ALTERACAO_ITEM")
EICPO400.PRW - P_TE_3() -> EXECBLOCK("EICPPO02",.F.,.F.,"19")
EICPO400.PRW - P_TE_3() -> EXECBLOCK("EICPPO02",.F.,.F.,"5")
EICPO400.PRW - P_TE_3() -> EXECBLOCK(CARQNESTLE,.F.,.F.,"3")
EICPO400.PRW - P_TE_3() -> EXECBLOCK(CARQNESTLE,.F.,.F.,"6")
EICPO400.PRW - P_TE_3() -> EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICPO400.PRW - P_TE_3() -> IF( EASYENTRYPOINT("EICPO400"), EXECBLOCK("EICPO400",.F.,.F.,"INICIA_TE_3"), )
EICPO400.PRW - P_TE_3() -> IF( EASYENTRYPOINT("EICPO400"), EXECBLOCK("EICPO400",.F.,.F.,"INICIA_VAR_ITEM"), )
EICPO400.PRW - P_TE_3() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ALTERA_PO_POST"),)
EICPO400.PRW - P_TE_3() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"COORDENADA_TELA_ITENS"),)
EICPO400.PRW - P_TE_3() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"GRAVA_ITENS_WORK"),)
EICPO400.PRW - P_TE_3() -> IF(LSEAL,EXECBLOCK("IC193PO1",.F.,.F.,"5"),)
EICPO400.PRW - P_TE_3() -> IF(LSEAL,EXECBLOCK("IC193PO1",.F.,.F.,"6"),)
EICPO400.PRW - P_TE_4() -> EXECBLOCK("EICPO400",.F.,.F.,"DEFINIR_ACAMPOS")
EICPO400.PRW - P_TE_4() -> EXECBLOCK("EICPO400",.F.,.F.,"INICIA_VARIAVEL_CONFERENCIA_FINAL")
EICPO400.PRW - P_TE_4() -> EXECBLOCK("EICPPO02",.F.,.F.,"29")
EICPO400.PRW - P_TE_4() -> EXECBLOCK("EICPPO02",.F.,.F.,"6")
EICPO400.PRW - P_TE_4() -> EXECBLOCK("EICPPO02",.F.,.F.,"7")
EICPO400.PRW - P_TE_4() -> EXECBLOCK(CARQNESTLE,.F.,.F.,"9")
EICPO400.PRW - P_TE_4() -> EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICPO400.PRW - P_TE_4() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"APOS_CONFERENCIAFINAL"),)
EICPO400.PRW - P_TE_4() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"BROWSE_CONFERENCIA"),)
EICPO400.PRW - P_TE_4() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"11"),)
EICPO400.PRW - P_TE_4() -> IF(LSEAL,EXECBLOCK("IC193PO1",.F.,.F.,"4"),)
EICPO400.PRW - VALIDOPEPO() -> IF(EASYENTRYPOINT("EICPO400"),EXECBLOCK("EICPO400",.F.,.F.,"ANTES_SALVAR"),)
EICPO430.PRW - PO430DADOS() -> IF(EASYENTRYPOINT("EICPO430"),EXECBLOCK("EICPO430",.F.,.F.,"PROFORMA"),)
EICPO551.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IPO551MNU",.F.,.F.)
EICPO551.PRW - PO551BATECARTA() -> EXECBLOCK("IC195PO2",.F.,.F.,LINHA)
EICPO552.PRW - PO552MENI() -> EXECBLOCK("EICPPO01",.F.,.F.,"I")
EICPO552.PRW - PO552MENP() -> EXECBLOCK("EICPPO01",.F.,.F.,"P")
EICPO552.PRW - PO552_REL() -> EXECBLOCK("IC195PO1",.F.,.F.)
EICPO557.PRW - PO557() -> EXECBLOCK(CPOINTS,.F.,.F.)
EICPO558.PRW - EICPO558() -> EXECBLOCK("EICPO57S",.F.,.F.)
EICPS150.PRW - EICPS150() -> EXECBLOCK("EICPS150",.F.,.F.,"BROWSE")
EICPS150.PRW - EICPS150() -> EXECBLOCK("EICPS150",.F.,.F.,"ESTRUTURA")
EICPS150.PRW - EICPS150() -> EXECBLOCK("EICPS150",.F.,.F.,"TELA")
EICPS150.PRW - PS150GRAVA() -> EXECBLOCK("EICPS150",.F.,.F.,"GRAVA")
EICPS150.PRW - PS150GRV() -> EXECBLOCK("EICPS150",.F.,.F.,"GRAVA_WORK")
EICPS150.PRW - PS150GRV() -> IF(EASYENTRYPOINT("EICPS150"),EXECBLOCK("EICPS150",.F.,.F.,"PESO" ),)
EICPS150.PRW - PS150VAL() -> EXECBLOCK("EICPS150",.F.,.F.,"VALID")
EICQC210.PRW - EICQC210() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"IND_AVALIA"),)
EICQC210.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("IQC210MNU",.F.,.F.)
EICQC210.PRW - QC210AVALIA() -> IF(EASYENTRYPOINT("EICQC210"), EXECBLOCK("EICQC210",.F.,.F.,"FIM_DLG_AVALIA"), )
EICQC210.PRW - QC210AVALIA() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"ADIC_COLS"),)
EICQC210.PRW - QC210AVALIA() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"ORD_AVALIA"),)
EICQC210.PRW - QC210FOR() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"INCLUI_FORN"),)
EICQC210.PRW - QC210GERAWORK() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"ALIM_COLS"),)
EICQC210.PRW - QC210GERAWORK() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"MAIS_2COND"),)
EICQC210.PRW - QC210GERAWORK() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"MAIS_COND"),)
EICQC210.PRW - QC210GERAWORK() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"SALVA_REG"),)
EICQC210.PRW - QC210GERAWORK() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"WRK_AVALIA"),)
EICQC210.PRW - QC210GETTIPO() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"IT_AVALIA"),)
EICQC210.PRW - QC210GRAVA() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"CTRL_CO"),)
EICQC210.PRW - QC210GRAVA() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"GRAVA_OK"),)
EICQC210.PRW - QC210GRAVA() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"TESTA_ALT"),)
EICQC210.PRW - QC210GRV3WORK() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"ACERTA_WORK"),)
EICQC210.PRW - QC210GRV3WORK() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"CARREGA_WORK3"),)
EICQC210.PRW - QC210GRVPRUNI() -> EXECBLOCK("ICPADQC0",.T.,.T.,1)
EICQC210.PRW - QC210GRVWORKS() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"CARREGA_WORK1"),)
EICQC210.PRW - QC210GRVWORKS() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"CARREGA_WORK2"),)
EICQC210.PRW - QC210LINKS() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"GRAVA_1REG"),)
EICQC210.PRW - QC210LINKS() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"GRAVA_2REG"),)
EICQC210.PRW - QC210LINKS() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"LINKS_ACM_PROD"),)
EICQC210.PRW - QC210LINKS() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"MAIS_3COND"),)
EICQC210.PRW - QCBARCAP() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"BTAVALIA"),)
EICQC210.PRW - QCBARCAP() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"BTINCLUI"),)
EICQC210.PRW - QCMANSWR() -> EXECBLOCK("EICQC210",.F.,.F.,"ADD_CAMPOS_WT")
EICQC210.PRW - QCMANSWR() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"ALTERA_ORDEM"),)
EICQC210.PRW - QCMANSWR() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"ANTES_GRAVA"),)
EICQC210.PRW - QCMANSWR() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"BTAVALIA"),)
EICQC210.PRW - QCMANSWR() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"BTINCLUI"),)
EICQC210.PRW - QCMANSWR() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"DEPOIS_GRAVA"),)
EICQC210.PRW - QCMANSWR() -> IF(EASYENTRYPOINT("EICQC210"),EXECBLOCK("EICQC210",.F.,.F.,"REL_AVALIA"),)
EICRD152.PRW - RD152() -> EXECBLOCK("EICPRD01", .F., .F., "CRIAR_CAMPO")
EICRD152.PRW - RD152() -> EXECBLOCK("EICPRD01", .F., .F., "PARAMETROS")
EICRD152.PRW - RD152() -> EXECBLOCK("EICRD152", .F., .F., "CRIAR_CAMPO")
EICRD152.PRW - RD152() -> EXECBLOCK("EICRD152", .F., .F., "PARAMETROS")
EICRD152.PRW - RD152() -> IF(EASYENTRYPOINT("EICRD152"),EXECBLOCK("EICRD152",.F.,.F.,"DENTRO_JANELA"),)
EICRD152.PRW - RD152CAB() -> EXECBLOCK("EICPRD01", .F., .F., "CABEC1")
EICRD152.PRW - RD152CAB() -> EXECBLOCK("EICPRD01", .F., .F., "CABEC2")
EICRD152.PRW - RD152CAB() -> EXECBLOCK("EICRD152", .F., .F., "CABEC1")
EICRD152.PRW - RD152CAB() -> EXECBLOCK("EICRD152", .F., .F., "CABEC2")
EICRD152.PRW - RD152DET() -> EXECBLOCK("EICPRD01", .F., .F., "DETALHE")
EICRD152.PRW - RD152DET() -> EXECBLOCK("EICRD152", .F., .F., "DETALHE")
EICRD152.PRW - RD152GRAVA() -> EXECBLOCK("EICPRD01", .F., .F., "GRAVA_CAMPO")
EICRD152.PRW - RD152GRAVA() -> EXECBLOCK("EICRD152", .F., .F., "GRAVA_CAMPO")
EICRD152.PRW - RELRD152() -> EXECBLOCK("EICPRD01", .F., .F., "IMPRIME")
EICRD152.PRW - RELRD152() -> EXECBLOCK("EICPRD01", .F., .F., "IMPRIME_TOTAL")
EICRD152.PRW - RELRD152() -> EXECBLOCK("EICRD152", .F., .F., "IMPRIME")
EICRD152.PRW - RELRD152() -> EXECBLOCK("EICRD152", .F., .F., "IMPRIME_TOTAL")
EICSI400.PRW - DB_SI400GRAVA() -> EXECBLOCK("EICPSI01",.F.,.F.,"12")
EICSI400.PRW - DB_SI400GRAVA() -> EXECBLOCK("EICPSI01",.F.,.F.,"3")
EICSI400.PRW - DB_SI400GRAVA() -> EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICSI400.PRW - DB_SI400GRAVA() -> IF(EASYENTRYPOINT("EICSI400"),EXECBLOCK("EICSI400",.F.,.F.,"ANTES_GRAVA_SW0"),)
EICSI400.PRW - DB_SI400GRAVA() -> IF(EASYENTRYPOINT("EICSI400"),EXECBLOCK("EICSI400",.F.,.F.,"GRAVASW1"),)
EICSI400.PRW - DB_SI400GRAVA() -> IF(EASYENTRYPOINT("EICSI400"),EXECBLOCK("EICSI400",.F.,.F.,"GRV_DELET"),)
EICSI400.PRW - DB_SI400GRAVA() -> IF(EASYENTRYPOINT("EICSI400"),EXECBLOCK("EICSI400",.F.,.F.,"GRV_INCALT"),)
EICSI400.PRW - DB_SI400GRAVA() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"3"),)
EICSI400.PRW - DB_SI400GRAVA() -> IF(LUNISYS,EXECBLOCK("IC159SI0",.F.,.F.,"3"),)
EICSI400.PRW - DB_SI400GRAVA() -> IF(LUNISYS,EXECBLOCK("IC159SI0",.F.,.F.,"4"),)
EICSI400.PRW - DB_SI400LINOK() -> LRETPTO := EXECBLOCK("EICSI400",.F.,.F.,"DB_LINOK")
EICSI400.PRW - DB_SI400VALID() -> LRET:=EXECBLOCK("EICPSI01",.F.,.F.,"9")
EICSI400.PRW - DB_SI400VALID() -> LRET:=EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICSI400.PRW - EICSI400() -> EXECBLOCK("EICSI400",.F.,.F.,"1")
EICSI400.PRW - EICSI400() -> IF(EASYENTRYPOINT("EICSI400"),EXECBLOCK("EICSI400",.F.,.F.,"DEPOIS_MBROWSE"),)
EICSI400.PRW - EICSI400() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"1"),)
EICSI400.PRW - EICSI400() -> IF(LUNISYS,EXECBLOCK("IC159SI0",.F.,.F.,"1"),)
EICSI400.PRW - EILINOK(LMEM() -> EXECBLOCK("EICSI400",.F.,.F.,"EILINOK")
EICSI400.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("ISI400MNU",.F.,.F.)
EICSI400.PRW - SI400ALTERA() -> EXECBLOCK("EICSI400",.F.,.F.,"ALTERA_CAMPOS")
EICSI400.PRW - SI400ALTERA() -> EXECBLOCK("EICSI400",.F.,.F.,"ANTES_TELA_ALTERA")
EICSI400.PRW - SI400ALTERA() -> EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICSI400.PRW - SI400ALTERA() -> IF !EXECBLOCK("EICPSI01",.F.,.F.,"10")
EICSI400.PRW - SI400ALTERA() -> IF !EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICSI400.PRW - SI400ALTERA() -> IF(EASYENTRYPOINT("EICSI400"),EXECBLOCK("EICSI400",.F.,.F.,"DEPOIS_TELA_ALTERA"),)
EICSI400.PRW - SI400ALTERA() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"2"),)
EICSI400.PRW - SI400ALTERA() -> IF(LUNISYS,EXECBLOCK("IC159SI0",.F.,.F.,"2"),)
EICSI400.PRW - SI400APAGAREG()() -> EXECBLOCK("EICSI400",.F.,.F.,"MSGETDB_DEL")
EICSI400.PRW - SI400BARITEM() -> EXECBLOCK("EICSI400",.F.,.F.,"INCLUI_BOTAO")
EICSI400.PRW - SI400COPIA() -> IF(EASYENTRYPOINT("EICSI400"),EXECBLOCK("EICSI400",.F.,.F.,"COPIA_SI"),)
EICSI400.PRW - SI400EFETIVA() -> EXECBLOCK("EICSI400",.F.,.F.,"ALTERA_VARMEMO")
EICSI400.PRW - SI400EXC() -> IF(EASYENTRYPOINT("EICSI400"),EXECBLOCK("EICSI400",.F.,.F.,"GRV_EXCLUI"),)
EICSI400.PRW - SI400EXCLUI() -> EXECBLOCK("EICSI400",.F.,.F.,"ALTERA_CAMPOS")
EICSI400.PRW - SI400EXCLUI() -> EXECBLOCK("EICSI400",.F.,.F.,"ANTES_TELA_EXCLUI")
EICSI400.PRW - SI400EXCLUI() -> EXECBLOCK("EICSI400",.F.,.F.,"DEPOIS_ESTORNO")
EICSI400.PRW - SI400EXCLUI() -> EXECBLOCK("EICSI400",.F.,.F.,"VALIDA_EXCLUSAO")
EICSI400.PRW - SI400EXCLUI() -> EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICSI400.PRW - SI400EXCLUI() -> IF !EXECBLOCK("EICPSI01",.F.,.F.,"10")
EICSI400.PRW - SI400EXCLUI() -> IF !EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICSI400.PRW - SI400EXCLUI() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"2"),)
EICSI400.PRW - SI400EXCLUI() -> IF(LUNISYS,EXECBLOCK("IC159SI0",.F.,.F.,"2"),)
EICSI400.PRW - SI400GATILHO() -> IF(EASYENTRYPOINT("EICSI400"),EXECBLOCK("EICSI400",.F.,.F.,"SI400_GATILHO"),)
EICSI400.PRW - SI400GRAVA() -> EXECBLOCK("EICPSI01",.F.,.F.,"12")
EICSI400.PRW - SI400GRAVA() -> EXECBLOCK("EICPSI01",.F.,.F.,"3")
EICSI400.PRW - SI400GRAVA() -> EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICSI400.PRW - SI400GRAVA() -> IF(EASYENTRYPOINT("EICSI400"),EXECBLOCK("EICSI400",.F.,.F.,"ANTES_GRAVA_SW0"),)
EICSI400.PRW - SI400GRAVA() -> IF(EASYENTRYPOINT("EICSI400"),EXECBLOCK("EICSI400",.F.,.F.,"GRAVASW1"),)
EICSI400.PRW - SI400GRAVA() -> IF(EASYENTRYPOINT("EICSI400"),EXECBLOCK("EICSI400",.F.,.F.,"GRV_DELET"),)
EICSI400.PRW - SI400GRAVA() -> IF(EASYENTRYPOINT("EICSI400"),EXECBLOCK("EICSI400",.F.,.F.,"GRV_INCALT"),)
EICSI400.PRW - SI400GRAVA() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"3"),)
EICSI400.PRW - SI400GRAVA() -> IF(LUNISYS,EXECBLOCK("IC159SI0",.F.,.F.,"3"),)
EICSI400.PRW - SI400GRAVA() -> IF(LUNISYS,EXECBLOCK("IC159SI0",.F.,.F.,"4"),)
EICSI400.PRW - SI400GRTRB() -> EXECBLOCK("EICPSI01",.F.,.F.,"11")
EICSI400.PRW - SI400GRTRB() -> EXECBLOCK("EICSI400",.F.,.F.,"GRAVA_TRB")
EICSI400.PRW - SI400GRTRB() -> EXECBLOCK("EICSINEC",.F.,.F.)
EICSI400.PRW - SI400GRTRB() -> EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICSI400.PRW - SI400GRTRB() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"4"),)
EICSI400.PRW - SI400GRTRB() -> IF(LUNISYS,EXECBLOCK("IC159SI0",.F.,.F.,"5"),)
EICSI400.PRW - SI400HISTORICO() -> EXECBLOCK("EICSI400",.F.,.F.,"HISTORICO")
EICSI400.PRW - SI400IMP() -> EXECBLOCK("EICSI400",.F.,.F.,"ANTES_WHILE_RELAT")
EICSI400.PRW - SI400IMP() -> EXECBLOCK("EICSI400",.F.,.F.,"DETITEM")
EICSI400.PRW - SI400IMP() -> EXECBLOCK("EICSI400",.F.,.F.,"FINAL_RELAT")
EICSI400.PRW - SI400IMP() -> EXECBLOCK("EICSI400",.F.,.F.,"RELAT")
EICSI400.PRW - SI400IMP() -> EXECBLOCK("EICSI400",.F.,.F.,"SUB_CAB_REL")
EICSI400.PRW - SI400IMP() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"6"),)
EICSI400.PRW - SI400IMP() -> IF(LUNISYS,EXECBLOCK("IC159SI0",.F.,.F.,"7"),)
EICSI400.PRW - SI400INCLUI() -> EXECBLOCK("EICSI400",.F.,.F.,"ALTERA_CAMPOS")
EICSI400.PRW - SI400INCLUI() -> EXECBLOCK("EICSI400",.F.,.F.,"ANTES_TELA_INCLUI")
EICSI400.PRW - SI400INCLUI() -> EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICSI400.PRW - SI400INCLUI() -> IF !EXECBLOCK("EICPSI01",.F.,.F.,"6")
EICSI400.PRW - SI400INCLUI() -> IF !EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICSI400.PRW - SI400INCLUI() -> IF(EASYENTRYPOINT("EICSI400"),EXECBLOCK("EICSI400",.F.,.F.,"DEPOIS_TELA_INCLUI"),)
EICSI400.PRW - SI400INCLUI() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"2"),)
EICSI400.PRW - SI400INCLUI() -> IF(LUNISYS,EXECBLOCK("IC159SI0",.F.,.F.,"2"),)
EICSI400.PRW - SI400LINOK() -> LRETPTO := EXECBLOCK("EICSI400",.F.,.F.,"LINOK")
EICSI400.PRW - SI400MANUT() -> EXECBLOCK("EICSI400",.F.,.F.,"CAMPOS_ENCHOICE")
EICSI400.PRW - SI400MANUT() -> EXECBLOCK("EICSI400",.F.,.F.,"VALMARCOD")
EICSI400.PRW - SI400MANUT() -> EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICSI400.PRW - SI400MANUT() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"5"),)
EICSI400.PRW - SI400MANUT() -> IF(LUNISYS,EXECBLOCK("IC159SI0",.F.,.F.,"6"),)
EICSI400.PRW - SI400RELAT() -> IF EASYENTRYPOINT("EICPSI01") .AND. EXECBLOCK("EICPSI01",.F.,.F.,"7")
EICSI400.PRW - SI400RELSUB() -> EXECBLOCK("EICSI400",.F.,.F.,"CABEC")
EICSI400.PRW - SI400RELSUB() -> EXECBLOCK("EICSI400",.F.,.F.,"SUBCAB")
EICSI400.PRW - SI400RELSUB() -> EXECBLOCK("EICSI400",.F.,.F.,"SUBCABLINHA")
EICSI400.PRW - SI400SAIR() -> IF(EASYENTRYPOINT("EICSI400"),EXECBLOCK("EICSI400",.F.,.F.,"SI400SAIR"),)
EICSI400.PRW - SI400SUBHIST() -> EXECBLOCK("EICSI400",.F.,.F.,"SUBHIST")
EICSI400.PRW - SI400VALID() -> LRET:=EXECBLOCK("EICPSI01",.F.,.F.,"9")
EICSI400.PRW - SI400VALID() -> LRET:=EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICSI400.PRW - SI400VISUAL() -> EXECBLOCK("EICSI400",.F.,.F.,"ACPOS3")
EICSI400.PRW - SI400VISUAL() -> EXECBLOCK("EICSI400",.F.,.F.,"ALTERA_CAMPOS")
EICSI400.PRW - SI400VISUAL() -> EXECBLOCK("EICSI400",.F.,.F.,"ANTES_TELA_VISUAL")
EICSI400.PRW - SI400VISUAL() -> EXECBLOCK("EICSI400",.F.,.F.,"FIM_VISUAL")
EICSI400.PRW - SI400VISUAL() -> EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICSI400.PRW - SI400VISUAL() -> IF(LHUNTER,EXECBLOCK("IC010PO1",.F.,.F.,"2"),)
EICSI400.PRW - SI400VISUAL() -> IF(LUNISYS,EXECBLOCK("IC159SI0",.F.,.F.,"2"),)
EICSU100.PRW - SUF100GRV() -> EXECBLOCK("ICPADSUF",.F.,.F.,"ENVIO")
EICSU100.PRW - SUF100GRV() -> EXECBLOCK("ICPADSUF",.F.,.F.,"TOTAIS")
EICSU100.PRW - SUF100GRV() -> IF !EXECBLOCK("ICPADSUF",.F.,.F.,"GRVLOG")
EICSU100.PRW - SUF100GRV() -> IF(EASYENTRYPOINT("ICPADSUF"),EXECBLOCK("ICPADSUF",.F.,.F.,"PESO"),)
EICSU100.PRW - SUF100GRV() -> IF(EASYENTRYPOINT("ICPADSUF"),EXECBLOCK("ICPADSUF",.F.,.F.,"PESOESTUFF"),)
EICTC210.PRW - CRIASTRUCT() -> EXECBLOCK("EICTC210",.F.,.F.,"MONTA_CAMPOS")
EICTC210.PRW - MENUDEF() -> AROTADIC := EXECBLOCK("ITC210MNU",.F.,.F.)
EICTC210.PRW - TC210DESP() -> IF(EASYENTRYPOINT("EICTC210"),EXECBLOCK("EICTC210",.F.,.F.,"CAR_DESP"),)
EICTC210.PRW - TC210INCLUI() -> IF(EASYENTRYPOINT("EICTC210"),EXECBLOCK("EICTC210",.F.,.F.,"TRATA_VAR"),)
EICTC210.PRW - TC210LINOK() -> EXECBLOCK("EICTC210",.F.,.F.,"VAL_CUSTOMIZA")
EICTC210.PRW - TC210TUDOK() -> IF(EASYENTRYPOINT("EICTC210"),EXECBLOCK("EICTC210",.F.,.F.,"FINAL_TUDOK"),)
EICTP251.PRW - TPC251CAB() -> IF(EASYENTRYPOINT("EICTP251"),EXECBLOCK("EICTP251",.F.,.F.,"IMP_DATA_CONV_TAXA"),)
EICTP251.PRW - TPC251CALC() -> IF(EASYENTRYPOINT("EICTP251"),EXECBLOCK("EICTP251",.F.,.F.,"TPC251CALC_ANT_TELA"),)
EICTP251.PRW - TPC251CALTAB() -> EXECBLOCK("EICTP251",.F.,.F.,"CALTAB")
EICTP251.PRW - TPC251CALTAB() -> IF(EASYENTRYPOINT("EICTP251"),EXECBLOCK("EICTP251",.F.,.F.,"APOS_AEVAL_TPC"),)
EICTP251.PRW - TPC251CALTAB() -> IF(EASYENTRYPOINT("EICTP251"),EXECBLOCK("EICTP251",.F.,.F.,"TPC251CALCTAB_GRV_SWH"),)
EICTP251.PRW - TPC251CALTAB() -> IF(EASYENTRYPOINT("EICTP251"),EXECBLOCK("EICTP251",.F.,.F.,'TOT_CNT'),)
EICTP251.PRW - TPC251DETDESP() -> EXECBLOCK( "EICTP251",.F.,.F.,"IMPRIRDESP")
EICTP251.PRW - TPC251GRAVA() -> IF(EASYENTRYPOINT("EICTP251"),EXECBLOCK("EICTP251",.F.,.F.,"TPC251GRAVA_GRV_SWH"),)
EICTP251.PRW - TPC251GRPRECALC() -> EXECBLOCK("EICTP251",.F.,.F.,"ALTPESO")
EICTP251.PRW - TPC251QTIT_DECLA() -> IF(EASYENTRYPOINT("EICTP251"),EXECBLOCK("EICTP251",.F.,.F.,"EM_SW7"),)
EICTP251.PRW - TPC251VERCON() -> IF(EASYENTRYPOINT("EICTP251"),EXECBLOCK("EICTP251",.F.,.F.,"POS_GRAVA_TPC"),)
EICTP251.PRW - TPC251VERCON() -> IF(EASYENTRYPOINT("EICTP251"),EXECBLOCK("EICTP251",.F.,.F.,"TPC251VERCON_ANT_TELA"),)
EICTP251.PRW - TPC251WORK_1() -> IF(EASYENTRYPOINT("EICTP251"),EXECBLOCK("EICTP251",.F.,.F.,"WORK_1"),)
EICTP251.PRW - TPC251_APURACAO () -> EXECBLOCK( "EICTP251",.F.,.F.,"PERC_DESPESA")
EICTP251.PRW - TPC251_APURACAO () -> EXECBLOCK(CPOINTS)
EICTP251.PRW - TPC251_APURACAO () -> IF LPOINTE .AND. !EXECBLOCK(CPOINTE)
EICTP252.PRW - EICFLUXO() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"GRAVA_WORKTP_INVOICES"),)
EICTP252.PRW - EICFLUXO() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"WHILE_WORKTP"),)
EICTP252.PRW - EICTP252() -> EXECBLOCK("EICTP252",.F.,.F.,"ALTERA_FILTRO")
EICTP252.PRW - EICTP252() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"ANTES_IF_SINTETICO"),)
EICTP252.PRW - EICTP252() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"BUTTON"),)
EICTP252.PRW - EICTP252() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"GET_DEPESA"),)
EICTP252.PRW - EICTP252() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"INICIA_VARIAVEIS"),)
EICTP252.PRW - EICTP_SW8() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"APOS_AEVAL_TPC2"),)
EICTP252.PRW - TP252CRIAWORK() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"ESTR_WORK"),)
EICTP252.PRW - TPC252APUFRE() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"APU_FRE"),)
EICTP252.PRW - TPC252APUFRE() -> LRET := EXECBLOCK("EICTP252",.F.,.F.,{"TPC252APUFRE_INI_WHILE",PDBF})
EICTP252.PRW - TPC252FRETE() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,'TOT_CNT'),)
EICTP252.PRW - TPC252FRETE() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,'TOT_CNT_SEM_EMB'),)
EICTP252.PRW - TPC252GRAVA() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"APOS_GRAVA_WORKTP"),)
EICTP252.PRW - TPC252GRAVA() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"GRAVA_WORKTP"),)
EICTP252.PRW - TPC252ITENS() -> EXECBLOCK("EICTP252",.F.,.F.,"ANTES_CALC_ITEM")
EICTP252.PRW - TPC252ITENS() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"APOS_AEVAL_TPC1"),)
EICTP252.PRW - TPC252ITENS() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"LER_ITENS"),)
EICTP252.PRW - TPC252ITENS() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"MDT_ENTR"),)
EICTP252.PRW - TPC252ITENS() -> LRET := EXECBLOCK("EICTP252",.F.,.F.,{"TPC252ITENS_INI_WHILE",PDBF})
EICTP252.PRW - TPC252PAGOU() -> EXECBLOCK("EICTP252",.F.,.F.,"PAGOU_DESPESAS")
EICTP252.PRW - TPCALCIMP() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"TPCALCIMP"),)
EICTP252.PRW - TPCANA_CAB() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"CAB_ANA"),)
EICTP252.PRW - TPCANA_CAB() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"IMP_CAB"),)
EICTP252.PRW - TPCANA_DET() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"APOS_IMP_VAL"),)
EICTP252.PRW - TPCCALCULO() -> EXECBLOCK("EICTP252",.F.,.F.,{"TPCCALCULO_CALCDESP",TPC:DESP})
EICTP252.PRW - TPCCALCULO() -> IF(EASYENTRYPOINT("EICTP251"),EXECBLOCK("EICTP251",.F.,.F.,"DESPFRE"),)
EICTP252.PRW - TPCCALCULO() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"ALIQUOTA"),)
EICTP252.PRW - TPCCALCULO() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"ALTERA_FRETE"),)
EICTP252.PRW - TPCCALCULO() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"DEPOIS_BUSCA_NCM"),)
EICTP252.PRW - TPCCALCULO() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"DESPFRE"),)
EICTP252.PRW - TPCCALCULO() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"INICIO_TPCCALCULO"),)
EICTP252.PRW - TPCCALCULO() -> XRETPE := EXECBLOCK("EICTP252",.F.,.F.,{"ALTTPC",TPC})
EICTP252.PRW - TPCCALCULO() -> XRETPE := EXECBLOCK("EICTP252",.F.,.F.,{"TPC",TPC})
EICTP252.PRW - TPCCARGA() -> EXECBLOCK("EICTP252",.F.,.F.,"REORDENA_ARRAY")
EICTP252.PRW - TPCCARGA() -> EXECBLOCK("EICTP252",.F.,.F.,"TPCCARGA_INICIO")
EICTP252.PRW - TPCQB_ANA() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"IMP_TOTAL"),)
EICTP252.PRW - TPCSIN_CAB() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"CAB_SIN"),)
EICTP252.PRW - TPC_ANA() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"IMP_TOTGER"),)
EICTP252.PRW - TPC_SIN() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"IMP_SIN"),)
EICTP252.PRW - TPC_SIN() -> IF(EASYENTRYPOINT("EICTP252"),EXECBLOCK("EICTP252",.F.,.F.,"TOT_SIN"),)
EICTP253.PRW - EICTP253() -> IF(EASYENTRYPOINT("EICTP253"),EXECBLOCK("EICTP253",.F.,.F.,"ESTRU_WORK"),)
EICTP253.PRW - EICTP253() -> IF(EASYENTRYPOINT("EICTP253"),EXECBLOCK("EICTP253",.F.,.F.,"GET_DESPESA"),)
EICTP253.PRW - TPC253ANACAB() -> IF(EASYENTRYPOINT("EICTP253"),EXECBLOCK("EICTP253",.F.,.F.,"CAB_REL"),)
EICTP253.PRW - TPC253ANACAB() -> IF(EASYENTRYPOINT("EICTP253"),EXECBLOCK("EICTP253",.F.,.F.,"IMP_CAB"),)
EICTP253.PRW - TPC253ANADET() -> IF(EASYENTRYPOINT("EICTP253"),EXECBLOCK("EICTP253",.F.,.F.,"APOS_IMP_VAL"),)
EICTP253.PRW - TPC253GRAVA() -> IF(EASYENTRYPOINT("EICTP253"),EXECBLOCK("EICTP253",.F.,.F.,"GRAVA_WORK"),)
EICTR175.PRW - EICTR175() -> EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICTR175.PRW - TR175ALT() -> IF(EASYENTRYPOINT("EICTR175"),EXECBLOCK("EICTR175",.F.,.F.,"ANTESAITENS"),)
EICTR175.PRW - TR175ALT() -> IF(EASYENTRYPOINT("EICTR175"),EXECBLOCK("EICTR175",.F.,.F.,"EXECAITENS"),)
EICTR175.PRW - TR175ALT() -> LRETCAMP6 := EXECBLOCK("EICTR175",.F.,.F.,"CHECK_FAFO")
EICTR175.PRW - TR175ALT() -> LRETCAMP7 := EXECBLOCK("EICTR175",.F.,.F.,"CHECK_FORNEC")
EICTR175.PRW - TR175GRAVAWORK() -> EXECBLOCK("EICTR175",.F.,.F.,"GRV_WORK")
EICTR175.PRW - TR175TELA() -> EXECBLOCK("EICRDTR175",.F.,.F.,"01")
EICTR175.PRW - TR175TELA() -> EXECBLOCK("EICTR175",.F.,.F.,"GRV_TBCAMPOS")
EICTR175.PRW - TR175TELA() -> IF(EXECBLOCK(CARQRDMAKE,.F.,.F.),(NOPCA:=5,ODLG:END()),)) OF OPANEL PIXEL
EICTR175.PRW - TR175_1TELA() -> EXECBLOCK("EICTR175",.F.,.F.,"ALTERA_DATA")
EICTR175.PRW - TR175_CLF() -> EXECBLOCK("EICTR175",.F.,.F.,"FABR_ATUAL_SW3")
EICTR175.PRW - TR175_CPD() -> EXECBLOCK("EICTR175",.F.,.F.,"ATUALIZA_DTS_PRECO_SW3")
EICTR175.PRW - TR175_FAFO() -> EXECBLOCK("EICTR175",.F.,.F.,"ATUAL_EZB")
EICTR200.PRW - EICTR227() -> IF(EASYENTRYPOINT("EICTR227"),EXECBLOCK("EICTR227",.F.,.F.,"TR227CPOTRB"),)
EICTR200.PRW - EICTR227() -> IF(EASYENTRYPOINT("EICTR227"),EXECBLOCK("EICTR227",.F.,.F.,"TR227RCAMPOS"),)
EICTR200.PRW - REPORTDEF() -> IF(EASYENTRYPOINT("EICTR200"),EXECBLOCK("EICTR200",.F.,.F.,"TR200REPORT"),)
EICTR200.PRW - REPORTDEF() -> IF(EASYENTRYPOINT("EICTR210"),EXECBLOCK("EICTR210",.F.,.F.,"TR210REPORT"),)
EICTR200.PRW - REPORTDEF() -> IF(EASYENTRYPOINT("EICTR226"),EXECBLOCK("EICTR226",.F.,.F.,"TR226REPORT"),)
EICTR200.PRW - REPORTPRINT() -> IF(EASYENTRYPOINT("EICTR200"),EXECBLOCK("EICTR200",.F.,.F.,"TR200APOS_REPORT"),)
EICTR200.PRW - TR200ATUALIZA() -> EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICTR200.PRW - TR200ATUALIZA() -> IF(EASYENTRYPOINT("EICTR200"),EXECBLOCK("EICTR200",.F.,.F.,"TR200APPEND"),)
EICTR200.PRW - TR200ATUALIZA() -> IF(EASYENTRYPOINT("EICTR200"),EXECBLOCK("EICTR200",.F.,.F.,"TR200VALID_APPEND"),)
EICTR200.PRW - TR200COMPR() -> IF(EASYENTRYPOINT("EICTR200"),EXECBLOCK("EICTR200",.F.,.F.,"TR200ANTES_GET"),)
EICTR200.PRW - TR200COMPR() -> IF(EASYENTRYPOINT("EICTR200"),EXECBLOCK("EICTR200",.F.,.F.,"TR200CAMPOS"),)
EICTR200.PRW - TR200COMPR() -> IF(EASYENTRYPOINT("EICTR200"),EXECBLOCK("EICTR200",.F.,.F.,"TR200CPOTRB"),)
EICTR200.PRW - TR200GRAVA() -> EXECBLOCK(CARQRDMAKE,.F.,.F.)
EICTR200.PRW - TR210ATUALIZA() -> IF(EASYENTRYPOINT("EICTR200"),EXECBLOCK("EICTR200",.F.,.F.,"TR210GRAVA"),)
EICTR200.PRW - TR210IMPOR() -> IF(EASYENTRYPOINT("EICTR200"),EXECBLOCK("EICTR200",.F.,.F.,"TR210CAMPOS"),)
EICTR200.PRW - TR210IMPOR() -> IF(EASYENTRYPOINT("EICTR210"),EXECBLOCK("EICTR210",.F.,.F.,"TR210CPOTRB"),)
EICTR200.PRW - TR210IMPOR() -> IF(EASYENTRYPOINT("EICTR210"),EXECBLOCK("EICTR210",.F.,.F.,"TR210RCAMPOS"),)
EICTR200.PRW - TR225GRAVAWORK() -> IF(EASYENTRYPOINT("EICTR225"),EXECBLOCK("EICTR225",.F.,.F.,"TR225GRAVA"),)
EICTR250.PRW - EICTR250() -> EXECBLOCK("EICTR250",.F.,.F.,"TR250DIALOG_CUSTO")
EICTR250.PRW - EICTR250() -> IF(EASYENTRYPOINT("EICTR250"),EXECBLOCK("EICTR250",.F.,.F.,"TR250CABEC_TELA"),)
EICTR250.PRW - EICTR250() -> IF(EASYENTRYPOINT("EICTR250"),EXECBLOCK("EICTR250",.F.,.F.,"TR250CAMPOS"),)
EICTR250.PRW - EICTR250() -> IF(EASYENTRYPOINT("EICTR250"),EXECBLOCK("EICTR250",.F.,.F.,"TR250INDICE"),)
EICTR250.PRW - EICTR255() -> EXECBLOCK("EICTR255",.F.,.F.,"TR255DIALOG_CUSTO")
EICTR250.PRW - EICTR255() -> IF(EASYENTRYPOINT("EICTR255"),EXECBLOCK("EICTR255",.F.,.F.,"TR255CABEC_TELA"),)
EICTR250.PRW - EICTR255() -> IF(EASYENTRYPOINT("EICTR255"),EXECBLOCK("EICTR255",.F.,.F.,"TR255CAMPOS"),)
EICTR250.PRW - TR250CAB //AWR 10/05/1999() -> IF(EASYENTRYPOINT("EICTR250"),EXECBLOCK("EICTR250",.F.,.F.,"TR250CABLIN"),)
EICTR250.PRW - TR250CAB //AWR 10/05/1999() -> IF(EASYENTRYPOINT("EICTR250"),EXECBLOCK("EICTR250",.F.,.F.,"TR250IMPCAB"),)
EICTR250.PRW - TR250CAB //AWR 10/05/1999() -> IF(EASYENTRYPOINT("EICTR255"),EXECBLOCK("EICTR255",.F.,.F.,"TR255CABLIN"),)
EICTR250.PRW - TR250CAB //AWR 10/05/1999() -> IF(EASYENTRYPOINT("EICTR255"),EXECBLOCK("EICTR255",.F.,.F.,"TR255IMPCAB"),)
EICTR250.PRW - TR250CAB //AWR 10/05/1999() -> IF(LSEAL,EXECBLOCK("IC193TR1",.F.,.F.,"4"),)
EICTR250.PRW - TR250CAB //AWR 10/05/1999() -> IF(LSEAL,EXECBLOCK("IC193TR1",.F.,.F.,"5"),)
EICTR250.PRW - TR250DETALHE //AWR 10/05/1999() -> IF(EASYENTRYPOINT("EICTR250"),EXECBLOCK("EICTR250",.F.,.F.,"TR250IMPDET"),)
EICTR250.PRW - TR250DETALHE //AWR 10/05/1999() -> IF(EASYENTRYPOINT("EICTR255"),EXECBLOCK("EICTR255",.F.,.F.,"TR255IMPDET"),)
EICTR250.PRW - TR250DETALHE //AWR 10/05/1999() -> IF(LSEAL,EXECBLOCK("IC193TR1",.F.,.F.,"6"),)
EICTR250.PRW - TR250GRAVA() -> IF(EASYENTRYPOINT("EICTR250"),EXECBLOCK("EICTR250",.F.,.F.,"TR250GRAVA"),)
EICTR250.PRW - TR250GRAVA() -> IF(EASYENTRYPOINT("EICTR250"),EXECBLOCK("EICTR250",.F.,.F.,"TR250VALID_GRAVA"),)
EICTR250.PRW - TR250GRAVA() -> IF(LEXISTERD,EXECBLOCK("EICPFUP1_AP5",.F.,.F.,"1"),)
EICTR250.PRW - TR250GRAVA() -> IF(LSEAL,EXECBLOCK("IC193TR1",.F.,.F.,"2"),)
EICTR250.PRW - TR250ITEM() -> IF(EASYENTRYPOINT("EICTR250"),EXECBLOCK("EICTR250",.F.,.F.,"TR250ANTESIMPRIME"),)
EICTR250.PRW - TR250ITEM() -> IF(EASYENTRYPOINT("EICTR250"),EXECBLOCK("EICTR250",.F.,.F.,"TR250DEFCOLS"),)
EICTR250.PRW - TR250ITEM() -> IF(EASYENTRYPOINT("EICTR255"),EXECBLOCK("EICTR255",.F.,.F.,"TR255ANTESIMPRIME"),)
EICTR250.PRW - TR250ITEM() -> IF(EASYENTRYPOINT("EICTR255"),EXECBLOCK("EICTR255",.F.,.F.,"TR255DEFCOLS"),)
EICTR250.PRW - TR250ITEM() -> IF(LSEAL,EXECBLOCK("IC193TR1",.F.,.F.,"3"),)
EICTR250.PRW - TR255GRAVA() -> IF(EASYENTRYPOINT("EICTR255"),EXECBLOCK("EICTR255",.F.,.F.,"TR255GRAVA"),)
EICTR250.PRW - TR255GRAVA() -> IF(EASYENTRYPOINT("EICTR255"),EXECBLOCK("EICTR255",.F.,.F.,"TR255VALID_GRAVA"),)
EICTR260.PRW - E_SELEMBAR() -> IF(EASYENTRYPOINT("EICTR260"),EXECBLOCK("EICTR260",.F.,.F.,"TR260ANTES_BROWSE"),)
EICTR260.PRW - E_SELEMBAR() -> IF(EASYENTRYPOINT("EICTR260"),EXECBLOCK("EICTR260",.F.,.F.,"TR260DIALOG_CUSTO"),)
EICTR260.PRW - REPORTDEF() -> IF(EASYENTRYPOINT("EICTR260"),EXECBLOCK("EICTR260",.F.,.F.,"TR260REPORTDEF"),)
EICTR260.PRW - REPORTPRINT() -> IF(EASYENTRYPOINT("EICTR260"),EXECBLOCK("EICTR260",.F.,.F.,"TR260FIM_TREPORT"),)
EICTR260.PRW - TR260GRAVA() -> IF(EASYENTRYPOINT("EICTR260"),EXECBLOCK("EICTR260",.F.,.F.,"TR260GRAVA"),)
EICTR260.PRW - TR260GRAVA() -> IF(EASYENTRYPOINT("EICTR260"),EXECBLOCK("EICTR260",.F.,.F.,"TR260VALID_GRAVA"),)
EICTR270.PRW - EICTR275R3() -> EXECBLOCK("EICPTR02", .F., .F., "DESPACHANTE")
EICTR270.PRW - TR270ATUALIZA() -> IF(EASYENTRYPOINT("EICTR270"),EXECBLOCK("EICTR270",.F.,.F.,"GRAVA_TRB"),)
EICTR270.PRW - TR270GRAVA() -> IF(EASYENTRYPOINT("EICTR270"),EXECBLOCK("EICTR270",.F.,.F.,"POS_GRV_TRB"),)
EICTR270.PRW - TR270VISUA() -> IF(EASYENTRYPOINT("EICTR270"),EXECBLOCK("EICTR270",.F.,.F.,"ANTES_TELA"),)
EICTR270.PRW - TR270VISUA() -> IF(EASYENTRYPOINT("EICTR270"),EXECBLOCK("EICTR270",.F.,.F.,"ESTR_TRB"),)
EICTR280.PRW - EICTR280R3() -> EXECBLOCK("EICTR280",.F.,.F.,"ACAMPOS")
EICTR280.PRW - EICTR285R3() -> EXECBLOCK("EICPTR02", .F., .F., "PROCESSO")
EICTR280.PRW - EICTR285R3() -> EXECBLOCK("EICTR280",.F.,.F.,"ACAMPOS5")
EICTR280.PRW - TR280GRAVA() -> EXECBLOCK("EICTR280",.F.,.F.,"LGRAVA")
EICTR280.PRW - TR280GRAVA() -> EXECBLOCK("EICTR280",.F.,.F.,"TRBGRV")
EICTR280.PRW - TR280MAIN() -> EXECBLOCK("EICTR280",.F.,.F.,"LPADRAO")
EICTR280.PRW - TR280MAIN() -> EXECBLOCK("EICTR280",.F.,.F.,"TELA_01")
EICTR280.PRW - TR285GRAVA() -> EXECBLOCK("EICTR280",.F.,.F.,"LGRAVAS")
EICTR280.PRW - TR285GRAVA() -> EXECBLOCK("EICTR280",.F.,.F.,"TRBGRVS")
EICTR290.PRW - EICTR290R3() -> EXECBLOCK("EICTR290",.F.,.F.,"SAYLEADT")
EICTR290.PRW - TR290GRAVA() -> EXECBLOCK("EICTR290",.F.,.F.,"GRVTRB")
EICTR290.PRW - TR290GRAVA() -> EXECBLOCK("EICTR290",.F.,.F.,"LOOP")
EICTR300.PRW - EICTR300R3() -> IF(EASYENTRYPOINT("EICTR300"),EXECBLOCK("EICTR300",.F.,.F.,"TELA_01"),)
EICTR300.PRW - TR300GRAVA() -> IF(EASYENTRYPOINT("EICTR300"),EXECBLOCK("EICTR300",.F.,.F.,"TR300GRAVA"),)
EICTR300.PRW - TR300GRHP() -> IF(EASYENTRYPOINT("EICTR300"),EXECBLOCK("EICTR300",.F.,.F.,"FILTER"),)
EICTR300.PRW - TR300GRHP() -> IF(EASYENTRYPOINT("EICTR300"),EXECBLOCK("EICTR300",.F.,.F.,"TR300GRHP"),)
EICTR300.PRW - TR300HLP() -> IF(EASYENTRYPOINT("EICTR300"),EXECBLOCK("EICTR300",.F.,.F.,"SEEKHLP"),)
EICTR300.PRW - TR300HLP() -> IF(EASYENTRYPOINT("EICTR300"),EXECBLOCK("EICTR300",.F.,.F.,"TR300HLP"),)
EICTR300.PRW - TR_HISTARQ() -> IF(EASYENTRYPOINT("EICTR300"),EXECBLOCK("EICTR300",.F.,.F.,"TR_HISTARQ"),)
EICTR300.PRW - TR_HISTSET() -> IF(EASYENTRYPOINT("EICTR300"),EXECBLOCK("EICTR300",.F.,.F.,"TR_HISTSET"),)
EICTR310.PRW - BUSCAGERAL() -> IF(EASYENTRYPOINT("EICTR310"),RDESC:=EXECBLOCK("EICTR310",.F.,.F.,"BUSCAGERAL"),)
EICTR310.PRW - EICTR310() -> IF(EASYENTRYPOINT("EICTR310"),EXECBLOCK("EICTR310",.F.,.F.,"TELA_01"),)
EICTR330.PRW - EICTR330R3() -> IF(EASYENTRYPOINT("EICTR330"),EXECBLOCK("EICTR330",.F.,.F.,"ANTES_TELA"),)
EICTR330.PRW - EICTR330R3() -> IF(EASYENTRYPOINT("EICTR330"),EXECBLOCK("EICTR330",.F.,.F.,"GER_TELA"),)
EICTR330.PRW - EICTR330R3() -> IF(EASYENTRYPOINT("EICTR330"),EXECBLOCK("EICTR330",.F.,.F.,"INIVAR"),)
EICTR330.PRW - EICTR330R3() -> IF(EASYENTRYPOINT("EICTR330"),EXECBLOCK("EICTR330",.F.,.F.,"TB_CAMPOS"),)
EICTR330.PRW - RODAPE_REL()() -> IF(EASYENTRYPOINT("EICTR330"),EXECBLOCK("EICTR330",.F.,.F.,"RODAPE_REL"),)
EICTR330.PRW - TOTALPRZMED() -> IF(EASYENTRYPOINT("EICTR330"),EXECBLOCK("EICTR330",.F.,.F.,"RODAPE_REL"),)
EICTR330.PRW - TR330GRAVA() -> IF(EASYENTRYPOINT("EICTR330"),EXECBLOCK("EICTR330",.F.,.F.,"GRAVA_WORK"),)
EICTR330.PRW - TR330GRAVA() -> IF(EASYENTRYPOINT("EICTR330"),EXECBLOCK("EICTR330",.F.,.F.,"LOOP"),)
EICTR350.PRW - CALCULA_PARCELAS() -> EXECBLOCK("EICTR350",.F.,.F.,"DATA_EMBARQUE")
EICTR350.PRW - CALCULA_PARCELAS() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"APOS_CALC_PARCELA"),)
EICTR350.PRW - EICTR350() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"FINAL_VAL"),)
EICTR350.PRW - TR350ARQ() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"ALT_TITULO"),)
EICTR350.PRW - TR350ARQ() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"GERA_REL"),)
EICTR350.PRW - TR350ARQ() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"GRV_WORKA"),)
EICTR350.PRW - TR350ARQ() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"GRV_WORKB"),)
EICTR350.PRW - TR350ARQ() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"IMPR_REL"),)
EICTR350.PRW - TR350BROWSE() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"TELA_BROWSE"),)
EICTR350.PRW - TR350FATPRINT() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"CGC_IMP"),)
EICTR350.PRW - TR350FATPRINT() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"IMPRIMINDO"),)
EICTR350.PRW - TR350PREEQ() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"GRV_WORK"),)
EICTR350.PRW - TR350PRINT() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"ALT_PRINT"),)
EICTR350.PRW - TR350PRINT() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"ANTES_IMPRIMIR"),)
EICTR350.PRW - TR350PRINT() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"DEPOIS_IMPRIME_DOC"),)
EICTR350.PRW - TR350PRINT() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"TELA_FECHAMENTO"),)
EICTR350.PRW - TR350PROCESSA() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"GRV_WORK"),)
EICTR350.PRW - TR350QUEBRA() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"SOMA_TOTAIS"),)
EICTR350.PRW - TR350SX1VALID() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"SX1VALID"),)
EICTR350.PRW - TR350TOTAIS() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"IMP_TRACO"),)
EICTR350.PRW - TR350TOTAIS() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"IMP_VALOR"),)
EICTR350.PRW - TR350WORKS() -> IF(EASYENTRYPOINT("EICTR350"),EXECBLOCK("EICTR350",.F.,.F.,"ESTRU_WORK"),)
EICTR500.PRW - EICTR500R3() -> IF(EASYENTRYPOINT("EICTR500"),EXECBLOCK("EICTR500",.F.,.F.,"GERTELA"),)
EICTR500.PRW - TR500GRV() -> IF(EASYENTRYPOINT("EICTR500"),EXECBLOCK("EICTR500",.F.,.F.,"LOOP"),)
EICTR600.PRW - EICTR600() -> EXECBLOCK("EICTR600",.F.,.F.,"ACERTA_VARIAVEIS")
EICTR600.PRW - EICTR600() -> EXECBLOCK("EICTR600",.F.,.F.,"ANTES_GRV_WORK")
EICTR600.PRW - EICTR600() -> EXECBLOCK("EICTR600",.F.,.F.,"DEPOIS_GRV_WORK")
EICTR600.PRW - EICTR600() -> EXECBLOCK("EICTR600",.F.,.F.,"INDICE")
EICTR600.PRW - EICTR600() -> EXECBLOCK("EICTR600",.F.,.F.,"INICIA_VARIAVEIS")
EICTR600.PRW - TR600GRV() -> EXECBLOCK("EICTR600",.F.,.F.,"GRV_WK_APAGAR")
EICTR600.PRW - TR600GRV() -> EXECBLOCK("EICTR600",.F.,.F.,"GRV_WK_FORN")
EICTR600.PRW - TR600GRV() -> EXECBLOCK("EICTR600",.F.,.F.,"GRV_WK_NAO_PAGAS")
EICTR600.PRW - TR600GRV() -> EXECBLOCK("EICTR600",.F.,.F.,"GRV_WK_PAGAS")
EICTR600.PRW - TR600GRV() -> EXECBLOCK("EICTR600",.F.,.F.,"VALID_GRV_WORK")
EICXFUN.PRW - AV_ESC_OBS() -> EXECBLOCK("EICXFUN",.F.,.F.,"GRAVACAO_WORK_MEN")
EICXFUN.PRW - PRINTCAB() -> EXECBLOCK("EICXFUN",.F.,.F.,"LOGOTIPO")
EICXFUN.PRW - PRINTCAB() -> EXECBLOCK("IC195XF1",.F.,.F.,LINHA)
ESTW002.PRW - WHTHRSD5() -> EXECBLOCK('PEUPDE08', .F., .F., {'SD5'})
ESTW002.PRW - WHTHRSDA() -> EXECBLOCK('PEUPDE08', .F., .F., {'SDA'})
ESTW002.PRW - WHTHRSDB() -> EXECBLOCK('PEUPDE08', .F., .F., {'SDB'})
ESTW002.PRW - WIZLTSBF() -> EXECBLOCK('PEUPDE08', .F., .F., {'SBF'})
ESTW002.PRW - WIZLTSBJ() -> EXECBLOCK('PEUPDE08', .F., .F., {'SBJ'})
ESTW002.PRW - WIZLTSBK() -> EXECBLOCK('PEUPDE08', .F., .F., {'SBK'})
ESTW002.PRW - WIZLTSD5() -> EXECBLOCK('PEUPDE08', .F., .F., {'SD5'})
ESTW002.PRW - WIZLTSDA() -> EXECBLOCK('PEUPDE08', .F., .F., {'SDA'})
ESTW002.PRW - WIZLTSDB() -> EXECBLOCK('PEUPDE08', .F., .F., {'SDB'})
ESTW002.PRW - WZTHRSB8() -> EXECBLOCK('PEUPDE08', .F., .F., {'SB8'})
ESTW002.PRW - WZTHRSBF() -> EXECBLOCK('PEUPDE08', .F., .F., {'SBF'})
ESTW002.PRW - WZTHRSBJ() -> EXECBLOCK('PEUPDE08', .F., .F., {'SBJ'})
ESTW002.PRW - WZTHRSBK() -> EXECBLOCK('PEUPDE08', .F., .F., {'SBK'})
EXTFISXTAF.PRW - REGT007() -> ASPEDPROD := EXECBLOCK("SPEDPROD", .F., .F., {"SB1",""})
EXTT050.PRW - EXTGERACIAP() -> LOCAL BWHILESM0 AS EXECBLOCK
FATA010.PRX - FT010GRV() -> LOCAL AUSRMEMO := IF( EXISTBLOCK( "FT010MEM" ), EXECBLOCK( "FT010MEM", .F.,.F. ), {} )
FATA010.PRX - MODELDEF() -> LOCAL AUSRMEMO := IF( EXISTBLOCK( "FT010MEM" ), EXECBLOCK( "FT010MEM", .F.,.F. ), {} )
FATA010.PRX - VIEWDEF() -> LOCAL AUSRMEMO := IF( EXISTBLOCK( "FT010MEM" ), EXECBLOCK( "FT010MEM", .F.,.F. ), {} )
FATA050.PRX - FATA050POS() -> LRET := EXECBLOCK("FT050TOK",.F.,.F.,{OMDL})
FATA050.PRX - FT050LINOK() -> LRET := EXECBLOCK("FT050LOK",.F.,.F.)
FATA050.PRX - MENUDEF() -> AUSRBUT := EXECBLOCK("FT050MNU",.F.,.F.)
FATA070.PRX - FT070GRAVA() -> EXECBLOCK( "FT070RDZ",.F.,.F.,{ARDZVEN})
FATA070.PRX - FT070MACT() -> EXECBLOCK("FT70ENABTN",.F.,.F.,{OMENU,OTREE,LVISUAL})
FATA070.PRX - FT070MENU() -> LRETORNO := EXECBLOCK("FT70ACTMNU",.F.,.F.,{OTREE,CACTION})
FATA070.PRX - FT070MONTA() -> CIMGVEND := EXECBLOCK("FT70IMGVEN",.F.,.F.,{SA3->A3_COD})
FATA080.PRX - FT080GRV() -> EXECBLOCK("FT080GRV",.F.,.F.,{NOPCAO})
FATA080.PRX - FTDESCCAB() -> NRET := EXECBLOCK("FT080DSC",.F.,.F.,{NPRCLISTA,NPRCVEN})
FATA080.PRX - MARGRDESC() -> NDESCONTO := EXECBLOCK("FT080RDES",.F.,.F.,{CPRODUTO,CCLIENTE,CLOJA,CTABPRECO,NFAIXA,CCONDPG,CFORMPG,NTIPO,APRODS,AEXC})
FATA080.PRX - MENUDEF() -> EXECBLOCK("FT080MNU",.F.,.F.)
FATA090.PRX - FT090LOK() -> LRETORNO := EXECBLOCK("FT090LOK",.F.,.F.)
FATA090.PRX - FT090TOK() -> LRETORNO := EXECBLOCK("FT090TDOK",.F.,.F.)
FATA090.PRX - MENUDEF() -> EXECBLOCK("FT090MNU",.F.,.F.)
FATA100.PRX - FT100OK() -> LFT100TOK := EXECBLOCK( "FT100TOK",.F.,.F.,{OGETD1, OGETD2, OGETD3} )
FATA100.PRX - FTREGNEGIT() -> ARETREG := EXECBLOCK('FT100RNI',.F.,.F.,{CCODREG,CTABPRECO,CCONDPG,CFORMPG,APRODUTOS,APRODDESC,LCONTINUA,LRETORNO,LCONTVERBA,LEXECAO})
FATA100.PRX - MENUDEF() -> EXECBLOCK("FT100MNU",.F.,.F.)
FATA140.PRW - FT140COMM() -> EXECBLOCK("FT140GRV",.F.,.F.)
FATA140.PRW - FT140VLDEL() -> LEXCLUI:=EXECBLOCK("FT140EXC",.F.,.F.)
FATA140.PRW - FT140VLDEL() -> RESTAREA(AAREA)
FATA150.PRW - FT150MANUT() -> EXECBLOCK("FT150GRV",.F.,.F.,{"",NOPC-2,AHEADER,ACOLS,ACLONE(AFT150CPOCAB)})
FATA150.PRW - MENUDEF() -> EXECBLOCK("FT150MNU",.F.,.F.)
FATA210.PRW - FATA210() -> ACORESNEW := EXECBLOCK("FT210COR",.F.,.F.,ACORES)
FATA210.PRW - FT210LEGEND() -> ACORESNEW := EXECBLOCK("FT210LEG",.F.,.F.,ACORES)
FATA210.PRW - FT210LIBER() -> NOPCA := EXECBLOCK("FT210OPC",.F.,.F.,{NOPCA})
FATA210.PRW - FT210PROC() -> EXECBLOCK("FT210LIB",.F.,.F.)
FATA210.PRW - MENUDEF() -> EXECBLOCK("FT210MNU",.F.,.F.)
FATA220.PRX - FT220POS() -> LRET := EXECBLOCK("FT220EXC",.F.,.F.,{__CUSERID,CUSERNAME,OMDLAI3:GETVALUE("AI3_CODUSU"),OMDLAI3:GETVALUE("AI3_LOGIN"),OMDLAI3:GETVALUE("AI3_NOME")})
FATA300.PRX - BROWSEDEF() -> CFILUSER := EXECBLOCK("FT300FILBW",.F.,.F.)
FATA300.PRX - FATA300CPO() -> CFIELDSUSR := EXECBLOCK("FT300CPO",.F.,.F.)
FATA300.PRX - FT300AD1STA() -> ARETPE:= EXECBLOCK("FT300D1ST",.F.,.F.)
FATA300.PRX - FT300LEG() -> ACORESNEW := EXECBLOCK("FT30LEG",.F.,.F.,{ACORES})
FATA300.PRX - MENUDEF() -> UROTINA := EXECBLOCK("FT300MNU",.F.,.F.,{AROTINA})
FATA300.PRX - TABLEATTDEF() -> ACAMPOSVIS := EXECBLOCK("FT300CPV")
FATA300.PRX - VIEWDEF() -> ABUTUSER := EXECBLOCK("FT300BUT",.F.,.F.,{OVIEW})
FATA300.PRX - VIEWDEF() -> URETORNO := EXECBLOCK("FT300ORC",.F.,.F.,{OMODEL, NOPC })
FATA310.PRX - FT310ADDBT() -> IF VALTYPE( AUSRBUTTONS := EXECBLOCK( "FT310BUT", .F.,.F., { AOPC[NI] } ) ) == "A"
FATA310.PRX - FT310BTCAN() -> LRET := EXECBLOCK("FT310CAN",.F.,.F.)
FATA310.PRX - FT310COM() -> EXECBLOCK( "FAT310GR", .F., .F., {NOPC-2})
FATA310.PRX - FT310LOK() -> LRET := EXECBLOCK( "FT310LOK", .F.,.F.)
FATA310.PRX - FT310TOK() -> LRETORNO := EXECBLOCK("FT310TOK")
FATA310.PRX - MENUDEF() -> EXECBLOCK("FT310MNU",.F.,.F.)
FATA310.PRX - MODELDEF() -> LOCAL AUSRMEMO:= IF( EXISTBLOCK( "FT310MEM" ), EXECBLOCK( "FT310MEM", .F.,.F. ), {} )
FATA310.PRX - VIEWDEF() -> LOCAL AUSRMEMO:= IF( EXISTBLOCK( "FT310MEM" ), EXECBLOCK( "FT310MEM", .F.,.F. ), {} )
FATA320.PRX - FT320AGE() -> IF VALTYPE( AUSBUTTONS := EXECBLOCK( "FT320BUT", .F., .F. ) ) == "A"
FATA320.PRX - FT320DVIS2() -> LPERMDEL := EXECBLOCK( "FT320DEL", .F., .F. )
FATA320.PRX - FT320LOK1() -> LRET := EXECBLOCK( "FT320VALID", .F., .F. )
FATA320.PRX - FT320PVIS() -> DDATAVIS := EXECBLOCK("FT320DTI",.F.,.F.)
FATA320.PRX - FT320PVIS() -> DDATAVIS := EXECBLOCK("FT320DVA",.F.,.F.,{DDATAVIS})
FATA320.PRX - FT320PVIS() -> EXECBLOCK("FT320AG2",.F.,.F.)
FATA320.PRX - FT320PVIS() -> EXECBLOCK("FT320GRV",.F.,.F.)
FATA320.PRX - FT320PVIS() -> LCONTBLK := EXECBLOCK("FT320VLD",.F.,.F.,{LQUERY})
FATA320.PRX - FT320TOK() -> LRET := EXECBLOCK("FT320TDK",.F.,.F.)
FATA320.PRX - FTULTVIS() -> DDATA := EXECBLOCK("FTULTVIS",.F.,.F.,{DDATA})
FATA320.PRX - MENUDEF() -> EXECBLOCK("FT320MNU",.F.,.F.)
FATA320B.PRX - FT320BTN() -> CFTRUSR := EXECBLOCK("FT300FTR",.F.,.F.)
FATA320B.PRX - FT320FILANI() -> ACONTATOS := EXECBLOCK("PEEXCONT",.F.,.F., {CCODVND})
FATA320B.PRX - FT320LOADRES() -> EXECBLOCK("FT320INF",.F.,.F.)
FATA320B.PRX - FT320TASK() -> ABUTUSR := EXECBLOCK("FT320TBT",.F.,.F.)
FATA320B.PRX - FT320TASK() -> ACTIVATE MSDIALOG ODLGTASK CENTERED ON INIT ENCHOICEBAR(ODLGTASK,{||NOPCA:=1,IF(OGETD:TUDOOK(),ODLGTASK:END(),NOPCA:=0)},IIF(LFT320CAN,{|| IIF(EXECBLOCK("FT320CAN",.F.,.F.),ODLGTASK:END(),)},{||ODLGTASK:END()}),,ABUTUSR)
FATA320B.PRX - FT320TASK() -> EXECBLOCK( "FT320TSK", .F., .F. )
FATA320B.PRX - FT320WAREA() -> ABUTUSR := EXECBLOCK("FT320BRP",.F.,.F.)
FATA320B.PRX - FT320WAREA() -> CFILTER := EXECBLOCK("FT320ADL",.F.,.F.,{CVENDLOG})
FATA320B.PRX - FT320WAREA() -> EXECBLOCK("FT320INF",.F.,.F.,{OPANCTAS})
FATA320B.PRX - MENUDEF() -> AROTUSR := EXECBLOCK("FT320ROT",.F.,.F.,{AROTINA})
FATA320B.PRX - MONTABTN() -> LVISIBLE := EXECBLOCK("FT320BVS",.F.,.F.,{ABUTTONS[NX][1],ABUTTONS[NX][3]})
FATA321C.PRW - FT321LENTIDA() -> ADADOS := EXECBLOCK("FT321ENT",.F.,.F.,{CCODVND})
FATA321C.PRW - FT321LPOS() -> LRET := EXECBLOCK("FT321LOK",.F.,.F.,{OMDLGRID})
FATA321C.PRW - VIEWDEF() -> ABUTUSR := EXECBLOCK("FT320TBT",.F.,.F.)
FATA330.PRW - FATA330() -> APROSPECTS := EXECBLOCK("FT330PRO",.F.,.F., {CCODVEND})
FATA330.PRW - FT330ASSOCIACONT() -> EXECBLOCK("FT330ASS",.F.,.F., {AGERAL})
FATA340.PRX - FA080BUTS() -> AUSBUTTONS := EXECBLOCK( "FT340BUT", .F., .F. )
FATA340.PRX - FA340COMMI() -> EXECBLOCK("FT340GRV",.F.,.F.,{ NOPC})
FATA340.PRX - FA340POSVL() -> LRET := EXECBLOCK( "FT340VLD", .F., .F.,{NOPC,FUNNAME()} )
FATA340.PRX - FT340ALTER() -> LRET := EXECBLOCK( "FT340VLD", .F., .F.,{NOPCX,FUNNAME()} )
FATA340.PRX - FT340BAR() -> AUSBUTTONS := EXECBLOCK( "FT340BUT", .F., .F. )
FATA340.PRX - FT340CPYOBJ() -> CNAMESERV := EXECBLOCK( "FT340CHG", .F., .F.,{CNAMESERV} )
FATA340.PRX - FT340CPYOBJ() -> LRET := EXECBLOCK( "FT340TAM", .F., .F.,{AFILES} )
FATA340.PRX - FT340GRV() -> EXECBLOCK("FT340GRV",.F.,.F.,{ NTIPO })
FATA340.PRX - FT340INCLU() -> LRET := EXECBLOCK( "FT340VLD", .F., .F.,{NOPCX,FUNNAME()} )
FATA350.PRX - FTDESPFIN() -> EXECBLOCK("FT350DSP", .F., .F., { SE2->(RECNO()) } )
FATA400.PRX - FATA400() -> ACORES := EXECBLOCK("FT400COR",.F.,.F.,ACORES)
FATA400.PRX - FT400ALTER() -> EXECBLOCK("FT400CLOSE",.F.,.F.,NOPCX)
FATA400.PRX - FT400ALTER() -> EXECBLOCK("FT400VCP",.F.,.F.,{NOPCX,LNEWCONT})
FATA400.PRX - FT400ALTER() -> IF !EXECBLOCK("FT400DEL",.F.,.F.)
FATA400.PRX - FT400BAR() -> ABUTTONUSR := EXECBLOCK("FT400BAR",.F.,.F.)
FATA400.PRX - FT400BCTR() -> CQUERY += EXECBLOCK("FT400FLT",.F.,.F., {CCLIENTE, CLOJA, CQUERY})
FATA400.PRX - FT400GRAVA() -> EXECBLOCK("FT400AGR",.F.,.F.,{NOPCA})
FATA400.PRX - FT400GRAVA() -> EXECBLOCK("FT400GRV",.F.,.F.,{NOPCA})
FATA400.PRX - FT400INCLU() -> EXECBLOCK("FT400CLOSE",.F.,.F.,NOPCX)
FATA400.PRX - FT400LEGEN() -> ARETPE := EXECBLOCK("FT400LEG",.F.,.F.)
FATA400.PRX - FT400LINOK() -> LRETORNO := EXECBLOCK( "FT400LOK", .F.,.F.)
FATA400.PRX - FT400PV() -> ACOLSC6 := EXECBLOCK("FT400LIN",.F.,.F.,{AHEADC6,ACOLSC6})
FATA400.PRX - FT400PV() -> EXECBLOCK("FT400CAB",.F.,.F.)
FATA400.PRX - FT400PV() -> EXECBLOCK("FT400LIB", .F.,.F.,NTIPO)
FATA400.PRX - FT400PV() -> EXECBLOCK("FT400PED",.F.,.F.)
FATA400.PRX - FT400PV() -> LVALCONTR := EXECBLOCK("FT400VAL",.F.,.F.,{CCONTRATO,NTIPO})
FATA400.PRX - FT400PV() -> LVALITCON := EXECBLOCK("FT400VLC",.F.,.F.,{CCONTRATO,ADB->ADB_ITEM})
FATA400.PRX - FT400REMES() -> CCONTRATO := EXECBLOCK("FT400CON",.F.,.F.)
FATA400.PRX - FT400TUDOK() -> LRETORNO := EXECBLOCK("FT400TOK",.F.,.F.)
FATA400.PRX - MENUDEF() -> EXECBLOCK("FT400MNU",.F.,.F.)
FATA502.PRW - A502DESAPR() -> EXECBLOCK("MT416DES",.F.,.F.)
FATA502.PRW - A502LEGEND() -> ACORES := EXECBLOCK("MA415LEG",.F.,.F.,ACORES)
FATA502.PRW - A502LIBERA() -> EXECBLOCK("FT502FAT",.F.,.F.)
FATA502.PRW - A502LIBERA() -> EXECBLOCK("FT502LIB",.F.,.F.)
FATA502.PRW - FATA502() -> ACORES := EXECBLOCK("MA416COR",.F.,.F.,ACORES)
FATA510.PRW - FATA510CMT() -> EXECBLOCK("FT510CNF",.F.,.F.,{"ADK",NREG,NOPERATION})
FATA510.PRW - FATA510PRE() -> ABUTTONS := EXECBLOCK("FT510BUT",.F.,.F.)
FATA530.PRW - FT530ABREMD() -> CRETPE := EXECBLOCK("FT530QRY",.F.,.F.)
FATA530.PRW - FT530SELMD() -> EXECBLOCK("FT530SEL",.F.,.F.,{@OTREE,@ATREE,NOPCX})
FATA530.PRW - FTADLGAF1() -> LRET := EXECBLOCK("FT530VDC",.F.,.F.,{M->AF1_ORCAME,M->AF1_VERSAO})
FATA570.PRW - FT570GRL() -> EXECBLOCK("FT570GRV",.F.,.F.)
FATA590.PRW - FATA590() -> LOCAL CVLDEXC := ".T."
FATA600.PRW - FATA600() -> AFT600CL := EXECBLOCK("FT600CL",.F.,.F.)
FATA600.PRW - FT600CBXSTATUS() -> CRETSTATUS := EXECBLOCK("FT600NSTA")
FATA600.PRW - FT600LEGENDA() -> ACORESNEW := EXECBLOCK("FT600COR",.F.,.F.,{ARET})
FATA600.PRW - MENUDEF() -> AMENUUSER := EXECBLOCK("FT600MNU",.F.,.F.,{AROTINA,OMDLFT300})
FATA600.PRW - MODELDEF() -> EXECBLOCK("FATA600MDL" ,.F. ,.F. ,{OMODEL})
FATA600.PRW - VIEWDEF() -> ABUTTONS := EXECBLOCK( "FT600BUT", .F.,.F., {OVIEW} )
FATA600.PRW - VIEWDEF() -> LAPROVA := EXECBLOCK("FT600APRV", .F., .F., {OMODEL})
FATA610.PRW - A610ACESSORIO() -> CWHEREQ := EXECBLOCK( "FT610WHE",.F.,.F.,)
FATA610.PRW - A610MTREE() -> CFILTMP := EXECBLOCK("FT610MT1",.F.,.F.,{CCODPAI})
FATA610.PRW - A610MTREE() -> CTEXTO := EXECBLOCK("FT610TXT",.F.,.F.)
FATA610.PRW - A610PRODUTO() -> CDESCPROD := EXECBLOCK("FT610DPR",.F.,.F.,TR3->B1_COD)
FATA610.PRW - A610PRODUTO() -> CDESCPROD := EXECBLOCK("FT610DPR",.F.,.F.,TR4->B1_COD)
FATA610.PRW - A610PRODUTO() -> CWHEREPE:= EXECBLOCK("FT610WH2",.F.,.F.)
FATA750.PRW - FTA750ASG() -> EXECBLOCK( CCFDINC, .F. , .F. , {CNUMFAC , CSERIE , CESPECIE , CCLIENTE , CLOJA, LOWER( ALLTRIM(CESPECIE) + "_" + ALLTRIM(SUBSTR(CSERIE,1,3)) + "_" + ALLTRIM(CNUMFAC)), CRUTASRV} )
FATC010.PRX - FTC010STAGE() -> IF VALTYPE( AFILTRO := EXECBLOCK( "FT320FIL", .F., .F. ) ) == "A"
FATC010.PRX - MENUDEF() -> EXECBLOCK("FC010MNU",.F.,.F.)
FATC020.PRW - GETQRYAD1() -> CQUERY := EXECBLOCK("FATC20AD1",.F.,.F.,{CCPOSAD1,CVEND,CPROCESSO,CESTAGIO})
FATN300.PRX - F300CMTMDL() -> EXECBLOCK("FT300GRA",.F.,.F.,{OMODEL})
FATN300.PRX - F300CMTMDL() -> EXECBLOCK("FT300UPLMAN", .F., .F., { OMDLAD1 })
FATN300.PRX - F300CMTMDL() -> URETORNO := EXECBLOCK("FT300PRC",.F.,.F.,{OMODEL})
FATN300.PRX - F300CMTMDL() -> URETORNO := EXECBLOCK("FT300SPR",.F.,.F.,{OMODEL,CCODPROP})
FATN300.PRX - FT300PENDF() -> URETORNO := EXECBLOCK("FT300FIN",.F.,.F.,{OMODEL})
FATN300.PRX - FT300RETREV() -> ACAMPOSUSU := EXECBLOCK("FT300CMP",.F.,.F.)
FATN300.PRX - FT300VROPO() -> URETORNO := EXECBLOCK("FT300REV",.F.,.F.)
FATN300A.PRX - F300AFTVIEWACT() -> LRETORNO := EXECBLOCK("FT300AFTVWEACT",.F.,.F.,{OVIEW})
FATN300A.PRX - FT300GPDAUTO() -> ARET := EXECBLOCK("FT300PV", .F., .F., {CFILBKP})
FATN600.PRW - A600BPROP() -> CFILSQL := EXECBLOCK("FT600FSQL",.F.,.F.)
FATN600.PRW - A600DEL() -> LRET:= EXECBLOCK("FT600EXC", .F.,.F., {OMODEL})
FATN600.PRW - A600IMPR() -> LRETORNO := EXECBLOCK( "FT600IMP", .F., .F. )
FATN600.PRW - A600SERVICOS() -> LRET := EXECBLOCK("FT600SRV",.T.,.T.,{ CPROPOSTA, COPORTUNIDA, CTABPRC, OMODEL } )
FATN600.PRW - AT600COMMIT() -> EXECBLOCK("FT600FGR", .F., .F., {OMODEL})
FATN600.PRW - AT600COMMIT() -> LGRAVA := EXECBLOCK("FT600GRV", .F., .F., {OMODEL})
FATN600.PRW - FT600CAT() -> APRODSEL := EXECBLOCK("FT600MCPRD", .F.,.F., { OMDLPRD, OMDLACE } )
FATN600.PRW - FT600CAT() -> EXECBLOCK("FT600SEL", .F.,.F., {OMDLPRD, OMDLACE})
FATN600.PRW - FT600RLGRID() -> ARET:= EXECBLOCK("FT600ULGRID", .F., .F., APARAM)
FATN600.PRW - FT600RLGRID() -> ARET:= EXECBLOCK("FT600ULGRID", .F.,.F.,APARAM)
FATN600.PRW - FT600RLGRID() -> EXECBLOCK("FT600ULGRID", .F., .F., APARAM)
FATN600.PRW - FT600RLGRID() -> LINCMULTPROD := EXECBLOCK("FT600PRR",.F.,.F.)
FATN600.PRW - FT600RLGRID() -> LRET:= EXECBLOCK("FT600ULGRID", .F.,.F., APARAM)
FATN600.PRW - FT600TRIGGER() -> UVALUE := EXECBLOCK("FT600UTRIGGER", .F.,.F., {CFIELDDOM, CFIELDCDOM, CMDLDETAIL, UVALUE})
FATN600.PRW - INITP09() -> ATIPO09:= EXECBLOCK("FT600TP09", .F., .F., {OMODEL})
FATN600A.PRW - A600TOTAL() -> ARETPE:= EXECBLOCK('FT600TOT', .F., .F., {OMODEL, ACRONOFIN})
FATR600.PRW - R600MACROS() -> EXECBLOCK(ACOMPONENTE[NFUNCAO][8],.F.,.F.,{HWORD} )
FATV300.PRX - F300MDLACT() -> EXECBLOCK("FT300INI",.F.,.F.,{OMODEL})
FATV300.PRX - F300MDLPVAL() -> URETORNO := EXECBLOCK("FT300VLD",.F.,.F.,{OMODEL})
FATV300.PRX - FT300VLDDEL() -> URETORNO := EXECBLOCK("FT300DOK",.F.,.F.)
FATV600A.PRW - AT600LOK() -> LRET := EXECBLOCK("FT600LOK", .F.,.F., {OMDLATU})
FATV600A.PRW - AT600TOK() -> LRETORNO := EXECBLOCK("FT600VTC", .F.,.F., {CTPCONT})
FATV600A.PRW - AT600TOK() -> LSOMA := EXECBLOCK( 'FT600TOC', .F., .F., { OMODEL:GETMODEL(CFOLDER):GETVALUE("ADZ_PRODUT"), OMODEL, NABA, NX } )
FATV600A.PRW - AT600TOK() -> URETPE:= EXECBLOCK("FT600TOK", .F.,.F., OMODEL)
FATV600A.PRW - AT600TP9TOT() -> LRET := EXECBLOCK("FT600T9A", .F., .F., {ACOLS, AHEADER})
FATXFUN.PRX - A440GERAC9() -> LTRVSA1 := IIF(CPAISLOC == "BRA" .AND. LFATTRVSA1, EXECBLOCK("FATTRVSA1", .F., .F., {XFILIAL("SA1"), SA1->A1_COD, SA1->A1_LOJA}), .T.)
FATXFUN.PRX - A440GERAC9() -> NVALAV:=EXECBLOCK("MTVALAVC",.F.,.F.,{'A440GERAC9',SC6->C6_PRCVEN*NQTDLIB,NIL})
FATXFUN.PRX - A440GRAVA() -> EXECBLOCK("MAAVSC5",.F.,.F.,{3})
FATXFUN.PRX - A440VERSB2() -> CFILTRO := EXECBLOCK("MTA440A")
FATXFUN.PRX - A440VERSB2() -> NQTD440L := IF(EXISTBLOCK("MTA440L"),EXECBLOCK("MTA440L",.F.,.F.),0)
FATXFUN.PRX - A460ESTORNA() -> EXECBLOCK("M460DEL",.F.,.F.)
FATXFUN.PRX - A460ESTORNA() -> LCONTINUA := EXECBLOCK("MT460EST",.F.,.F.)
FATXFUN.PRX - AT040GRAVA() -> EXECBLOCK( "AT040GRV", .F., .F., { NOPCAO } )
FATXFUN.PRX - FATGETHELP() -> LOCAL LPADRAO:= !( FWISINCALLSTACK("EXECBLOCK") .OR. FWISINCALLSTACK("EXECTEMPLATE") )
FATXFUN.PRX - FTVLDQTVEN() -> LRET := EXECBLOCK( "FTQTDMIN", .F., .F. )
FATXFUN.PRX - MAAVALCRED() -> CQUERY:= EXECBLOCK("MAAVCRFIN", .F., .F., {CQUERY, CCODCLI, CLOJA})
FATXFUN.PRX - MAAVALCRED() -> LRETORNO := EXECBLOCK("MAAVCRPR",.F.,.F.,{CCODCLI,CLOJA,NVALOR,NMOEDA,LPEDIDO,CTIPOLIM,LRETORNO,CCODIGO,CCOMPLTUR,CSEGTUR})
FATXFUN.PRX - MAAVALCRED() -> XRETORNO := EXECBLOCK("MAAVCRED",.F.,.F.,{CCODCLI,CLOJA,NVALOR,NMOEDA,LPEDIDO,CCOMPLTUR,CSEGTUR})
FATXFUN.PRX - MAAVALSC5() -> EXECBLOCK("MAAVSC5",.F.,.F.,{NEVENTO})
FATXFUN.PRX - MAAVALSC5() -> EXECBLOCK("MALIBREG",.F.,.F.,{SC5->C5_NUM})
FATXFUN.PRX - MAAVALSC5() -> LEXECFLCX := EXECBLOCK("FTNRUNFLCX",.F.,.F.)
FATXFUN.PRX - MAAVALSC6() -> LTRVSA1 := IIF(CPAISLOC == "BRA" .AND. LFATTRVSA1, EXECBLOCK("FATTRVSA1", .F., .F., {XFILIAL("SA1"), SA1->A1_COD, SA1->A1_LOJA}), .T.)
FATXFUN.PRX - MAAVALSC9() -> LRETEMPPE := EXECBLOCK("MTVALEMP",.F.,.F.,{NEVENTO,CALIASSC9,LATUEMP})
FATXFUN.PRX - MAAVALSC9() -> LTRVSA1 := IIF(CPAISLOC == "BRA" .AND. LFATTRVSA1, EXECBLOCK("FATTRVSA1", .F., .F., {XFILIAL("SA1"), SA1->A1_COD, SA1->A1_LOJA}), .T.)
FATXFUN.PRX - MAAVALSC9() -> NVALAV:=EXECBLOCK("MTVALAVC",.F.,.F.,{'MAAVALSC9',(CALIASSC9)->C9_QTDLIB*(CALIASSC9)->C9_PRCVEN,NEVENTO})
FATXFUN.PRX - MAAVLIBPED() -> LTRVSA1 := IIF(CPAISLOC == "BRA" .AND. LFATTRVSA1, EXECBLOCK("FATTRVSA1", .F., .F., {XFILIAL("SA1"), SA1->A1_COD, SA1->A1_LOJA}), .T.)
FATXFUN.PRX - MAGRAVASC9() -> EXECBLOCK("M440SC9I",.F.,.F.)
FATXFUN.PRX - MAGRAVASC9() -> EXECBLOCK("MA440GRLT",.F.,.F.,{SC6->C6_PRODUTO,SC6->C6_LOCAL,NQTDLIB,SC6->C6_LOTECTL,SC6->C6_NUMLOTE,SC6->C6_LOCALIZ,SC6->C6_NUMSERI})
FATXFUN.PRX - MAGRAVASC9() -> EXECBLOCK("MTA440C9",.F.,.F.)
FATXFUN.PRX - MAGRAVASC9() -> LRETWMSPE := EXECBLOCK("MA440WMS",.F.,.F.,{LHASWMS})
FATXFUN.PRX - MAGRAVASC9() -> LTRVSA1 := IIF(CPAISLOC == "BRA" .AND. LFATTRVSA1, EXECBLOCK("FATTRVSA1", .F., .F., {XFILIAL("SA1"), SA1->A1_COD, SA1->A1_LOJA}), .T.)
FATXFUN.PRX - MATGRDMONT() -> ACOLUNA := EXECBLOCK("PVORDGRC",.F.,.F.,{CPRODREF})
FATXFUN.PRX - MATGRDMONT() -> ALINHA := EXECBLOCK("PVORDGRL",.F.,.F.,{CPRODREF})
FATXFUN.PRX - RHINSSPAT() -> CQUERY += EXECBLOCK("QRYDESON",.F.,.F.,{CQUERY})
FATXFUN.PRX - RHINSSPAT() -> LRET := EXECBLOCK("NFSDESON",.F.,.F.,{(CALIASQRY)->D2_DOC, (CALIASQRY)->D2_SERIE, (CALIASQRY)->D2_COD})
FATXJOB.PRX - FTJOBNFS() -> NITEMNF := EXECBLOCK("M460NITE",.F.,.F.,{LEN(APVLNFS),APVLNFS})
FATXJOB.PRX - FTJOBNFSB2() -> EXECBLOCK("FTJNFSB2",.F.,.F.,{APEDIDO,ANOTA})
FATXJOB.PRX - FTJOBPVCF() -> LEXECFLCX := EXECBLOCK("FTNRUNFLCX",.F.,.F.)
FATXJOB.PRX - FTJOBPVMAIL() -> CQRY := EXECBLOCK("JOBSC5MAIL",.F.,.F.,{CQRY,1})
FATXJOB.PRX - FTJOBPVMAIL() -> CQRY := EXECBLOCK("JOBSC9MAIL",.F.,.F.,{CQRY,1})
FATXJOB.PRX - FTJOBPVMAIL() -> CQRY := EXECBLOCK("JOBSD2MAIL",.F.,.F.,{CQRY,1})
FATXJOB.PRX - FTJOBPVXML() -> EXECBLOCK("FTJOBPV",.F.,.F.,{CPEDIDO})
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎
Um abraço, e até a próxima