PSA48P4 ;VMP/PDW-BUILD MCKESSON XTMP( ;9/19/2004
;;3.0;DRUG ACCOUNTABILITY/INVENTORY INTERFACE;**48**;10/24/97
;;1142553~1000^1142579~500^1142637~60^1142652~100^1142694~100^1142736~15^1142744~10000^1142769~63^1142777~60^1142785~25^
;;1142827~15^1142835~90^1142843~100^1142850~500^1142876~100^1142991~100^1143007~5^1143056~60^1143064~50^1143163~100^
;;1143171~1000^1143189~30^1143239~100^1143247~90^1143262~5^1143270~100^1143304~200^1143312~90^1143346~100^1143387~2^
;;1143403~500^1143452~5^1143460~30^1143486~100^1143494~90^1143544~12^1143569~30^1143577~25^1143593~100^1143619~15^
;;1143627~10000^1143635~500^1143643~100^1143684~3.7^1143692~30^1143726~30^1143759~100^1143767~30^1143791~50^1143809~1000^
;;1143825~1000^1143833~5^1143841~500^1143866~60^1143924~100^1143932~100^1143940~500^1143973~60^1144054~15^1144088~100^
;;1144112~454^1144120~15^1144138~100^1144146~5^1144153~15^1144187~1.5^1144203~15^1144229~75^1144237~10^1144252~30^
;;1144260~6^1144278~100^1144286~28^1144310~237^1144328~10^1144351~473^1144393~100^1144500~100^1144567~500^1144617~100^
;;1144633~100^1144682~30^1144757~500^1144765~100^1144773~10^1144799~1^1144807~30^1144823~473^1144831~1000^1144849~100^
;;1144856~100^1144872~10^1144880~100^1144898~473^1144914~1^1144922~1^1144930~30^1144948~2^1144955~100^1144971~2^
;;1145028~480^1145051~2^1145077~10^1145085~100^1145119~100^1145127~100^1145150~60^1145176~50^1145192~473^1145200~50^
;;1145234~473^1145267~100^1145283~6^1145325~100^1145333~50^1145341~1000^1145366~50^1145374~100^1145382~100^1145440~100^
;;1145481~20^1145523~100^1145630~100^1145648~60^1145655~100^1145671~10^1145705~100^1145713~355^1145754~100^1145762~100^
;;1145820~10^1145846~15^1145895~60^1145911~500^1145952~100^1145960~500^1146067~100^1146109~1^1146182~1^1146208~100^
;;1146224~500^1146273~100^1146323~100^1146372~63^1146380~90^1146422~100^1146471~24^1146505~60^1146570~100^1146588~150^
;;1146596~1014^1146646~100^1146679~100^1146711~60^1146737~100^1146786~5^1146828~100^1146836~100^1146851~15^1146885~240^
;;1146950~30^1147057~60^1147065~500^1147081~100^1147149~500^1147198~20^1147230~100^1147248~100^1147255~100^1147347~100^
;;1147354~100^1147446~240^1147545~100^1147578~473^1147586~15^1147685~100^1147735~250^1147776~100^1147800~100^1147875~25^
;;1147966~473^1148048~9^1148212~500^1148311~237^1148402~473^1148436~6^1148444~3000^1148568~50^1148626~100^1148634~100^
;;1148659~480^1148667~100^1148683~1^1148774~100^1148816~100^1148832~473^1148865~100^1148980~100^1149251~5^1149269~1000^
;;1149293~500^1149327~454^1149384~100^1149467~100^1149475~100^1149483~100^1149517~100^1149558~100^1149566~100^1149582~50^
;;1149616~100^1149715~100^1149756~100^1149764~100^1149772~100^1149780~30^1149822~100^1149830~1^1149848~100^1149921~100^
;;1149970~100^1150184~100^1150192~5^1150200~100^1150218~30^1150226~100^1150259~258^1150325~100^1150382~500^1150408~100^
;;1150473~5^1150499~507^1150523~12^1150531~100^1150622~1^1150648~454^1150655~480^1150747~100^1150796~2^1150804~100^
;;1150812~100^1150861~100^1150895~20^1151018~500^1151026~100^1151083~100^1151141~50^1151182~1000^1151281~1000^1151331~150^
;;1151349~60^1151356~100^1151380~100^1151406~100^1151471~100^1151596~100^1151653~100^1151661~1^1151695~28^1151737~120^
;;1151760~50^1151778~100^1151794~60^1151810~20^1151828~50^1151836~100^1151844~25^1151893~250^1151968~100^1151976~100^
;;1151992~10^1152008~2^1152024~120^1152032~90^1152164~1^1152180~500^1152198~2^1152297~45^1152321~15^1152347~473^
;;1152453~500^1152461~4^1152479~100^1152487~10^1152503~100^1152511~1000^1152545~100^1152552~100^1152578~5^1152594~50^
;;1152602~1^1152610~100^1152636~20^1152644~10^1152651~15^1152669~100^1152677~150^1152685~1000^1152701~150^1152719~100^
;;1152727~500^1152735~100^1152743~500^1152776~60^1152784~10^1152792~100^1152826~10^1152859~10^1152867~100^1152917~100^
;;1152941~500^1152958~30^1152982~10^1153022~100^1153048~100^1153089~1000^1153105~1^1153113~3000^1153121~100^1153147~60^
;;1153295~100^1153311~500^1153345~1000^1153360~100^1153402~100^1153501~60^1153519~100^1153535~100^1153550~100^1153568~100^
;;1153667~100^1153717~100^1153725~130^1153741~100^1153758~1^1153857~10^1153881~480^1153931~100^1153949~4^1153956~4^
;;1154004~100^1154020~100^1154046~1000^1154061~130^1154079~100^1154087~60^1154137~100^1154160~60^1154186~60^1154194~1000^
;;1154244~500^1154327~100^1154343~10^1154368~100^1154384~100^1154418~10^1154475~100^1154483~100^1154491~10^1154509~100^
;;1154541~100^1154574~5^1154764~20^1154780~100^1154798~100^1154830~500^1154848~1^1154855~1000^1154863~1^1154871~100^
;;1154921~473^1155019~100^1155134~100^1155142~237^1155332~1^1155431~100^1155522~12^1155563~15^1155621~1000^1155639~100^
;;1155837~100^1155852~300^1155878~125^1155886~250^1155951~15^1156017~1000^1156058~10^1156108~15^1156157~25^1156215~10^
;;1156223~15^1156249~20^1156298~1^1156322~60^1156355~25^1156397~118^1156462~60^1156504~24^1156645~100^1156702~100^
;;1156744~60^1156793~1^1156835~100^1156843~100^1156884~100^1156918~1000^1156934~1^1156967~50^1156975~20^1156983~50^
;;1157007~20^1157015~50^1157023~50^1157031~20^1157049~50^1157056~20^1157064~50^1157072~2^1157080~5^1157106~30^
;;1157114~5^1157130~2^1157163~30^1157171~30^1157239~50^1157247~100^1157254~30^1157338~4^1157346~100^1157353~450^
;;1157411~100^1157536~1000^1157551~100^1157619~100^1157924~100^1158013~500^1158047~1000^1158062~355^1158104~100^1158120~100^
;;1158146~100^1158187~25^1158245~24^1158336~24^1158369~1000^1158377~100^1158393~500^1158427~3.5^1158468~100^1158559~12^
;;1158633~100^1158690~100^1158716~2^1158757~100^1158849~1000^1158864~100^1158872~1000^1158880~100^1158898~1000^1158930~42.5^
;;1158971~100^1159128~15^1159144~100^1159177~100^1159201~30^1159243~240^1159250~48^1159276~100^1159300~10^1159367~5^
;;1159482~500^1159557~1000^1159565~480^1159599~100^1159680~200^1159722~1^1159797~960^1159821~1^1159847~222^1159938~200^
;;1159946~500^1159953~10^1159961~200^1159995~100^1160035~100^1160043~500^1160100~500^1160118~1920^1160126~473^1160134~25^
;;1160191~480^1160217~100^1160225~1000^1160258~100^1160274~100^1160308~60^1160357~100^1160407~10^1160449~30^1160589~20^
;;END
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HPSA48P4 6159 printed Dec 13, 2024@01:48:40 Page 2
PSA48P4 ;VMP/PDW-BUILD MCKESSON XTMP( ;9/19/2004
+1 ;;3.0;DRUG ACCOUNTABILITY/INVENTORY INTERFACE;**48**;10/24/97
+2 ;;1142553~1000^1142579~500^1142637~60^1142652~100^1142694~100^1142736~15^1142744~10000^1142769~63^1142777~60^1142785~25^
+3 ;;1142827~15^1142835~90^1142843~100^1142850~500^1142876~100^1142991~100^1143007~5^1143056~60^1143064~50^1143163~100^
+4 ;;1143171~1000^1143189~30^1143239~100^1143247~90^1143262~5^1143270~100^1143304~200^1143312~90^1143346~100^1143387~2^
+5 ;;1143403~500^1143452~5^1143460~30^1143486~100^1143494~90^1143544~12^1143569~30^1143577~25^1143593~100^1143619~15^
+6 ;;1143627~10000^1143635~500^1143643~100^1143684~3.7^1143692~30^1143726~30^1143759~100^1143767~30^1143791~50^1143809~1000^
+7 ;;1143825~1000^1143833~5^1143841~500^1143866~60^1143924~100^1143932~100^1143940~500^1143973~60^1144054~15^1144088~100^
+8 ;;1144112~454^1144120~15^1144138~100^1144146~5^1144153~15^1144187~1.5^1144203~15^1144229~75^1144237~10^1144252~30^
+9 ;;1144260~6^1144278~100^1144286~28^1144310~237^1144328~10^1144351~473^1144393~100^1144500~100^1144567~500^1144617~100^
+10 ;;1144633~100^1144682~30^1144757~500^1144765~100^1144773~10^1144799~1^1144807~30^1144823~473^1144831~1000^1144849~100^
+11 ;;1144856~100^1144872~10^1144880~100^1144898~473^1144914~1^1144922~1^1144930~30^1144948~2^1144955~100^1144971~2^
+12 ;;1145028~480^1145051~2^1145077~10^1145085~100^1145119~100^1145127~100^1145150~60^1145176~50^1145192~473^1145200~50^
+13 ;;1145234~473^1145267~100^1145283~6^1145325~100^1145333~50^1145341~1000^1145366~50^1145374~100^1145382~100^1145440~100^
+14 ;;1145481~20^1145523~100^1145630~100^1145648~60^1145655~100^1145671~10^1145705~100^1145713~355^1145754~100^1145762~100^
+15 ;;1145820~10^1145846~15^1145895~60^1145911~500^1145952~100^1145960~500^1146067~100^1146109~1^1146182~1^1146208~100^
+16 ;;1146224~500^1146273~100^1146323~100^1146372~63^1146380~90^1146422~100^1146471~24^1146505~60^1146570~100^1146588~150^
+17 ;;1146596~1014^1146646~100^1146679~100^1146711~60^1146737~100^1146786~5^1146828~100^1146836~100^1146851~15^1146885~240^
+18 ;;1146950~30^1147057~60^1147065~500^1147081~100^1147149~500^1147198~20^1147230~100^1147248~100^1147255~100^1147347~100^
+19 ;;1147354~100^1147446~240^1147545~100^1147578~473^1147586~15^1147685~100^1147735~250^1147776~100^1147800~100^1147875~25^
+20 ;;1147966~473^1148048~9^1148212~500^1148311~237^1148402~473^1148436~6^1148444~3000^1148568~50^1148626~100^1148634~100^
+21 ;;1148659~480^1148667~100^1148683~1^1148774~100^1148816~100^1148832~473^1148865~100^1148980~100^1149251~5^1149269~1000^
+22 ;;1149293~500^1149327~454^1149384~100^1149467~100^1149475~100^1149483~100^1149517~100^1149558~100^1149566~100^1149582~50^
+23 ;;1149616~100^1149715~100^1149756~100^1149764~100^1149772~100^1149780~30^1149822~100^1149830~1^1149848~100^1149921~100^
+24 ;;1149970~100^1150184~100^1150192~5^1150200~100^1150218~30^1150226~100^1150259~258^1150325~100^1150382~500^1150408~100^
+25 ;;1150473~5^1150499~507^1150523~12^1150531~100^1150622~1^1150648~454^1150655~480^1150747~100^1150796~2^1150804~100^
+26 ;;1150812~100^1150861~100^1150895~20^1151018~500^1151026~100^1151083~100^1151141~50^1151182~1000^1151281~1000^1151331~150^
+27 ;;1151349~60^1151356~100^1151380~100^1151406~100^1151471~100^1151596~100^1151653~100^1151661~1^1151695~28^1151737~120^
+28 ;;1151760~50^1151778~100^1151794~60^1151810~20^1151828~50^1151836~100^1151844~25^1151893~250^1151968~100^1151976~100^
+29 ;;1151992~10^1152008~2^1152024~120^1152032~90^1152164~1^1152180~500^1152198~2^1152297~45^1152321~15^1152347~473^
+30 ;;1152453~500^1152461~4^1152479~100^1152487~10^1152503~100^1152511~1000^1152545~100^1152552~100^1152578~5^1152594~50^
+31 ;;1152602~1^1152610~100^1152636~20^1152644~10^1152651~15^1152669~100^1152677~150^1152685~1000^1152701~150^1152719~100^
+32 ;;1152727~500^1152735~100^1152743~500^1152776~60^1152784~10^1152792~100^1152826~10^1152859~10^1152867~100^1152917~100^
+33 ;;1152941~500^1152958~30^1152982~10^1153022~100^1153048~100^1153089~1000^1153105~1^1153113~3000^1153121~100^1153147~60^
+34 ;;1153295~100^1153311~500^1153345~1000^1153360~100^1153402~100^1153501~60^1153519~100^1153535~100^1153550~100^1153568~100^
+35 ;;1153667~100^1153717~100^1153725~130^1153741~100^1153758~1^1153857~10^1153881~480^1153931~100^1153949~4^1153956~4^
+36 ;;1154004~100^1154020~100^1154046~1000^1154061~130^1154079~100^1154087~60^1154137~100^1154160~60^1154186~60^1154194~1000^
+37 ;;1154244~500^1154327~100^1154343~10^1154368~100^1154384~100^1154418~10^1154475~100^1154483~100^1154491~10^1154509~100^
+38 ;;1154541~100^1154574~5^1154764~20^1154780~100^1154798~100^1154830~500^1154848~1^1154855~1000^1154863~1^1154871~100^
+39 ;;1154921~473^1155019~100^1155134~100^1155142~237^1155332~1^1155431~100^1155522~12^1155563~15^1155621~1000^1155639~100^
+40 ;;1155837~100^1155852~300^1155878~125^1155886~250^1155951~15^1156017~1000^1156058~10^1156108~15^1156157~25^1156215~10^
+41 ;;1156223~15^1156249~20^1156298~1^1156322~60^1156355~25^1156397~118^1156462~60^1156504~24^1156645~100^1156702~100^
+42 ;;1156744~60^1156793~1^1156835~100^1156843~100^1156884~100^1156918~1000^1156934~1^1156967~50^1156975~20^1156983~50^
+43 ;;1157007~20^1157015~50^1157023~50^1157031~20^1157049~50^1157056~20^1157064~50^1157072~2^1157080~5^1157106~30^
+44 ;;1157114~5^1157130~2^1157163~30^1157171~30^1157239~50^1157247~100^1157254~30^1157338~4^1157346~100^1157353~450^
+45 ;;1157411~100^1157536~1000^1157551~100^1157619~100^1157924~100^1158013~500^1158047~1000^1158062~355^1158104~100^1158120~100^
+46 ;;1158146~100^1158187~25^1158245~24^1158336~24^1158369~1000^1158377~100^1158393~500^1158427~3.5^1158468~100^1158559~12^
+47 ;;1158633~100^1158690~100^1158716~2^1158757~100^1158849~1000^1158864~100^1158872~1000^1158880~100^1158898~1000^1158930~42.5^
+48 ;;1158971~100^1159128~15^1159144~100^1159177~100^1159201~30^1159243~240^1159250~48^1159276~100^1159300~10^1159367~5^
+49 ;;1159482~500^1159557~1000^1159565~480^1159599~100^1159680~200^1159722~1^1159797~960^1159821~1^1159847~222^1159938~200^
+50 ;;1159946~500^1159953~10^1159961~200^1159995~100^1160035~100^1160043~500^1160100~500^1160118~1920^1160126~473^1160134~25^
+51 ;;1160191~480^1160217~100^1160225~1000^1160258~100^1160274~100^1160308~60^1160357~100^1160407~10^1160449~30^1160589~20^
+52 ;;END