;IHS/SD/lwj 8/6/02 NCPDP 5.1 forced the splitting of the parsing -
; this subroutine is the original code that will parse 3.2 still
PCSREV
; split off of PCS REVERSAL processing - RHEADER has everything
; Make it look like a prescription multiple
; It has no GS or FS stuff, so everything is in RHEADERR
PARSE(RREC,RESPIEN)
;EP - from ABSPOSQL from ABSPOSQ4
AKMEDFIX
; as noted, above ; Alaska Medicaid while sleeping - you get
; this corrupt message. May be true of other insurers, too.
; This looks like it might be an NDC message.
; We'll find out as time goes on.
; Here - we make sure that it's one of those packets,
; and we insert GS characters so that it parses correctly.