DataFlex
Sign PDF for ICP-Brasil

Sign a PDF to create a signed PDF compliant with the ICP-Brasil Digital Signature Standard Conformity Checker. (Verificador de Conformidade do Padrão de Assinatura Digital ICP-Brasil)
Chilkat DataFlex Downloads

Download Chilkat for DataFlex
DataFlex
Use ChilkatAx-win32.pkg

Procedure Test
    Boolean iSuccess
    Handle hoPdf
    Variant vJson
    Handle hoJson
    Variant vCert
    Handle hoCert
    String sTemp1

    Move False To iSuccess

    // This example requires the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

    // The signed PDF produced by this example should be verifiable at https://validar.iti.gov.br/
    Get Create (RefClass(cComChilkatPdf)) To hoPdf
    If (Not(IsComObjectCreated(hoPdf))) Begin
        Send CreateComObject of hoPdf
    End

    // Load a PDF to be signed.
    // The "hello.pdf" is available at https://chilkatsoft.com/hello.pdf
    Get ComLoadFile Of hoPdf "qa_data/pdf/hello.pdf" To iSuccess
    If (iSuccess = False) Begin
        Get ComLastErrorText Of hoPdf To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    Get Create (RefClass(cComChilkatJsonObject)) To hoJson
    If (Not(IsComObjectCreated(hoJson))) Begin
        Send CreateComObject of hoJson
    End

    // Define the appearance and location of the signature.
    Get ComUpdateInt Of hoJson "page" 1 To iSuccess
    Get ComUpdateString Of hoJson "appearance.y" "bottom" To iSuccess
    Get ComUpdateString Of hoJson "appearance.x" "middle" To iSuccess
    Get ComUpdateString Of hoJson "appearance.fontScale" "9.0" To iSuccess
    Get ComUpdateString Of hoJson "appearance.text[0]" "Digitally signed by: cert_cn" To iSuccess
    Get ComUpdateString Of hoJson "appearance.text[1]" "current_dt" To iSuccess
    Get ComUpdateString Of hoJson "appearance.image" "document-accepted" To iSuccess
    Get ComUpdateString Of hoJson "appearance.imagePlacement" "left" To iSuccess
    Get ComUpdateString Of hoJson "appearance.imageOpacity" "100" To iSuccess

    // Add the CMS options required for ICP-Brasil
    Get ComUpdateInt Of hoJson "contentType" 1 To iSuccess
    Get ComUpdateInt Of hoJson "messageDigest" 1 To iSuccess
    Get ComUpdateInt Of hoJson "signingCertificateV2" 1 To iSuccess
    Get ComUpdateBool Of hoJson "ltvOcsp" True To iSuccess

    // Listed here are the currently existing profiles. (Chilkat will add additional ICP Brasil policy profiles in future versions as new ones are created.)
    // See https://www.gov.br/iti/pt-br/assuntos/repositorio/artefatos-de-assinatura-digital for more information.
    // 
    // PA_AD_RA_v1_1 --> 2.16.76.1.7.1.5.1.1
    // PA_AD_RA_v1_2 --> 2.16.76.1.7.1.5.1.2
    // PA_AD_RA_v2_0 --> 2.16.76.1.7.1.5.2
    // PA_AD_RA_v2_1 --> 2.16.76.1.7.1.5.2.1
    // PA_AD_RA_v2_2 --> 2.16.76.1.7.1.5.2.2
    // PA_AD_RA_v2_3 --> 2.16.76.1.7.1.5.2.3
    // PA_AD_RA_v2_4 --> 2.16.76.1.7.1.5.2.4

    // PA_AD_RB_v1_1 --> 2.16.76.1.7.1.1.1.1
    // PA_AD_RB_v2_0 --> 2.16.76.1.7.1.1.2
    // PA_AD_RB_v2_1 --> 2.16.76.1.7.1.1.2.1
    // PA_AD_RB_v2_2 --> 2.16.76.1.7.1.1.2.2
    // PA_AD_RB_v2_3 --> 2.16.76.1.7.1.1.2.3

    // PA_AD_RC_v1_1 --> 2.16.76.1.7.1.4.1.1
    // PA_AD_RC_v2_0 --> 2.16.76.1.7.1.4.2
    // PA_AD_RC_v2_1 --> 2.16.76.1.7.1.4.2.1
    // PA_AD_RC_v2_2 --> 2.16.76.1.7.1.4.2.2
    // PA_AD_RC_v2_3 --> 2.16.76.1.7.1.4.2.3

    // PA_AD_RT_v1_1 --> 2.16.76.1.7.1.2.1.1
    // PA_AD_RT_v2_0 --> 2.16.76.1.7.1.2.2
    // PA_AD_RT_v2_1 --> 2.16.76.1.7.1.2.2.1
    // PA_AD_RT_v2_2 --> 2.16.76.1.7.1.2.2.2
    // PA_AD_RT_v2_3 --> 2.16.76.1.7.1.2.2.3

    // PA_AD_RV_v1_1 --> 2.16.76.1.7.1.3.1.1
    // PA_AD_RV_v2_0 --> 2.16.76.1.7.1.3.2
    // PA_AD_RV_v2_1 --> 2.16.76.1.7.1.3.2.1
    // PA_AD_RV_v2_2 --> 2.16.76.1.7.1.3.2.2
    // PA_AD_RV_v2_3 --> 2.16.76.1.7.1.3.2.3

    // PA_PAdES_AD_RA_v1_0 --> 2.16.76.1.7.1.14.1
    // PA_PAdES_AD_RA_v1_1 --> 2.16.76.1.7.1.14.1.1
    // PA_PAdES_AD_RA_v1_2 --> 2.16.76.1.7.1.14.1.2
    // PA_PAdES_AD_RB_v1_0 --> 2.16.76.1.7.1.11.1
    // PA_PAdES_AD_RB_v1_1 --> 2.16.76.1.7.1.11.1.1
    // PA_PAdES_AD_RC_v1_0 --> 2.16.76.1.7.1.13.1
    // PA_PAdES_AD_RC_v1_1 --> 2.16.76.1.7.1.13.1.1
    // PA_PAdES_AD_RC_v1_2 --> 2.16.76.1.7.1.13.1.2
    // PA_PAdES_AD_RT_v1_0 --> 2.16.76.1.7.1.12.1
    // PA_PAdES_AD_RT_v1_1 --> 2.16.76.1.7.1.12.1.1

    // Set the policy profile name
    // ---------------------------------------------------
    // Note: On 24-May-2024, I was informed that adding the "policyId.profile"
    // causes the PDF signature to fail validation at https://validar.iti.gov.br/
    // Perhaps something changed in the years since this example was originally written and tested to be working.
    // You may need to omit the "policyId.profile".
    // ---------------------------------------------------
    Get ComUpdateString Of hoJson "policyId.profile" "PA_PAdES_AD_RB_v1_1" To iSuccess

    // Load the signing certificate. (Use your own certificate.)
    // Note: If loading from a smart card, call LoadFromSmartcard instead, and make sure to use Chilkat v9.5.0.88 or later.
    Get Create (RefClass(cComChilkatCert)) To hoCert
    If (Not(IsComObjectCreated(hoCert))) Begin
        Send CreateComObject of hoCert
    End
    Get ComLoadPfxFile Of hoCert "qa_data/pfx/myPdfSigningCert.pfx" "pfx_password" To iSuccess
    If (iSuccess = False) Begin
        Get ComLastErrorText Of hoCert To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    // Tell the pdf object to use the certificate for signing.
    Get pvComObject of hoCert to vCert
    Get ComSetSigningCert Of hoPdf vCert To iSuccess
    If (iSuccess = False) Begin
        Get ComLastErrorText Of hoPdf To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    Get pvComObject of hoJson to vJson
    Get ComSignPdf Of hoPdf vJson "qa_output/hello_signed.pdf" To iSuccess
    If (iSuccess = False) Begin
        Get ComLastErrorText Of hoPdf To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    Showln "The PDF has been successfully cryptographically signed."


End_Procedure