PROCEDURE INSERT_AP_JFC_TABLE
    AS
    ------------------------------------------------------------------------- 
    --             C U R S O R     to read JFC 810 info                    -- 
    -------------------------------------------------------------------------  
    CURSOR cur_810
    IS    
    select
        i.A810_SEQ_ID,           --"seqid",
        i.BIG02_INV_ID,          --"invoice #",
        i.BIG01_INV_ISS_DT,      --"invoice date", 
        pid.pid04_prod_dc_cd,    --"Prod",
        pid.pid05_prod_dc,       --"CC",
        ref.REF02_ID,            --"siteid",
        ven.VENDOR_NAME,         --"ven name",
        sites.ADDRESS_LINE1,     --"ven addr1",
        sites.ADDRESS_LINE2,     --"ven addr2",
        sites.ADDRESS_LINE3,     --"ven addr3",
        sites.CITY,              --"ven city",
        sites.state,             --"ven state",
        sites.ZIP,               --"ven zip",
        ven.SEGMENT1,            --"ven #"
        i.TDS01_TOT_INV_AMT      -- "total invoice amt"  
    from ANSI810.A810_INVOICE    i,
         ref_reference           ref,
         pid_prod_item_desc      pid,
         po_vendor_sites_all     sites,
         po_vendors              ven
    where i.a810_seq_id      =  pid.a810_seq_id
      and ref.a810_seq_id    =  i.A810_SEQ_ID
      and ref.REF02_ID       =  sites.VENDOR_SITE_ID
      and sites.VENDOR_ID    =  ven.VENDOR_ID(+);
      
    ------------------------------------------------------------------------- 
    --             C U R S O R     to read it1_loop                        -- 
    -------------------------------------------------------------------------  
    CURSOR cur_it1_amts
    IS    
    select
        IT102_INV_QT,         --hours worked 
        IT104_UNIT_PRC_AMT,   --hourly rate 
        IT1_ID                --sequence # for multiple rows 
    from it1_loop
    where a810_seq_id      =  v_a810_seq_id_cur; <------------------------------------MY VARIABLE
PLS-00320: the declaration of the type of this expression is incomplete or malformed<----ERROR

    v_jfc_line_amt        number(15,2);
    v_jfc_inv_lines       number(10);
    v_a810_seq_id_cur     number(10); <-----------------------------------------------MY VARIABLE
            
    ----------------------------------------------- START OF CURSOR  810   
    BEGIN
        FOR cur_810_rec IN cur_810 
        LOOP
          ----------------------------------------- START OF CURSOR  IT1 amts 
          BEGIN
            v_jfc_inv_lines   :=0;
            v_a810_seq_id_cur := cur_810_rec.A810_SEQ_ID;<----------------------------MY VARIABLE
            
            FOR cur_it1_amts_rec IN cur_it1_amts 
            LOOP
                v_jfc_line_amt  := (cur_it1_amts_rec.IT102_INV_QT  * 
                                    cur_it1_amts_rec.IT104_UNIT_PRC_AMT); 
                v_jfc_inv_lines := v_jfc_inv_lines + 1;  
                
                --------------------------------------------INSERT AP JCF TABLE 
                INSERT INTO XXCBC_AP_JFC_TBL
                     (JFC_INV_NO,
                      JFC_VEN_NAME,
                      JFC_VEN_ADDR,
                      JFC_VEN_CITY,
                      JFC_VEN_STATE,
                      JFC_VEN_ZIP,
                      JFC_PMT_TERMS,
                      JFC_INV_LINES,
                      JFC_COST_CTR,
                      JFC_PRODUCT,
                      JFC_LINE_AMT,
                      JFC_ITEM_DESC,
                      JFC_ITEM_QTY,
                      JFC_UNIT_PRICE,
                      JFC_INV_TOT_AMT,
                      JFC_DISTRIBUTION_COST_CTR_ID,
                      JFC_PROCESS_RECORD_FLAG,
                      JFC_VALID_RECORD_FLAG,
                      CRT_USE_ID,
                      CRT_TS,
                      UPDT_USE_ID,
                      UPDT_TS,
                      JFC_INV_DT,
                      JFC_SITE_ID)
                VALUES
                     (cur_810_rec.BIG02_INV_ID,         
                      cur_810_rec.VENDOR_NAME,        
                      cur_810_rec.ADDRESS_LINE1,    
                      cur_810_rec.CITY,             
                      cur_810_rec.state,            
                      cur_810_rec.ZIP,
                      '',
                      cur_810_rec.IT1_ID,
                      cur_810_rec.pid05_prod_dc,
                      cur_810_rec.pid04_prod_dc_cd,
                      v_jfc_line_amt,
                      '?',
                      cur_it1_amts_rec.IT102_INV_QT,
                      cur_it1_amts_rec.IT104_UNIT_PRC_AMT,
                      cur_810_rec.TDS01_TOT_INV_AMT,                                     
                      cur_810_rec.SEGMENT1,       ----need to get this id from ccid      
                      'N',
                      'N',  
                      'JFC810',
                      SYSDATE,
                      'JFC810',
                      SYSDATE,
                      cur_810_rec.BIG01_INV_ISS_DT,
                      cur_810_rec.REF02_ID);
               COMMIT;
               DBMS_OUTPUT.PUT_LINE('Successfully inserted line record : '|| v_jfc_inv_lines );
               v_rec_success_cnt := NVL(v_rec_success_cnt, 0) + 1;
            END LOOP;
          END;  
        END LOOP;
    END INSERT_AP_JFC_TABLE;