[ID]
  NUMERO=1000
  NOMBRE=DPCBTEPAGO_HIS
  DESCRIPCION=Comprobante de Pago Histórico 
  CONFIG=F
  SINGUL=Comprobante de Pago 
  APLICA=04
  PRIMARY_KEY='PAG_CODSUC,PAG_NUMERO'
[END_ID]

[FIELDS]
  C001=PAG_ACT                                ,'N',018,0,'','Estatus',0
  C002=PAG_ANOMBR                             ,'C',040,0,'','A nombre de',0
  C003=PAG_AUTORI                             ,'L',001,0,'','Autorizado',0
  C004=PAG_CBTNUM                             ,'C',008,0,'','Comprobante Contable',0
  C005=PAG_CENCOS                             ,'C',008,0,'','Centro de Costos',0
  C006=PAG_CODCAJ                             ,'C',006,0,'','Caja Origen',0
  C007=PAG_CODIGO                             ,'C',010,0,'','Proveedor',0
  C008=PAG_CODMON                             ,'C',003,0,'','Moneda',0
  C009=PAG_CODSUC                             ,'C',006,0,'','Sucursal',0
  C010=PAG_COMEN1                             ,'C',060,0,'','Comentario 1',0
  C011=PAG_COMEN2                             ,'C',060,0,'','Comentario 2',0
  C012=PAG_ESTADO                             ,'C',001,0,'','Estado',0
  C013=PAG_FECHA                              ,'D',008,0,'','Fecha',0
  C014=PAG_FILMAI                             ,'N',007,0,'','Digitalización',0
  C015=PAG_HORA                               ,'C',008,0,'','Hora',0
  C016=PAG_IMPRES                             ,'L',001,0,'','Impreso',0
  C017=PAG_MONTO                              ,'N',014,2,'','Monto',0
  C018=PAG_MTOIVA                             ,'N',016,2,'','Monto de IVA',0
  C019=PAG_NUMDOC                             ,'C',010,0,'','Documento Asociado',0
  C020=PAG_NUMERO                             ,'C',008,0,'','Número',0
  C021=PAG_NUMMEM                             ,'N',007,0,'','Registro Memo',0
  C022=PAG_NUMORD                             ,'C',008,0,'','Numero de Orden de Pago',0
  C023=PAG_NUMRMU                             ,'C',010,0,'','Número de Retención 1x1000',0
  C024=PAG_PROYEC                             ,'C',008,0,'','',0
  C025=PAG_RETIRO                             ,'L',001,0,'','Pago Retirado por el Receptor',0
  C026=PAG_TIPDOC                             ,'C',004,0,'','Tipo de Documento Asociado',0
  C027=PAG_TIPPAG                             ,'C',001,0,'','Tipo de Pago',0
  C028=PAG_USUAR2                             ,'C',003,0,'','Usuario que Autoriza',0
  C029=PAG_VALCAM                             ,'N',017,2,'','Valor Cambiario',0
[END_FIELDS]

[TABLE_MAIN]
  T001=DPCENCOS                              , PAG_CENCOS=CEN_CODIGO <UPDATE> <RUN>
  T002=DPPROVEEDOR                           , PAG_CODIGO=PRO_CODIGO <UPDATE> <RUN>
  T003=DPSUCURSAL                            , PAG_CODSUC=SUC_CODIGO <UPDATE> <RUN>
[END_TABLE_MAIN]

[LINK_VIRTUAL]
  T001=DPCENCOS                    , PAG_CENCOS=CEN_CODIGO, <CAMPO:CEN_DESCRI>, <WHERE:>
  T002=DPCTABANCOMOV               , PAG_CODSUC,PAG_NUMERO=MOB_CODSUC,MOB_DOCASO, <CAMPO:MOB_CODBCO>, <WHERE:>
  T003=DPMEMO                      , PAG_NUMMEM=MEM_NUMERO, <CAMPO:MEM_DESCRI>, <WHERE:>
  T004=DPPROVEEDOR                 , PAG_CODIGO=PRO_CODIGO, <CAMPO:PRO_NOMBRE>, <WHERE:>
  T005=DPSUCURSAL                  , PAG_CODSUC=SUC_CODIGO, <CAMPO:SUC_DESCRI>, <WHERE:>
[END_LINK_VIRTUAL]


[INNER_JOIN]
  SELECT CEN_DESCRI FROM DPCBTEPAGO_HIS INNER JOIN DPCENCOS ON CEN_CODIGO=PAG_CENCOS
  SELECT MOB_CODBCO FROM DPCBTEPAGO_HIS INNER JOIN DPCTABANCOMOV ON MOB_CODSUC=PAG_CODSUC AND MOB_DOCASO=PAG_NUMERO
  SELECT MEM_DESCRI FROM DPCBTEPAGO_HIS INNER JOIN DPMEMO ON MEM_NUMERO=PAG_NUMMEM
  SELECT PRO_NOMBRE FROM DPCBTEPAGO_HIS INNER JOIN DPPROVEEDOR ON PRO_CODIGO=PAG_CODIGO
  SELECT SUC_DESCRI FROM DPCBTEPAGO_HIS INNER JOIN DPSUCURSAL ON SUC_CODIGO=PAG_CODSUC
  SELECT * FROM DPCBTEPAGO_HIS INNER JOIN DPCENCOS ON PAG_CENCOS=CEN_CODIGO
  SELECT * FROM DPCBTEPAGO_HIS INNER JOIN DPPROVEEDOR ON PAG_CODIGO=PRO_CODIGO
  SELECT * FROM DPCBTEPAGO_HIS INNER JOIN DPSUCURSAL ON PAG_CODSUC=SUC_CODIGO
[END_INNER_JOIN]

[OPTIONS]
[END_OPTIONS]

[COMENTARIOS]
  C: CHAR 
  D: DATE 
  L: LOGICAL 1=T 0=F 
  N: NUMERICO
  M: MEMO

[SQL]
  SELECT <CAMPOS> FROM <TABLA> 
  INNER JOIN XTABLA ON XCAMPO=YCAMPO 
[ENDSQL]