©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
ACRFUFMI ;IHS/OIRM/DSD/AEF - PO ITEMS ORDERED DATA EXTRACT [ 05/11/2007 10:05 AM ]
Source file <ACRFUFMI.m>
| Package | Total | Call Graph |
|---|---|---|
| Commitment Register | 2 | ($$DOL,$$MATCH2)^ACRFUFMU HIT1166^ACRFUFMX |
| Package | Total | Caller Graph |
|---|---|---|
| Commitment Register | 2 | ACRFUFMX ACRFUFMZ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| LCOD(X) | ;EP -- RETURNS EXTERNAL LOCATION CODE
|
|
| RR(X) | ; -- RETRIEVES RECEIVING REPORT DATA
; X = FMS SUPPLIES AND SERVICES IEN |
|
| PRG(X) | ;EP -- RETURNS DEPARTMENT NAME ***
|
|
| ITEMS(ACRDOC,ACRSSDA,ACRCORE,ACRRFIN,ACRIFIN,ACRHIT) | ||
| IDESC(X) | ;----- RETURNS DESCRIPTION LINES 1-5
|
|
| ITEMS11(ARRAY) | ;EP -- FINDS ITEMS FROM 1166 APPROVALS FOR PAYMENT FILE MATCH
|
|
| SET(Z) | ;
|
|
| ECOST(X) | ;----- RETURNS ESTIMATED COST
|
|
| SS(X,ACRCANDA) | ;SET VARIABLES FROM THE FMS SUPPLIES AND SERVICES FILE
|
|
| ITEMSDHR(ARRAY,ACRCORE) | ;EP -- FINDS ITEMS FROM FMS DOCUMENT HISTORY RECORDS FILE MATCH
|
|
| LCODN(X) | ;EP -- RETURNS LOCATION CODE NAME OF DEPARTMENT ACCOUNT
|
|
| LOCB(X) | ;EP -- RETURNS DEPARTMENT/PROGRAM POINTER ***
|
|
| SSX(X,N,B,E) | ;RETURN PIECE FROM FMS SUPPLIES AND SERVICES FILE
|
|
| LOCNM(X) | ;EP -- RETURNS EXTERNAL LOCATION NAME
; X = LOCATION IEN |
|
| 112 | ; CALLED BY ITEMS AND ITEMS11
|
|
| LCODE(X) | ;EP -- RETURNS LOCATION CODE NAME
|
|
| RRDEF | ;RECEIVING REPORT DEFAULTS
|
|
| DESC11(OCC) | ;----- RETURNS DESCRIPTION LINES 1-5
|
|
| CAN(X) | ;
|
|
| UI(X) | ;----- RETURNS UNIT OF ISSUE
|
|
| DESC | ;----- ROUTINE DESCRIPTION
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ACRCAN - [#9002186.5] | CAN+5, CAN+6, CAN+10 |
| ^ACRLOCB - [#9002188] | LOCB+6, LCODN+6 |
| ^ACRRR - [#9002193.2] | RR+9, RR+12 |
| ^ACRRR("B" | RR+3 |
| ^ACRSS - [#9002193] | SSX+10, UI+6, ECOST+6 |
| ^ACRUI - [#9002190.6] | UI+7 |
| ^ACRZ("ITEMS" | SET+29, SET+30*, SET+31*, SET+32*, SET+33* |
| ^AFSLAFP - [#9002325] | 112+6 |
| ^AUTTCAN("B" | ITEMSDHR+15 |
| ^AUTTLCOD - [#9999999.66] | LCOD+6, LCODE+3 |
| ^AUTTLOC - [#9999999.06] | CAN+19 |
| ^AUTTOBJC - [#9999999.59] | DESC11+6, DESC11+8 |
| ^AUTTOBJC("C" | ITEMSDHR+16 |
| ^AUTTOCG - [#9999999.591] | DESC11+9 |
| ^AUTTPRG - [#9999999.62] | PRG+6 |
| ^DIC(4 - [#4] | CAN+20, LOCNM+5 |
| Name | Line Occurrences |
|---|---|
| $$DESC11 | ITEMSDHR+18, ITEMS11+9, IDESC+13 |
| $$IDESC | SS+20 |
| $$LCODE | CAN+16, LCODN+7 |
| $$LCODN | SS+22 |
| $$LOCB | SS+19 |
| $$PRG | SS+21, CAN+13, CAN+14 |
| $$SSX | SS+3, SS+4, SS+5, SS+6, SS+7, SS+8, SS+9, SS+11, SS+14, SS+15 , SS+18, IDESC+6, IDESC+7, IDESC+12 |
| $$UI | SS+10 |
| 112 | ITEMS+16, ITEMS11+6 |
| CAN | ITEMS+10, ITEMS+18, ITEMSDHR+17, ITEMS11+8 |
| RR | ITEMS+9, ITEMS+17 |
| RRDEF | ITEMSDHR+19, ITEMS11+10 |
| SET | ITEMS+11, ITEMS+19, ITEMSDHR+20, ITEMS11+11 |
| SS | ITEMS+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> ACRAPD | SS+17*, 112+12*, 112+13, 112+14, 112+15*, SET+13, RRDEF+2*, RRDEF+11* |
| >> ACRCAN | ITEMSDHR+8*, ITEMSDHR+15 |
| ACRCANDA | ITEMS+3~, ITEMS+6, ITEMS+10, ITEMS+18, SS~, SS+4*, ITEMSDHR+3~, ITEMSDHR+15*, ITEMSDHR+17, ITEMS11+4~ , ITEMS11+8, 112+7* |
| >> ACRCDOC | SET+29, SET+30, SET+31, SET+32 |
| ACRCORE | ITEMS~, CAN+3, ITEMSDHR~, SET+28 |
| ACRCST | ITEMSDHR+4~, ITEMSDHR+10*, ITEMSDHR+12, ITEMSDHR+13 |
| ACRDEPT | ITEMS+3~, SS+21*, ITEMSDHR+3~, ITEMS11+4~, SET+24, RRDEF+1* |
| ACRDESC | ITEMS+4~, SS+20*, ITEMSDHR+4~, ITEMSDHR+18*, ITEMS11+5~, ITEMS11+9*, SET+17, SET+21 |
| ACRDLCOD | ITEMS+4~, SS+22*, ITEMSDHR+4~, ITEMS11+5~, SET+25, RRDEF+1* |
| ACRDOC | ITEMS~, ITEMS+7, ITEMSDHR+5*, 112+1* |
| ACRECST | ITEMS+4~, SS+11*, SS+13, ITEMSDHR+3~, ITEMSDHR+12*, ITEMS11+4~, 112+13*, SET+6 |
| ACRHIT | ITEMS~, ITEMS+5*, ITEMS+12*, ITEMS+20* |
| ACRI | ITEMSDHR+11*, ITEMSDHR+13, ITEMS11+5~, ITEMS11+7, 112+10* |
| >> ACRID | RR+8 |
| ACRIFIN | ITEMS~, ITEMSDHR+14*, ITEMS11+7*, SET+15, RR+4*, RR+8*, RR+11*, RRDEF+6, RRDEF+10 |
| ACRITM | ITEMS+3~, SS+3*, ITEMSDHR+3~, ITEMS11+4~, SET+2, RRDEF+3*, RRDEF+7* |
| ACRKW | ITEMS+3~, SS+8*, ITEMSDHR+3~, ITEMS11+4~, SET+18, RRDEF+1* |
| ACRMAIL | ITEMS+4~, CAN+2*, CAN+13*, ITEMSDHR+4~, ITEMS11+5~, SET+22 |
| >> ACROCC | ITEMSDHR+9*, ITEMSDHR+16 |
| >> ACROCCDA | ITEMSDHR+16*, ITEMSDHR+18, ITEMS11+9, 112+8* |
| >> ACRQACP | SS+15*, SS+16, SET+8, RRDEF+3*, RRDEF+7* |
| >> ACRQDI | SS+18*, SET+9, RRDEF+4*, RRDEF+10* |
| >> ACRQRCD | SS+14*, SS+16*, SET+7, RRDEF+3*, RRDEF+7* |
| ACRQTY | ITEMS+3~, SS+7*, SS+12, SS+13*, ITEMSDHR+3~, ITEMS11+4~, SET+4, RRDEF+3*, RRDEF+7* |
| >> ACRRDA | RR+3*, RR+6, RR+9, RR+12 |
| >> ACRRDT | RR+12*, RR+13, RR+14, RR+15, RR+17, RR+18, RR+19 |
| >> ACRREV | 112+11*, 112+15 |
| ACRRFIN | ITEMS~, SET+14, RR+5*, RR+8*, RR+10*, RRDEF+5* |
| >> ACRRIQ | SET+12, RR+7*, RR+18*, RRDEF+2*, RRDEF+8* |
| >> ACRRIUC | RR+7*, RR+17*, RRDEF+11* |
| >> ACRRIV | RR+19* |
| >> ACRRQA | SET+11, RR+7*, RR+15*, RR+16, RRDEF+2*, RRDEF+8* |
| >> ACRRQR | SET+10, RR+7*, RR+14*, RR+16*, RRDEF+2*, RRDEF+8* |
| >> ACRRR0 | RR+9*, RR+10, RR+11 |
| >> ACRRUC | RR+13* |
| ACRSHIP | ITEMS+4~, CAN+2*, CAN+14*, ITEMSDHR+4~, ITEMS11+5~, SET+23 |
| ACRSINO | ITEMS+3~, SS+6*, ITEMSDHR+3~, ITEMS11+4~, SET+19, RRDEF+1* |
| ACRSSDA | ITEMS~, ITEMS+6, ITEMS+9, ITEMS+11, ITEMS+17, ITEMS+19 |
| >> ACRTCOD | ITEMS11+7, 112+9*, 112+10, 112+11 |
| ACRTMP | ITEMSDHR+4~, ITEMSDHR+6*, ITEMSDHR+7, ITEMSDHR+8, ITEMSDHR+9, ITEMSDHR+10, ITEMSDHR+11, ITEMSDHR+14, ITEMS11+5~, 112+2* , 112+3, 112+4, 112+5, 112+6*, 112+7, 112+8, 112+9, 112+12 |
| ACRTYPE | CAN+1~, CAN+3*, CAN+9 |
| ACRUCST | ITEMS+3~, SS+9*, SS+12, SS+13*, ITEMSDHR+3~, ITEMSDHR+13*, ITEMS11+4~, 112+14*, SET+5, RRDEF+11 |
| ACRUI | ITEMS+3~, SS+10*, SS+12, SS+13*, ITEMSDHR+3~, ITEMS11+4~, SET+3, RRDEF+1*, RRDEF+9* |
| >> ACRV | ITEMS+14 |
| >> ACRXX | ITEMS+8, ITEMS+13, ITEMS+14 |
| ACRZ | ITEMSDHR+4~, ITEMSDHR+7*, ITEMSDHR+20 |
| ARRAY | ITEMS+14*, ITEMS+15, ITEMSDHR~, ITEMSDHR+5, ITEMSDHR+6, ITEMS11~, 112+1, 112+2 |
| B | SSX~, SSX+10 |
| >> BATCH | ITEMS11+11, 112+4*, 112+6 |
| CAN0 | CAN+1~, CAN+5*, CAN+15, CAN+17 |
| CLCOD | CAN+1~, CAN+15*, CAN+16 |
| CLCODN | ITEMS+4~, CAN+16*, ITEMSDHR+4~, ITEMS11+5~, SET+27 |
| CLOC | CAN+1~, CAN+17*, CAN+18, CAN+19 |
| CLOCNAM | ITEMS+4~, CAN+2*, CAN+20*, ITEMSDHR+4~, ITEMS11+5~, SET+26 |
| CLOCPTR | CAN+1~, CAN+19*, CAN+20 |
| DESC | DESC11+3~, DESC11+4*, DESC11+5, IDESC+3~, IDESC+4*, IDESC+5, IDESC+6*, IDESC+8, IDESC+9*, IDESC+10* , IDESC+11, IDESC+14*, IDESC+15 |
| DFLT | CAN+1~, CAN+6*, CAN+7, CAN+8 |
| DFLT2 | CAN+1~, CAN+10*, CAN+11, CAN+12 |
| DPTR | SS+2~, SS+5*, SS+19, SS+22 |
| E | SSX~, SSX+10 |
| >> FY | ITEMS11+11, 112+3*, 112+6 |
| >> I | ITEMS+13*, ITEMS+14 |
| CAN+1~, CAN+8*, CAN+12*, CAN+13 | |
| N | SSX~, SSX+10 |
| NOTE | IDESC+3~, IDESC+4*, IDESC+7*, IDESC+9 |
| OCC | DESC11~, DESC11+5, DESC11+6, DESC11+8, IDESC+3~, IDESC+12*, IDESC+13 |
| OCCDA | DESC11+3~, DESC11+8*, DESC11+9, IDESC+3~ |
| OCCN | DESC11+3~, DESC11+6*, DESC11+7, DESC11+9*, DESC11+10, IDESC+3~, IDESC+13*, IDESC+14 |
| PRGPTR | SS+2~, SS+19*, SS+21 |
| >> SEQ | ITEMS11+11, 112+5*, 112+6 |
| SHIP | CAN+1~, CAN+7*, CAN+11*, CAN+14 |
| STR1 | SET+1~, SET+2*, SET+3*, SET+4*, SET+5*, SET+6*, SET+7*, SET+8*, SET+9*, SET+10* , SET+11*, SET+12*, SET+13*, SET+14*, SET+15*, SET+28*, SET+30 |
| STR2 | SET+1~, SET+17*, SET+18*, SET+19*, SET+31 |
| STR3 | SET+1~, SET+21*, SET+22*, SET+23*, SET+24*, SET+25*, SET+26*, SET+27*, SET+32 |
| U | SSX+10, LOCB+6, PRG+6, CAN+3, CAN+7, CAN+8, CAN+11, CAN+12, CAN+15, CAN+17 , CAN+19, CAN+20, ITEMSDHR+5, ITEMSDHR+7, ITEMSDHR+8, ITEMSDHR+9, ITEMSDHR+10, ITEMSDHR+11, ITEMSDHR+14, 112+1 , 112+3, 112+4, 112+5, 112+7, 112+8, 112+9, 112+12, DESC11+6, DESC11+8, DESC11+9 , SET+2, SET+3, SET+4, SET+5, SET+6, SET+7, SET+8, SET+9, SET+10, SET+11 , SET+12, SET+13, SET+14, SET+15, SET+17, SET+18, SET+19, SET+21, SET+22, SET+23 , SET+24, SET+25, SET+26, SET+27, SET+28, IDESC+10, UI+6, UI+7, ECOST+6, LCOD+6 , LOCNM+5, LCODE+3, LCODN+6, RR+10, RR+11, RR+13, RR+14, RR+15, RR+17, RR+18 , RR+19 |
| X | ITEMS+3~, SSX~, SSX+10, LOCB~, LOCB+6, PRG~, PRG+6, SS~, SS+3, SS+4 , SS+5, SS+6, SS+7, SS+8, SS+9, SS+10, SS+11, SS+14, SS+15, SS+18 , SS+20, CAN~, CAN+4, CAN+5, CAN+6, CAN+10, IDESC~, IDESC+5, IDESC+6, IDESC+7 , IDESC+12, UI~, UI+6, ECOST~, ECOST+6, LCOD~, LCOD+6, LOCNM~, LOCNM+5, LCODE~ , LCODE+3, LCODN~, LCODN+6, RR~, RR+3 |
| Y | SSX+8~, SSX+9*, SSX+10*, SSX+11, LOCB+4~, LOCB+5*, LOCB+6*, LOCB+7, PRG+4~, PRG+5* , PRG+6*, PRG+7, ITEMSDHR+3~, ITEMS11+4~, UI+4~, UI+5*, UI+6*, UI+7*, UI+8, ECOST+4~ , ECOST+5*, ECOST+6*, ECOST+7, LCOD+4~, LCOD+5*, LCOD+6*, LCOD+7, LOCNM+3~, LOCNM+4*, LOCNM+5* , LOCNM+6, LCODE+1~, LCODE+2*, LCODE+3*, LCODE+4, LCODN+4~, LCODN+5*, LCODN+6*, LCODN+7*, LCODN+8 |
| Z | ITEMS+3~, SET~, SET+29, SET+30, SET+31, SET+32 |