Name | Value |
---|---|
FORM FIELD REFERENCE | LEGACY HCFA-1500 |
SECURITY LEVEL | NATIONAL,NO EDIT |
DATA ELEMENT | N-GET FROM PREVIOUS EXTRACT |
PAD CHARACTER | NO PAD REQUIRED |
FORMAT CODE | I $O(^TMP("IBXDATA",$J,IBXREC,1)) N Z,FLDS X "F Z=1:1:+$O(^IBA(364.6,""ASEQ"",2,1,""""),-1) S:(Z'>44!(Z'<57))&(Z'=6)&(Z'=39)&(Z'=41) FLDS(Z)=""""" F Z=2:1:+$O(^TMP("IBXDATA",$J,IBXREC,Z),-1) D MPG^IBCEF3(Z,.FLDS,2) |
FORMAT CODE DESCRIPTION | If there is more than 1 page of bill extracted, the variable FLDS(line,column) holds the lines and columns that should be duplicated on pages after the first. This takes care of the population of these static fields on these subsequent pages. |