| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106 |
- DEFINE TEMP-TABLE CUS NO-UNDO
- FIELD BRANCH_ID AS CHARACTER
- FIELD CUSTOMER_ID AS CHARACTER
- FIELD PAYER_ID AS CHARACTER
- FIELD CUSTOMER_NAME_1 AS CHARACTER
- FIELD CUSTOMER_NAME_2 AS CHARACTER
- FIELD CUSTOMER_TYPE AS CHARACTER
- FIELD COUNTRY_ID AS CHARACTER
- FIELD CITY AS CHARACTER
- FIELD POSTAL_CODE AS CHARACTER
- FIELD STREET AS CHARACTER
- FIELD APT_NUMBER AS CHARACTER
- FIELD TIN AS CHARACTER
- FIELD ACTIVITY AS INTEGER
- FIELD LATITUDE AS CHARACTER INITIAL ?
- FIELD LONGITUDE AS CHARACTER INITIAL ?
- FIELD REGION_1 AS CHARACTER INITIAL ?
- FIELD REGION_2 AS CHARACTER INITIAL ?
- FIELD REGION_3 AS CHARACTER INITIAL ?
- FIELD REGION_4 AS CHARACTER INITIAL ?
- .
- DEFINE TEMP-TABLE PRO
- FIELD BRANCH_ID AS CHARACTER
- FIELD PRODUCT_ID AS CHARACTER
- FIELD PRODUCER_PRODUCT_ID AS CHARACTER
- FIELD EAN AS CHARACTER
- FIELD PRODUCT_NAME_1 AS CHARACTER
- FIELD PRODUCT_NAME_2 AS CHARACTER
- FIELD MEASURE_UNIT_ID AS CHARACTER
- FIELD MEASURE_UNIT AS CHARACTER
- FIELD PRODUCER_ID AS CHARACTER
- FIELD PRODUCER_NAME AS CHARACTER
- FIELD ACTIVITY AS INTEGER
- FIELD MULTIPLIER AS DECIMAL
- FIELD MULTIPLIER_VOL AS DECIMAL
- .
- DEFINE TEMP-TABLE SAL_HEADER NO-UNDO SERIALIZE-NAME ''
- FIELD FROM_DATE AS CHARACTER
- XML-NODE-TYPE "ATTRIBUTE"
- FIELD TO_DATE AS CHARACTER
- XML-NODE-TYPE "ATTRIBUTE"
- FIELD TYPE_DATE AS CHARACTER
- XML-NODE-TYPE "ATTRIBUTE"
- FIELD SAL_HEADER_ID AS RECID SERIALIZE-HIDDEN
- XML-NODE-TYPE "HIDDEN"
- .
- DEFINE TEMP-TABLE SAL NO-UNDO
- FIELD SAL_HEADER_ID AS RECID SERIALIZE-HIDDEN
- XML-NODE-TYPE "HIDDEN"
- FIELD TYPE_ID AS CHARACTER
- FIELD BRANCH_ID AS CHARACTER
- FIELD DOC_ID AS CHARACTER
- FIELD ISSUE_DATE AS CHARACTER
- FIELD SALE_DATE AS CHARACTER
- FIELD CUSTOMER_ID AS CHARACTER
- FIELD COR_DOC_ID AS CHARACTER INITIAL ?
- FIELD COR_DOC_DATE AS CHARACTER INITIAL ?
- FIELD TYPE_SALE_ID AS CHARACTER
- FIELD FIELD_1 AS CHARACTER INITIAL ?
- FIELD FIELD_2 AS CHARACTER INITIAL ?
- FIELD FIELD_3 AS CHARACTER INITIAL ?
- FIELD SAL_ID AS RECID SERIALIZE-HIDDEN
- XML-NODE-TYPE "HIDDEN"
- .
- DEFINE TEMP-TABLE SAL_ITEM NO-UNDO
- FIELD SAL_ID AS RECID SERIALIZE-HIDDEN
- XML-NODE-TYPE "HIDDEN"
- FIELD ITEM AS INTEGER
- FIELD PRODUCT_ID AS CHARACTER
- FIELD MEASURE_UNIT_ID AS CHARACTER
- FIELD PRODUCER_ID AS CHARACTER
- FIELD QUANTITY AS DECIMAL
- FIELD QUANTITY_VOL AS DECIMAL
- FIELD QUANTITY_WAS AS DECIMAL
- FIELD QUANTITY_VOL_WAS AS DECIMAL
- FIELD PURCHASE_ORDER AS CHARACTER
- FIELD FIELD_1 AS CHARACTER
- FIELD FIELD_2 AS CHARACTER
- FIELD FIELD_3 AS CHARACTER
-
- INDEX SALE_ITEM-K1 IS PRIMARY
- SAL_ID
- ITEM
- .
-
- DEFINE DATASET dsSALE SERIALIZE-NAME ''
- FOR SAL_HEADER, SAL, SAL_ITEM
- PARENT-ID-RELATION RELATION1 FOR SAL_HEADER, SAL
- PARENT-ID-FIELD SAL_HEADER_ID
-
- PARENT-ID-RELATION RELATION2 FOR SAL, SAL_ITEM
- PARENT-ID-FIELD SAL_ID
- .
-
- DEFINE TEMP-TABLE tControlList NO-UNDO
- FIELD BRANCH_ID AS CHARACTER
- FIELD CUSTOMER_ID AS CHARACTER
- FIELD PRODUCT_ID AS CHARACTER
- FIELD PRODUCT_NAME AS CHARACTER
- FIELD DOCUMENT_TYPE AS CHARACTER
- FIELD DOCUMENT_NUMBER AS CHARACTER
- FIELD DOCUMENT_ISSUE_DATE AS CHARACTER
- FIELD QUANTITY_SOLD AS DECIMAL
- .
|
