FILL METHOD of PRODATASET & XREF

saravanakumar

saravanakumar

Member
Team,
When i take an XREF for the program that uses FILL method to create records for my table, i couldnt see an appropriate entry in XREF file with "CREATE" option in it. Is this a kind of bug in XREF tool or am i missing out something?

Code: 
 [U]dsProMain.p[/U]
/* Include temp table component */
{dsOrderTT.i}

/* Include DataSet definition */
{dsOrder.i}


/* Query definition */
DEFINE QUERY qOrder FOR Order, Customer, SalesRep.
DEFINE QUERY qItem FOR ITEM.

/* Data Source Definition */
DEFINE DATA-SOURCE srcOrder FOR QUERY qOrder Order KEYS (Order-Num),
Customer KEYS (Cust-Num), SalesRep KEYS (Sales-Rep).
DEFINE DATA-SOURCE srcOline FOR Order-Line KEYS (Order-Num).
DEFINE DATA-SOURCE srcItem FOR ITEM KEYS (Item-Num).

QUERY qOrder:QUERY-PREPARE("FOR EACH Order WHERE Order.Order-Num = 1, " +
"FIRST Customer OF Order, FIRST SalesRep OF Order").

/* Attach Data Source whenever required */
BUFFER ttOrder:ATTACH-DATA-SOURCE(DATA-SOURCE srcOrder:HANDLE,"Customer.Name,CustName").
BUFFER ttOline:ATTACH-DATA-SOURCE(DATA-SOURCE srcOline:HANDLE).
BUFFER ttItem:ATTACH-DATA-SOURCE(DATA-SOURCE srcItem:HANDLE,"Item-Num,ItemNum").

/* Fill data from Parent --> Child */
[B]DATASET dsOrder:FILL().[/B]

/* Detaching the Data Source once filled */
BUFFER ttOrder:DETACH-DATA-SOURCE().
BUFFER ttOline:DETACH-DATA-SOURCE().
BUFFER ttItem:DETACH-DATA-SOURCE().

Code: 
 [U]dsOrder.i[/U]
DEFINE DATASET dsOrder FOR ttOrder, ttOline, ttItem
    DATA-RELATION Order-Line FOR ttOrder, ttOline
        RELATION-FIELDS (Order-Num,Order-Num)
    DATA-RELATION LineItem FOR ttOline, ttItem
        RELATION-FIELDS (Item-Num,ItemNum).

Code: 
 [U]dsOrderTT.i[/U]
DEFINE TEMP-TABLE ttOrder LIKE Order
    FIELD OrderTotal AS DECIMAL
    FIELD CustName LIKE Customer.NAME
    FIELD RepName LIKE SalesRep.Rep-Name.

DEFINE TEMP-TABLE ttOline LIKE Order-Line.

DEFINE TEMP-TABLE ttItem
    FIELD ItemNum LIKE ITEM.Item-Num
    FIELD ItemName LIKE ITEM.Item-Name
    FIELD Price LIKE ITEM.Price
    /* FIELD Weight LIKE ITEM.Weight */
    FIELD OnHand LIKE ITEM.On-Hand
    FIELD OnOrder LIKE ITEM.On-Order.

XREF Details:

