Name | Value |
---|---|
FORM FIELD REFERENCE | CMS-1500 |
SECURITY LEVEL | NATIONAL,NO EDIT |
DATA ELEMENT | N-GET FROM PREVIOUS EXTRACT |
PAD CHARACTER | NO PAD REQUIRED |
FORMAT CODE | D:'$D(IBXSAVE("BOX19")) F^IBCEF("N-HCFA 1500 BOX 19",,,IBXIEN) S IBXDATA=$E($G(IBXSAVE("BOX19")),49,96) K IBXSAVE("BOX19") |
FORMAT CODE DESCRIPTION | If the array that holds the entire box 19 data is not defined, extract it. This field will hold the 49th through 96th characters of the box's data. |