COBOL GLOBAL & EXTERNAL Variable

关注

原创最新推荐文章于 2026-06-27 14:06:05 发布 1k 阅读 AI 写同款· GEO 优化 ›

MuleSoft企业级AI编排：用Runtime Fabric与DataWeave实现LLM工作流治理大语言模型（LLM）在企业落地的核心瓶颈并非模型能力，而是缺乏与现有IT系统深度集成的工程化能力。AI编排（AI Orchestration）作为连接LLM与ERP、CRM、SAP等关键业务系统的中枢技术，需兼顾韧性治理、数据合规与语义对齐。MuleSoft凭借其Runtime Fabric运行时引擎、声明式DataWeave数据编织语言及Anypoint平台的API全生命周期管理，将LLM从‘自由问答接口’升级为可监控、可熔断、可审计的生产级服务组件。本文聚焦企业级AI工作流构建实践，详解如何通过服务化封阅读详情

GLOBAL Variable

GLOBAL in an enclosing program makes that variable visible to a nested program with it.

PROGRAM-ID. Outer.

WORKING-STORAGE SECTION.

01 Not-Global        PIC X.

01 Is-Global           PIC X GLOBAL.

...

   CALL "Inner"

...

   PROGRAM-ID.   Inner.

       IF ( Not-Global .. )       <<-- error

       IF ( Is-Global .. )          <<--- OK

   END PROGRAM Inner.

END PROGRAM Outer.

EXTERNAL Variable

EXTERNAL data may be defined in several _separately_compiled_ (or nested but you wouldn't) and statically or dynamically linked programs and these all refer to the same data area. In other words the

EXTERNAL data items are separate objects from the programs (they are created externally to the program) which are created by the first program containing them being loaded and are linked to by each subsequent program containing that block by name.

PROGRAM-ID. ExternSamp.

WORKING-STORAGE SECTION.

01 Is-Extern PIC X EXTERN.

But an EXTERNAL variable cannot be defined with an initialization using VALUE clause; by default, all character variable will be initialized to whitespace, and numeric variable is initialized with zero.

收录于