View attachment dsProMain.txtView attachment dsProMain.txtView attachment dsProMain.txtView attachment dsProMain.txt
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 1 COMPILE "C:\saravanakumarb\prodataset\dsProMain.p"
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 1 CPINTERNAL ISO8859-1
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 1 CPSTREAM ISO8859-1
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 9 INCLUDE dsOrderTT.i
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 3 STRING "ttOrder" 7 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 3 STRING "Order-num" 9 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 3 STRING "Cust-Num" 8 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 3 STRING "Order-Date" 10 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 3 STRING "Ship-Date" 9 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 3 STRING "Promise-Date" 12 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 3 STRING "Carrier" 7 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 3 STRING "Instructions" 12 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 3 STRING "PO" 2 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 3 STRING "Terms" 5 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 3 STRING "Sales-Rep" 9 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 3 STRING "OrderTotal" 10 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 3 STRING "CustName" 8 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 3 REFERENCE TestSports.Customer Name
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 3 STRING "RepName" 7 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 3 REFERENCE TestSports.Salesrep Rep-Name
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 3 REFERENCE TestSports.Order
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 8 STRING "ttOline" 7 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 8 STRING "Order-num" 9 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 8 STRING "Line-num" 8 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 8 STRING "Item-num" 8 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 8 STRING "Price" 5 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 8 STRING "Qty" 3 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 8 STRING "Discount" 8 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 8 STRING "Extended-Price" 14 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 8 STRING "Backorder" 9 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 8 REFERENCE TestSports.Order-Line
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 10 STRING "ttItem" 6 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 10 STRING "ItemNum" 7 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 10 REFERENCE TestSports.Item Item-num
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 10 STRING "ItemName" 8 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 10 REFERENCE TestSports.Item Item-Name
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 10 STRING "Price" 5 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 10 REFERENCE TestSports.Item Price
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 10 STRING "OnHand" 6 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 10 REFERENCE TestSports.Item On-hand
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 10 STRING "OnOrder" 7 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrderTT.i 10 REFERENCE TestSports.Item On-Order
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 12 INCLUDE dsOrder.i
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrder.i 2 REFERENCE ttOrder Order-num TEMPTABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrder.i 2 REFERENCE ttOline Order-num TEMPTABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrder.i 2 REFERENCE ttOline Item-num TEMPTABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrder.i 2 REFERENCE ttItem ItemNum TEMPTABLE
"C:\saravanakumarb\prodataset\dsProMain.p" .\dsOrder.i 2 DATASET dsOrder,,,,,ttOrder ttOline ttItem DATALINKS 2 Order-Line 0 ttOrder ttOline 1 Order-num Order-num LineItem 0 ttOline ttItem 1 Item-num ItemNum
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 16 STRING "Order" 5 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 16 STRING "Customer" 8 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 16 STRING "Salesrep" 8 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 17 STRING "Item" 4 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 20 REFERENCE TestSports.Order Order-num
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 20 REFERENCE TestSports.Customer Cust-Num
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 20 REFERENCE TestSports.Salesrep Sales-Rep
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 22 STRING "Order-Line" 10 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 22 REFERENCE TestSports.Order-Line Order-num
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 23 REFERENCE TestSports.Item Item-num
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 25 STRING "FOR EACH Order WHERE Order.Order-Num = 1, " 42 NONE TRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 25 STRING "FIRST Customer OF Order, FIRST SalesRep OF Order" 48 NONE TRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 29 STRING "Customer.Name,CustName" 22 NONE TRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 31 STRING "Item-Num,ItemNum" 16 NONE TRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 45 STRING ">>>>9" 5 NONE TRANSLATABLE FORMAT
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 45 STRING "99/99/99" 8 NONE TRANSLATABLE FORMAT
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 45 STRING "X(15)" 5 NONE TRANSLATABLE FORMAT
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 45 STRING "X(15)" 5 NONE TRANSLATABLE FORMAT
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 53 STRING ">>>>9" 5 NONE TRANSLATABLE FORMAT
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 53 STRING ">>9" 3 NONE TRANSLATABLE FORMAT
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 59 STRING "99999" 5 NONE TRANSLATABLE FORMAT
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 59 STRING "x(15)" 5 NONE TRANSLATABLE FORMAT
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "Cust-Order" 10 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "Order-Date" 10 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "Order-Num" 9 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "Sales-Rep" 9 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "item-num" 8 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "order-line" 10 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "default" 7 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "qItem" 5 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "qOrder" 6 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "dsOrder" 7 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "Order-num,Order-num" 19 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "Order-Line" 10 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "Item-num,ItemNum" 16 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "LineItem" 8 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "srcItem" 7 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "Item-num" 8 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "srcOline" 8 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "Order-num" 9 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "srcOrder" 8 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "Order-num:Cust-Num:Sales-Rep" 28 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "Order-num" 9 LEFT TRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "Ordered" 7 LEFT TRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "Name" 4 LEFT TRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "Rep-Name" 8 LEFT TRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "----------- ----------- ----------------------------------" 58 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "Order-num" 9 LEFT TRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "Line-num" 8 LEFT TRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "----------- --------" 20 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "Item-num" 8 LEFT TRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "Item-Name" 9 LEFT TRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "---------- ----------------" 27 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "Order-Num" 9 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "order-line" 10 NONE UNTRANSLATABLE
"C:\saravanakumarb\prodataset\dsProMain.p" "C:\saravanakumarb\prodataset\dsProMain.p" 62 STRING "default" 7 NONE UNTRANSLATABLE
Click to expand...
 
tamhas

tamhas

ProgressTalk.com Sponsor
Been a while ... but I would do some simple experiments ... including a simple create record on a temp-table and see what you get. I don't recall, but it is possible that create is reserved for DB tables.
 
saravanakumar

saravanakumar

Member
Hi Tamhas,
I tried some simple program today and i don't think CREATE is reserved only for DB tables. Here is an extract from an XREF file where CREATE is used for temp-table also;

/pla/sample.p /pla/sample.p 8 STRING "tt-TmpTableTest" 11 NONE UNTRANSLATABLE
/pla/sample.p /pla/sample.p 8 ACCESS orders.orderline ht-status
/pla/sample.p /pla/sample.p 8 SEARCH tt-TmpTableTest tt-1 TEMPTABLE
/pla/sample.p /pla/sample.p 10 CREATE tt-TmpTableTest TEMPTABLE
/pla/sample.p /pla/sample.p 12 ACCESS orders.orderline ht-status
/pla/sample.p /pla/sample.p 15 ACCESS orders.orderxref OH-ORDNBR
/pla/sample.p /pla/sample.p 15 ACCESS orders.order OH-ORDNBR
/pla/sample.p /pla/sample.p 15 ACCESS orders.orderxref AR-ID
Click to expand...

I guess XREF utility needs to reflect the CREATE of temp table when FILL method is used on a Dataset. Do you agree?
 
You must log in or register to reply here.

Similar threads

S
  • Locked
[Progress News] [Progress OpenEdge ABL] Corticon Implementation Walkthrough: Sales Content Repository
Replies
0
Views
401
Seth Meldon
S
P
Error Error in Consuming Service (v11.3.3)
Replies
2
Views
1K
patelspam
P
R
  • Locked
[Progress News] [Progress OpenEdge ABL] Using Python to Interact with Data in Progress MarkLogic
Replies
0
Views
599
Rekiah Hinton
R
K
  • Locked
[Progress News] [Progress OpenEdge ABL] UX Crash Course: Nielsen’s Usability Heuristics
Replies
0
Views
155
Kathryn Grayson Nanz
K
S
  • Locked
[Progress News] [Progress OpenEdge ABL] Mortgage Approval with Progress Corticon
Replies
0
Views
451
Seth Meldon
S
Top