Routine: ABSPOSH4

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Caller Graph
Entry Points
External References
Global Variables Directly Accessed
Label References
Local Variables

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

Package

Total

Call Graph

Pharmacy Point of Sale

FILE^ABSPOSH5

Package	Total	Caller Graph
Pharmacy Point of Sale	2	ABSPECA4 ABSPOSAE

Package

Total

Caller Graph

Pharmacy Point of Sale

ABSPECA4 ABSPOSAE

Entry Points

Name	Comments	DBIA/ICR reference
PARSEE1(RREC,E1IEN)	;EP - from ABSPECA4
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)
PARSE51(RREC,RESPIEN)	;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.)

Name	Field # of Occurrence
FILE^ABSPOSH5	PARSE51+13

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

Name	Line Occurrences
$$GETNUM	PARSETM+12, PARSETN+52, PARSETN+63
PARSEH	TRANSMSN+9
PARSETM	TRANSMSN+18
PARSETN	TRANSMSN+19, TRANSACT+13
TRANSACT	PARSEE1+12, PARSE51+12
TRANSMSN	PARSEE1+11, PARSE51+11

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> CKRPT	PARSETN+69*, PARSETN+70
E1IEN	PARSEE1~, PARSEE1+5, PARSEE1+6
>> FDATA(	PARSETM+14*
>> FDATA("M"	PARSETN+56, PARSETN+74, PARSETN+77*
>> 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+21~, PARSETN+49, PARSETN+50, PARSETN+51 , PARSETN+52, PARSETN+55, PARSETN+56, PARSETN+60, PARSETN+61*, PARSETN+62, PARSETN+63, PARSETN+74, PARSETN+77, 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+21~, PARSETN+52, PARSETN+53, PARSETN+54, PARSETN+55, PARSETN+56 , PARSETN+63, PARSETN+66, PARSETN+67, PARSETN+69, PARSETN+73, PARSETN+74, PARSETN+77, GETNUM+5~, GETNUM+6, GETNUM+14 , GETNUM+17
FS	PARSEE1+1~, PARSEE1+9, PARSE51+1~, PARSE51+9, TRANSMSN+16, PARSETM+10, PARSETN+24, PARSETN+50, PARSETN+61
>> GRP	TRANSACT+5*, TRANSACT+6
GS	PARSEE1+1~, PARSEE1+9, PARSE51+1~, PARSE51+9, TRANSMSN+5, TRANSACT+6
MEDN	TRANSMSN+19, TRANSACT+2~, TRANSACT+3, TRANSACT+8*, PARSETN+56, PARSETN+74, PARSETN+77
OCNT	PARSETN+21~, PARSETN+55*, PARSETN+56
PC	PARSETM+7~, PARSETM+9, PARSETM+10, PARSETN+21~, PARSETN+49, PARSETN+50, PARSETN+60*, PARSETN+61
RCNT	PARSETN+21~
RCNT(	PARSETN+73*, PARSETN+74
RCNT(439	PARSETN+45*
RCNT(511	PARSETN+33*
RCNT(526	PARSETN+33*
RCNT(528	PARSETN+45*
RCNT(529	PARSETN+45*
RCNT(530	PARSETN+45*
RCNT(531	PARSETN+45*
RCNT(532	PARSETN+46*
RCNT(533	PARSETN+46*
RCNT(544	PARSETN+46*
RCNT(546	PARSETN+33*
RCNT(548	PARSETN+33*
RCNT(552	PARSETN+37*
RCNT(553	PARSETN+37*
RCNT(554	PARSETN+37*
RCNT(555	PARSETN+37*
RCNT(556	PARSETN+37*
RCNT(564	PARSETN+41*
RCNT(565	PARSETN+41*
RCNT(567	PARSETN+46*
REPEAT	PARSETN+21~, PARSETN+68, PARSETN+70, PARSETN+72, PARSETN+76
RESPIEN	PARSE51~, PARSE51+5, PARSE51+6, PARSE51+13
RHEADER	TRANSMSN+2~, TRANSMSN+8*, PARSEH+3, PARSEH+4, PARSEH+5, PARSEH+6, PARSEH+7, PARSEH+8, PARSEH+9
RPTFLD	PARSETN+21~, PARSETN+23, PARSETN+32, PARSETN+36, PARSETN+40, PARSETN+44*, PARSETN+70
RREC	PARSEE1~, PARSEE1+4, PARSE51~, PARSE51+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+15, TRANSACT+2~, TRANSACT+10, TRANSACT+11
>> SEGFID	PARSETN+28*, PARSETN+31, PARSETN+35, PARSETN+39, PARSETN+43, PARSETN+48
SEGID	TRANSMSN+2~, TRANSMSN+16, TRANSMSN+17, TRANSMSN+18, TRANSMSN+19, PARSETN+24, PARSETN+25, PARSETN+26, PARSETN+28
SEGMENT	TRANSMSN+2~, TRANSMSN+15, TRANSMSN+16, TRANSACT+2~, TRANSACT+10, TRANSACT+11, TRANSACT+12, PARSETM+10, PARSETN+24, PARSETN+50 , PARSETN+61
SS	PARSEE1+1~, PARSEE1+9, PARSE51+1~, PARSE51+9, TRANSMSN+8, TRANSMSN+15, TRANSACT+11
U	GETNUM+14

Customize PDF page

Package: Pharmacy Point of Sale

Routine: ABSPOSH4

Information

Source Information

Call Graph

Call Graph Total: 1

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: