Qantel Product Resources

Don't Forget About QICLOOK!

QICLOOK is a powerful tool that you can use with PowerShift to generate exactly the reports you need. The report that follows allows the person responsible for purchase orders to review orders that are partially received. It includes runtime prompts for the output device and the percentage threshold that determines if a PO line is included on the report.

Many QICLOOK features are used in this example, including:

    • the ENTER keyword, which prompts the user for input when the report is run
    • the  special LDEVICE variable that defines an output device
    • a TITLE with a variable
    • JOB IS to let you specify a message that will be visible in *SPOOL

Here is the specification:

READ PO.LN
ENTER SEL.PER LENGTH 5 PROMPTING "Enter cutoff percentage nn.nn:  "
ENTER LDEVICE LENGTH 5 PROMPTING "Enter desired output device:  "
DEFINE ERR.1 AS [[ 0 ]] LENGTH 1.0
DEFINE PER.REC AS [[ (QTY.RECEIVED*1.0000/QTY.ORDERED)*100 ]] LENGTH 6.2 ROUND
DEFINE SEL.PER.N AS [[  NUM(SEL.PER,ERR.1)      ]] LENGTH 5.2
SELECTING IF PER.REC GT SEL.PER.N AND STATUS NE 'C'
ON LDEVICE PRINT PO.NUMBER, PO.LINE.NUMBER, ITEM.NUMBER, QTY.ORDERED,
QTY.RECEIVED, PER.REC
TITLE 'POTENTIAL PURCHASE ORDER LINES TO BE CLOSED SHORT'
TITLE 'Quantity received is more than ' SEL.PER.N '% of the quantity ordered'
TITLE 'QICLOOK NAME:  POCLS'
JOB IS "QICLOOK POCLS REPORT PARTIAL RECEIPTS"
RUN 'MENU'

A 70% cutoff percentage was entered for this report:

DATE:11/15/13                                                                         PAGE:    1
                                          PO Lines                                            
                      POTENTIAL PURCHASE ORDER LINES TO BE CLOSED SHORT                        
                 Quantity received is more than   70.00% of the quantity ordered                 
                                    QICLOOK NAME:  POCLS                                      

PO Number       Ln              Item No                  Qty              Qty          PER REC 
                                                       Ordered          Received               

041370             1     FALL,WINTER,SPRING,SUMM                 4                3        75.00
042945            16     104408                               1500             1228        81.87
042945            19     104755                               1500             1126        75.07
042945            30     100649                               4000             3000        75.00
043261             1     100039                                 48               36        75.00

Contact HelpDesk if you need assistance creating a report that will simplify your daily operations.