Routine: ABSPDR

Package	Total	Call Graph
Pharmacy Point of Sale	1	FILE^ABSPOSH5

Entry Points

Name	Comments	DBIA/ICR reference
TRANSMSN	;This subroutine will work through the transmission level information
PARSETN	; This subroutine will parse the transaction level segments. For ; most transactions, the only segment required in this area of ; the response is the status segment. However, since we aren't ; sure what we will be getting back, we will process whatever ; is sent our way.
TRANSACT	;This subroutine will work through the transaction level information
PARSETM	; This subroutine will parse the variable portions of the transmission ; level message. Keep in mind that most fields are optional ; so we have no idea what is coming back. We will parse based ; on the field separators, and field identification. ; (tranmission level variable records are the message (ID=20) ; and insurance (ID=25) segments)
PARSEE1(RREC,E1IEN,DEBUG)	;EP - from ABSPECA4
PARSEH	; The header record is required on all responses, and is fixed ; length. It is the only record that is fixed length.
GETNUM(FIELD)	; This routine will translate the field ID into a field number. ; We will use the ABSP NCPDP field Defs files, corss ref "D" to ; perform this translation. (The field number is needed to store ; the data in the correct field within the response file.)
PARSEB1(RREC,RESPIEN,DEBUG)	;EP - from ABSPECA4

External References

Name	Field # of Occurrence
FILE^ABSPOSH5	PARSEB1+14

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABSPE - [#9002313.7]	PARSEE1+6
^ABSPF(9002313.91 - [#9002313.91]	GETNUM+13, GETNUM+14
^ABSPR - [#9002313.03]	PARSEB1+6

Label References

Name	Line Occurrences
$$GETNUM	PARSETM+12, PARSETN+54
PARSEH	TRANSMSN+9
PARSETM	TRANSMSN+19
PARSETN	TRANSACT+13
TRANSACT	PARSEE1+12, PARSEB1+12
TRANSMSN	PARSEE1+11, PARSEB1+11

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> CKRPT	PARSETN+59*, PARSETN+60
DEBUG	PARSEE1~, PARSEB1~, PARSEB1+14
E1IEN	PARSEE1~, PARSEE1+5, PARSEE1+6
>> FDATA(	PARSETM+14*
>> FDATA("M"	PARSETN+64, PARSETN+67
>> FDATA(102	PARSEH+3*
>> FDATA(103	PARSEH+4*
>> FDATA(109	PARSEH+5*
>> FDATA(201	PARSEH+8*
>> FDATA(202	PARSEH+7*
>> FDATA(401	PARSEH+9*
>> FDATA(501	PARSEH+6*
FIELD	PARSETM+7~, PARSETM+9, PARSETM+10, PARSETM+11, PARSETM+12, PARSETM+14, PARSETN+22~, PARSETN+51, PARSETN+52, PARSETN+53 , PARSETN+54, PARSETN+64, PARSETN+67, GETNUM~, GETNUM+9
FLDID	GETNUM+5~, GETNUM+6, GETNUM+9, GETNUM+10, GETNUM+12, GETNUM+13
FLDIEN	GETNUM+5~, GETNUM+7, GETNUM+13, GETNUM+14
FLDNUM	PARSETM+7~, PARSETM+12, PARSETM+13, PARSETM+14, PARSETN+22~, PARSETN+54, PARSETN+57, PARSETN+59, PARSETN+63, PARSETN+64 , PARSETN+67, GETNUM+5~, GETNUM+6, GETNUM+14, GETNUM+17
FS	PARSEE1+1~, PARSEE1+9, PARSEB1+1~, PARSEB1+9, TRANSMSN+17, PARSETM+10, PARSETN+25, PARSETN+52
>> GRP	TRANSACT+5*, TRANSACT+6
GS	PARSEE1+1~, PARSEE1+9, PARSEB1+1~, PARSEB1+9, TRANSMSN+5, TRANSACT+6
MEDN	TRANSACT+2~, TRANSACT+3, TRANSACT+8, PARSETN+64, PARSETN+67
PC	PARSETM+7~, PARSETM+9, PARSETM+10, PARSETN+22~, PARSETN+51, PARSETN+52
RCNT	PARSETN+22~
RCNT(	PARSETN+63*, PARSETN+64
RCNT(439	PARSETN+46*
RCNT(511	PARSETN+34*
RCNT(526	PARSETN+34*
RCNT(528	PARSETN+46*
RCNT(529	PARSETN+46*
RCNT(530	PARSETN+46*
RCNT(531	PARSETN+46*
RCNT(532	PARSETN+47*
RCNT(533	PARSETN+47*
RCNT(544	PARSETN+47*
RCNT(546	PARSETN+34*
RCNT(548	PARSETN+34*
RCNT(552	PARSETN+38*
RCNT(553	PARSETN+38*
RCNT(554	PARSETN+38*
RCNT(555	PARSETN+38*
RCNT(556	PARSETN+38*
RCNT(564	PARSETN+42*
RCNT(565	PARSETN+42*
RCNT(567	PARSETN+47*
REPEAT	PARSETN+22~, PARSETN+58, PARSETN+60, PARSETN+62, PARSETN+66
RESPIEN	PARSEB1~, PARSEB1+5, PARSEB1+6, PARSEB1+14
RHEADER	TRANSMSN+2~, TRANSMSN+8*, PARSEH+3, PARSEH+4, PARSEH+5, PARSEH+6, PARSEH+7, PARSEH+8, PARSEH+9
RPTFLD	PARSETN+22~, PARSETN+24, PARSETN+33, PARSETN+37, PARSETN+41, PARSETN+45*, PARSETN+60
RREC	PARSEE1~, PARSEE1+4, PARSEB1~, PARSEB1+4, TRANSMSN+5, TRANSACT+6
RTRAN	TRANSACT+2~, TRANSACT+5, TRANSACT+6*, TRANSACT+7, TRANSACT+11
RTRANM	TRANSMSN+2~, TRANSMSN+5*, TRANSMSN+8, TRANSMSN+15
SEG	TRANSMSN+2~, TRANSMSN+14, TRANSMSN+15, TRANSACT+2~, TRANSACT+10, TRANSACT+11
>> SEGFID	PARSETN+29*, PARSETN+32, PARSETN+36, PARSETN+40, PARSETN+44
SEGID	TRANSMSN+2~, TRANSMSN+17, TRANSMSN+18, TRANSMSN+19, PARSETN+25, PARSETN+26, PARSETN+27, PARSETN+29
SEGMENT	TRANSMSN+2~, TRANSMSN+15, TRANSMSN+16, TRANSMSN+17, TRANSACT+2~, TRANSACT+10, TRANSACT+11, TRANSACT+12, PARSETM+10, PARSETN+25 , PARSETN+52
SS	PARSEE1+1~, PARSEE1+9, PARSEB1+1~, PARSEB1+9, TRANSMSN+8, TRANSMSN+15, TRANSACT+11
U	GETNUM+14

Customize PDF page

Package: Pharmacy Point of Sale

Routine: ABSPDR

Information

Source Information

Call Graph

Call Graph Total: 1

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: