LLZ001.xjs 751 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020102110221023102410251026102710281029103010311032103310341035103610371038103910401041104210431044104510461047104810491050105110521053105410551056105710581059106010611062106310641065106610671068106910701071107210731074107510761077107810791080108110821083108410851086108710881089109010911092109310941095109610971098109911001101110211031104110511061107110811091110111111121113111411151116111711181119112011211122112311241125112611271128112911301131113211331134113511361137113811391140114111421143114411451146114711481149115011511152115311541155115611571158115911601161116211631164116511661167116811691170117111721173117411751176117711781179118011811182118311841185118611871188118911901191119211931194119511961197119811991200120112021203120412051206120712081209121012111212121312141215121612171218121912201221122212231224122512261227122812291230123112321233123412351236123712381239124012411242124312441245124612471248124912501251125212531254125512561257125812591260126112621263126412651266126712681269127012711272127312741275127612771278127912801281128212831284128512861287128812891290129112921293129412951296129712981299130013011302130313041305130613071308130913101311131213131314131513161317131813191320132113221323132413251326132713281329133013311332133313341335133613371338133913401341134213431344134513461347134813491350135113521353135413551356135713581359136013611362136313641365136613671368136913701371137213731374137513761377137813791380138113821383138413851386138713881389139013911392139313941395139613971398139914001401140214031404140514061407140814091410141114121413141414151416141714181419142014211422142314241425142614271428142914301431143214331434143514361437143814391440144114421443144414451446144714481449145014511452145314541455145614571458145914601461146214631464146514661467146814691470147114721473147414751476147714781479148014811482148314841485148614871488148914901491149214931494149514961497149814991500150115021503150415051506150715081509151015111512151315141515151615171518151915201521152215231524152515261527152815291530153115321533153415351536153715381539154015411542154315441545154615471548154915501551155215531554155515561557155815591560156115621563156415651566156715681569157015711572157315741575157615771578157915801581158215831584158515861587158815891590159115921593159415951596159715981599160016011602160316041605160616071608160916101611161216131614161516161617161816191620162116221623162416251626162716281629163016311632163316341635163616371638163916401641164216431644164516461647164816491650165116521653165416551656165716581659166016611662166316641665166616671668166916701671167216731674167516761677167816791680168116821683168416851686168716881689169016911692169316941695169616971698169917001701170217031704170517061707170817091710171117121713171417151716171717181719172017211722172317241725172617271728172917301731173217331734173517361737173817391740174117421743174417451746174717481749175017511752175317541755175617571758175917601761176217631764176517661767176817691770177117721773177417751776177717781779178017811782178317841785178617871788178917901791179217931794179517961797179817991800180118021803180418051806180718081809181018111812181318141815181618171818181918201821182218231824182518261827182818291830183118321833183418351836183718381839184018411842184318441845184618471848184918501851185218531854185518561857185818591860186118621863186418651866186718681869187018711872187318741875187618771878187918801881188218831884188518861887188818891890189118921893189418951896189718981899190019011902190319041905190619071908190919101911191219131914191519161917191819191920192119221923192419251926192719281929193019311932193319341935193619371938193919401941194219431944194519461947194819491950195119521953195419551956195719581959196019611962196319641965196619671968196919701971197219731974197519761977197819791980198119821983198419851986198719881989199019911992199319941995199619971998199920002001200220032004200520062007200820092010201120122013201420152016201720182019202020212022202320242025202620272028202920302031203220332034203520362037203820392040204120422043204420452046204720482049205020512052205320542055205620572058205920602061206220632064206520662067206820692070207120722073207420752076207720782079208020812082208320842085208620872088208920902091209220932094209520962097209820992100210121022103210421052106210721082109211021112112211321142115211621172118211921202121212221232124212521262127212821292130213121322133213421352136213721382139214021412142214321442145214621472148214921502151215221532154215521562157215821592160216121622163216421652166216721682169217021712172217321742175217621772178217921802181218221832184218521862187218821892190219121922193219421952196219721982199220022012202220322042205220622072208220922102211221222132214221522162217221822192220222122222223222422252226222722282229223022312232223322342235223622372238223922402241224222432244224522462247224822492250225122522253225422552256225722582259226022612262226322642265226622672268226922702271227222732274227522762277227822792280228122822283228422852286228722882289229022912292229322942295229622972298229923002301230223032304230523062307230823092310231123122313231423152316231723182319232023212322232323242325232623272328232923302331233223332334233523362337233823392340234123422343234423452346234723482349235023512352235323542355235623572358235923602361236223632364236523662367236823692370237123722373237423752376237723782379238023812382238323842385238623872388238923902391239223932394239523962397239823992400240124022403240424052406240724082409241024112412241324142415241624172418241924202421242224232424242524262427242824292430243124322433243424352436243724382439244024412442244324442445244624472448244924502451245224532454245524562457245824592460246124622463246424652466246724682469247024712472247324742475247624772478247924802481248224832484248524862487248824892490249124922493249424952496249724982499250025012502250325042505250625072508250925102511251225132514251525162517251825192520252125222523252425252526252725282529253025312532253325342535253625372538253925402541254225432544254525462547254825492550255125522553255425552556255725582559256025612562256325642565256625672568256925702571257225732574257525762577257825792580258125822583258425852586258725882589259025912592259325942595259625972598259926002601260226032604260526062607260826092610261126122613261426152616261726182619262026212622262326242625262626272628262926302631263226332634263526362637263826392640264126422643264426452646264726482649265026512652265326542655265626572658265926602661266226632664266526662667266826692670267126722673267426752676267726782679268026812682268326842685268626872688268926902691269226932694269526962697269826992700270127022703270427052706270727082709271027112712271327142715271627172718271927202721272227232724272527262727272827292730273127322733273427352736273727382739274027412742274327442745274627472748274927502751275227532754275527562757275827592760276127622763276427652766276727682769277027712772277327742775277627772778277927802781278227832784278527862787278827892790279127922793279427952796279727982799280028012802280328042805280628072808280928102811281228132814281528162817281828192820282128222823282428252826282728282829283028312832283328342835283628372838283928402841284228432844284528462847284828492850285128522853285428552856285728582859286028612862286328642865286628672868286928702871287228732874287528762877287828792880288128822883288428852886288728882889289028912892289328942895289628972898289929002901290229032904290529062907290829092910291129122913291429152916291729182919292029212922292329242925292629272928292929302931293229332934293529362937293829392940294129422943294429452946294729482949295029512952295329542955295629572958295929602961296229632964296529662967296829692970297129722973297429752976297729782979298029812982298329842985298629872988298929902991299229932994299529962997299829993000300130023003300430053006300730083009301030113012301330143015301630173018301930203021302230233024302530263027302830293030303130323033303430353036303730383039304030413042304330443045304630473048304930503051305230533054305530563057305830593060306130623063306430653066306730683069307030713072307330743075307630773078307930803081308230833084308530863087308830893090309130923093309430953096309730983099310031013102310331043105310631073108310931103111311231133114311531163117311831193120312131223123312431253126312731283129313031313132313331343135313631373138313931403141314231433144314531463147314831493150315131523153315431553156315731583159316031613162316331643165316631673168316931703171317231733174317531763177317831793180318131823183318431853186318731883189319031913192319331943195319631973198319932003201320232033204320532063207320832093210321132123213321432153216321732183219322032213222322332243225322632273228322932303231323232333234323532363237323832393240324132423243324432453246324732483249325032513252325332543255325632573258325932603261326232633264326532663267326832693270327132723273327432753276327732783279328032813282328332843285328632873288328932903291329232933294329532963297329832993300330133023303330433053306330733083309331033113312331333143315331633173318331933203321332233233324332533263327332833293330333133323333333433353336333733383339334033413342334333443345334633473348334933503351335233533354335533563357335833593360336133623363336433653366336733683369337033713372337333743375337633773378337933803381338233833384338533863387338833893390339133923393339433953396339733983399340034013402340334043405340634073408340934103411341234133414341534163417341834193420342134223423342434253426342734283429343034313432343334343435343634373438343934403441344234433444344534463447344834493450345134523453345434553456345734583459346034613462346334643465346634673468346934703471347234733474347534763477347834793480348134823483348434853486348734883489349034913492349334943495349634973498349935003501350235033504350535063507350835093510351135123513351435153516351735183519352035213522352335243525352635273528352935303531353235333534353535363537353835393540354135423543354435453546354735483549355035513552355335543555355635573558355935603561356235633564356535663567356835693570357135723573357435753576357735783579358035813582358335843585358635873588358935903591359235933594359535963597359835993600360136023603360436053606360736083609361036113612361336143615361636173618361936203621362236233624362536263627362836293630363136323633363436353636363736383639364036413642364336443645364636473648364936503651365236533654365536563657365836593660366136623663366436653666366736683669367036713672367336743675367636773678367936803681368236833684368536863687368836893690369136923693369436953696369736983699370037013702370337043705370637073708370937103711371237133714371537163717371837193720372137223723372437253726372737283729373037313732373337343735373637373738373937403741374237433744374537463747374837493750375137523753375437553756375737583759376037613762376337643765376637673768376937703771377237733774377537763777377837793780378137823783378437853786378737883789379037913792379337943795379637973798379938003801380238033804380538063807380838093810381138123813381438153816381738183819382038213822382338243825382638273828382938303831383238333834383538363837383838393840384138423843384438453846384738483849385038513852385338543855385638573858385938603861386238633864386538663867386838693870387138723873387438753876387738783879388038813882388338843885388638873888388938903891389238933894389538963897389838993900390139023903390439053906390739083909391039113912391339143915391639173918391939203921392239233924392539263927392839293930393139323933393439353936393739383939394039413942394339443945394639473948394939503951395239533954395539563957395839593960396139623963396439653966396739683969397039713972397339743975397639773978397939803981398239833984398539863987398839893990399139923993399439953996399739983999400040014002400340044005400640074008400940104011401240134014401540164017401840194020402140224023402440254026402740284029403040314032403340344035403640374038403940404041404240434044404540464047404840494050405140524053405440554056405740584059406040614062406340644065406640674068406940704071407240734074407540764077407840794080408140824083408440854086408740884089409040914092409340944095409640974098409941004101410241034104410541064107410841094110411141124113411441154116411741184119412041214122412341244125412641274128412941304131413241334134413541364137413841394140414141424143414441454146414741484149415041514152415341544155415641574158415941604161416241634164416541664167416841694170417141724173417441754176417741784179418041814182418341844185418641874188418941904191419241934194419541964197419841994200420142024203420442054206420742084209421042114212421342144215421642174218421942204221422242234224422542264227422842294230423142324233423442354236423742384239424042414242424342444245424642474248424942504251425242534254425542564257425842594260426142624263426442654266426742684269427042714272427342744275427642774278427942804281428242834284428542864287428842894290429142924293429442954296429742984299430043014302430343044305430643074308430943104311431243134314431543164317431843194320432143224323432443254326432743284329433043314332433343344335433643374338433943404341434243434344434543464347434843494350435143524353435443554356435743584359436043614362436343644365436643674368436943704371437243734374437543764377437843794380438143824383438443854386438743884389439043914392439343944395439643974398439944004401440244034404440544064407440844094410441144124413441444154416441744184419442044214422442344244425442644274428442944304431443244334434443544364437443844394440444144424443444444454446444744484449445044514452445344544455445644574458445944604461446244634464446544664467446844694470447144724473447444754476447744784479448044814482448344844485448644874488448944904491449244934494449544964497449844994500450145024503450445054506450745084509451045114512451345144515451645174518451945204521452245234524452545264527452845294530453145324533453445354536453745384539454045414542454345444545454645474548454945504551455245534554455545564557455845594560456145624563456445654566456745684569457045714572457345744575457645774578457945804581458245834584458545864587458845894590459145924593459445954596459745984599460046014602460346044605460646074608460946104611461246134614461546164617461846194620462146224623462446254626462746284629463046314632463346344635463646374638463946404641464246434644464546464647464846494650465146524653465446554656465746584659466046614662466346644665466646674668466946704671467246734674467546764677467846794680468146824683468446854686468746884689469046914692469346944695469646974698469947004701470247034704470547064707470847094710471147124713471447154716471747184719472047214722472347244725472647274728472947304731473247334734473547364737473847394740474147424743474447454746474747484749475047514752475347544755475647574758475947604761476247634764476547664767476847694770477147724773477447754776477747784779478047814782478347844785478647874788478947904791479247934794479547964797479847994800480148024803480448054806480748084809481048114812481348144815481648174818481948204821482248234824482548264827482848294830483148324833483448354836483748384839484048414842484348444845484648474848484948504851485248534854485548564857485848594860486148624863486448654866486748684869487048714872487348744875487648774878487948804881488248834884488548864887488848894890489148924893489448954896489748984899490049014902490349044905490649074908490949104911491249134914491549164917491849194920492149224923492449254926492749284929493049314932493349344935493649374938493949404941494249434944494549464947494849494950495149524953495449554956495749584959496049614962496349644965496649674968496949704971497249734974497549764977497849794980498149824983498449854986498749884989499049914992499349944995499649974998499950005001500250035004500550065007500850095010501150125013501450155016501750185019502050215022502350245025502650275028502950305031503250335034503550365037503850395040504150425043504450455046504750485049505050515052505350545055505650575058505950605061506250635064506550665067506850695070507150725073507450755076507750785079508050815082508350845085508650875088508950905091509250935094509550965097509850995100510151025103510451055106510751085109511051115112511351145115511651175118511951205121512251235124512551265127512851295130513151325133513451355136513751385139514051415142514351445145514651475148514951505151515251535154515551565157515851595160516151625163516451655166516751685169517051715172517351745175517651775178517951805181518251835184518551865187518851895190519151925193519451955196519751985199520052015202520352045205520652075208520952105211521252135214521552165217521852195220522152225223522452255226522752285229523052315232523352345235523652375238523952405241524252435244524552465247524852495250525152525253525452555256525752585259526052615262526352645265526652675268526952705271527252735274527552765277527852795280528152825283528452855286528752885289529052915292529352945295529652975298529953005301530253035304530553065307530853095310531153125313531453155316531753185319532053215322532353245325532653275328532953305331533253335334533553365337533853395340534153425343534453455346534753485349535053515352535353545355535653575358535953605361536253635364536553665367536853695370537153725373537453755376537753785379538053815382538353845385538653875388538953905391539253935394539553965397539853995400540154025403540454055406540754085409541054115412541354145415541654175418541954205421542254235424542554265427542854295430543154325433543454355436543754385439544054415442544354445445544654475448544954505451545254535454545554565457545854595460546154625463546454655466546754685469547054715472547354745475547654775478547954805481548254835484548554865487548854895490549154925493549454955496549754985499550055015502550355045505550655075508550955105511551255135514551555165517551855195520552155225523552455255526552755285529553055315532553355345535553655375538553955405541554255435544554555465547554855495550555155525553555455555556555755585559556055615562556355645565556655675568556955705571557255735574557555765577557855795580558155825583558455855586558755885589559055915592559355945595559655975598559956005601560256035604560556065607560856095610561156125613561456155616561756185619562056215622562356245625562656275628562956305631563256335634563556365637563856395640564156425643564456455646564756485649565056515652565356545655565656575658565956605661566256635664566556665667566856695670567156725673567456755676567756785679568056815682568356845685568656875688568956905691569256935694569556965697569856995700570157025703570457055706570757085709571057115712571357145715571657175718571957205721572257235724572557265727572857295730573157325733573457355736573757385739574057415742574357445745574657475748574957505751575257535754575557565757575857595760576157625763576457655766576757685769577057715772577357745775577657775778577957805781578257835784578557865787578857895790579157925793579457955796579757985799580058015802580358045805580658075808580958105811581258135814581558165817581858195820582158225823582458255826582758285829583058315832583358345835583658375838583958405841584258435844584558465847584858495850585158525853585458555856585758585859586058615862586358645865586658675868586958705871587258735874587558765877587858795880588158825883588458855886588758885889589058915892589358945895589658975898589959005901590259035904590559065907590859095910591159125913591459155916591759185919592059215922592359245925592659275928592959305931593259335934593559365937593859395940594159425943594459455946594759485949595059515952595359545955595659575958595959605961596259635964596559665967596859695970597159725973597459755976597759785979598059815982598359845985598659875988598959905991599259935994599559965997599859996000600160026003600460056006600760086009601060116012601360146015601660176018601960206021602260236024602560266027602860296030603160326033603460356036603760386039604060416042604360446045604660476048604960506051605260536054605560566057605860596060606160626063606460656066606760686069607060716072607360746075607660776078607960806081608260836084608560866087608860896090609160926093609460956096609760986099610061016102610361046105610661076108610961106111611261136114611561166117611861196120612161226123612461256126612761286129613061316132613361346135613661376138613961406141614261436144614561466147614861496150615161526153615461556156615761586159616061616162616361646165616661676168616961706171617261736174617561766177617861796180618161826183618461856186618761886189619061916192619361946195619661976198619962006201620262036204620562066207620862096210621162126213621462156216621762186219622062216222622362246225622662276228622962306231623262336234623562366237623862396240624162426243624462456246624762486249625062516252625362546255625662576258625962606261626262636264626562666267626862696270627162726273627462756276627762786279628062816282628362846285628662876288628962906291629262936294629562966297629862996300630163026303630463056306630763086309631063116312631363146315631663176318631963206321632263236324632563266327632863296330633163326333633463356336633763386339634063416342634363446345634663476348634963506351635263536354635563566357635863596360636163626363636463656366636763686369637063716372637363746375637663776378637963806381638263836384638563866387638863896390639163926393639463956396639763986399640064016402640364046405640664076408640964106411641264136414641564166417641864196420642164226423642464256426642764286429643064316432643364346435643664376438643964406441644264436444644564466447644864496450645164526453645464556456645764586459646064616462646364646465646664676468646964706471647264736474647564766477647864796480648164826483648464856486648764886489649064916492649364946495649664976498649965006501650265036504650565066507650865096510651165126513651465156516651765186519652065216522652365246525652665276528652965306531653265336534653565366537653865396540654165426543654465456546654765486549655065516552655365546555655665576558655965606561656265636564656565666567656865696570657165726573657465756576657765786579658065816582658365846585658665876588658965906591659265936594659565966597659865996600660166026603660466056606660766086609661066116612661366146615661666176618661966206621662266236624662566266627662866296630663166326633663466356636663766386639664066416642664366446645664666476648664966506651665266536654665566566657665866596660666166626663666466656666666766686669667066716672667366746675667666776678667966806681668266836684668566866687668866896690669166926693669466956696669766986699670067016702670367046705670667076708670967106711671267136714671567166717671867196720672167226723672467256726672767286729673067316732673367346735673667376738673967406741674267436744674567466747674867496750675167526753675467556756675767586759676067616762676367646765676667676768676967706771677267736774677567766777677867796780678167826783678467856786678767886789679067916792679367946795679667976798679968006801680268036804680568066807680868096810681168126813681468156816681768186819682068216822682368246825682668276828682968306831683268336834683568366837683868396840684168426843684468456846684768486849685068516852685368546855685668576858685968606861686268636864686568666867686868696870687168726873687468756876687768786879688068816882688368846885688668876888688968906891689268936894689568966897689868996900690169026903690469056906690769086909691069116912691369146915691669176918691969206921692269236924692569266927692869296930693169326933693469356936693769386939694069416942694369446945694669476948694969506951695269536954695569566957695869596960696169626963696469656966696769686969697069716972697369746975697669776978697969806981698269836984698569866987698869896990699169926993699469956996699769986999700070017002700370047005700670077008700970107011701270137014701570167017701870197020702170227023702470257026702770287029703070317032703370347035703670377038703970407041704270437044704570467047704870497050705170527053705470557056705770587059706070617062706370647065706670677068706970707071707270737074707570767077707870797080708170827083708470857086708770887089709070917092709370947095709670977098709971007101710271037104710571067107710871097110711171127113711471157116711771187119712071217122712371247125712671277128712971307131713271337134713571367137713871397140714171427143714471457146714771487149715071517152715371547155715671577158715971607161716271637164716571667167716871697170717171727173717471757176717771787179718071817182718371847185718671877188718971907191719271937194719571967197719871997200720172027203720472057206720772087209721072117212721372147215721672177218721972207221722272237224722572267227722872297230723172327233723472357236723772387239724072417242724372447245724672477248724972507251725272537254725572567257725872597260726172627263726472657266726772687269727072717272727372747275727672777278727972807281728272837284728572867287728872897290729172927293729472957296729772987299730073017302730373047305730673077308730973107311731273137314731573167317731873197320732173227323732473257326732773287329733073317332733373347335733673377338733973407341734273437344734573467347734873497350735173527353735473557356735773587359736073617362736373647365736673677368736973707371737273737374737573767377737873797380738173827383738473857386738773887389739073917392739373947395739673977398739974007401740274037404740574067407740874097410741174127413741474157416741774187419742074217422742374247425742674277428742974307431743274337434743574367437743874397440744174427443744474457446744774487449745074517452745374547455745674577458745974607461746274637464746574667467746874697470747174727473747474757476747774787479748074817482748374847485748674877488748974907491749274937494749574967497749874997500750175027503750475057506750775087509751075117512751375147515751675177518751975207521752275237524752575267527752875297530753175327533753475357536753775387539754075417542754375447545754675477548754975507551755275537554755575567557755875597560756175627563756475657566756775687569757075717572757375747575757675777578757975807581758275837584758575867587758875897590759175927593759475957596759775987599760076017602760376047605760676077608760976107611761276137614761576167617761876197620762176227623762476257626762776287629763076317632763376347635763676377638763976407641764276437644764576467647764876497650765176527653765476557656765776587659766076617662766376647665766676677668766976707671767276737674767576767677767876797680768176827683768476857686768776887689769076917692769376947695769676977698769977007701770277037704770577067707770877097710771177127713771477157716771777187719772077217722772377247725772677277728772977307731773277337734773577367737773877397740774177427743774477457746774777487749775077517752775377547755775677577758775977607761776277637764776577667767776877697770777177727773777477757776777777787779778077817782778377847785778677877788778977907791779277937794779577967797779877997800780178027803780478057806780778087809781078117812781378147815781678177818781978207821782278237824782578267827782878297830783178327833783478357836783778387839784078417842784378447845784678477848784978507851785278537854785578567857785878597860786178627863786478657866786778687869787078717872787378747875787678777878787978807881788278837884788578867887788878897890789178927893789478957896789778987899790079017902790379047905790679077908790979107911791279137914791579167917791879197920792179227923792479257926792779287929793079317932793379347935793679377938793979407941794279437944794579467947794879497950795179527953795479557956795779587959796079617962796379647965796679677968796979707971797279737974797579767977797879797980798179827983798479857986798779887989799079917992799379947995799679977998799980008001800280038004800580068007800880098010801180128013801480158016801780188019802080218022802380248025802680278028802980308031803280338034803580368037803880398040804180428043804480458046804780488049805080518052805380548055805680578058805980608061806280638064806580668067806880698070807180728073807480758076807780788079808080818082808380848085808680878088808980908091809280938094809580968097809880998100810181028103810481058106810781088109811081118112811381148115811681178118811981208121812281238124812581268127812881298130813181328133813481358136813781388139814081418142814381448145814681478148814981508151815281538154815581568157815881598160816181628163816481658166816781688169817081718172817381748175817681778178817981808181818281838184818581868187818881898190819181928193819481958196819781988199820082018202820382048205820682078208820982108211821282138214821582168217821882198220822182228223822482258226822782288229823082318232823382348235823682378238823982408241824282438244824582468247824882498250825182528253825482558256825782588259826082618262826382648265826682678268826982708271827282738274827582768277827882798280828182828283828482858286828782888289829082918292829382948295829682978298829983008301830283038304830583068307830883098310831183128313831483158316831783188319832083218322832383248325832683278328832983308331833283338334833583368337833883398340834183428343834483458346834783488349835083518352835383548355835683578358835983608361836283638364836583668367836883698370837183728373837483758376837783788379838083818382838383848385838683878388838983908391839283938394839583968397839883998400840184028403840484058406840784088409841084118412841384148415841684178418841984208421842284238424842584268427842884298430843184328433843484358436843784388439844084418442844384448445844684478448844984508451845284538454845584568457845884598460846184628463846484658466846784688469847084718472847384748475847684778478847984808481848284838484848584868487848884898490849184928493849484958496849784988499850085018502850385048505850685078508850985108511851285138514851585168517851885198520852185228523852485258526852785288529853085318532853385348535853685378538853985408541854285438544854585468547854885498550855185528553855485558556855785588559856085618562856385648565856685678568856985708571857285738574857585768577857885798580858185828583858485858586858785888589859085918592859385948595859685978598859986008601860286038604860586068607860886098610861186128613861486158616861786188619862086218622862386248625862686278628862986308631863286338634863586368637863886398640864186428643864486458646864786488649865086518652865386548655865686578658865986608661866286638664866586668667866886698670867186728673867486758676867786788679868086818682868386848685868686878688868986908691869286938694869586968697869886998700870187028703870487058706870787088709871087118712871387148715871687178718871987208721872287238724872587268727872887298730873187328733873487358736873787388739874087418742874387448745874687478748874987508751875287538754875587568757875887598760876187628763876487658766876787688769877087718772877387748775877687778778877987808781878287838784878587868787878887898790879187928793879487958796879787988799880088018802880388048805880688078808880988108811881288138814881588168817881888198820882188228823882488258826882788288829883088318832883388348835883688378838883988408841884288438844884588468847884888498850885188528853885488558856885788588859886088618862886388648865886688678868886988708871887288738874887588768877887888798880888188828883888488858886888788888889889088918892889388948895889688978898889989008901890289038904890589068907890889098910891189128913891489158916891789188919892089218922892389248925892689278928892989308931893289338934893589368937893889398940894189428943894489458946894789488949895089518952895389548955895689578958895989608961896289638964896589668967896889698970897189728973897489758976897789788979898089818982898389848985898689878988898989908991899289938994899589968997899889999000900190029003900490059006900790089009901090119012901390149015901690179018901990209021902290239024902590269027902890299030903190329033903490359036903790389039904090419042904390449045904690479048904990509051905290539054905590569057905890599060906190629063906490659066906790689069907090719072907390749075907690779078907990809081908290839084908590869087908890899090909190929093909490959096909790989099910091019102910391049105910691079108910991109111911291139114911591169117911891199120912191229123912491259126912791289129913091319132913391349135913691379138913991409141914291439144914591469147914891499150915191529153915491559156915791589159916091619162916391649165916691679168916991709171917291739174917591769177917891799180918191829183918491859186918791889189919091919192919391949195919691979198919992009201920292039204920592069207920892099210921192129213921492159216921792189219922092219222922392249225922692279228922992309231923292339234923592369237923892399240924192429243924492459246924792489249925092519252925392549255925692579258925992609261926292639264926592669267926892699270927192729273927492759276927792789279928092819282928392849285928692879288928992909291929292939294929592969297929892999300930193029303930493059306930793089309931093119312931393149315931693179318931993209321932293239324932593269327932893299330933193329333933493359336933793389339934093419342934393449345934693479348934993509351935293539354935593569357935893599360936193629363936493659366936793689369937093719372937393749375937693779378937993809381938293839384938593869387938893899390939193929393939493959396939793989399940094019402940394049405940694079408940994109411941294139414941594169417941894199420942194229423942494259426942794289429943094319432943394349435943694379438943994409441944294439444944594469447944894499450945194529453945494559456945794589459946094619462946394649465946694679468946994709471947294739474947594769477947894799480948194829483948494859486948794889489949094919492949394949495949694979498949995009501950295039504950595069507950895099510951195129513951495159516951795189519952095219522952395249525952695279528952995309531953295339534953595369537953895399540954195429543954495459546954795489549955095519552955395549555955695579558955995609561956295639564956595669567956895699570957195729573957495759576957795789579958095819582958395849585958695879588958995909591959295939594959595969597959895999600960196029603960496059606960796089609961096119612961396149615961696179618961996209621962296239624962596269627962896299630963196329633963496359636963796389639964096419642964396449645964696479648964996509651965296539654965596569657965896599660966196629663966496659666966796689669967096719672967396749675967696779678967996809681968296839684968596869687968896899690969196929693969496959696969796989699970097019702970397049705970697079708970997109711971297139714971597169717971897199720972197229723972497259726972797289729973097319732973397349735973697379738973997409741974297439744974597469747974897499750975197529753975497559756975797589759976097619762976397649765976697679768976997709771977297739774977597769777977897799780978197829783978497859786978797889789979097919792979397949795979697979798979998009801980298039804980598069807980898099810981198129813981498159816981798189819982098219822982398249825982698279828982998309831983298339834983598369837983898399840984198429843984498459846984798489849985098519852985398549855985698579858985998609861986298639864986598669867986898699870987198729873987498759876987798789879988098819882988398849885988698879888988998909891989298939894989598969897989898999900990199029903990499059906990799089909991099119912991399149915991699179918991999209921992299239924992599269927992899299930993199329933993499359936993799389939994099419942994399449945994699479948994999509951995299539954995599569957995899599960996199629963996499659966996799689969997099719972997399749975997699779978997999809981998299839984998599869987998899899990999199929993999499959996999799989999100001000110002100031000410005100061000710008100091001010011100121001310014100151001610017100181001910020100211002210023100241002510026100271002810029100301003110032100331003410035100361003710038100391004010041100421004310044100451004610047100481004910050100511005210053100541005510056100571005810059100601006110062100631006410065100661006710068100691007010071100721007310074100751007610077100781007910080100811008210083100841008510086100871008810089100901009110092100931009410095100961009710098100991010010101101021010310104101051010610107101081010910110101111011210113101141011510116101171011810119101201012110122101231012410125101261012710128101291013010131101321013310134101351013610137101381013910140101411014210143101441014510146101471014810149101501015110152101531015410155101561015710158101591016010161101621016310164101651016610167101681016910170101711017210173101741017510176101771017810179101801018110182101831018410185101861018710188101891019010191101921019310194101951019610197101981019910200102011020210203102041020510206102071020810209102101021110212102131021410215102161021710218102191022010221102221022310224102251022610227102281022910230102311023210233102341023510236102371023810239102401024110242102431024410245102461024710248102491025010251102521025310254102551025610257102581025910260102611026210263102641026510266102671026810269102701027110272102731027410275102761027710278102791028010281102821028310284102851028610287102881028910290102911029210293102941029510296102971029810299103001030110302103031030410305103061030710308103091031010311103121031310314103151031610317103181031910320103211032210323103241032510326103271032810329103301033110332103331033410335103361033710338103391034010341103421034310344103451034610347103481034910350103511035210353103541035510356103571035810359103601036110362103631036410365103661036710368103691037010371103721037310374103751037610377103781037910380103811038210383103841038510386103871038810389103901039110392103931039410395103961039710398103991040010401104021040310404104051040610407104081040910410104111041210413104141041510416104171041810419104201042110422104231042410425104261042710428104291043010431104321043310434104351043610437104381043910440104411044210443104441044510446104471044810449104501045110452104531045410455104561045710458104591046010461104621046310464104651046610467104681046910470104711047210473104741047510476104771047810479104801048110482104831048410485104861048710488104891049010491104921049310494104951049610497104981049910500105011050210503105041050510506105071050810509105101051110512105131051410515105161051710518105191052010521105221052310524105251052610527105281052910530105311053210533105341053510536105371053810539105401054110542105431054410545105461054710548105491055010551105521055310554105551055610557105581055910560105611056210563105641056510566105671056810569105701057110572105731057410575105761057710578105791058010581105821058310584105851058610587105881058910590105911059210593105941059510596105971059810599106001060110602106031060410605106061060710608106091061010611106121061310614106151061610617106181061910620106211062210623106241062510626106271062810629106301063110632106331063410635106361063710638106391064010641106421064310644106451064610647106481064910650106511065210653106541065510656106571065810659106601066110662106631066410665106661066710668106691067010671106721067310674106751067610677106781067910680106811068210683106841068510686106871068810689106901069110692106931069410695106961069710698106991070010701107021070310704107051070610707107081070910710107111071210713107141071510716107171071810719107201072110722107231072410725107261072710728107291073010731107321073310734107351073610737107381073910740107411074210743107441074510746107471074810749107501075110752107531075410755107561075710758107591076010761107621076310764107651076610767107681076910770107711077210773107741077510776107771077810779107801078110782107831078410785107861078710788107891079010791107921079310794107951079610797107981079910800108011080210803108041080510806108071080810809108101081110812108131081410815108161081710818108191082010821108221082310824108251082610827108281082910830108311083210833108341083510836108371083810839108401084110842108431084410845108461084710848108491085010851108521085310854108551085610857108581085910860108611086210863108641086510866108671086810869108701087110872108731087410875108761087710878108791088010881108821088310884108851088610887108881088910890108911089210893108941089510896108971089810899109001090110902109031090410905109061090710908109091091010911109121091310914109151091610917109181091910920109211092210923109241092510926109271092810929109301093110932109331093410935109361093710938109391094010941109421094310944109451094610947109481094910950109511095210953109541095510956109571095810959109601096110962109631096410965109661096710968109691097010971109721097310974109751097610977109781097910980109811098210983109841098510986109871098810989109901099110992109931099410995109961099710998109991100011001110021100311004110051100611007110081100911010110111101211013110141101511016110171101811019110201102111022110231102411025110261102711028110291103011031110321103311034110351103611037110381103911040110411104211043110441104511046110471104811049110501105111052110531105411055110561105711058110591106011061110621106311064110651106611067110681106911070110711107211073110741107511076110771107811079110801108111082110831108411085110861108711088110891109011091110921109311094110951109611097110981109911100111011110211103111041110511106111071110811109111101111111112111131111411115111161111711118111191112011121111221112311124111251112611127111281112911130111311113211133111341113511136111371113811139111401114111142111431114411145111461114711148111491115011151111521115311154111551115611157111581115911160111611116211163111641116511166111671116811169111701117111172111731117411175111761117711178111791118011181111821118311184111851118611187111881118911190111911119211193111941119511196111971119811199112001120111202112031120411205112061120711208112091121011211112121121311214112151121611217112181121911220112211122211223112241122511226112271122811229112301123111232112331123411235112361123711238112391124011241112421124311244112451124611247112481124911250112511125211253112541125511256112571125811259112601126111262112631126411265112661126711268112691127011271112721127311274112751127611277112781127911280112811128211283112841128511286112871128811289112901129111292112931129411295112961129711298112991130011301113021130311304113051130611307113081130911310113111131211313113141131511316113171131811319113201132111322113231132411325113261132711328113291133011331113321133311334113351133611337113381133911340113411134211343113441134511346113471134811349113501135111352113531135411355113561135711358113591136011361113621136311364113651136611367113681136911370113711137211373113741137511376113771137811379113801138111382113831138411385113861138711388113891139011391113921139311394113951139611397113981139911400114011140211403114041140511406114071140811409114101141111412114131141411415114161141711418114191142011421114221142311424114251142611427114281142911430114311143211433114341143511436114371143811439114401144111442114431144411445114461144711448114491145011451114521145311454114551145611457114581145911460114611146211463114641146511466114671146811469114701147111472114731147411475114761147711478114791148011481114821148311484114851148611487114881148911490114911149211493114941149511496114971149811499115001150111502115031150411505115061150711508115091151011511115121151311514115151151611517115181151911520115211152211523115241152511526115271152811529115301153111532115331153411535115361153711538115391154011541115421154311544115451154611547115481154911550115511155211553115541155511556115571155811559115601156111562115631156411565115661156711568115691157011571115721157311574115751157611577115781157911580115811158211583115841158511586115871158811589115901159111592115931159411595115961159711598115991160011601116021160311604116051160611607116081160911610116111161211613116141161511616116171161811619116201162111622116231162411625116261162711628116291163011631116321163311634116351163611637116381163911640116411164211643116441164511646116471164811649116501165111652116531165411655116561165711658116591166011661116621166311664116651166611667116681166911670116711167211673116741167511676116771167811679116801168111682116831168411685116861168711688116891169011691116921169311694116951169611697116981169911700117011170211703117041170511706117071170811709117101171111712117131171411715117161171711718117191172011721117221172311724117251172611727117281172911730117311173211733117341173511736117371173811739117401174111742117431174411745117461174711748117491175011751117521175311754117551175611757117581175911760117611176211763117641176511766117671176811769117701177111772117731177411775117761177711778117791178011781117821178311784117851178611787117881178911790117911179211793117941179511796117971179811799118001180111802118031180411805118061180711808118091181011811118121181311814118151181611817118181181911820118211182211823118241182511826118271182811829118301183111832118331183411835118361183711838118391184011841118421184311844118451184611847118481184911850118511185211853118541185511856118571185811859118601186111862118631186411865118661186711868118691187011871118721187311874118751187611877118781187911880118811188211883118841188511886118871188811889118901189111892118931189411895118961189711898118991190011901119021190311904119051190611907119081190911910119111191211913119141191511916119171191811919119201192111922119231192411925119261192711928119291193011931119321193311934119351193611937119381193911940119411194211943119441194511946119471194811949119501195111952119531195411955119561195711958119591196011961119621196311964119651196611967119681196911970119711197211973119741197511976119771197811979119801198111982119831198411985119861198711988119891199011991119921199311994119951199611997119981199912000120011200212003120041200512006120071200812009120101201112012120131201412015120161201712018120191202012021120221202312024120251202612027120281202912030120311203212033120341203512036120371203812039120401204112042120431204412045120461204712048120491205012051120521205312054120551205612057120581205912060120611206212063120641206512066120671206812069120701207112072120731207412075120761207712078120791208012081120821208312084120851208612087120881208912090120911209212093120941209512096120971209812099121001210112102121031210412105121061210712108121091211012111121121211312114121151211612117121181211912120121211212212123121241212512126121271212812129121301213112132121331213412135121361213712138121391214012141121421214312144121451214612147121481214912150121511215212153121541215512156121571215812159121601216112162121631216412165121661216712168121691217012171121721217312174121751217612177121781217912180121811218212183121841218512186121871218812189121901219112192121931219412195121961219712198121991220012201122021220312204122051220612207122081220912210122111221212213122141221512216122171221812219122201222112222122231222412225122261222712228122291223012231122321223312234122351223612237122381223912240122411224212243122441224512246122471224812249122501225112252122531225412255122561225712258122591226012261122621226312264122651226612267122681226912270122711227212273122741227512276122771227812279122801228112282122831228412285122861228712288122891229012291122921229312294122951229612297122981229912300123011230212303123041230512306123071230812309123101231112312123131231412315123161231712318123191232012321123221232312324123251232612327123281232912330123311233212333123341233512336123371233812339123401234112342123431234412345123461234712348123491235012351123521235312354123551235612357123581235912360123611236212363123641236512366123671236812369123701237112372123731237412375123761237712378123791238012381123821238312384123851238612387123881238912390123911239212393123941239512396123971239812399124001240112402124031240412405124061240712408124091241012411124121241312414124151241612417124181241912420124211242212423124241242512426124271242812429124301243112432124331243412435124361243712438124391244012441124421244312444124451244612447124481244912450124511245212453124541245512456124571245812459124601246112462124631246412465124661246712468124691247012471124721247312474124751247612477124781247912480124811248212483124841248512486124871248812489124901249112492124931249412495124961249712498124991250012501125021250312504125051250612507125081250912510125111251212513125141251512516125171251812519125201252112522125231252412525125261252712528125291253012531125321253312534125351253612537125381253912540125411254212543125441254512546125471254812549125501255112552125531255412555125561255712558125591256012561125621256312564125651256612567125681256912570125711257212573125741257512576125771257812579125801258112582125831258412585125861258712588125891259012591125921259312594125951259612597125981259912600126011260212603126041260512606126071260812609126101261112612126131261412615126161261712618126191262012621126221262312624126251262612627126281262912630126311263212633126341263512636126371263812639126401264112642126431264412645126461264712648126491265012651126521265312654126551265612657126581265912660126611266212663126641266512666126671266812669126701267112672126731267412675126761267712678126791268012681126821268312684126851268612687126881268912690126911269212693126941269512696126971269812699127001270112702127031270412705127061270712708127091271012711127121271312714127151271612717127181271912720127211272212723127241272512726127271272812729127301273112732127331273412735127361273712738127391274012741127421274312744127451274612747127481274912750127511275212753127541275512756127571275812759127601276112762127631276412765127661276712768127691277012771127721277312774127751277612777127781277912780127811278212783127841278512786127871278812789127901279112792127931279412795127961279712798127991280012801128021280312804128051280612807128081280912810128111281212813128141281512816128171281812819128201282112822128231282412825128261282712828128291283012831128321283312834128351283612837128381283912840128411284212843128441284512846128471284812849128501285112852128531285412855128561285712858128591286012861128621286312864128651286612867128681286912870128711287212873128741287512876128771287812879128801288112882128831288412885128861288712888128891289012891128921289312894128951289612897128981289912900129011290212903129041290512906129071290812909129101291112912129131291412915129161291712918129191292012921129221292312924129251292612927129281292912930129311293212933129341293512936129371293812939129401294112942129431294412945129461294712948129491295012951129521295312954129551295612957129581295912960129611296212963129641296512966129671296812969129701297112972129731297412975129761297712978129791298012981129821298312984129851298612987129881298912990129911299212993129941299512996129971299812999130001300113002130031300413005130061300713008130091301013011130121301313014130151301613017130181301913020130211302213023130241302513026130271302813029130301303113032130331303413035130361303713038130391304013041130421304313044130451304613047130481304913050130511305213053130541305513056130571305813059130601306113062130631306413065130661306713068130691307013071130721307313074130751307613077130781307913080130811308213083130841308513086130871308813089130901309113092130931309413095130961309713098130991310013101131021310313104131051310613107131081310913110131111311213113131141311513116131171311813119131201312113122131231312413125131261312713128131291313013131131321313313134131351313613137131381313913140131411314213143131441314513146131471314813149131501315113152131531315413155131561315713158131591316013161131621316313164131651316613167131681316913170131711317213173131741317513176131771317813179131801318113182131831318413185131861318713188131891319013191131921319313194131951319613197131981319913200132011320213203132041320513206132071320813209132101321113212132131321413215132161321713218132191322013221132221322313224132251322613227132281322913230132311323213233132341323513236132371323813239132401324113242132431324413245132461324713248132491325013251132521325313254132551325613257132581325913260132611326213263132641326513266132671326813269132701327113272132731327413275132761327713278132791328013281132821328313284132851328613287132881328913290132911329213293132941329513296132971329813299133001330113302133031330413305133061330713308133091331013311133121331313314133151331613317133181331913320133211332213323133241332513326133271332813329133301333113332133331333413335133361333713338133391334013341133421334313344133451334613347133481334913350133511335213353133541335513356133571335813359133601336113362133631336413365133661336713368133691337013371133721337313374133751337613377133781337913380133811338213383133841338513386133871338813389133901339113392133931339413395133961339713398133991340013401134021340313404134051340613407134081340913410134111341213413134141341513416134171341813419134201342113422134231342413425134261342713428134291343013431134321343313434134351343613437134381343913440134411344213443134441344513446134471344813449134501345113452134531345413455134561345713458134591346013461134621346313464134651346613467134681346913470134711347213473134741347513476134771347813479134801348113482134831348413485134861348713488134891349013491134921349313494134951349613497134981349913500135011350213503135041350513506135071350813509135101351113512135131351413515135161351713518135191352013521135221352313524135251352613527135281352913530135311353213533135341353513536135371353813539135401354113542135431354413545135461354713548135491355013551135521355313554135551355613557135581355913560135611356213563135641356513566135671356813569135701357113572135731357413575135761357713578135791358013581135821358313584135851358613587135881358913590135911359213593135941359513596135971359813599136001360113602136031360413605136061360713608136091361013611136121361313614136151361613617136181361913620136211362213623136241362513626136271362813629136301363113632136331363413635136361363713638136391364013641136421364313644136451364613647136481364913650136511365213653136541365513656136571365813659136601366113662136631366413665136661366713668136691367013671136721367313674136751367613677136781367913680136811368213683136841368513686136871368813689136901369113692136931369413695136961369713698136991370013701137021370313704137051370613707137081370913710137111371213713137141371513716137171371813719137201372113722137231372413725137261372713728137291373013731137321373313734137351373613737137381373913740137411374213743137441374513746137471374813749137501375113752137531375413755137561375713758137591376013761137621376313764137651376613767137681376913770137711377213773137741377513776137771377813779137801378113782137831378413785137861378713788137891379013791137921379313794137951379613797137981379913800138011380213803138041380513806138071380813809138101381113812138131381413815138161381713818138191382013821138221382313824138251382613827138281382913830138311383213833138341383513836138371383813839138401384113842138431384413845138461384713848138491385013851138521385313854138551385613857138581385913860138611386213863138641386513866138671386813869138701387113872138731387413875138761387713878138791388013881138821388313884138851388613887138881388913890138911389213893138941389513896138971389813899139001390113902139031390413905139061390713908139091391013911139121391313914139151391613917139181391913920139211392213923139241392513926139271392813929139301393113932139331393413935139361393713938139391394013941139421394313944139451394613947139481394913950139511395213953139541395513956139571395813959139601396113962139631396413965139661396713968139691397013971139721397313974139751397613977139781397913980139811398213983139841398513986139871398813989139901399113992139931399413995139961399713998139991400014001140021400314004140051400614007140081400914010140111401214013140141401514016140171401814019140201402114022140231402414025140261402714028140291403014031140321403314034140351403614037140381403914040140411404214043140441404514046140471404814049140501405114052140531405414055140561405714058140591406014061140621406314064140651406614067140681406914070140711407214073140741407514076140771407814079140801408114082140831408414085140861408714088140891409014091140921409314094140951409614097140981409914100141011410214103141041410514106141071410814109141101411114112141131411414115141161411714118141191412014121141221412314124141251412614127141281412914130141311413214133141341413514136141371413814139141401414114142141431414414145141461414714148141491415014151141521415314154141551415614157141581415914160141611416214163141641416514166141671416814169141701417114172141731417414175141761417714178141791418014181141821418314184141851418614187141881418914190141911419214193141941419514196141971419814199142001420114202142031420414205142061420714208142091421014211142121421314214142151421614217142181421914220142211422214223142241422514226142271422814229142301423114232142331423414235142361423714238142391424014241142421424314244142451424614247142481424914250142511425214253142541425514256142571425814259142601426114262142631426414265142661426714268142691427014271142721427314274142751427614277142781427914280142811428214283142841428514286142871428814289142901429114292142931429414295142961429714298142991430014301143021430314304143051430614307143081430914310143111431214313143141431514316143171431814319143201432114322143231432414325143261432714328143291433014331143321433314334143351433614337143381433914340143411434214343143441434514346143471434814349143501435114352143531435414355143561435714358143591436014361143621436314364143651436614367143681436914370143711437214373143741437514376143771437814379143801438114382143831438414385143861438714388143891439014391143921439314394143951439614397143981439914400144011440214403144041440514406144071440814409144101441114412144131441414415144161441714418144191442014421144221442314424144251442614427144281442914430144311443214433144341443514436144371443814439144401444114442144431444414445144461444714448144491445014451144521445314454144551445614457144581445914460144611446214463144641446514466144671446814469144701447114472144731447414475144761447714478144791448014481144821448314484144851448614487144881448914490144911449214493144941449514496144971449814499145001450114502145031450414505145061450714508145091451014511145121451314514145151451614517145181451914520145211452214523145241452514526145271452814529145301453114532145331453414535145361453714538145391454014541145421454314544145451454614547145481454914550145511455214553145541455514556145571455814559145601456114562145631456414565145661456714568145691457014571145721457314574145751457614577145781457914580145811458214583145841458514586145871458814589145901459114592145931459414595145961459714598145991460014601146021460314604146051460614607146081460914610146111461214613146141461514616146171461814619146201462114622146231462414625146261462714628146291463014631146321463314634146351463614637146381463914640146411464214643146441464514646146471464814649146501465114652146531465414655146561465714658146591466014661146621466314664146651466614667146681466914670146711467214673146741467514676146771467814679146801468114682146831468414685146861468714688146891469014691146921469314694146951469614697146981469914700147011470214703147041470514706147071470814709147101471114712147131471414715147161471714718147191472014721147221472314724147251472614727147281472914730147311473214733147341473514736147371473814739147401474114742147431474414745147461474714748147491475014751147521475314754147551475614757147581475914760147611476214763147641476514766147671476814769147701477114772147731477414775147761477714778147791478014781147821478314784147851478614787147881478914790147911479214793147941479514796147971479814799148001480114802148031480414805148061480714808148091481014811148121481314814148151481614817148181481914820148211482214823148241482514826148271482814829148301483114832148331483414835148361483714838148391484014841148421484314844148451484614847148481484914850148511485214853148541485514856148571485814859148601486114862148631486414865148661486714868148691487014871148721487314874148751487614877148781487914880148811488214883148841488514886148871488814889148901489114892148931489414895148961489714898148991490014901149021490314904149051490614907149081490914910149111491214913149141491514916149171491814919149201492114922149231492414925149261492714928149291493014931149321493314934149351493614937149381493914940149411494214943149441494514946149471494814949149501495114952149531495414955149561495714958149591496014961149621496314964149651496614967149681496914970149711497214973149741497514976149771497814979149801498114982149831498414985149861498714988149891499014991149921499314994149951499614997149981499915000150011500215003150041500515006150071500815009150101501115012150131501415015150161501715018150191502015021150221502315024150251502615027150281502915030150311503215033150341503515036150371503815039150401504115042150431504415045150461504715048150491505015051150521505315054150551505615057150581505915060150611506215063150641506515066150671506815069150701507115072150731507415075150761507715078150791508015081150821508315084150851508615087150881508915090150911509215093150941509515096150971509815099151001510115102151031510415105151061510715108151091511015111151121511315114151151511615117151181511915120151211512215123151241512515126151271512815129151301513115132151331513415135151361513715138151391514015141151421514315144151451514615147151481514915150151511515215153151541515515156151571515815159151601516115162151631516415165151661516715168151691517015171151721517315174151751517615177151781517915180151811518215183151841518515186151871518815189151901519115192151931519415195151961519715198151991520015201152021520315204152051520615207152081520915210152111521215213152141521515216152171521815219152201522115222152231522415225152261522715228152291523015231152321523315234152351523615237152381523915240152411524215243152441524515246152471524815249152501525115252152531525415255152561525715258152591526015261152621526315264152651526615267152681526915270152711527215273152741527515276152771527815279152801528115282152831528415285152861528715288152891529015291152921529315294152951529615297152981529915300153011530215303153041530515306153071530815309153101531115312153131531415315153161531715318153191532015321153221532315324153251532615327153281532915330153311533215333153341533515336153371533815339153401534115342153431534415345153461534715348153491535015351153521535315354153551535615357153581535915360153611536215363153641536515366153671536815369153701537115372153731537415375153761537715378153791538015381153821538315384153851538615387153881538915390153911539215393153941539515396153971539815399154001540115402154031540415405154061540715408154091541015411154121541315414154151541615417154181541915420154211542215423154241542515426154271542815429154301543115432154331543415435154361543715438154391544015441154421544315444154451544615447154481544915450154511545215453154541545515456154571545815459154601546115462154631546415465154661546715468154691547015471154721547315474154751547615477154781547915480154811548215483154841548515486154871548815489154901549115492154931549415495154961549715498154991550015501155021550315504155051550615507155081550915510155111551215513155141551515516155171551815519155201552115522155231552415525155261552715528155291553015531155321553315534155351553615537155381553915540155411554215543155441554515546155471554815549155501555115552155531555415555155561555715558155591556015561155621556315564155651556615567155681556915570155711557215573155741557515576155771557815579155801558115582155831558415585155861558715588155891559015591155921559315594155951559615597155981559915600156011560215603156041560515606156071560815609156101561115612156131561415615156161561715618156191562015621156221562315624156251562615627156281562915630156311563215633156341563515636156371563815639156401564115642156431564415645156461564715648156491565015651156521565315654156551565615657156581565915660156611566215663156641566515666156671566815669156701567115672156731567415675156761567715678156791568015681156821568315684156851568615687156881568915690156911569215693156941569515696156971569815699157001570115702157031570415705157061570715708157091571015711157121571315714157151571615717157181571915720157211572215723157241572515726157271572815729157301573115732157331573415735157361573715738157391574015741157421574315744157451574615747157481574915750157511575215753157541575515756157571575815759157601576115762157631576415765157661576715768157691577015771157721577315774157751577615777157781577915780157811578215783157841578515786157871578815789157901579115792157931579415795157961579715798157991580015801158021580315804158051580615807158081580915810158111581215813158141581515816158171581815819158201582115822158231582415825158261582715828158291583015831158321583315834158351583615837158381583915840158411584215843158441584515846158471584815849158501585115852158531585415855158561585715858158591586015861158621586315864158651586615867158681586915870158711587215873158741587515876158771587815879158801588115882158831588415885158861588715888158891589015891158921589315894158951589615897158981589915900159011590215903159041590515906159071590815909159101591115912159131591415915159161591715918159191592015921159221592315924159251592615927159281592915930159311593215933159341593515936159371593815939159401594115942159431594415945159461594715948159491595015951159521595315954159551595615957159581595915960159611596215963159641596515966159671596815969159701597115972159731597415975159761597715978159791598015981159821598315984159851598615987159881598915990159911599215993159941599515996159971599815999160001600116002160031600416005160061600716008160091601016011160121601316014160151601616017160181601916020160211602216023160241602516026160271602816029160301603116032160331603416035160361603716038160391604016041160421604316044160451604616047160481604916050160511605216053160541605516056160571605816059160601606116062160631606416065160661606716068160691607016071160721607316074160751607616077160781607916080160811608216083160841608516086160871608816089160901609116092160931609416095160961609716098160991610016101161021610316104161051610616107161081610916110161111611216113161141611516116161171611816119161201612116122161231612416125161261612716128161291613016131161321613316134161351613616137161381613916140161411614216143161441614516146161471614816149161501615116152161531615416155161561615716158161591616016161161621616316164161651616616167161681616916170161711617216173161741617516176161771617816179161801618116182161831618416185161861618716188161891619016191161921619316194161951619616197161981619916200162011620216203162041620516206162071620816209162101621116212162131621416215162161621716218162191622016221162221622316224162251622616227162281622916230162311623216233162341623516236162371623816239162401624116242162431624416245162461624716248162491625016251162521625316254162551625616257162581625916260162611626216263162641626516266162671626816269162701627116272162731627416275162761627716278162791628016281162821628316284162851628616287162881628916290162911629216293162941629516296162971629816299163001630116302163031630416305163061630716308163091631016311163121631316314163151631616317163181631916320163211632216323163241632516326163271632816329163301633116332163331633416335163361633716338163391634016341163421634316344163451634616347163481634916350163511635216353163541635516356163571635816359163601636116362163631636416365163661636716368163691637016371163721637316374163751637616377163781637916380163811638216383163841638516386163871638816389163901639116392163931639416395163961639716398163991640016401164021640316404164051640616407164081640916410164111641216413164141641516416164171641816419164201642116422164231642416425164261642716428164291643016431164321643316434164351643616437164381643916440164411644216443164441644516446164471644816449164501645116452164531645416455164561645716458164591646016461164621646316464164651646616467164681646916470164711647216473164741647516476164771647816479164801648116482164831648416485164861648716488164891649016491164921649316494164951649616497164981649916500165011650216503165041650516506165071650816509165101651116512165131651416515165161651716518165191652016521165221652316524165251652616527165281652916530165311653216533165341653516536165371653816539165401654116542165431654416545165461654716548165491655016551165521655316554165551655616557165581655916560165611656216563165641656516566165671656816569165701657116572165731657416575165761657716578165791658016581165821658316584165851658616587165881658916590165911659216593165941659516596165971659816599166001660116602166031660416605166061660716608166091661016611166121661316614166151661616617166181661916620166211662216623166241662516626166271662816629166301663116632166331663416635166361663716638166391664016641166421664316644166451664616647166481664916650166511665216653166541665516656166571665816659166601666116662166631666416665166661666716668166691667016671166721667316674166751667616677166781667916680166811668216683166841668516686166871668816689166901669116692166931669416695166961669716698166991670016701167021670316704167051670616707167081670916710167111671216713167141671516716167171671816719167201672116722167231672416725167261672716728167291673016731167321673316734167351673616737167381673916740167411674216743167441674516746167471674816749167501675116752167531675416755167561675716758167591676016761167621676316764167651676616767167681676916770167711677216773167741677516776167771677816779167801678116782167831678416785167861678716788167891679016791167921679316794167951679616797167981679916800168011680216803168041680516806168071680816809168101681116812168131681416815168161681716818168191682016821168221682316824168251682616827168281682916830168311683216833168341683516836168371683816839168401684116842168431684416845168461684716848168491685016851168521685316854168551685616857168581685916860168611686216863168641686516866168671686816869168701687116872168731687416875168761687716878168791688016881168821688316884168851688616887168881688916890168911689216893168941689516896168971689816899169001690116902169031690416905169061690716908169091691016911169121691316914169151691616917169181691916920169211692216923169241692516926169271692816929169301693116932169331693416935169361693716938169391694016941169421694316944169451694616947169481694916950169511695216953169541695516956169571695816959169601696116962169631696416965169661696716968169691697016971169721697316974169751697616977169781697916980169811698216983169841698516986169871698816989169901699116992169931699416995169961699716998169991700017001170021700317004170051700617007170081700917010170111701217013170141701517016170171701817019170201702117022170231702417025170261702717028170291703017031170321703317034170351703617037170381703917040170411704217043170441704517046170471704817049170501705117052170531705417055170561705717058170591706017061170621706317064170651706617067170681706917070170711707217073170741707517076170771707817079170801708117082170831708417085170861708717088170891709017091170921709317094170951709617097170981709917100171011710217103171041710517106171071710817109171101711117112171131711417115171161711717118171191712017121171221712317124171251712617127171281712917130171311713217133171341713517136171371713817139171401714117142171431714417145171461714717148171491715017151171521715317154171551715617157171581715917160171611716217163171641716517166171671716817169171701717117172171731717417175171761717717178171791718017181171821718317184171851718617187171881718917190171911719217193171941719517196171971719817199172001720117202172031720417205172061720717208172091721017211172121721317214172151721617217172181721917220172211722217223172241722517226172271722817229172301723117232172331723417235172361723717238172391724017241172421724317244172451724617247172481724917250172511725217253172541725517256172571725817259172601726117262172631726417265172661726717268172691727017271172721727317274172751727617277172781727917280172811728217283172841728517286172871728817289172901729117292172931729417295172961729717298172991730017301173021730317304173051730617307173081730917310173111731217313173141731517316173171731817319173201732117322173231732417325173261732717328173291733017331173321733317334173351733617337173381733917340173411734217343173441734517346173471734817349173501735117352173531735417355173561735717358173591736017361173621736317364173651736617367173681736917370173711737217373173741737517376173771737817379173801738117382173831738417385173861738717388173891739017391173921739317394173951739617397173981739917400174011740217403174041740517406174071740817409174101741117412174131741417415174161741717418174191742017421174221742317424174251742617427174281742917430174311743217433174341743517436174371743817439174401744117442174431744417445174461744717448174491745017451174521745317454174551745617457174581745917460174611746217463174641746517466174671746817469174701747117472174731747417475174761747717478174791748017481174821748317484174851748617487174881748917490174911749217493174941749517496174971749817499175001750117502175031750417505175061750717508175091751017511175121751317514175151751617517175181751917520175211752217523175241752517526175271752817529175301753117532175331753417535175361753717538175391754017541175421754317544175451754617547175481754917550175511755217553175541755517556175571755817559175601756117562175631756417565175661756717568175691757017571175721757317574175751757617577175781757917580175811758217583175841758517586175871758817589175901759117592175931759417595175961759717598175991760017601176021760317604176051760617607176081760917610176111761217613176141761517616176171761817619176201762117622176231762417625176261762717628176291763017631176321763317634176351763617637176381763917640176411764217643176441764517646176471764817649176501765117652176531765417655176561765717658176591766017661176621766317664176651766617667176681766917670176711767217673176741767517676176771767817679176801768117682176831768417685176861768717688176891769017691176921769317694176951769617697176981769917700177011770217703177041770517706177071770817709177101771117712177131771417715177161771717718177191772017721177221772317724177251772617727177281772917730177311773217733177341773517736177371773817739177401774117742177431774417745177461774717748177491775017751177521775317754177551775617757177581775917760177611776217763177641776517766177671776817769177701777117772177731777417775177761777717778177791778017781177821778317784177851778617787177881778917790177911779217793177941779517796177971779817799178001780117802178031780417805178061780717808178091781017811178121781317814178151781617817178181781917820178211782217823178241782517826178271782817829178301783117832178331783417835178361783717838178391784017841178421784317844178451784617847178481784917850178511785217853178541785517856178571785817859178601786117862178631786417865178661786717868178691787017871178721787317874178751787617877178781787917880178811788217883178841788517886178871788817889178901789117892178931789417895178961789717898178991790017901179021790317904179051790617907179081790917910179111791217913179141791517916179171791817919179201792117922179231792417925179261792717928179291793017931179321793317934179351793617937179381793917940179411794217943179441794517946179471794817949179501795117952179531795417955179561795717958179591796017961179621796317964179651796617967179681796917970179711797217973179741797517976179771797817979179801798117982179831798417985179861798717988179891799017991179921799317994179951799617997179981799918000180011800218003180041800518006180071800818009180101801118012180131801418015180161801718018180191802018021180221802318024180251802618027180281802918030180311803218033180341803518036180371803818039180401804118042180431804418045180461804718048180491805018051180521805318054180551805618057180581805918060180611806218063180641806518066180671806818069180701807118072180731807418075180761807718078180791808018081180821808318084180851808618087180881808918090180911809218093180941809518096180971809818099181001810118102181031810418105181061810718108181091811018111181121811318114181151811618117181181811918120181211812218123181241812518126181271812818129181301813118132181331813418135181361813718138181391814018141181421814318144181451814618147181481814918150181511815218153181541815518156181571815818159181601816118162181631816418165181661816718168181691817018171181721817318174181751817618177181781817918180181811818218183181841818518186181871818818189181901819118192181931819418195181961819718198181991820018201182021820318204182051820618207182081820918210182111821218213182141821518216182171821818219182201822118222182231822418225182261822718228182291823018231182321823318234182351823618237182381823918240182411824218243182441824518246182471824818249182501825118252182531825418255182561825718258182591826018261182621826318264182651826618267182681826918270182711827218273182741827518276182771827818279182801828118282182831828418285182861828718288182891829018291182921829318294182951829618297182981829918300183011830218303183041830518306183071830818309183101831118312183131831418315183161831718318183191832018321183221832318324183251832618327183281832918330183311833218333183341833518336183371833818339183401834118342183431834418345183461834718348183491835018351183521835318354183551835618357183581835918360183611836218363183641836518366183671836818369183701837118372183731837418375183761837718378183791838018381183821838318384183851838618387183881838918390183911839218393183941839518396183971839818399184001840118402184031840418405184061840718408184091841018411184121841318414184151841618417184181841918420184211842218423184241842518426184271842818429184301843118432184331843418435184361843718438184391844018441184421844318444184451844618447184481844918450184511845218453184541845518456184571845818459184601846118462184631846418465184661846718468184691847018471184721847318474184751847618477184781847918480184811848218483184841848518486184871848818489184901849118492184931849418495184961849718498184991850018501185021850318504185051850618507185081850918510185111851218513185141851518516185171851818519185201852118522185231852418525185261852718528185291853018531185321853318534185351853618537185381853918540185411854218543185441854518546185471854818549185501855118552185531855418555185561855718558185591856018561185621856318564185651856618567185681856918570185711857218573185741857518576185771857818579185801858118582185831858418585185861858718588185891859018591185921859318594185951859618597185981859918600186011860218603186041860518606186071860818609186101861118612186131861418615186161861718618186191862018621186221862318624186251862618627186281862918630186311863218633186341863518636186371863818639186401864118642186431864418645186461864718648186491865018651186521865318654186551865618657186581865918660186611866218663186641866518666186671866818669186701867118672186731867418675186761867718678186791868018681186821868318684186851868618687186881868918690186911869218693186941869518696186971869818699187001870118702187031870418705187061870718708187091871018711187121871318714187151871618717187181871918720187211872218723187241872518726187271872818729187301873118732187331873418735187361873718738187391874018741187421874318744187451874618747187481874918750187511875218753187541875518756187571875818759187601876118762187631876418765187661876718768187691877018771187721877318774187751877618777187781877918780187811878218783187841878518786187871878818789187901879118792187931879418795187961879718798187991880018801188021880318804188051880618807188081880918810188111881218813188141881518816188171881818819188201882118822188231882418825188261882718828188291883018831188321883318834188351883618837188381883918840188411884218843188441884518846188471884818849188501885118852188531885418855188561885718858188591886018861188621886318864188651886618867188681886918870188711887218873188741887518876188771887818879188801888118882188831888418885188861888718888188891889018891188921889318894188951889618897188981889918900189011890218903189041890518906189071890818909189101891118912189131891418915189161891718918189191892018921189221892318924189251892618927189281892918930189311893218933189341893518936189371893818939189401894118942189431894418945189461894718948189491895018951189521895318954189551895618957189581895918960189611896218963189641896518966189671896818969189701897118972189731897418975189761897718978189791898018981189821898318984189851898618987189881898918990189911899218993189941899518996189971899818999190001900119002190031900419005190061900719008190091901019011190121901319014190151901619017190181901919020190211902219023190241902519026190271902819029190301903119032190331903419035190361903719038190391904019041190421904319044190451904619047190481904919050190511905219053190541905519056190571905819059190601906119062190631906419065190661906719068190691907019071190721907319074190751907619077190781907919080190811908219083190841908519086190871908819089190901909119092190931909419095190961909719098190991910019101191021910319104191051910619107191081910919110191111911219113191141911519116191171911819119191201912119122191231912419125191261912719128191291913019131191321913319134191351913619137191381913919140191411914219143191441914519146191471914819149191501915119152191531915419155191561915719158191591916019161191621916319164191651916619167191681916919170191711917219173191741917519176191771917819179191801918119182191831918419185191861918719188191891919019191191921919319194191951919619197191981919919200192011920219203192041920519206192071920819209192101921119212192131921419215192161921719218192191922019221192221922319224192251922619227192281922919230192311923219233192341923519236192371923819239192401924119242192431924419245192461924719248192491925019251192521925319254192551925619257192581925919260192611926219263192641926519266192671926819269192701927119272192731927419275192761927719278192791928019281192821928319284192851928619287192881928919290192911929219293192941929519296192971929819299193001930119302193031930419305193061930719308193091931019311193121931319314193151931619317193181931919320193211932219323193241932519326193271932819329193301933119332193331933419335193361933719338193391934019341193421934319344193451934619347193481934919350193511935219353193541935519356193571935819359193601936119362193631936419365193661936719368193691937019371193721937319374193751937619377193781937919380193811938219383193841938519386193871938819389193901939119392193931939419395193961939719398193991940019401194021940319404194051940619407194081940919410194111941219413194141941519416194171941819419194201942119422194231942419425194261942719428194291943019431194321943319434194351943619437194381943919440194411944219443194441944519446194471944819449194501945119452194531945419455194561945719458194591946019461194621946319464194651946619467194681946919470194711947219473194741947519476194771947819479194801948119482194831948419485194861948719488194891949019491194921949319494194951949619497194981949919500195011950219503195041950519506195071950819509195101951119512195131951419515195161951719518195191952019521195221952319524195251952619527195281952919530195311953219533195341953519536195371953819539195401954119542195431954419545195461954719548195491955019551195521955319554195551955619557195581955919560195611956219563195641956519566195671956819569195701957119572195731957419575195761957719578195791958019581195821958319584195851958619587195881958919590195911959219593195941959519596195971959819599196001960119602196031960419605196061960719608196091961019611196121961319614196151961619617196181961919620196211962219623196241962519626196271962819629196301963119632196331963419635196361963719638196391964019641196421964319644196451964619647196481964919650196511965219653196541965519656196571965819659196601966119662196631966419665196661966719668196691967019671196721967319674196751967619677196781967919680196811968219683196841968519686196871968819689196901969119692196931969419695196961969719698196991970019701197021970319704197051970619707197081970919710197111971219713197141971519716197171971819719197201972119722197231972419725197261972719728197291973019731197321973319734197351973619737197381973919740197411974219743197441974519746197471974819749197501975119752197531975419755197561975719758197591976019761197621976319764197651976619767197681976919770197711977219773197741977519776197771977819779197801978119782197831978419785197861978719788197891979019791197921979319794197951979619797197981979919800198011980219803198041980519806198071980819809198101981119812198131981419815198161981719818198191982019821198221982319824198251982619827198281982919830198311983219833198341983519836198371983819839198401984119842198431984419845198461984719848198491985019851198521985319854198551985619857198581985919860198611986219863198641986519866198671986819869198701987119872198731987419875198761987719878198791988019881198821988319884198851988619887198881988919890198911989219893198941989519896198971989819899199001990119902199031990419905199061990719908199091991019911199121991319914199151991619917199181991919920199211992219923199241992519926199271992819929199301993119932199331993419935199361993719938199391994019941199421994319944199451994619947199481994919950199511995219953199541995519956199571995819959199601996119962199631996419965199661996719968199691997019971199721997319974199751997619977199781997919980199811998219983199841998519986199871998819989199901999119992199931999419995199961999719998199992000020001200022000320004200052000620007200082000920010200112001220013200142001520016200172001820019200202002120022200232002420025200262002720028200292003020031200322003320034200352003620037200382003920040200412004220043200442004520046200472004820049200502005120052200532005420055200562005720058200592006020061200622006320064200652006620067200682006920070200712007220073200742007520076200772007820079200802008120082200832008420085200862008720088200892009020091200922009320094200952009620097200982009920100201012010220103201042010520106201072010820109201102011120112201132011420115201162011720118201192012020121201222012320124201252012620127201282012920130201312013220133201342013520136201372013820139201402014120142201432014420145201462014720148201492015020151201522015320154201552015620157201582015920160201612016220163201642016520166201672016820169201702017120172201732017420175201762017720178201792018020181201822018320184201852018620187201882018920190201912019220193201942019520196201972019820199202002020120202202032020420205202062020720208202092021020211202122021320214202152021620217202182021920220202212022220223202242022520226202272022820229202302023120232202332023420235202362023720238202392024020241202422024320244202452024620247202482024920250202512025220253202542025520256202572025820259202602026120262202632026420265202662026720268202692027020271202722027320274202752027620277202782027920280202812028220283202842028520286202872028820289202902029120292202932029420295202962029720298202992030020301203022030320304203052030620307203082030920310203112031220313203142031520316203172031820319203202032120322203232032420325203262032720328203292033020331203322033320334203352033620337203382033920340203412034220343203442034520346203472034820349203502035120352203532035420355203562035720358203592036020361203622036320364203652036620367203682036920370203712037220373203742037520376203772037820379203802038120382203832038420385203862038720388203892039020391203922039320394203952039620397203982039920400204012040220403204042040520406204072040820409204102041120412204132041420415204162041720418204192042020421204222042320424204252042620427204282042920430204312043220433204342043520436204372043820439204402044120442204432044420445204462044720448204492045020451204522045320454204552045620457204582045920460204612046220463204642046520466204672046820469204702047120472204732047420475204762047720478204792048020481204822048320484204852048620487204882048920490204912049220493204942049520496204972049820499205002050120502205032050420505205062050720508205092051020511205122051320514205152051620517205182051920520205212052220523205242052520526205272052820529205302053120532205332053420535205362053720538205392054020541205422054320544205452054620547205482054920550205512055220553205542055520556205572055820559205602056120562205632056420565205662056720568205692057020571205722057320574205752057620577205782057920580205812058220583205842058520586205872058820589205902059120592205932059420595205962059720598205992060020601206022060320604206052060620607206082060920610206112061220613206142061520616206172061820619206202062120622206232062420625206262062720628206292063020631206322063320634206352063620637206382063920640206412064220643206442064520646206472064820649206502065120652206532065420655206562065720658206592066020661206622066320664206652066620667206682066920670206712067220673206742067520676206772067820679206802068120682206832068420685
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <Script type="xscript4.0"><![CDATA[
  3. /********************************************************************************************************************/
  4. /************************* 본인부담 요율변경 대상 환자 ************************************************/
  5. /********************************************************************************************************************/
  6. // lf_getPrcpRcptInfo : 전자서명관련 모듈을 생성 및 초기화 한다.
  7. // lf_lisGetTitle : 화면의 타이틀명을 가져온다.
  8. /********************************************************************************************************************/
  9. /************************* 그리드 관련 ************************************************/
  10. /********************************************************************************************************************/
  11. // lf_lisClearStatus : 그리드의 상태값(i,d,u 등)의 값을 초기화한다.
  12. // fCOMLIS_ResultValidation : 결과저장시 유효성체크 & 서버로 전달할 자료 Flag변경
  13. // fCOMLIS_MicroResultValidation : 결과저장시 유효성체크 & 서버로 전달할 자료 Flag변경
  14. /********************************************************************************************************************/
  15. /************************* 시리얼바코드 출력 ************************************************/
  16. /********************************************************************************************************************/
  17. // lf_patNmBarCdLabel2 : 환자명 바코드를 출력 한다.
  18. // lf_lisSpcBarcodeLabelB : cross-matcing 바코드를 출력 한다.t
  19. // lf_lisSpcBarcodeLabel : 일반채혈 바코드를 출력 한다.
  20. // lf_lisPlgySpcBarcodeLabel : 병리채혈 바코드를 출력 한다.
  21. // lf_lisMicrobarcdLabel : 배지 바코드를 출력 한다.
  22. // lf_lisReagentBarcodeLabel : 시약 라벨을 출력한다.
  23. // lf_lisTnsrBarcodeLabel : 혈액은행 바코드 출력 혈액준비, 혈액불출시
  24. // lf_lisTnsrBarcodeLabel2 : 혈액은행 바코드 출력 혈액준비, 혈액불출시
  25. // lf_lisSpcSlideLabelPrint : 혈액은행 바코드 출력 혈액준비, 혈액불출시
  26. // lf_lisQCBarcodePrint : QC정도관리 바코드출력, 접수시
  27. // lf_getLISUserInfo : 로그인 LIS사용자정보 조회
  28. /********************************************************************************************************************/
  29. /************************* CVR발송 ************************************************/
  30. /********************************************************************************************************************/
  31. // lf_sendMessage : CVR발송
  32. /**********************************************************************************
  33. * 함수명 : lf_getPrcpRcptInfo
  34. * 설명 : 외래채혈,환자별채혈 화면에서 본인부담요율변경 대상자 확인 - 원무 수납 재정산 안내 메시지 및 메시지 출력 여부.
  35. * argument : instcd - 기관코드
  36. pid - 등록번호
  37. flagvalue - 처방분류코드
  38. flag - 1(oprc.prcpclscd)
  39. * return Type : String
  40. **********************************************************************************/
  41. include "com_commodulexp::SSZFM00901.xjs"
  42. function lf_getPrcpRcptInfo(instcd, pid, flagvalue, flag){
  43. trace("lf_getPrcpRcptInfo :"+instcd+"/"+pid+"/"+flagvalue+"/"+flag);
  44. if(ds_init_lb8001.getColumn(0,"nm") == "Y"){
  45. dsf_createDs("ds_prcpRcptChk"
  46. , [{col: "prcprcptyn"}]);
  47. var sInDsName = dsf_createDsRow("ds_temp2_search"
  48. , [{col: "instcd", val: instcd}
  49. , {col: "pid", val: pid}
  50. , {col: "flagvalue", val: flagvalue}
  51. , {col: "flag", val: flag}]);
  52. tranf_submit({
  53. id: "TRAEA01100"
  54. , service: "pamcomnapp.PamComn"
  55. , method: "get0701GosiPrcpRcptChk"
  56. , inds : "cond="+sInDsName
  57. , outds: "ds_prcpRcptChk=prcprcptyn"
  58. , async: false
  59. , error: false
  60. });
  61. if(ds_prcpRcptChk.getColumn(0,"prcprcptyn") == "Y"
  62. && ds_init_lb8001.getColumn(0,"nm") == "Y"
  63. && frmf_getMenuParam() != "V"){
  64. sysf_messageBox(ds_init_lb8001.getColumn(0,"etc01"),"I");
  65. }
  66. }
  67. }
  68. /**********************************************************************************
  69. * 함수명 : lf_lisGetTitle
  70. * 설명 : 화면의 타이틀명을 가져온다.
  71. * argument :
  72. * return Type : String - 타이틀명
  73. **********************************************************************************/
  74. function lf_lisGetTitle(obj:Form){
  75. var sTitleName = "";
  76. var sSysteminstnm = sysf_getUserInfo("systeminstnm");
  77. if(!frmf_isPopup()){
  78. var sMainTitle = "";
  79. var sTitleName = parent.bgv_sTitleText;
  80. }else{
  81. if(!utlf_isNull(bgv_objScreenInfo.menuitemnm)){
  82. sTitleName += bgv_objScreenInfo.menuitemnm
  83. }else if(!utlf_isNull(obj.titletext)){
  84. sTitleName += obj.titletext;
  85. }else{
  86. sTitleName += frmplgv_titleName;
  87. }
  88. if(sTitleName.indexOf("(S") > -1){
  89. sTitleName = sTitleName.substr(0,sTitleName.indexOf("(S"));
  90. }
  91. }
  92. return sTitleName;
  93. }
  94. /**********************************************************************************
  95. * 함수명 : lf_lisClearStatus
  96. * 설명 : 그리드의 상태값을 초기화한다.
  97. * argument : ref : 초기화시킬 그리드의 ID
  98. * return Type : N/A
  99. **********************************************************************************/
  100. function lf_lisClearStatus(ref){
  101. var arrPostion = new Array();
  102. for(i=0;i<ref.rowcount;i++){
  103. arrPostion[i] = i;
  104. }
  105. grdf_setStatus(ref, "", arrPostion);
  106. }
  107. /**********************************************************************************
  108. * 함수명 : lf_patNmBarCdLabel2
  109. * 설명 : 외래채혈,병동채혈,환자별채혈 화면에서 환자명바코드를 출력한다.
  110. * argument : ref - 출력할 바코드정보 Dataset
  111. prntinfo - 바코드설정정보 Dataset
  112. **********************************************************************************/
  113. function lf_patNmBarCdLabel2(ref,prntinfo){
  114. var sPrntKind = prntinfo.getColumn(0,"prntkind"); //프린터종류
  115. var portOpenCheck = "";
  116. var iXPos = 0;
  117. var iYPos = 0;
  118. var sSndMsg = "";
  119. if (sPrntKind == 0) return;
  120. var sCommKind = utlf_transNullToEmpty(prntinfo.getColumn(0,"commkind"));
  121. var sLeftBank = utlf_transNullToEmpty(prntinfo.getColumn(0,"left")); //왼쪽여백
  122. var sTopBank = utlf_transNullToEmpty(prntinfo.getColumn(0,"top")); //위쪽여백
  123. if(sCommKind == "01") {
  124. var sSetUpVal = prntinfo.getColumn(0,"setupval"); //PRT LPT출력
  125. }
  126. else if(sCommKind == "02") { //COM serial출력
  127. var sComm = utlf_transNullToEmpty(prntinfo.getColumn(0,"comm")); //com port
  128. var sDataBit = utlf_transNullToEmpty(prntinfo.getColumn(0,"databit")); //data bit
  129. var sStopBit = utlf_transNullToEmpty(prntinfo.getColumn(0,"stopbit")); //stop bit
  130. var sBaudRate = utlf_transNullToEmpty(prntinfo.getColumn(0,"baudrate")); //baud rate
  131. var sParity = utlf_transNullToEmpty(prntinfo.getColumn(0,"parity")); //parity
  132. llz_objCommAX.CommPort = sComm;
  133. llz_objCommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  134. portOpenCheck = llz_objCommAX.PortOpen(true);
  135. //portOpenCheck = llz_objCommAX.PortOpen = true;
  136. }
  137. else if(sCommKind == "03") { //TCP/IP출력
  138. var sSetUpVal = prntinfo.getColumn(0,"setupval03");
  139. var sEqmtCD = prntinfo.getColumn(0,"eqmtcd");
  140. }
  141. if( (portOpenCheck == "TRUE" && sCommKind == "02")
  142. || sCommKind == "01"
  143. || sCommKind == "03"){
  144. var pid = utlf_transNullToEmpty(ref.getColumn(0,"pid")); //등록번호
  145. var patnm = utlf_transNullToEmpty(ref.getColumn(0,"patnm")); //환자명
  146. var patsexage = utlf_transNullToEmpty(ref.getColumn(0,"patsexage")); //성별/나이
  147. var rrgstno = utlf_transNullToEmpty(ref.getColumn(0,"rrgstno")); //주민등록번호
  148. var printdt = utlf_transNullToEmpty(ref.getColumn(0,"printdt")); //출력일시
  149. var orddeptcd = utlf_transNullToEmpty(ref.getColumn(0,"orddeptcd")); //병동/병실
  150. var wardroom = utlf_transNullToEmpty(ref.getColumn(0,"wardroom")); //진료과
  151. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  152. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  153. if(sPrntKind == "15") { //인터맥
  154. //프린터설정
  155. //sSndMsg += "SYSVAR(18)=0" + "\r\n"; //다변설정 기본:0
  156. sSndMsg += "SYSVAR(35)=1" + "\r\n"; //저장여부 0:영구저장,1:임시저장
  157. //sSndMsg += "LTS& OFF" + "\r\n"; //배치인쇄시 유용,기본 off
  158. sSndMsg += "INPUT OFF" + "\r\n"; //인터맥다이렉트프로토콜 비활성화
  159. //sSndMsg += "FORMAT INPUT \"STX\" , \"ETX\",\"CR\"" + "\r\n";
  160. //sSndMsg += "FORMAT INPUT CHR$(2),CHR$(3),CHR$(13)"; //layout run 명령어구문 정의
  161. sSndMsg += "LAYOUT INPUT " +"\"" + "tmp:LBLSOFT.LAY" + "\"" + "\r\n"; //layout구성 시작
  162. sSndMsg += "NASC -2:AN 7" + "\r\n"; //캐릭터셋지정 -2:ANSI : 위치지정 7:좌측상단
  163. //sSndMsg += "CLIP OFF" + "\r\n"; //인쇄바같부분 비활성화 기본 :off
  164. //sSndMsg += "CLIP BARCODE OFF" + "\r\n";//인쇄바같부분 비활성화 기본 :off
  165. //sSndMsg += "XORMODE OFF" + "\r\n"; //교차필드인쇄부분 기본:off
  166. //sSndMsg += "MAG 1,1" + "\r\n"; 확대:높이,폭 기본 1,1
  167. //출력일시(캡션)
  168. iXPos = Number(sLeftBank) + 20;
  169. iYPos = Number(sTopBank) + 280;
  170. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + "출력일시 : " + "\"" + "\r\n";
  171. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,9,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  172. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  173. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  174. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  175. sSndMsg += "PT " +"\"" + "출력일시" +"\"" + "\r\n"; //입력데이터제공
  176. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  177. //sSndMsg += "PF " + "\r\n"; //인쇄
  178. //출력일시
  179. iXPos = Number(sLeftBank) + 180;
  180. iYPos = Number(sTopBank) + 256;
  181. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,8:NI:PT " +"\"" + printdt + "\"" + "\r\n";
  182. //환자명
  183. iXPos = Number(sLeftBank) + 20;
  184. iYPos = Number(sTopBank) + 250;
  185. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,16,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  186. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  187. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  188. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  189. sSndMsg += "PT " +"\"" + patnm +"\"" + "\r\n"; //입력데이터제공
  190. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  191. //sSndMsg += "PF " + "\r\n"; //인쇄
  192. //성별/나이
  193. iXPos = Number(sLeftBank) + 280;
  194. iYPos = Number(sTopBank) + 232;
  195. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,8:NI:PT " +"\"" + patsexage + "\"" + "\r\n";
  196. //병동/병실
  197. iXPos = Number(sLeftBank) + 280;
  198. if(wardroom == "외래") {
  199. iYPos = Number(sTopBank) + 230;
  200. }
  201. else{
  202. iYPos = Number(sTopBank) + 210;
  203. }
  204. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + wardroom + "\"" + "\r\n";
  205. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,9,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  206. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  207. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  208. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  209. sSndMsg += "PT " +"\"" + wardroom +"\"" + "\r\n"; //입력데이터제공
  210. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  211. //sSndMsg += "PF " + "\r\n"; //인쇄
  212. //진료과
  213. iXPos = Number(sLeftBank) + 280;
  214. iYPos = Number(sTopBank) + 184;
  215. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,8:NI:PT " +"\"" + orddeptcd + "\"" + "\r\n";
  216. //등록번호
  217. iXPos = Number(sLeftBank) + 20;
  218. iYPos = Number(sTopBank) + 170;
  219. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,12:NI:PT " +"\"" + pid + "\"" + "\r\n";
  220. //주민번호 생년월일
  221. iXPos = Number(sLeftBank) + 280;
  222. iYPos = Number(sTopBank) + 160;
  223. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,8:NI:PT " +"\"" + rrgstno + "\"" + "\r\n";
  224. //등록번호바코드
  225. iXPos = Number(sLeftBank) + 20;
  226. iYPos = Number(sTopBank) + 136;
  227. sSndMsg += "PP " + iXPos + "," + iYPos + ":AN 7:DIR 1:BARSET " +"\"" + "CODE39" +"\"" + ",2,1,2,101:PB " + "\"" + pid + "\"" + "\r\n";
  228. //출력
  229. sSndMsg += "LAYOUT END" + "\r\n"; //레이아웃구성을 중지하고 저장
  230. sSndMsg += "LAYOUT RUN " +"\"" + "tmp:LBLSOFT.LAY" +"\"" + "\r\n"; //레이아웃시작
  231. sSndMsg += "INPUT ON" + "\r\n"; //인터맥다이렉트 프로토콜 활성화
  232. sSndMsg += "PF " + "\r\n"; //인쇄
  233. sSndMsg += "PRINT KEY OFF" + "\r\n"; //프린트버튼 비활성화
  234. if(sCommKind == "01") {
  235. llz_objCommAX.SendMessageToLPT(sSndMsg);
  236. //llz_objCommAX.Output = sSndMsg;
  237. sSndMsg = "";
  238. }
  239. else if(sCommKind == "02") {
  240. llz_objCommAX.SendMessage(sSndMsg);
  241. //llz_objCommAX.Output = sSndMsg;
  242. sSndMsg = "";
  243. }
  244. }
  245. else if(sPrntKind == "16") { //루칸
  246. //프린터설정
  247. sSndMsg += "N" + "\r\n"; //이미지버퍼내용삭제
  248. sSndMsg += "Q256,24" + "\r\n"; //용지세로 32mm,용지사이여백3mm
  249. sSndMsg += "q432" + "\r\n"; //용지가로54mm
  250. //출력일시(캡션)
  251. iXPos = Number(sLeftBank) + 20;
  252. iYPos = Number(sTopBank) + 0;
  253. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + "출력일시 : " + "\"" + "\r\n";
  254. //출력일시
  255. iXPos = Number(sLeftBank) + 160;
  256. iYPos = Number(sTopBank) + 0;
  257. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + printdt + "\"" + "\r\n";
  258. //환자명
  259. iXPos = Number(sLeftBank) + 20;
  260. iYPos = Number(sTopBank) + 24;
  261. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,2,2,N," + "\"" + patnm + "\"" + "\r\n";
  262. //성별/나이
  263. iXPos = Number(sLeftBank) + 280;
  264. iYPos = Number(sTopBank) + 24;
  265. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + patsexage + "\"" + "\r\n";
  266. //진료과
  267. iXPos = Number(sLeftBank) + 280;
  268. iYPos = Number(sTopBank) + 48;
  269. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + wardroom + "\"" + "\r\n";
  270. //병동/병실
  271. XPos = Number(sLeftBank) + 280;
  272. iYPos = Number(sTopBank) + 72;
  273. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + orddeptcd + "\"" + "\r\n";
  274. //등록번호
  275. iXPos = Number(sLeftBank) + 280;
  276. iYPos = Number(sTopBank) + 96;
  277. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + pid + "\"" + "\r\n";
  278. //등록번호바코드
  279. iXPos = Number(sLeftBank) + 20;
  280. iYPos = Number(sTopBank) + 120;
  281. sSndMsg += "B" + iXPos + "," + iYPos + "," + "0,3,2,4,101,N," + "\"" + pid + "\"" + "\r\n";
  282. //출력
  283. sSndMsg += "P1"+ "\r\n";
  284. if(sCommKind == "01") {
  285. llz_objCommAX.SendMessageToLPT(sSndMsg);
  286. //llz_objCommAX.Output = sSndMsg;
  287. sSndMsg = "";
  288. }
  289. else if(sCommKind == "02") {
  290. llz_objCommAX.SendMessage(sSndMsg);
  291. //llz_objCommAX.Output = sSndMsg;
  292. sSndMsg = "";
  293. }
  294. }
  295. else if(sPrntKind == "17") { //아르고스
  296. //프린터설정
  297. sSndMsg += "N" + "\r\n"; //이미지버퍼내용삭제
  298. sSndMsg += "JF" + "\r\n"; //용지정렬
  299. sSndMsg += "Q256,24" + "\r\n"; //용지세로 32mm,용지사이여백3mm
  300. sSndMsg += "q432" + "\r\n"; //용지가로54mm
  301. //출력일시(캡션)
  302. iXPos = Number(sLeftBank) + 20;
  303. iYPos = Number(sTopBank) + 5;
  304. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + "출력일시 : " + "\"" + "\r\n";
  305. //출력일시
  306. iXPos = Number(sLeftBank) + 160;
  307. iYPos = Number(sTopBank) + 10;
  308. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + printdt + "\"" + "\r\n";
  309. //환자명
  310. iXPos = Number(sLeftBank) + 20;
  311. iYPos = Number(sTopBank) + 50;
  312. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,2,2,N," + "\"" + patnm + "\"" + "\r\n";
  313. //성별/나이
  314. iXPos = Number(sLeftBank) + 280;
  315. iYPos = Number(sTopBank) + 30;
  316. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + patsexage + "\"" + "\r\n";
  317. //병동/병실
  318. iXPos = Number(sLeftBank) + 280;
  319. iYPos = Number(sTopBank) + 54;
  320. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + wardroom + "\"" + "\r\n";
  321. //진료과
  322. XPos = Number(sLeftBank) + 280;
  323. iYPos = Number(sTopBank) + 78;
  324. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + orddeptcd + "\"" + "\r\n";
  325. //등록번호
  326. iXPos = Number(sLeftBank) + 280;
  327. iYPos = Number(sTopBank) + 102;
  328. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + pid + "\"" + "\r\n";
  329. //등록번호바코드
  330. iXPos = Number(sLeftBank) + 20;
  331. iYPos = Number(sTopBank) + 120;
  332. sSndMsg += "B" + iXPos + "," + iYPos + "," + "0,3,2,4,101,N," + "\"" + pid + "\"" + "\r\n";
  333. //출력
  334. sSndMsg += "P1"+ "\r\n";
  335. if(sCommKind == "01") {
  336. llz_objCommAX.SendMessageToLPT(sSndMsg);
  337. //llz_objCommAX.Output = sSndMsg;
  338. sSndMsg = "";
  339. }
  340. else if(sCommKind == "02") {
  341. trace(llz_objCommAX.SendMessage(sSndMsg));
  342. //llz_objCommAX.Output = sSndMsg;
  343. sSndMsg = "";
  344. }
  345. }
  346. if(sCommKind == "02") {
  347. //llz_objCommAX.PortOpen = false;
  348. portOpenCheck = llz_objCommAX.PortClose(true);
  349. }
  350. }else if(portOpenCheck == "FALSE" && sCommKind == "02"){
  351. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  352. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  353. + " \n 2.케이블 확인"
  354. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  355. return;
  356. }
  357. }
  358. /**********************************************************************************
  359. * 함수명 : lf_lisSpcBarcodeLabelB
  360. * 설명 : 채혈,cross-matcing화면에서 cross-matcing 바코드를 출력한다.
  361. * argument : ref - 출력할 바코드정보 Dataset
  362. prntinfo - 바코드설정정보 Dataset
  363. **********************************************************************************/
  364. function lf_lisSpcBarcodeLabelB(ref,prntinfo){
  365. var sPrntKind = prntinfo.getColumn(0,"prntkind"); //프린터종류
  366. var portOpenCheck = "";
  367. var iXPos = 0;
  368. var iYPos = 0;
  369. var sSndMsg = "";
  370. if (sPrntKind == 0) return;
  371. var sCommKind = utlf_transNullToEmpty(prntinfo.getColumn(0,"commkind"));
  372. var sLeftBank = utlf_transNullToEmpty(prntinfo.getColumn(0,"left")); //왼쪽여백
  373. var sTopBank = utlf_transNullToEmpty(prntinfo.getColumn(0,"top")); //위쪽여백
  374. if(sCommKind == "01") {
  375. var sSetUpVal = prntinfo.getColumn(0,"setupval"); //PRT LPT출력
  376. }
  377. else if(sCommKind == "02") { //COM serial출력
  378. var sComm = prntinfo.getColumn(0,"comm"); //com port
  379. var sDataBit = prntinfo.getColumn(0,"databit"); //data bit
  380. var sStopBit = prntinfo.getColumn(0,"stopbit"); //stop bit
  381. var sBaudRate = prntinfo.getColumn(0,"baudrate"); //baud rate
  382. var sParity = prntinfo.getColumn(0,"parity"); //parity
  383. llz_objCommAX.CommPort = sComm;
  384. llz_objCommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  385. //portOpenCheck = llz_objCommAX.PortOpen("true");
  386. portOpenCheck = llz_objCommAX.PortOpen(true);
  387. }
  388. else if(sCommKind == "03") { //TCP/IP출력
  389. var sSetUpVal = prntinfo.getColumn(0,"setupval03");
  390. var sEqmtCD = prntinfo.getColumn(0,"eqmtcd");
  391. }
  392. if( (portOpenCheck == "TRUE" && sCommKind == "02")
  393. || sCommKind == "01"
  394. || sCommKind == "03"){
  395. var roomcd = utlf_transNullToEmpty(ref.getColumn(0,"roomcd")); //병실코드
  396. var wardnm = utlf_transNullToEmpty(ref.getColumn(0,"wardnm")); //병동명
  397. var pid = utlf_transNullToEmpty(ref.getColumn(0,"pid")); //등록번호
  398. var patnm = utlf_transNullToEmpty(ref.getColumn(0,"patnm")); //환자명
  399. var patsex = utlf_transNullToEmpty(ref.getColumn(0,"patsex")); //환자성별
  400. var patage = utlf_transNullToEmpty(ref.getColumn(0,"patage")); //환자나이
  401. var orddeptcd = utlf_transNullToEmpty(ref.getColumn(0,"orddeptcd")); //진료과
  402. var bcollnm = utlf_transNullToEmpty(ref.getColumn(0,"bcollnm")); //채혈자
  403. var bcolldt = utlf_transNullToEmpty(ref.getColumn(0,"bcolldt")); //채혈일시
  404. var dt = utlf_transNullToEmpty(ref.getColumn(0,"dt")); //현재일시
  405. var btype = utlf_transNullToEmpty(ref.getColumn(0,"btype")); //혈액형
  406. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  407. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  408. if(sPrntKind == "15") { //인터맥
  409. //프린터설정
  410. //sSndMsg += "SYSVAR(18)=0" + "\r\n"; //다변설정 기본:0
  411. sSndMsg += "SYSVAR(35)=1" + "\r\n"; //저장여부 0:영구저장,1:임시저장
  412. //sSndMsg += "LTS& OFF" + "\r\n"; //배치인쇄시 유용,기본 off
  413. sSndMsg += "INPUT OFF" + "\r\n"; //인터맥다이렉트프로토콜 비활성화
  414. //sSndMsg += "FORMAT INPUT \"STX\" , \"ETX\",\"CR\"" + "\r\n";
  415. //sSndMsg += "FORMAT INPUT CHR$(2),CHR$(3),CHR$(13)"; //layout run 명령어구문 정의
  416. sSndMsg += "LAYOUT INPUT " +"\"" + "tmp:LBLSOFT.LAY" + "\"" + "\r\n"; //layout구성 시작
  417. sSndMsg += "NASC -2:AN 7" + "\r\n"; //캐릭터셋지정 -2:ANSI : 위치지정 7:좌측상단
  418. //sSndMsg += "CLIP OFF" + "\r\n"; //인쇄바같부분 비활성화 기본 :off
  419. //sSndMsg += "CLIP BARCODE OFF" + "\r\n";//인쇄바같부분 비활성화 기본 :off
  420. //sSndMsg += "XORMODE OFF" + "\r\n"; //교차필드인쇄부분 기본:off
  421. //sSndMsg += "MAG 1,1" + "\r\n"; 확대:높이,폭 기본 1,1
  422. //출력시각
  423. if(ref.getColumn(0,"reprint")=="1"){ //재출력 바코드일경우 음영처리 조건
  424. iXPos = Number(sLeftBank) + 200;
  425. iYPos = Number(sTopBank) + 256;
  426. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:II:PT " +"\"" + dt + "\"" + "\r\n";
  427. }else{
  428. iXPos = Number(sLeftBank) + 200;
  429. iYPos = Number(sTopBank) + 256;
  430. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + dt + "\"" + "\r\n";
  431. }
  432. //등록번호바코드
  433. iXPos = Number(sLeftBank) + 20;
  434. iYPos = Number(sTopBank) + 220;
  435. sSndMsg += "PP " + iXPos + "," + iYPos + ":AN 7:DIR 1:BARSET " +"\"" + "CODE39" +"\"" + ",2,1,2,101:PB " + "\"" + pid + "\"" + "\r\n";
  436. //ABO(Rh)
  437. //iXPos = Number(sLeftBank) + 20;
  438. //iYPos = Number(sTopBank) + 232;
  439. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + btype + "\"" + "\r\n";
  440. //등록번호
  441. iXPos = Number(sLeftBank) + 20;
  442. iYPos = Number(sTopBank) + 124;
  443. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + pid + "\"" + "\r\n";
  444. //환자명
  445. iXPos = Number(sLeftBank) + 270;
  446. iYPos = Number(sTopBank) + 124;
  447. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  448. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  449. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  450. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  451. sSndMsg += "PT " +"\"" + patnm +"\"" + "\r\n"; //입력데이터제공
  452. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  453. //sSndMsg += "PF " + "\r\n"; //인쇄
  454. //진료과/병실
  455. XPos = Number(sLeftBank) + 240;
  456. iYPos = Number(sTopBank) + 100;
  457. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + orddeptcd + "/" + roomcd + "\"" + "\r\n";
  458. //성별/나이
  459. iXPos = Number(sLeftBank) + 350;
  460. iYPos = Number(sTopBank) + 100;
  461. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + patsex + "/" + patage + "\"" + "\r\n";
  462. //X-Matching(캡션-역상표현)
  463. iXPos = Number(sLeftBank) + 20;
  464. iYPos = Number(sTopBank) + 52;
  465. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:II:PT " +"\"" + "X-Matching" + "\"" + "\r\n";
  466. //채혈자(캡션)
  467. iXPos = Number(sLeftBank) + 180;
  468. iYPos = Number(sTopBank) + 76;
  469. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  470. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  471. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  472. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  473. sSndMsg += "PT " +"\"" + "채혈자:" +"\"" + "\r\n"; //입력데이터제공
  474. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  475. //sSndMsg += "PF " + "\r\n"; //인쇄
  476. //확인자(캡션)
  477. iXPos = Number(sLeftBank) + 180;
  478. iYPos = Number(sTopBank) + 52;
  479. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  480. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  481. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  482. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  483. sSndMsg += "PT " +"\"" + "확인자:" +"\"" + "\r\n"; //입력데이터제공
  484. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  485. //sSndMsg += "PF " + "\r\n"; //인쇄
  486. //출력
  487. sSndMsg += "LAYOUT END" + "\r\n"; //레이아웃구성을 중지하고 저장
  488. sSndMsg += "LAYOUT RUN " +"\"" + "tmp:LBLSOFT.LAY" +"\"" + "\r\n"; //레이아웃시작
  489. sSndMsg += "INPUT ON" + "\r\n"; //인터맥다이렉트 프로토콜 활성화
  490. sSndMsg += "PF " + "\r\n"; //인쇄
  491. sSndMsg += "PRINT KEY OFF" + "\r\n"; //프린트버튼 비활성화
  492. if(sCommKind == "01") {
  493. llz_objCommAX.SendMessageToLPT(sSndMsg);
  494. sSndMsg = "";
  495. }
  496. else if(sCommKind == "02") {
  497. llz_objCommAX.SendMessage(sSndMsg);
  498. sSndMsg = "";
  499. }
  500. }
  501. else if(sPrntKind == "16") { //루칸
  502. //프린터설정
  503. sSndMsg += "N" + "\r\n"; //이미지버퍼내용삭제
  504. sSndMsg += "Q256,24" + "\r\n"; //용지세로 32mm,용지사이여백3mm
  505. sSndMsg += "q432" + "\r\n"; //용지가로54mm
  506. //출력시각
  507. if(ref.getColumn(0,"reprint")=="1"){ //재출력 바코드일경우 음영처리 조건
  508. iXPos = Number(sLeftBank) + 200;
  509. iYPos = Number(sTopBank) + 0;
  510. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,LE," + "\"" + dt + "\"" + "\r\n";
  511. }else{
  512. iXPos = Number(sLeftBank) + 200;
  513. iYPos = Number(sTopBank) + 0;
  514. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + dt + "\"" + "\r\n";
  515. }
  516. //등록번호바코드
  517. iXPos = Number(sLeftBank) + 20;
  518. iYPos = Number(sTopBank) + 30;
  519. sSndMsg += "B" + iXPos + "," + iYPos + "," + "0,3,2,4,101,N," + "\"" + pid + "\"" + "\r\n";
  520. //ABO(Rh)
  521. //iXPos = Number(sLeftBank) + 20;
  522. //iYPos = Number(sTopBank) + 24;
  523. //sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,2,2,N," + "\"" + patnm + "\"" + "\r\n";
  524. //등록번호
  525. iXPos = Number(sLeftBank) + 20;
  526. iYPos = Number(sTopBank) + 132;
  527. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,2,2,N," + "\"" + pid + "\"" + "\r\n";
  528. //환자명
  529. iXPos = Number(sLeftBank) + 270;
  530. iYPos = Number(sTopBank) + 132;
  531. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + patnm + "\"" + "\r\n";
  532. //진료과/병실
  533. XPos = Number(sLeftBank) + 240;
  534. iYPos = Number(sTopBank) + 156;
  535. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + orddeptcd + "/" + roomcd + "\"" + "\r\n";
  536. //성별/나이
  537. iXPos = Number(sLeftBank) + 350;
  538. iYPos = Number(sTopBank) + 156;
  539. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + patsex + "/" + patage + "\"" + "\r\n";
  540. //X-Matching(캡션-역상표현)
  541. iXPos = Number(sLeftBank) + 20;
  542. iYPos = Number(sTopBank) + 204;
  543. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,R," + "\"" + "X-Matching" + "\"" + "\r\n";
  544. //채혈자(캡션)
  545. iXPos = Number(sLeftBank) + 180;
  546. iYPos = Number(sTopBank) + 180;
  547. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + "채혈자:" + "\"" + "\r\n";
  548. //확인자(캡션)
  549. iXPos = Number(sLeftBank) + 180;
  550. iYPos = Number(sTopBank) + 204;
  551. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + "확인자:" + "\"" + "\r\n";
  552. //출력
  553. sSndMsg += "P1"+ "\r\n";
  554. if(sCommKind == "01") {
  555. llz_objCommAX.SendMessageToLPT(sSndMsg);
  556. sSndMsg = "";
  557. }
  558. else if(sCommKind == "02") {
  559. llz_objCommAX.SendMessage(sSndMsg);
  560. sSndMsg = "";
  561. }
  562. }
  563. else if(sPrntKind == "17") { //아르고스
  564. //프린터설정
  565. sSndMsg += "N" + "\r\n"; //이미지버퍼내용삭제
  566. sSndMsg += "JF" + "\r\n"; //용지정렬
  567. sSndMsg += "Q256,24" + "\r\n"; //용지세로 32mm,용지사이여백3mm
  568. sSndMsg += "q432" + "\r\n"; //용지가로54mm
  569. //출력시각
  570. if(ref.getColumn(0,"reprint")=="1"){ //재출력 바코드일경우 음영처리 조건
  571. iXPos = Number(sLeftBank) + 200;
  572. iYPos = Number(sTopBank) + 10;
  573. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,R," + "\"" + dt + "\"" + "\r\n";
  574. }else{
  575. iXPos = Number(sLeftBank) + 200;
  576. iYPos = Number(sTopBank) + 10;
  577. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + dt + "\"" + "\r\n";
  578. }
  579. //등록번호바코드
  580. iXPos = Number(sLeftBank) + 20;
  581. iYPos = Number(sTopBank) + 30;
  582. sSndMsg += "B" + iXPos + "," + iYPos + "," + "0,3,2,4,101,N," + "\"" + pid + "\"" + "\r\n";
  583. //ABO(Rh)
  584. iXPos = Number(sLeftBank) + 330;
  585. iYPos = Number(sTopBank) + 64;
  586. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,2,2,N," + "\"" + btype + "\"" + "\r\n";
  587. //등록번호
  588. iXPos = Number(sLeftBank) + 20;
  589. iYPos = Number(sTopBank) + 135;
  590. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,2,2,N," + "\"" + pid + "\"" + "\r\n";
  591. //환자명
  592. iXPos = Number(sLeftBank) + 270;
  593. iYPos = Number(sTopBank) + 135;
  594. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + patnm + "\"" + "\r\n";
  595. //진료과/병실
  596. XPos = Number(sLeftBank) + 240;
  597. iYPos = Number(sTopBank) + 161;
  598. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + orddeptcd + "/" + roomcd + "\"" + "\r\n";
  599. //성별/나이
  600. iXPos = Number(sLeftBank) + 270;
  601. iYPos = Number(sTopBank) + 180;
  602. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + patsex + "/" + patage + "\"" + "\r\n";
  603. //X-Matching(캡션-역상표현)
  604. iXPos = Number(sLeftBank) + 20;
  605. iYPos = Number(sTopBank) + 218;
  606. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,R," + "\"" + "X-Matching" + "\"" + "\r\n";
  607. //채혈자(캡션)
  608. iXPos = Number(sLeftBank) + 170;
  609. iYPos = Number(sTopBank) + 200;
  610. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + "채혈자:" + "\"" + "\r\n";
  611. //확인자(캡션)
  612. iXPos = Number(sLeftBank) + 170;
  613. iYPos = Number(sTopBank) + 224;
  614. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + "확인자:" + "\"" + "\r\n";
  615. //출력
  616. sSndMsg += "P1"+ "\r\n";
  617. if(sCommKind == "01") {
  618. llz_objCommAX.SendMessageToLPT(sSndMsg);
  619. sSndMsg = "";
  620. }
  621. else if(sCommKind == "02") {
  622. trace(llz_objCommAX.SendMessage(sSndMsg));
  623. sSndMsg = "";
  624. }
  625. }
  626. if(sCommKind == "02") {
  627. //llz_objCommAX.PortOpen = false;
  628. portOpenCheck = llz_objCommAX.PortClose(true);
  629. }
  630. }else if(portOpenCheck == "FALSE" && sCommKind == "02"){
  631. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  632. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  633. + " \n 2.케이블 확인"
  634. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  635. return;
  636. }
  637. }
  638. /**********************************************************************************
  639. * 함수명 : lf_lisSpcBarcodeLabel
  640. * 설명 : 채혈,재출력화면에서 일반채혈 바코드를 출력한다.
  641. * argument : ref - 출력할 바코드정보 Dataset
  642. prntinfo - 바코드설정정보 Dataset
  643. bGbn - 채혈,접수화면에서 출력시 설정
  644. **********************************************************************************/
  645. function lf_lisSpcBarcodeLabel(ref,prntinfo,bGbn){
  646. var cntHR = ref.rowcount;
  647. var sPrntKind = prntinfo.getColumn(0,"prntkind"); //프린터종류
  648. var portOpenCheck = "";
  649. var iXPos = 0;
  650. var iYPos = 0;
  651. var reprint = utlf_transNullToEmpty(ref.getColumn(0,"reprint")); //재출력바코드인지 여부 (값이 "1"이면 재출력->출력시각 음영처리)
  652. var sSndMsg = "";
  653. //인터맥 한글,영문 구분
  654. var aStr = ""; // 리턴받는 배열
  655. var aFlag = new Array(); //한글 영문 구분
  656. var hangulCnt = 0;
  657. if (sPrntKind == 0) return;
  658. var sCommKind = utlf_transNullToEmpty(prntinfo.getColumn(0,"commkind"));
  659. var sLeftBank = utlf_transNullToEmpty(prntinfo.getColumn(0,"left")); //왼쪽여백
  660. var sTopBank = utlf_transNullToEmpty(prntinfo.getColumn(0,"top")); //위쪽여백
  661. if(sCommKind == "01") {
  662. var sSetUpVal = prntinfo.getColumn(0,"setupval"); //PRT LPT출력
  663. }
  664. else if(sCommKind == "02") { //COM serial출력
  665. var sComm = prntinfo.getColumn(0,"comm"); //com port
  666. var sDataBit = prntinfo.getColumn(0,"databit"); //data bit
  667. var sStopBit = prntinfo.getColumn(0,"stopbit"); //stop bit
  668. var sBaudRate = prntinfo.getColumn(0,"baudrate"); //baud rate
  669. var sParity = prntinfo.getColumn(0,"parity"); //parity
  670. llz_objCommAX.CommPort = sComm;
  671. llz_objCommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  672. trace("portOpenCheck전:"+portOpenCheck);
  673. if(portOpenCheck == "TRUE" || utlf_isNull(portOpenCheck)){
  674. portOpenCheck = llz_objCommAX.PortOpen(true);
  675. }
  676. trace("portOpenCheck후:"+portOpenCheck);
  677. }
  678. else if(sCommKind == "03") { //TCP/IP출력
  679. var sSetUpVal = prntinfo.getColumn(0,"setupval03");
  680. var sEqmtCD = prntinfo.getColumn(0,"eqmtcd");
  681. }
  682. if( (portOpenCheck == "TRUE" && sCommKind == "02")
  683. || sCommKind == "01"
  684. || sCommKind == "03"){
  685. for(i=0 ; i< cntHR;i++){
  686. if(bGbn == "1"){ //채혈
  687. var cnt = utlf_transNullToEmpty(ref.getColumn(i,"bcollbarcdprntcnt")); //채혈바코드장수
  688. }
  689. else if(bGbn == "2"){ //접수
  690. var cnt = utlf_transNullToEmpty(ref.getColumn(i,"spcacptbarcdprntcnt")); //접수바코드장수
  691. }
  692. else{ //재출력,1장출력인 부분 -> 바코드갯수로 수정
  693. //var cnt = "1";
  694. var cnt = utlf_transNullToEmpty(ref.getColumn(i,"bcollbarcdprntcnt")); //채혈바코드장수
  695. }
  696. if(cnt > "0") { //출력바코드장수가 있다면
  697. var sStr = "";
  698. var tsectlblnm = utlf_transNullToEmpty(ref.getColumn(i,"tsectlblnm")); //검사계라벨명
  699. var bcno = utlf_transNullToEmpty(ref.getColumn(i,"bcno")); //검체번호
  700. var barcdprntdt = utlf_transNullToEmpty(ref.getColumn(i,"barcdprntdt")); //라벨발행일자
  701. var dt = utlf_getCurrentDateTime().toDate("YYYYMMDD hhmmss").getDateFormat("YYYY-MM-DD hh:mm"); //출력일시
  702. var patnm = utlf_transNullToEmpty(ref.getColumn(i,"patnm")); //환자성명
  703. var pid = utlf_transNullToEmpty(ref.getColumn(i,"pid")); //등록번호
  704. var sexage = utlf_transNullToEmpty(ref.getColumn(i,"sexage")); //성별연령
  705. var deptroom = utlf_transNullToEmpty(ref.getColumn(i,"deptroom")); //진료과병실
  706. var spclblnm = utlf_transNullToEmpty(ref.getColumn(i,"spclblnm")); //검체라벨명
  707. var tubelblnm = utlf_transNullToEmpty(ref.getColumn(i,"tubelblnm")); //용기라벨명
  708. var eqmtlblnms = utlf_transNullToEmpty(ref.getColumn(i,"eqmtlblnm")); //장비명
  709. var eqmtlblnm = eqmtlblnms.substring(0,10); //장비명
  710. var secttsect = utlf_transNullToEmpty(ref.getColumn(i,"secttsect")); //계검사계
  711. var tclslblnmlists = utlf_transNullToEmpty(ref.getColumn(i,"tclslblnmlist")); //검사라벨명
  712. var tclslblnmlist = tclslblnmlists.substring(0,28);
  713. var sInfcinfolist = utlf_transNullToEmpty(ref.getColumn(i,"infcinfolist")); //감염정보
  714. var aInfcinfolist = sInfcinfolist.split("^"); //배열에 분리
  715. var infcinfolist = ""; //감염정보 바코드에 표현
  716. var bcollinfoyn = utlf_transNullToEmpty(ref.getColumn(i,"bcollinfoyn")); // 크로스매칭 구분
  717. //trace("eqmtlblnm: "+ eqmtlblnm);
  718. for(var a=0; a<aInfcinfolist.length-1; a++){
  719. sSndMsg = "";
  720. if(aInfcinfolist[a]=="Y"&&a==0){
  721. infcinfolist += "B|";
  722. }
  723. if(aInfcinfolist[a]=="Y"&&a==1){
  724. infcinfolist += "C|";
  725. }
  726. if(aInfcinfolist[a]=="Y"&&a==2){
  727. infcinfolist += "A|";
  728. }
  729. if(aInfcinfolist[a]=="Y"&&a==3){
  730. infcinfolist += "D|";
  731. }
  732. if(aInfcinfolist[a]=="Y"&&a==4){
  733. infcinfolist += "E|";
  734. }
  735. }
  736. var erprcpflag = utlf_transNullToEmpty(ref.getColumn(i,"erprcpflag")); //응급여부
  737. var bcollbarcdprntcnt = utlf_transNullToEmpty(ref.getColumn(i,"bcollbarcdprntcnt")); //채혈바코드수
  738. var spcacptbarcdprntcnt = utlf_transNullToEmpty(ref.getColumn(i,"spcacptbarcdprntcnt")); //검체바코드수
  739. var microbarcdprntcnt = utlf_transNullToEmpty(ref.getColumn(i,"microbarcdprntcnt")); //미생물바코수
  740. var mdiabarcdprntcnt = utlf_transNullToEmpty(ref.getColumn(i,"mdiabarcdprntcnt")); //분주바코드수
  741. var workno = utlf_transNullToEmpty(ref.getColumn(i,"workno")); //작업번호
  742. var orddrnm = utlf_transNullToEmpty(ref.getColumn(i,"orddrnm")); //주치의
  743. var roomcd = utlf_transNullToEmpty(ref.getColumn(i,"roomcd")); //병실
  744. var dept = utlf_transNullToEmpty(ref.getColumn(i,"dept")); //진료과
  745. var spcacptdd = utlf_transNullToEmpty(ref.getColumn(i,"spcacptdd")); //접수일자
  746. var dnornm = utlf_transNullToEmpty(ref.getColumn(i,"dnornm")); //공여자명
  747. var prcphopedd = utlf_transNullToEmpty(ref.getColumn(i,"prcphopedd")); //접수일자
  748. var bedposcnts = utlf_transNullToEmpty(ref.getColumn(i,"bedposcnts")); //기본코드명칭
  749. var bldtype = utlf_transNullToEmpty(ref.getColumn(i,"bldtype")); //혈액형정보
  750. var bcollcau = utlf_transNullToEmpty(ref.getColumn(i,"bcollcau")); //채혈시주의사항
  751. var prcpremfacts = utlf_transNullToEmpty(ref.getColumn(i,"prcpremfact")); //의사remark
  752. var bcollcmt = utlf_transNullToEmpty(ref.getColumn(i,"bcollcmt")); //채혈comment
  753. var prcpremfact = prcpremfacts.substring(0,10);
  754. var testlrgkind = utlf_transNullToEmpty(ref.getColumn(i,"testlrgkind")); //RIA인지
  755. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  756. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  757. if(sPrntKind == "15") { //인터맥
  758. //프린터설정
  759. //sSndMsg += "SYSVAR(18)=0" + "\r\n"; //다변설정 기본:0
  760. sSndMsg += "SYSVAR(35)=1" + "\r\n"; //저장여부 0:영구저장,1:임시저장
  761. //sSndMsg += "LTS& OFF" + "\r\n"; //배치인쇄시 유용,기본 off
  762. sSndMsg += "INPUT OFF" + "\r\n"; //인터맥다이렉트프로토콜 비활성화
  763. //sSndMsg += "FORMAT INPUT \"STX\" , \"ETX\",\"CR\"" + "\r\n";
  764. //sSndMsg += "FORMAT INPUT CHR$(2),CHR$(3),CHR$(13)"; //layout run 명령어구문 정의
  765. sSndMsg += "LAYOUT INPUT " +"\"" + "tmp:LBLSOFT.LAY" + "\"" + "\r\n"; //layout구성 시작
  766. sSndMsg += "NASC -2:AN 7" + "\r\n"; //캐릭터셋지정 -2:ANSI : 위치지정 7:좌측상단
  767. //sSndMsg += "CLIP OFF" + "\r\n"; //인쇄바같부분 비활성화 기본 :off
  768. //sSndMsg += "CLIP BARCODE OFF" + "\r\n";//인쇄바같부분 비활성화 기본 :off
  769. //sSndMsg += "XORMODE OFF" + "\r\n"; //교차필드인쇄부분 기본:off
  770. //sSndMsg += "MAG 1,1" + "\r\n"; 확대:높이,폭 기본 1,1
  771. //검사계라벨명
  772. if(tsectlblnm.length != utlf_getStringLength(tsectlblnm)){
  773. iYPos = Number(sTopBank) + 280;
  774. }else{
  775. iYPos = Number(sTopBank) + 260;
  776. }
  777. iXPos = Number(sLeftBank) + 20;
  778. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  779. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  780. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  781. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  782. sSndMsg += "PT " +"\"" + tsectlblnm +"\"" + "\r\n"; //입력데이터제공
  783. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  784. //검체번호
  785. iXPos = Number(sLeftBank) + 90;
  786. iYPos = Number(sTopBank) + 240;
  787. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + bcno + "\"" + "\r\n";
  788. //출력시각 barcdprntdt
  789. //바코드 재출력일경우 출력시각 음영처리 - NI(노말) , II(음영)
  790. if(reprint!="1"){
  791. iXPos = Number(sLeftBank) + 220;
  792. iYPos = Number(sTopBank) + 240;
  793. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + dt + "\"" + "\r\n";
  794. } else if(reprint=="1"){
  795. iXPos = Number(sLeftBank) + 220;
  796. iYPos = Number(sTopBank) + 240;
  797. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:II:PT " +"\"" + dt + "\"" + "\r\n";
  798. }
  799. //검체바코드
  800. iXPos = Number(sLeftBank) + 20;
  801. iYPos = Number(sTopBank) + 215;
  802. sSndMsg += "PP " + iXPos + "," + iYPos + ":AN 7:DIR 1:BARSET " +"\"" + "CODE39" +"\"" + ",2,1,2,101:PB " + "\"" + bcno + "\"" + "\r\n";
  803. if(secttsect == "T1" ){
  804. //ABO(Rh)
  805. iXPos = Number(sLeftBank) + 330;
  806. iYPos = Number(sTopBank) + 170;
  807. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,9:NI:PT " +"\"" + bldtype + "\"" + "\r\n";
  808. }else{
  809. //감염정보
  810. iXPos = Number(sLeftBank) + 330;
  811. iYPos = Number(sTopBank) + 170;
  812. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,9:NI:PT " +"\"" + infcinfolist + "\"" + "\r\n";
  813. }
  814. if(bcollinfoyn == "Y"){
  815. // 등록번호 폐기능검사실,RIA 음영처리 - NI(노말) , II(음영)
  816. iXPos = Number(sLeftBank) + 20;
  817. iYPos = Number(sTopBank) + 115;
  818. if(secttsect=="P1" || testlrgkind == "N"){
  819. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,8:II:PT " +"\"" + pid + "\"" + "\r\n";
  820. } else{
  821. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,8:NI:PT " +"\"" + pid + "\"" + "\r\n";
  822. }
  823. if(patnm.length != utlf_getStringLength(patnm)){
  824. iYPos = Number(sTopBank) + 135;
  825. }else{
  826. iYPos = Number(sTopBank) + 115;
  827. }
  828. //환자명
  829. iXPos = Number(sLeftBank) + 140;
  830. //iYPos = Number(sTopBank) + 135;
  831. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,9,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  832. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  833. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  834. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  835. sSndMsg += "PT " +"\"" + patnm +"\"" + "\r\n"; //입력데이터제공
  836. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  837. //sSndMsg += "PF " + "\r\n"; //인쇄
  838. //병동/병실
  839. iXPos = Number(sLeftBank) + 300;
  840. iYPos = Number(sTopBank) + 110;
  841. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,8:NI:PT " +"\"" + deptroom + "\"" + "\r\n";
  842. //성별/나이
  843. iXPos = Number(sLeftBank) + 300;
  844. iYPos = Number(sTopBank) + 90;
  845. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,8:NI:PT " +"\"" + sexage + "\"" + "\r\n";
  846. //Remark
  847. // hangulCnt = 0;
  848. // aStr = "";
  849. // aFlag = new Array();
  850. //
  851. // aStr = lpzfGetHanGul(prcpremfact, aFlag);
  852. // for (var iNo=0; iNo < aStr.length; iNo++) {
  853. // if (aFlag[iNo] != "E") {
  854. // hangulCnt++;
  855. // break;
  856. // }
  857. // }
  858. if(prcpremfact.length != utlf_getStringLength(prcpremfact)){
  859. iYPos = Number(sTopBank) + 110;
  860. }else{
  861. iYPos = Number(sTopBank) + 95;
  862. }
  863. iXPos = Number(sLeftBank) + 20;
  864. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  865. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  866. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  867. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  868. sSndMsg += "PT " +"\"" + prcpremfact +"\"" + "\r\n"; //입력데이터제공
  869. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  870. //sSndMsg += "PF " + "\r\n"; //인쇄
  871. //채혈comment
  872. if(bcollcmt.length != utlf_getStringLength(bcollcmt)){
  873. iYPos = Number(sTopBank) + 110;
  874. }else{
  875. iYPos = Number(sTopBank) + 90;
  876. }
  877. iXPos = Number(sLeftBank) + 150;
  878. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + bcollcmt + "\"" + "\r\n";
  879. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  880. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  881. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  882. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  883. sSndMsg += "PT " +"\"" + bcollcmt +"\"" + "\r\n"; //입력데이터제공
  884. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  885. //sSndMsg += "PF " + "\r\n"; //인쇄
  886. //작업그룹코드
  887. //iXPos = Number(sLeftBank) + 300;
  888. //iYPos = Number(sTopBank) + 50;
  889. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + "작업그룹코드" + "\"" + "\r\n";
  890. //검체 spclblnm
  891. if(spclblnm.length != utlf_getStringLength(spclblnm)){
  892. iYPos = Number(sTopBank) + 90;
  893. }else{
  894. iYPos = Number(sTopBank) + 70;
  895. }
  896. iXPos = Number(sLeftBank) + 20;
  897. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  898. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  899. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  900. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  901. sSndMsg += "PT " +"\"" + spclblnm +"\"" + "\r\n"; //입력데이터제공
  902. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  903. //용기 tubelblnm
  904. if(tubelblnm.length != utlf_getStringLength(tubelblnm)){
  905. iYPos = Number(sTopBank) + 90;
  906. }else{
  907. iYPos = Number(sTopBank) + 70;
  908. }
  909. iXPos = Number(sLeftBank) + 140;
  910. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  911. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  912. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  913. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  914. sSndMsg += "PT " +"\"" + tubelblnm +"\"" + "\r\n"; //입력데이터제공
  915. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  916. //장비 eqmtlblnm
  917. if(eqmtlblnm.length != utlf_getStringLength(eqmtlblnm)){
  918. iYPos = Number(sTopBank) + 90;
  919. }else{
  920. iYPos = Number(sTopBank) + 70;
  921. }
  922. iXPos = Number(sLeftBank) + 250;
  923. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  924. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  925. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  926. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  927. sSndMsg += "PT " +"\"" + eqmtlblnm +"\"" + "\r\n"; //입력데이터제공
  928. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  929. //검사파트코드
  930. iXPos = Number(sLeftBank) + 20;
  931. iYPos = Number(sTopBank) + 50;
  932. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,8:NI:PT " +"\"" + secttsect + "\"" + "\r\n";
  933. //검사목록 tclslblnmlist
  934. if(tclslblnmlist.length != utlf_getStringLength(tclslblnmlist)){
  935. iYPos = Number(sTopBank) + 90;
  936. }else{
  937. iYPos = Number(sTopBank) + 50;
  938. }
  939. iXPos = Number(sLeftBank) + 60;
  940. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  941. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  942. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  943. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  944. sSndMsg += "PT " +"\"" + tclslblnmlist +"\"" + "\r\n"; //입력데이터제공
  945. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  946. //채혈자,확인자 (시행부서가 혈액은행인 검체 바코드에만 추가
  947. iXPos = Number(sLeftBank) + 20;
  948. iYPos = Number(sTopBank) + 50;
  949. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  950. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  951. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  952. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  953. sSndMsg += "PT " +"\"" + "채혈자: 확인자:" +"\"" + "\r\n"; //입력데이터제공
  954. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  955. }else{
  956. // 등록번호 폐기능검사실,RIA 음영처리 - NI(노말) , II(음영)
  957. iXPos = Number(sLeftBank) + 20;
  958. iYPos = Number(sTopBank) + 110;
  959. if(secttsect=="P1" || testlrgkind == "N"){
  960. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,10:II:PT " +"\"" + pid + "\"" + "\r\n";
  961. } else{
  962. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,10:NI:PT " +"\"" + pid + "\"" + "\r\n";
  963. }
  964. if(patnm.length != utlf_getStringLength(patnm)){
  965. iYPos = Number(sTopBank) + 135;
  966. }else{
  967. iYPos = Number(sTopBank) + 115;
  968. }
  969. //환자명
  970. iXPos = Number(sLeftBank) + 170;
  971. //iYPos = Number(sTopBank) + 124;
  972. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,10,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  973. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  974. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  975. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  976. sSndMsg += "PT " +"\"" + patnm +"\"" + "\r\n"; //입력데이터제공
  977. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  978. //sSndMsg += "PF " + "\r\n"; //인쇄
  979. //병동/병실
  980. iXPos = Number(sLeftBank) + 300;
  981. iYPos = Number(sTopBank) + 110;
  982. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,8:NI:PT " +"\"" + deptroom + "\"" + "\r\n";
  983. //성별/나이
  984. iXPos = Number(sLeftBank) + 300;
  985. iYPos = Number(sTopBank) + 90;
  986. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,8:NI:PT " +"\"" + sexage + "\"" + "\r\n";
  987. //Remark
  988. if(prcpremfact.length != utlf_getStringLength(prcpremfact)){
  989. iYPos = Number(sTopBank) + 100;
  990. }else{
  991. iYPos = Number(sTopBank) + 80;
  992. }
  993. iXPos = Number(sLeftBank) + 20;
  994. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  995. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  996. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  997. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  998. sSndMsg += "PT " +"\"" + prcpremfact +"\"" + "\r\n"; //입력데이터제공
  999. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  1000. //sSndMsg += "PF " + "\r\n"; //인쇄
  1001. //채혈comment
  1002. if(bcollcmt.length != utlf_getStringLength(bcollcmt)){
  1003. iYPos = Number(sTopBank) + 100;
  1004. }else{
  1005. iYPos = Number(sTopBank) + 80;
  1006. }
  1007. iXPos = Number(sLeftBank) + 150;
  1008. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + bcollcmt + "\"" + "\r\n";
  1009. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  1010. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  1011. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  1012. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  1013. sSndMsg += "PT " +"\"" + bcollcmt +"\"" + "\r\n"; //입력데이터제공
  1014. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  1015. //sSndMsg += "PF " + "\r\n"; //인쇄
  1016. //작업그룹코드
  1017. //iXPos = Number(sLeftBank) + 300;
  1018. //iYPos = Number(sTopBank) + 50;
  1019. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + "작업그룹코드" + "\"" + "\r\n";
  1020. //검체 spclblnm
  1021. if(spclblnm.length != utlf_getStringLength(spclblnm)){
  1022. iYPos = Number(sTopBank) + 75;
  1023. }else{
  1024. iYPos = Number(sTopBank) + 55;
  1025. }
  1026. iXPos = Number(sLeftBank) + 20;
  1027. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  1028. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  1029. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  1030. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  1031. sSndMsg += "PT " +"\"" + spclblnm +"\"" + "\r\n"; //입력데이터제공
  1032. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  1033. //용기 tubelblnm
  1034. if(tubelblnm.length != utlf_getStringLength(tubelblnm)){
  1035. iYPos = Number(sTopBank) + 75;
  1036. }else{
  1037. iYPos = Number(sTopBank) + 55;
  1038. }
  1039. iXPos = Number(sLeftBank) + 140;
  1040. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  1041. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  1042. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  1043. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  1044. sSndMsg += "PT " +"\"" + tubelblnm +"\"" + "\r\n"; //입력데이터제공
  1045. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  1046. //장비 eqmtlblnm
  1047. if(eqmtlblnm.length != utlf_getStringLength(eqmtlblnm)){
  1048. iYPos = Number(sTopBank) + 75;
  1049. }else{
  1050. iYPos = Number(sTopBank) + 55;
  1051. }
  1052. iXPos = Number(sLeftBank) + 240;
  1053. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  1054. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  1055. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  1056. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  1057. sSndMsg += "PT " +"\"" + eqmtlblnm +"\"" + "\r\n"; //입력데이터제공
  1058. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  1059. //검사파트코드
  1060. iXPos = Number(sLeftBank) + 20;
  1061. iYPos = Number(sTopBank) + 30;
  1062. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + secttsect + "\"" + "\r\n";
  1063. //검사목록 tclslblnmlist
  1064. if(tclslblnmlist.length != utlf_getStringLength(tclslblnmlist)){
  1065. iYPos = Number(sTopBank) + 50;
  1066. }else{
  1067. iYPos = Number(sTopBank) + 30;
  1068. }
  1069. iXPos = Number(sLeftBank) + 60;
  1070. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  1071. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  1072. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  1073. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  1074. sSndMsg += "PT " +"\"" + tclslblnmlist +"\"" + "\r\n"; //입력데이터제공
  1075. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  1076. }
  1077. //출력
  1078. sSndMsg += "LAYOUT END" + "\r\n"; //레이아웃구성을 중지하고 저장
  1079. sSndMsg += "LAYOUT RUN " +"\"" + "tmp:LBLSOFT.LAY" +"\"" + "\r\n"; //레이아웃시작
  1080. sSndMsg += "INPUT ON" + "\r\n"; //인터맥다이렉트 프로토콜 활성화
  1081. sSndMsg += "PF " + "1" + "\r\n"; //인쇄
  1082. sSndMsg += "PRINT KEY OFF" + "\r\n"; //프린트버튼 비활성화
  1083. for(var cntRow = 0; cntRow <cnt; cntRow++){
  1084. if(sCommKind == "01") {
  1085. llz_objCommAX.SendMessageToLPT(sSndMsg);
  1086. //llz_objCommAX.Output = sSndMsg;
  1087. }
  1088. else if(sCommKind == "02") {
  1089. llz_objCommAX.SendMessage(sSndMsg);
  1090. //llz_objCommAX.Output = sSndMsg;
  1091. }
  1092. trace("속도개선용==============");
  1093. trace(bcollbarcdprntcnt);
  1094. trace(spcacptbarcdprntcnt);
  1095. trace(microbarcdprntcnt);
  1096. trace(mdiabarcdprntcnt);
  1097. trace(workno);
  1098. trace(bedposcnts);
  1099. trace(prcpremfact);
  1100. trace(bcollcmt);
  1101. trace(bcno);
  1102. trace(barcdprntdt);
  1103. trace(patnm);
  1104. trace(pid);
  1105. trace("속도개선용==============");
  1106. }
  1107. }
  1108. else if(sPrntKind == "16") { //루칸
  1109. //프린터설정
  1110. sSndMsg += "N" + "\r\n"; //이미지버퍼내용삭제
  1111. sSndMsg += "Q256,24" + "\r\n"; //용지세로 32mm,용지사이여백3mm
  1112. sSndMsg += "q432" + "\r\n"; //용지가로54mm
  1113. //검사계라벨명
  1114. iXPos = Number(sLeftBank) + 20;
  1115. iYPos = Number(sTopBank) + 0;
  1116. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + tsectlblnm + "\"" + "\r\n";
  1117. //검체번호
  1118. iXPos = Number(sLeftBank) + 80;
  1119. iYPos = Number(sTopBank) + 0;
  1120. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + bcno + "\"" + "\r\n";
  1121. //출력시각 barcdprntdt
  1122. //바코드 재출력일경우 출력시각 음영처리 - N(노말), R(음영)
  1123. if(reprint!="1"){
  1124. iXPos = Number(sLeftBank) + 220;
  1125. iYPos = Number(sTopBank) + 0;
  1126. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,1,1,1,N," + "\"" + dt + "\"" + "\r\n";
  1127. } else if(reprint =="1"){
  1128. iXPos = Number(sLeftBank) + 220;
  1129. iYPos = Number(sTopBank) + 0;
  1130. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,1,1,1,R," + "\"" + dt + "\"" + "\r\n";
  1131. }
  1132. if(!utlf_isNull(bcno)){
  1133. //검체바코드
  1134. iXPos = Number(sLeftBank) + 30;
  1135. iYPos = Number(sTopBank) + 22;
  1136. sSndMsg += "B" + iXPos + "," + iYPos + "," + "0,3,2,4,91,N," + "\"" + bcno + "\"" + "\r\n";
  1137. }
  1138. if(secttsect == "T1"){
  1139. //ABO(Rh)
  1140. iXPos = Number(sLeftBank) + 340;
  1141. iYPos = Number(sTopBank) + 50;
  1142. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + bldtype + "\"" + "\r\n";
  1143. }else{
  1144. //감염정보
  1145. iXPos = Number(sLeftBank) + 340;
  1146. iYPos = Number(sTopBank) + 50;
  1147. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + infcinfolist + "\"" + "\r\n";
  1148. }
  1149. if(bcollinfoyn == "Y"){
  1150. //등록번호 음영처리 - N(노말), R(음영)
  1151. iXPos = Number(sLeftBank) + 20;
  1152. iYPos = Number(sTopBank) + 117;
  1153. if(secttsect=="P1" || testlrgkind == "N"){
  1154. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,R," + "\"" + pid + "\"" + "\r\n";
  1155. } else{
  1156. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + pid + "\"" + "\r\n";
  1157. }
  1158. // iXPos = Number(sLeftBank) + 20;
  1159. // iYPos = Number(sTopBank) + 117;
  1160. // sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + pid + "\"" + "\r\n";
  1161. //환자명
  1162. iXPos = Number(sLeftBank) + 160;
  1163. iYPos = Number(sTopBank) + 117;
  1164. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + patnm + "\"" + "\r\n";
  1165. //병동/병실
  1166. iXPos = Number(sLeftBank) + 280;
  1167. iYPos = Number(sTopBank) + 117;
  1168. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + deptroom + "\"" + "\r\n";
  1169. //성별/나이
  1170. iXPos = Number(sLeftBank) + 280;
  1171. iYPos = Number(sTopBank) + 134;
  1172. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + sexage + "\"" + "\r\n";
  1173. //작업그룹코드
  1174. //iXPos = Number(sLeftBank) + 280;
  1175. //iYPos = Number(sTopBank) + 206;
  1176. //sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + "작업그룹코드" + "\"" + "\r\n";
  1177. //Remark
  1178. iXPos = Number(sLeftBank) + 20;
  1179. iYPos = Number(sTopBank) + 155;
  1180. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + prcpremfact + "\"" + "\r\n";
  1181. //채혈comment
  1182. iXPos = Number(sLeftBank) + 150;
  1183. iYPos = Number(sTopBank) + 155;
  1184. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + bcollcmt + "\"" + "\r\n";
  1185. //검체 spclblnm
  1186. iXPos = Number(sLeftBank) + 20;
  1187. iYPos = Number(sTopBank) + 180;
  1188. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + spclblnm + "\"" + "\r\n";
  1189. //용기 tubelblnm
  1190. iXPos = Number(sLeftBank) + 140;
  1191. iYPos = Number(sTopBank) + 180;
  1192. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + tubelblnm + "\"" + "\r\n";
  1193. //장비 eqmtlblnm
  1194. iXPos = Number(sLeftBank) + 250;
  1195. iYPos = Number(sTopBank) + 180;
  1196. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + eqmtlblnm + "\"" + "\r\n";
  1197. //검사파트코드
  1198. iXPos = Number(sLeftBank) + 20;
  1199. iYPos = Number(sTopBank) + 200;
  1200. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + secttsect + "\"" + "\r\n";
  1201. //검사목록 tclslblnmlist
  1202. iXPos = Number(sLeftBank) + 70;
  1203. iYPos = Number(sTopBank) + 200;
  1204. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + tclslblnmlist + "\"" + "\r\n";
  1205. //채혈자,확인자 (시행부서가 혈액은행인 검체 바코드에만 추가)
  1206. iXPos = Number(sLeftBank) + 20;
  1207. iYPos = Number(sTopBank) + 220;
  1208. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + "채혈자: 확인자:" + "\"" + "\r\n";
  1209. }else{
  1210. //등록번호 음영처리 - N(노말), R(음영)
  1211. iXPos = Number(sLeftBank) + 20;
  1212. iYPos = Number(sTopBank) + 117;
  1213. if(secttsect=="P1" || testlrgkind == "N"){
  1214. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,2,R," + "\"" + pid + "\"" + "\r\n";
  1215. } else{
  1216. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,2,N," + "\"" + pid + "\"" + "\r\n";
  1217. }
  1218. // iXPos = Number(sLeftBank) + 20;
  1219. // iYPos = Number(sTopBank) + 117;
  1220. // sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,2,N," + "\"" + pid + "\"" + "\r\n";
  1221. //환자명
  1222. iXPos = Number(sLeftBank) + 160;
  1223. iYPos = Number(sTopBank) + 117;
  1224. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,2,N," + "\"" + patnm + "\"" + "\r\n";
  1225. //병동/병실
  1226. iXPos = Number(sLeftBank) + 280;
  1227. iYPos = Number(sTopBank) + 120;
  1228. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + deptroom + "\"" + "\r\n";
  1229. //성별/나이
  1230. iXPos = Number(sLeftBank) + 280;
  1231. iYPos = Number(sTopBank) + 138;
  1232. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + sexage + "\"" + "\r\n";
  1233. //작업그룹코드
  1234. //iXPos = Number(sLeftBank) + 280;
  1235. //iYPos = Number(sTopBank) + 206;
  1236. //sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + "작업그룹코드" + "\"" + "\r\n";
  1237. //Remark
  1238. iXPos = Number(sLeftBank) + 20;
  1239. iYPos = Number(sTopBank) + 170;
  1240. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + prcpremfact + "\"" + "\r\n";
  1241. //채혈comment
  1242. iXPos = Number(sLeftBank) + 150;
  1243. iYPos = Number(sTopBank) + 170;
  1244. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + bcollcmt + "\"" + "\r\n";
  1245. //검체 spclblnm
  1246. iXPos = Number(sLeftBank) + 20;
  1247. iYPos = Number(sTopBank) + 195;
  1248. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + spclblnm + "\"" + "\r\n";
  1249. //용기 tubelblnm
  1250. iXPos = Number(sLeftBank) + 140;
  1251. iYPos = Number(sTopBank) + 195;
  1252. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + tubelblnm + "\"" + "\r\n";
  1253. //장비 eqmtlblnm
  1254. iXPos = Number(sLeftBank) + 250;
  1255. iYPos = Number(sTopBank) + 195;
  1256. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + eqmtlblnm + "\"" + "\r\n";
  1257. //검사파트코드
  1258. iXPos = Number(sLeftBank) + 20;
  1259. iYPos = Number(sTopBank) + 220;
  1260. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + secttsect + "\"" + "\r\n";
  1261. //검사목록 tclslblnmlist
  1262. iXPos = Number(sLeftBank) + 70;
  1263. iYPos = Number(sTopBank) + 220;
  1264. //sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + tclslblnmlist + "\"" + "\r\n";
  1265. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + tclslblnmlist + "\"" + "\r\n";
  1266. }
  1267. //출력
  1268. sSndMsg += "P"+cnt+",1" + "\r\n";
  1269. if(sCommKind == "01") {
  1270. trace(llz_objCommAX.SendMessageToLPT(sSndMsg));
  1271. //llz_objCommAX.Output = sSndMsg;
  1272. sSndMsg = "";
  1273. }
  1274. else if(sCommKind == "02") {
  1275. trace(llz_objCommAX.SendMessage(sSndMsg));
  1276. //llz_objCommAX.Output = sSndMsg;
  1277. sSndMsg = "";
  1278. }
  1279. }
  1280. else if(sPrntKind == "17") { //아르고스
  1281. //프린터설정
  1282. sSndMsg += "N" + "\r\n"; //이미지버퍼내용삭제
  1283. sSndMsg += "JF" + "\r\n"; //용지정렬
  1284. sSndMsg += "Q256,24" + "\r\n"; //용지세로 32mm,용지사이여백3mm
  1285. sSndMsg += "q432" + "\r\n"; //용지가로54mm
  1286. //검사계라벨명
  1287. iXPos = Number(sLeftBank) + 20;
  1288. iYPos = Number(sTopBank) + 10;
  1289. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + tsectlblnm + "\"" + "\r\n";
  1290. //검체번호
  1291. iXPos = Number(sLeftBank) + 80;
  1292. iYPos = Number(sTopBank) + 10;
  1293. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + bcno + "\"" + "\r\n";
  1294. //출력시각 barcdprntdt
  1295. //재출력이면 출력시각에 음영처리 - N(노말), R(음영)
  1296. if(reprint != "1"){
  1297. iXPos = Number(sLeftBank) + 200;
  1298. iYPos = Number(sTopBank) + 10;
  1299. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,1,1,1,N," + "\"" + dt + "\"" + "\r\n";
  1300. }else if(reprint =="1"){
  1301. iXPos = Number(sLeftBank) + 200;
  1302. iYPos = Number(sTopBank) + 10;
  1303. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,1,1,1,R," + "\"" + dt + "\"" + "\r\n";
  1304. }
  1305. //검체바코드
  1306. iXPos = Number(sLeftBank) + 20;
  1307. iYPos = Number(sTopBank) + 27;
  1308. sSndMsg += "B" + iXPos + "," + iYPos + "," + "0,3,2,4,101,N," + "\"" + bcno + "\"" + "\r\n";
  1309. //trace("옥희 : " +secttsect.substr(0,1) + " bldtype: "+bldtype+ " infcinfolist : "+infcinfolist);
  1310. if(secttsect == "T1"){
  1311. //ABO(Rh)
  1312. iXPos = Number(sLeftBank) + 330;
  1313. iYPos = Number(sTopBank) + 60;
  1314. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,2,2,N," + "\"" + bldtype + "\"" + "\r\n";
  1315. }else{
  1316. //감염정보
  1317. iXPos = Number(sLeftBank) + 310;
  1318. iYPos = Number(sTopBank) + 50;
  1319. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + infcinfolist + "\"" + "\r\n";
  1320. }
  1321. if(bcollinfoyn == "Y"){
  1322. //등록번호
  1323. iXPos = Number(sLeftBank) + 20;
  1324. iYPos = Number(sTopBank) + 140;
  1325. if(secttsect=="P1" || testlrgkind == "N"){
  1326. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,2,R," + "\"" + pid + "\"" + "\r\n";
  1327. }else{
  1328. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,2,N," + "\"" + pid + "\"" + "\r\n";
  1329. }
  1330. //환자명
  1331. iXPos = Number(sLeftBank) + 140;
  1332. iYPos = Number(sTopBank) + 140;
  1333. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,2,1,N," + "\"" + patnm + "\"" + "\r\n";
  1334. //병동/병실
  1335. iXPos = Number(sLeftBank) + 330;
  1336. iYPos = Number(sTopBank) + 140;
  1337. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + deptroom + "\"" + "\r\n";
  1338. //성별/나이
  1339. iXPos = Number(sLeftBank) + 330;
  1340. iYPos = Number(sTopBank) + 165;
  1341. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + sexage + "\"" + "\r\n";
  1342. //작업그룹코드
  1343. //iXPos = Number(sLeftBank) + 270;
  1344. //iYPos = Number(sTopBank) + 190;
  1345. //sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + "작업그룹코드" + "\"" + "\r\n";
  1346. //Remark
  1347. iXPos = Number(sLeftBank) + 20;
  1348. iYPos = Number(sTopBank) + 170;
  1349. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + prcpremfact + "\"" + "\r\n";
  1350. //채혈comment
  1351. iXPos = Number(sLeftBank) + 80;
  1352. iYPos = Number(sTopBank) + 170;
  1353. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + bcollcmt + "\"" + "\r\n";
  1354. //검체 spclblnm
  1355. iXPos = Number(sLeftBank) + 20;
  1356. iYPos = Number(sTopBank) + 190;
  1357. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + spclblnm + "\"" + "\r\n";
  1358. //용기 tubelblnm
  1359. iXPos = Number(sLeftBank) + 150;
  1360. iYPos = Number(sTopBank) + 190;
  1361. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + tubelblnm + "\"" + "\r\n";
  1362. //장비 eqmtlblnm
  1363. iXPos = Number(sLeftBank) + 280;
  1364. iYPos = Number(sTopBank) + 190;
  1365. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + eqmtlblnm + "\"" + "\r\n";
  1366. //검사파트코드
  1367. iXPos = Number(sLeftBank) + 20;
  1368. iYPos = Number(sTopBank) + 210;
  1369. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + secttsect + "\"" + "\r\n";
  1370. //검사목록 tclslblnmlist
  1371. iXPos = Number(sLeftBank) + 60;
  1372. iYPos = Number(sTopBank) + 210;
  1373. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + tclslblnmlist + "\"" + "\r\n";
  1374. //채혈자,확인자 (시행부서가 혈액은행인 검체 바코드에만 추가)
  1375. iXPos = Number(sLeftBank) + 20;
  1376. iYPos = Number(sTopBank) + 230;
  1377. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + "채혈자: 확인자:" + "\"" + "\r\n";
  1378. }else{
  1379. //등록번호
  1380. iXPos = Number(sLeftBank) + 20;
  1381. iYPos = Number(sTopBank) + 140;
  1382. if(secttsect=="P1" || testlrgkind == "N"){
  1383. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,2,R," + "\"" + pid + "\"" + "\r\n";
  1384. }else{
  1385. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,2,N," + "\"" + pid + "\"" + "\r\n";
  1386. }
  1387. //환자명
  1388. iXPos = Number(sLeftBank) + 140;
  1389. iYPos = Number(sTopBank) + 140;
  1390. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,2,1,N," + "\"" + patnm + "\"" + "\r\n";
  1391. //병동/병실
  1392. iXPos = Number(sLeftBank) + 330;
  1393. iYPos = Number(sTopBank) + 140;
  1394. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + deptroom + "\"" + "\r\n";
  1395. //성별/나이
  1396. iXPos = Number(sLeftBank) + 330;
  1397. iYPos = Number(sTopBank) + 170;
  1398. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + sexage + "\"" + "\r\n";
  1399. //작업그룹코드
  1400. //iXPos = Number(sLeftBank) + 270;
  1401. //iYPos = Number(sTopBank) + 190;
  1402. //sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + "작업그룹코드" + "\"" + "\r\n";
  1403. //Remark
  1404. iXPos = Number(sLeftBank) + 20;
  1405. iYPos = Number(sTopBank) + 180;
  1406. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + prcpremfact + "\"" + "\r\n";
  1407. //채혈comment
  1408. iXPos = Number(sLeftBank) + 80;
  1409. iYPos = Number(sTopBank) + 180;
  1410. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + bcollcmt + "\"" + "\r\n";
  1411. //검체 spclblnm
  1412. iXPos = Number(sLeftBank) + 20;
  1413. iYPos = Number(sTopBank) + 205;
  1414. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + spclblnm + "\"" + "\r\n";
  1415. //용기 tubelblnm
  1416. iXPos = Number(sLeftBank) + 150;
  1417. iYPos = Number(sTopBank) + 205;
  1418. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + tubelblnm + "\"" + "\r\n";
  1419. //장비 eqmtlblnm
  1420. iXPos = Number(sLeftBank) + 280;
  1421. iYPos = Number(sTopBank) + 205;
  1422. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + eqmtlblnm + "\"" + "\r\n";
  1423. //검사파트코드
  1424. iXPos = Number(sLeftBank) + 20;
  1425. iYPos = Number(sTopBank) + 230;
  1426. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + secttsect + "\"" + "\r\n";
  1427. //검사목록 tclslblnmlist
  1428. iXPos = Number(sLeftBank) + 70;
  1429. iYPos = Number(sTopBank) + 230;
  1430. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + tclslblnmlist + "\"" + "\r\n";
  1431. }
  1432. //출력
  1433. sSndMsg += "P1"+ "," + cnt + "\r\n";
  1434. if(sCommKind == "01") {
  1435. trace(llz_objCommAX.SendMessageToLPT(sSndMsg));
  1436. //llz_objCommAX.Output = sSndMsg;
  1437. sSndMsg = "";
  1438. }
  1439. else if(sCommKind == "02") {
  1440. trace(llz_objCommAX.SendMessage(sSndMsg));
  1441. //llz_objCommAX.Output = sSndMsg;
  1442. sSndMsg = "";
  1443. }
  1444. }
  1445. }
  1446. else {
  1447. trace("========");
  1448. return;
  1449. }
  1450. }
  1451. if(sCommKind == "02") {
  1452. //llz_objCommAX.PortOpen = false;
  1453. // portOpenCheck = llz_objCommAX.PortOpen(false);
  1454. portOpenCheck = llz_objCommAX.PortClose(true);
  1455. trace("portClose후:"+portOpenCheck);
  1456. }
  1457. }else if(portOpenCheck == "FALSE" && sCommKind == "02"){
  1458. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  1459. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  1460. + " \n 2.케이블 확인"
  1461. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  1462. return;
  1463. }
  1464. }
  1465. /**********************************************************************************
  1466. * 함수명 : lf_lisMicrobarcdLabel
  1467. * 설명 : 배지바코드를 출력한다.
  1468. * argument : ref - 출력할 바코드정보 Dataset
  1469. prntinfo - 바코드설정정보 Dataset
  1470. bGbn - 접수화면에서 출력시 설정
  1471. **********************************************************************************/
  1472. function lf_lisMicrobarcdLabel(ref,prntinfo,bGbn){
  1473. var cntHR = ref.rowcount;
  1474. var sPrntKind = prntinfo.getColumn(0,"prntkind"); //프린터종류
  1475. var portOpenCheck = "";
  1476. var iXPos = 0;
  1477. var iYPos = 0;
  1478. var sSndMsg = "";
  1479. if (sPrntKind == 0) return;
  1480. var sCommKind = utlf_transNullToEmpty(prntinfo.getColumn(0,"commkind"));
  1481. var sLeftBank = utlf_transNullToEmpty(prntinfo.getColumn(0,"left")); //왼쪽여백
  1482. var sTopBank = utlf_transNullToEmpty(prntinfo.getColumn(0,"top")); //위쪽여백
  1483. if(sCommKind == "01") {
  1484. var sSetUpVal = prntinfo.getColumn(0,"setupval"); //PRT LPT출력
  1485. }
  1486. else if(sCommKind == "02") { //COM serial출력
  1487. var sComm = prntinfo.getColumn(0,"comm"); //com port
  1488. var sDataBit = prntinfo.getColumn(0,"databit"); //data bit
  1489. var sStopBit = prntinfo.getColumn(0,"stopbit"); //stop bit
  1490. var sBaudRate = prntinfo.getColumn(0,"baudrate"); //baud rate
  1491. var sParity = prntinfo.getColumn(0,"parity"); //parity
  1492. llz_objCommAX.CommPort = sComm;
  1493. llz_objCommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  1494. portOpenCheck = llz_objCommAX.PortOpen(true);
  1495. //portOpenCheck = llz_objCommAX.PortOpen = true;
  1496. }
  1497. else if(sCommKind == "03") { //TCP/IP출력
  1498. var sSetUpVal = prntinfo.getColumn(0,"setupval03");
  1499. var sEqmtCD = prntinfo.getColumn(0,"eqmtcd");
  1500. }
  1501. if( (portOpenCheck == "TRUE" && sCommKind == "02")
  1502. || sCommKind == "01"
  1503. || sCommKind == "03"){
  1504. for(i=0 ; i< cntHR;i++){
  1505. if(bGbn == "4"){ //접수시 배지바코드
  1506. var cnt = "1"; //model.getvalue(ref + "["+i+"]/mdiabarcdprntcnt"); //접수바코드장수
  1507. }
  1508. else{ //재출력,1장출력인 부분
  1509. var cnt = "1";
  1510. }
  1511. if(cnt > "0") { //출력바코드장수가 있다면
  1512. var sStr = "";
  1513. var pid = utlf_transNullToEmpty(ref.getColumn(i,"pid")); //등록번호
  1514. var sexage = utlf_transNullToEmpty(ref.getColumn(i,"sexage")); //성별나이
  1515. var patnm = utlf_transNullToEmpty(ref.getColumn(i,"patnm")); //환자명
  1516. var worknumber = utlf_transNullToEmpty(ref.getColumn(i,"workno")); //작업번호
  1517. var workno = worknumber.substring(0,2) + "-" + worknumber.substring(2,6) + "-" + worknumber.substring(6,15);
  1518. var spcnm = utlf_transNullToEmpty(ref.getColumn(i,"spcnm")); //검체명
  1519. var acptdt = utlf_transNullToEmpty(ref.getColumn(i,"acptdt")); //접수일자
  1520. var acptdt2 = utlf_transNullToEmpty(ref.getColumn(i,"acptdt2")); //접수일자2
  1521. var mdialblnm = utlf_transNullToEmpty(ref.getColumn(i,"mdialblnm")); //배지명
  1522. var wardinfo = utlf_transNullToEmpty(ref.getColumn(i,"wardinfo")); //병동정보
  1523. var bcno = utlf_transNullToEmpty(ref.getColumn(i,"bcno")); //바코드
  1524. var infcinfo = utlf_transNullToEmpty(ref.getColumn(i,"infcinfo")); //김염정보
  1525. var prcpremfact = utlf_transNullToEmpty(ref.getColumn(i,"prcpremfact")); //의사comment
  1526. var prntcnt = utlf_transNullToEmpty(ref.getColumn(i,"prntcnt")); //출력매수(화면설정)
  1527. var flag = utlf_transNullToEmpty(ref.getColumn(i,"flag")); //재출력이면 설정됨
  1528. var barcdprntdt = utlf_transNullToEmpty(ref.getColumn(i,"barcdprntdt")); //현재시간(TF단에서 처리됨)
  1529. var tclslblnm = utlf_transNullToEmpty(ref.getColumn(i,"tclslblnm")); //검사라벨명
  1530. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  1531. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  1532. if(sPrntKind == "15") { //인터맥
  1533. //프린터설정
  1534. //sSndMsg += "SYSVAR(18)=0" + "\r\n"; //다변설정 기본:0
  1535. sSndMsg += "SYSVAR(35)=1" + "\r\n"; //저장여부 0:영구저장,1:임시저장
  1536. //sSndMsg += "LTS& OFF" + "\r\n"; //배치인쇄시 유용,기본 off
  1537. sSndMsg += "INPUT OFF" + "\r\n"; //인터맥다이렉트프로토콜 비활성화
  1538. //sSndMsg += "FORMAT INPUT \"STX\" , \"ETX\",\"CR\"" + "\r\n";
  1539. //sSndMsg += "FORMAT INPUT CHR$(2),CHR$(3),CHR$(13)"; //layout run 명령어구문 정의
  1540. sSndMsg += "LAYOUT INPUT " +"\"" + "tmp:LBLSOFT.LAY" + "\"" + "\r\n"; //layout구성 시작
  1541. sSndMsg += "NASC -2:AN 7" + "\r\n"; //캐릭터셋지정 -2:ANSI : 위치지정 7:좌측상단
  1542. //sSndMsg += "CLIP OFF" + "\r\n"; //인쇄바같부분 비활성화 기본 :off
  1543. //sSndMsg += "CLIP BARCODE OFF" + "\r\n";//인쇄바같부분 비활성화 기본 :off
  1544. //sSndMsg += "XORMODE OFF" + "\r\n"; //교차필드인쇄부분 기본:off
  1545. //sSndMsg += "MAG 1,1" + "\r\n"; 확대:높이,폭 기본 1,1
  1546. //접수번호 -> 작업번호
  1547. iXPos = Number(sLeftBank) + 20;
  1548. iYPos = Number(sTopBank) + 256;
  1549. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,10:NI:PT " +"\"" + workno + "\"" + "\r\n";
  1550. //검체바코드
  1551. iXPos = Number(sLeftBank) + 20;
  1552. iYPos = Number(sTopBank) + 226;
  1553. sSndMsg += "PP " + iXPos + "," + iYPos + ":AN 7:DIR 1:BARSET " +"\"" + "CODE39" +"\"" + ",2,1,2,101:PB " + "\"" + bcno + "\"" + "\r\n";
  1554. //바코드번호
  1555. iiXPos = Number(sLeftBank) + 20;
  1556. iYPos = Number(sTopBank) + 124;
  1557. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + bcno + "\"" + "\r\n";
  1558. //파트접수일시
  1559. iXPos = Number(sLeftBank) + 200;
  1560. iYPos = Number(sTopBank) + 124;
  1561. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + acptdt2 + "\"" + "\r\n";
  1562. //등록번호
  1563. iXPos = Number(sLeftBank) + 20;
  1564. iYPos = Number(sTopBank) + 102;
  1565. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + pid + "\"" + "\r\n";
  1566. //환자명
  1567. iXPos = Number(sLeftBank) + 200;
  1568. iYPos = Number(sTopBank) + 122;
  1569. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  1570. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  1571. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  1572. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  1573. sSndMsg += "PT " +"\"" + patnm +"\"" + "\r\n"; //입력데이터제공
  1574. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  1575. //sSndMsg += "PF " + "\r\n"; //인쇄
  1576. //성별/나이
  1577. iXPos = Number(sLeftBank) + 20;
  1578. iYPos = Number(sTopBank) + 80;
  1579. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + sexage + "\"" + "\r\n";
  1580. //진료과/병실
  1581. iXPos = Number(sLeftBank) + 80;
  1582. iYPos = Number(sTopBank) + 80;
  1583. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + wardinfo + "\"" + "\r\n";
  1584. //검체명
  1585. iXPos = Number(sLeftBank) + 170;
  1586. iYPos = Number(sTopBank) + 80;
  1587. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + spcnm + "\"" + "\r\n";
  1588. //출력일시
  1589. iXPos = Number(sLeftBank) + 20;
  1590. iYPos = Number(sTopBank) + 60;
  1591. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + barcdprntdt + "\"" + "\r\n";
  1592. //배지명
  1593. iXPos = Number(sLeftBank) + 180;
  1594. iYPos = Number(sTopBank) + 60;
  1595. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,10:NI:PT " +"\"" + mdialblnm + "\"" + "\r\n";
  1596. //검사명
  1597. iXPos = Number(sLeftBank) + 20;
  1598. iYPos = Number(sTopBank) + 38;
  1599. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,10:NI:PT " +"\"" + tclslblnm + "\"" + "\r\n";
  1600. //출력
  1601. sSndMsg += "LAYOUT END" + "\r\n"; //레이아웃구성을 중지하고 저장
  1602. sSndMsg += "LAYOUT RUN " +"\"" + "tmp:LBLSOFT.LAY" +"\"" + "\r\n"; //레이아웃시작
  1603. sSndMsg += "INPUT ON" + "\r\n"; //인터맥다이렉트 프로토콜 활성화
  1604. sSndMsg += "PF " + cnt + "\r\n"; //인쇄
  1605. sSndMsg += "PRINT KEY OFF" + "\r\n"; //프린트버튼 비활성화
  1606. if(sCommKind == "01") {
  1607. llz_objCommAX.SendMessageToLPT(sSndMsg);
  1608. //llz_objCommAX.Output = sSndMsg;
  1609. sSndMsg = "";
  1610. }
  1611. else if(sCommKind == "02") {
  1612. llz_objCommAX.SendMessage(sSndMsg);
  1613. //llz_objCommAX.Output = sSndMsg;
  1614. sSndMsg = "";
  1615. }
  1616. }
  1617. else if(sPrntKind == "16") { //루칸
  1618. //프린터설정
  1619. sSndMsg += "N" + "\r\n"; //이미지버퍼내용삭제
  1620. sSndMsg += "Q256,24" + "\r\n"; //용지세로 32mm,용지사이여백3mm
  1621. sSndMsg += "q432" + "\r\n"; //용지가로54mm
  1622. //접수번호 -> 작업번호
  1623. iXPos = Number(sLeftBank) + 20;
  1624. iYPos = Number(sTopBank) + 0;
  1625. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + workno + "\"" + "\r\n";
  1626. //검체바코드
  1627. iXPos = Number(sLeftBank) + 20;
  1628. iYPos = Number(sTopBank) + 30;
  1629. sSndMsg += "B" + iXPos + "," + iYPos + "," + "0,3,2,4,101,N," + "\"" + bcno + "\"" + "\r\n";
  1630. //바코드번호
  1631. iiXPos = Number(sLeftBank) + 20;
  1632. iYPos = Number(sTopBank) + 132;
  1633. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + bcno + "\"" + "\r\n";
  1634. //파트접수일시
  1635. iXPos = Number(sLeftBank) + 200;
  1636. iYPos = Number(sTopBank) + 132;
  1637. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + acptdt2 + "\"" + "\r\n";
  1638. //등록번호
  1639. iXPos = Number(sLeftBank) + 20;
  1640. iYPos = Number(sTopBank) + 156;
  1641. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + pid + "\"" + "\r\n";
  1642. //환자명
  1643. iXPos = Number(sLeftBank) + 200;
  1644. iYPos = Number(sTopBank) + 156;
  1645. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + patnm + "\"" + "\r\n";
  1646. //성별/나이
  1647. iXPos = Number(sLeftBank) + 20;
  1648. iYPos = Number(sTopBank) + 180;
  1649. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + sexage + "\"" + "\r\n";
  1650. //진료과/병실
  1651. iXPos = Number(sLeftBank) + 80;
  1652. iYPos = Number(sTopBank) + 180;
  1653. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + wardinfo + "\"" + "\r\n";
  1654. //검체명
  1655. iXPos = Number(sLeftBank) + 150;
  1656. iYPos = Number(sTopBank) + 180;
  1657. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + spcnm + "\"" + "\r\n";
  1658. //출력일시
  1659. iXPos = Number(sLeftBank) + 20;
  1660. iYPos = Number(sTopBank) + 204;
  1661. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + barcdprntdt + "\"" + "\r\n";
  1662. //배지명
  1663. iXPos = Number(sLeftBank) + 180;
  1664. iYPos = Number(sTopBank) + 204;
  1665. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + mdialblnm + "\"" + "\r\n";
  1666. //검사라벨명
  1667. iXPos = Number(sLeftBank) + 20;
  1668. iYPos = Number(sTopBank) + 228;
  1669. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + tclslblnm + "\"" + "\r\n";
  1670. //출력
  1671. sSndMsg += "P"+cnt+",1" + "\r\n";
  1672. if(sCommKind == "01") {
  1673. llz_objCommAX.SendMessageToLPT(sSndMsg);
  1674. //llz_objCommAX.Output = sSndMsg;
  1675. sSndMsg = "";
  1676. }
  1677. else if(sCommKind == "02") {
  1678. llz_objCommAX.SendMessage(sSndMsg);
  1679. //llz_objCommAX.Output = sSndMsg;
  1680. sSndMsg = "";
  1681. }
  1682. }
  1683. else if(sPrntKind == "17") { //아르고스
  1684. //프린터설정
  1685. sSndMsg += "N" + "\r\n"; //이미지버퍼내용삭제
  1686. sSndMsg += "JF" + "\r\n"; //용지정렬
  1687. sSndMsg += "Q256,24" + "\r\n"; //용지세로 32mm,용지사이여백3mm
  1688. sSndMsg += "q432" + "\r\n"; //용지가로54mm
  1689. //접수번호 -> 작업번호
  1690. iXPos = Number(sLeftBank) + 20;
  1691. iYPos = Number(sTopBank) + 10;
  1692. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + workno + "\"" + "\r\n";
  1693. //검체바코드
  1694. iXPos = Number(sLeftBank) + 20;
  1695. iYPos = Number(sTopBank) + 30;
  1696. sSndMsg += "B" + iXPos + "," + iYPos + "," + "0,3,2,4,101,N," + "\"" + bcno + "\"" + "\r\n";
  1697. //바코드번호
  1698. iiXPos = Number(sLeftBank) + 20;
  1699. iYPos = Number(sTopBank) + 137;
  1700. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + bcno + "\"" + "\r\n";
  1701. //파트접수일시
  1702. iXPos = Number(sLeftBank) + 200;
  1703. iYPos = Number(sTopBank) + 137;
  1704. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + acptdt2 + "\"" + "\r\n";
  1705. //등록번호
  1706. iXPos = Number(sLeftBank) + 20;
  1707. iYPos = Number(sTopBank) + 156;
  1708. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + pid + "\"" + "\r\n";
  1709. //환자명
  1710. iXPos = Number(sLeftBank) + 140;
  1711. iYPos = Number(sTopBank) + 154;
  1712. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + patnm + "\"" + "\r\n";
  1713. //성별/나이
  1714. iXPos = Number(sLeftBank) + 20;
  1715. iYPos = Number(sTopBank) + 180;
  1716. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + sexage + "\"" + "\r\n";
  1717. //진료과/병실
  1718. iXPos = Number(sLeftBank) + 80;
  1719. iYPos = Number(sTopBank) + 180;
  1720. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + wardinfo + "\"" + "\r\n";
  1721. //검체명
  1722. iXPos = Number(sLeftBank) + 150;
  1723. iYPos = Number(sTopBank) + 180;
  1724. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + spcnm + "\"" + "\r\n";
  1725. //출력일시
  1726. iXPos = Number(sLeftBank) + 20;
  1727. iYPos = Number(sTopBank) + 204;
  1728. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + barcdprntdt + "\"" + "\r\n";
  1729. //배지명
  1730. iXPos = Number(sLeftBank) + 180;
  1731. iYPos = Number(sTopBank) + 204;
  1732. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + mdialblnm + "\"" + "\r\n";
  1733. //검사라벨명
  1734. iXPos = Number(sLeftBank) + 20;
  1735. iYPos = Number(sTopBank) + 228;
  1736. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + tclslblnm + "\"" + "\r\n";
  1737. //출력
  1738. sSndMsg += "P1"+ "," + cnt + "\r\n";
  1739. if(sCommKind == "01") {
  1740. llz_objCommAX.SendMessageToLPT(sSndMsg);
  1741. //llz_objCommAX.Output = sSndMsg;
  1742. sSndMsg = "";
  1743. }
  1744. else if(sCommKind == "02") {
  1745. trace(llz_objCommAX.SendMessage(sSndMsg));
  1746. //llz_objCommAX.Output = sSndMsg;
  1747. sSndMsg = "";
  1748. }
  1749. }
  1750. if(sCommKind == "02") {
  1751. //llz_objCommAX.PortOpen = false;
  1752. portOpenCheck = llz_objCommAX.PortClose(true);
  1753. }
  1754. }
  1755. else {
  1756. return;
  1757. }
  1758. }
  1759. }else if(portOpenCheck == "FALSE" && sCommKind == "02"){
  1760. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  1761. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  1762. + " \n 2.케이블 확인"
  1763. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  1764. return;
  1765. }
  1766. }
  1767. /**********************************************************************************
  1768. * 함수명 : lf_lisReagentBarcodeLabel
  1769. * 설명 : 채혈,재출력화면에서 시약라벨 바코드를 출력한다.
  1770. * argument : ref - 출력할 바코드정보 Dataset
  1771. prntinfo - 바코드설정정보 Dataset
  1772. bGbn - 채혈,접수화면에서 출력시 설정
  1773. **********************************************************************************/
  1774. function lf_lisReagentBarcodeLabel(ref,prntinfo,bGbn){
  1775. var cntHR = ref.rowcount;
  1776. var sPrntKind = prntinfo.getColumn(0,"prntkind"); //프린터종류
  1777. var portOpenCheck = "";
  1778. var iXPos = 0;
  1779. var iYPos = 0;
  1780. var sSndMsg = "";
  1781. if (sPrntKind == 0) return;
  1782. var sCommKind = utlf_transNullToEmpty(prntinfo.getColumn(0,"commkind"));
  1783. var sLeftBank = utlf_transNullToEmpty(prntinfo.getColumn(0,"left")); //왼쪽여백
  1784. var sTopBank = utlf_transNullToEmpty(prntinfo.getColumn(0,"top")); //위쪽여백
  1785. if(sCommKind == "01") {
  1786. var sSetUpVal = prntinfo.getColumn(0,"setupval"); //PRT LPT출력
  1787. }
  1788. else if(sCommKind == "02") { //COM serial출력
  1789. var sComm = prntinfo.getColumn(0,"comm"); //com port
  1790. var sDataBit = prntinfo.getColumn(0,"databit"); //data bit
  1791. var sStopBit = prntinfo.getColumn(0,"stopbit"); //stop bit
  1792. var sBaudRate = prntinfo.getColumn(0,"baudrate"); //baud rate
  1793. var sParity = prntinfo.getColumn(0,"parity"); //parity
  1794. llz_objCommAX.CommPort = sComm;
  1795. llz_objCommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  1796. portOpenCheck = llz_objCommAX.PortOpen(true);
  1797. }
  1798. else if(sCommKind == "03") { //TCP/IP출력
  1799. var sSetUpVal = prntinfo.getColumn(0,"setupval03");
  1800. var sEqmtCD = prntinfo.getColumn(0,"eqmtcd");
  1801. }
  1802. if( (portOpenCheck == "TRUE" && sCommKind == "02")
  1803. || sCommKind == "01"
  1804. || sCommKind == "03"){
  1805. for(i=0 ; i< cntHR;i++){
  1806. var cnt = utlf_transNullToEmpty(ref.getColumn(i,"reagentbarcdprntcnt")); //바코드장수
  1807. if(cnt > "0") { //출력바코드장수가 있다면
  1808. var reagentlblnm = utlf_transNullToEmpty(ref.getColumn(i,"reagentlblnm")); //시약라벨명
  1809. var pid = utlf_transNullToEmpty(ref.getColumn(i,"pid")); //등록번호
  1810. var hngnm = utlf_transNullToEmpty(ref.getColumn(i,"hngnm")); //환자명
  1811. var dt = utlf_getCurrentDateTime().toDate("YYYYMMDD hhmmss").getDateFormat("YYYY-MM-DD hh:mm"); //출력일시
  1812. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  1813. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  1814. if(sPrntKind == "15") { //인터맥
  1815. //프린터설정
  1816. //sSndMsg += "SYSVAR(18)=0" + "\r\n"; //다변설정 기본:0
  1817. sSndMsg += "SYSVAR(35)=1" + "\r\n"; //저장여부 0:영구저장,1:임시저장
  1818. //sSndMsg += "LTS& OFF" + "\r\n"; //배치인쇄시 유용,기본 off
  1819. sSndMsg += "INPUT OFF" + "\r\n"; //인터맥다이렉트프로토콜 비활성화
  1820. //sSndMsg += "FORMAT INPUT \"STX\" , \"ETX\",\"CR\"" + "\r\n";
  1821. //sSndMsg += "FORMAT INPUT CHR$(2),CHR$(3),CHR$(13)"; //layout run 명령어구문 정의
  1822. sSndMsg += "LAYOUT INPUT " +"\"" + "tmp:LBLSOFT.LAY" + "\"" + "\r\n"; //layout구성 시작
  1823. sSndMsg += "NASC -2:AN 7" + "\r\n"; //캐릭터셋지정 -2:ANSI : 위치지정 7:좌측상단
  1824. //sSndMsg += "CLIP OFF" + "\r\n"; //인쇄바같부분 비활성화 기본 :off
  1825. //sSndMsg += "CLIP BARCODE OFF" + "\r\n";//인쇄바같부분 비활성화 기본 :off
  1826. //sSndMsg += "XORMODE OFF" + "\r\n"; //교차필드인쇄부분 기본:off
  1827. //sSndMsg += "MAG 1,1" + "\r\n"; 확대:높이,폭 기본 1,1
  1828. //시약라벨
  1829. iXPos = Number(sLeftBank) + 20;
  1830. iYPos = Number(sTopBank) + 260;
  1831. //sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  1832. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,9,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  1833. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  1834. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  1835. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  1836. sSndMsg += "PT " +"\"" + "시약라벨" +"\"" + "\r\n"; //입력데이터제공
  1837. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  1838. //출력시각 dt
  1839. iXPos = Number(sLeftBank) + 200;
  1840. iYPos = Number(sTopBank) + 240;
  1841. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + dt + "\"" + "\r\n";
  1842. //시약라벨명
  1843. iXPos = Number(sLeftBank) + 20;
  1844. iYPos = Number(sTopBank) + 150;
  1845. sSndMsg += "FONTFT " +"\"" +"Haansoft Dotum" +"\"" + " ,9,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  1846. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  1847. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  1848. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  1849. sSndMsg += "PT " +"\"" + reagentlblnm +"\"" + "\r\n"; //입력데이터제공
  1850. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  1851. // 등록번호 pid
  1852. iXPos = Number(sLeftBank) + 20;
  1853. iYPos = Number(sTopBank) + 60;
  1854. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,8:NI:PT " +"\"" + pid + "\"" + "\r\n";
  1855. //환자명 hngnm
  1856. iXPos = Number(sLeftBank) + 200;
  1857. iYPos = Number(sTopBank) + 80;
  1858. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  1859. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  1860. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  1861. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  1862. sSndMsg += "PT " +"\"" + hngnm +"\"" + "\r\n"; //입력데이터제공
  1863. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  1864. //출력
  1865. sSndMsg += "LAYOUT END" + "\r\n"; //레이아웃구성을 중지하고 저장
  1866. sSndMsg += "LAYOUT RUN " +"\"" + "tmp:LBLSOFT.LAY" +"\"" + "\r\n"; //레이아웃시작
  1867. sSndMsg += "INPUT ON" + "\r\n"; //인터맥다이렉트 프로토콜 활성화
  1868. sSndMsg += "PF " + cnt + "\r\n"; //인쇄
  1869. sSndMsg += "PRINT KEY OFF" + "\r\n"; //프린트버튼 비활성화
  1870. if(sCommKind == "01") {
  1871. llz_objCommAX.SendMessageToLPT(sSndMsg);
  1872. //llz_objCommAX.Output = sSndMsg;
  1873. sSndMsg = "";
  1874. }
  1875. else if(sCommKind == "02") {
  1876. llz_objCommAX.SendMessage(sSndMsg);
  1877. //llz_objCommAX.Output = sSndMsg;
  1878. sSndMsg = "";
  1879. }
  1880. }
  1881. else if(sPrntKind == "16") { //루칸
  1882. //프린터설정
  1883. sSndMsg += "N" + "\r\n"; //이미지버퍼내용삭제
  1884. sSndMsg += "Q256,24" + "\r\n"; //용지세로 32mm,용지사이여백3mm
  1885. sSndMsg += "q432" + "\r\n"; //용지가로54mm
  1886. //시약라벨
  1887. iXPos = Number(sLeftBank) + 20;
  1888. iYPos = Number(sTopBank) + 10;
  1889. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + "시약라벨" + "\"" + "\r\n";
  1890. //출력일시
  1891. iXPos = Number(sLeftBank) + 200;
  1892. iYPos = Number(sTopBank) + 10;
  1893. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + dt + "\"" + "\r\n";
  1894. //시약라벨명 reagentlblnm
  1895. iXPos = Number(sLeftBank) + 20;
  1896. iYPos = Number(sTopBank) + 90;
  1897. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,2,3,N," + "\"" + reagentlblnm + "\"" + "\r\n";
  1898. //등록번호 pid
  1899. iXPos = Number(sLeftBank) + 20;
  1900. iYPos = Number(sTopBank) + 210;
  1901. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + pid + "\"" + "\r\n";
  1902. //환자명 hngnm
  1903. iXPos = Number(sLeftBank) + 200;
  1904. iYPos = Number(sTopBank) + 210;
  1905. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + hngnm + "\"" + "\r\n";
  1906. //출력
  1907. sSndMsg += "P"+cnt+",1" + "\r\n";
  1908. if(sCommKind == "01") {
  1909. trace(llz_objCommAX.SendMessageToLPT(sSndMsg));
  1910. //llz_objCommAX.Output = sSndMsg;
  1911. sSndMsg = "";
  1912. }
  1913. else if(sCommKind == "02") {
  1914. trace(llz_objCommAX.SendMessage(sSndMsg));
  1915. //llz_objCommAX.Output = sSndMsg;
  1916. sSndMsg = "";
  1917. }
  1918. }
  1919. else if(sPrntKind == "17") { //아르고스
  1920. //프린터설정
  1921. sSndMsg += "N" + "\r\n"; //이미지버퍼내용삭제
  1922. sSndMsg += "JF" + "\r\n"; //용지정렬
  1923. sSndMsg += "Q256,24" + "\r\n"; //용지세로 32mm,용지사이여백3mm
  1924. sSndMsg += "q432" + "\r\n"; //용지가로54mm
  1925. //시약라벨
  1926. iXPos = Number(sLeftBank) + 20;
  1927. iYPos = Number(sTopBank) + 20;
  1928. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + "시약라벨" + "\"" + "\r\n";
  1929. //출력일시
  1930. iXPos = Number(sLeftBank) + 200;
  1931. iYPos = Number(sTopBank) + 20;
  1932. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + dt + "\"" + "\r\n";
  1933. //시약라벨명 reagentlblnm
  1934. iXPos = Number(sLeftBank) + 20;
  1935. iYPos = Number(sTopBank) + 90;
  1936. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,2,3,N," + "\"" + reagentlblnm + "\"" + "\r\n";
  1937. //등록번호 pid
  1938. iXPos = Number(sLeftBank) + 20;
  1939. iYPos = Number(sTopBank) + 200;
  1940. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,2,N,"+ "\"" + pid + "\"" + "\r\n";
  1941. //환자명 hngnm
  1942. iXPos = Number(sLeftBank) + 200;
  1943. iYPos = Number(sTopBank) + 200;
  1944. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,2,N,"+ "\"" + hngnm + "\"" + "\r\n";
  1945. //출력
  1946. sSndMsg += "P1"+ "," + cnt + "\r\n";
  1947. if(sCommKind == "01") {
  1948. trace(llz_objCommAX.SendMessageToLPT(sSndMsg));
  1949. //llz_objCommAX.Output = sSndMsg;
  1950. sSndMsg = "";
  1951. }
  1952. else if(sCommKind == "02") {
  1953. trace(llz_objCommAX.SendMessage(sSndMsg));
  1954. //llz_objCommAX.Output = sSndMsg;
  1955. sSndMsg = "";
  1956. }
  1957. }
  1958. }
  1959. else {
  1960. trace("========");
  1961. return;
  1962. }
  1963. }
  1964. if(sCommKind == "02") {
  1965. //llz_objCommAX.PortOpen = false;
  1966. portOpenCheck = llz_objCommAX.PortClose(true);
  1967. }
  1968. }else if(portOpenCheck == "FALSE" && sCommKind == "02"){
  1969. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  1970. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  1971. + " \n 2.케이블 확인"
  1972. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  1973. return;
  1974. }
  1975. }
  1976. /**********************************************************************************
  1977. * 함수명 : lf_lisPlgySpcBarcodeLabel
  1978. * 설명 : 채혈화면에서 병리채혈 바코드를 출력한다.
  1979. * argument : ref - 출력할 바코드정보 Dataset
  1980. prntinfo - 바코드설정정보 Dataset
  1981. **********************************************************************************/
  1982. function lf_lisPlgySpcBarcodeLabel(ref,prntinfo){
  1983. var cntHR = ref.rowcount;
  1984. var sPrntKind = prntinfo.getColumn(0,"prntkind"); //프린터종류
  1985. var portOpenCheck = "";
  1986. var iXPos = 0;
  1987. var iYPos = 0;
  1988. var sSndMsg = "";
  1989. if (sPrntKind == 0) return;
  1990. var sCommKind = utlf_transNullToEmpty(prntinfo.getColumn(0,"commkind"));
  1991. var sLeftBank = utlf_transNullToEmpty(prntinfo.getColumn(0,"left")); //왼쪽여백
  1992. var sTopBank = utlf_transNullToEmpty(prntinfo.getColumn(0,"top")); //위쪽여백
  1993. if(sCommKind == "01") {
  1994. var sSetUpVal = prntinfo.getColumn(0,"setupval"); //PRT LPT출력
  1995. }
  1996. else if(sCommKind == "02") { //COM serial출력
  1997. var sComm = prntinfo.getColumn(0,"comm"); //com port
  1998. var sDataBit = prntinfo.getColumn(0,"databit"); //data bit
  1999. var sStopBit = prntinfo.getColumn(0,"stopbit"); //stop bit
  2000. var sBaudRate = prntinfo.getColumn(0,"baudrate"); //baud rate
  2001. var sParity = prntinfo.getColumn(0,"parity"); //parity
  2002. llz_objCommAX.CommPort = sComm;
  2003. llz_objCommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  2004. portOpenCheck = llz_objCommAX.PortOpen(true);
  2005. //portOpenCheck = llz_objCommAX.PortOpen = true;
  2006. }
  2007. else if(sCommKind == "03") { //TCP/IP출력
  2008. var sSetUpVal = prntinfo.getColumn(0,"setupval03");
  2009. var sEqmtCD = prntinfo.getColumn(0,"eqmtcd");
  2010. }
  2011. if( (portOpenCheck == "TRUE" && sCommKind == "02")
  2012. || sCommKind == "01"
  2013. || sCommKind == "03"){
  2014. for(i=0 ; i < cntHR;i++){
  2015. var sStr = "";
  2016. var instcd = utlf_transNullToEmpty(ref.getColumn(i,"instcd")); //기관코드
  2017. var spctrandd = utlf_transNullToEmpty(ref.getColumn(i,"spctrandd")); //검체전송일자
  2018. var spctranno = utlf_transNullToEmpty(ref.getColumn(i,"spctranno")); //검체전송번호
  2019. var spctranseqno = utlf_transNullToEmpty(ref.getColumn(i,"spctranseqno")); //검체전송일련번호 //순차적으로다르다
  2020. var pid = utlf_transNullToEmpty(ref.getColumn(i,"pid")); //등록번호
  2021. var patnm = utlf_transNullToEmpty(ref.getColumn(i,"patnm")); //환자명
  2022. var sexage = utlf_transNullToEmpty(ref.getColumn(i,"sexage")); //성별나이
  2023. var printdt = utlf_getCurrentDateTime().toDate("YYYYMMDD hhmmss").getDateFormat("YYYY-MM-DD hh:mm"); //출력일시
  2024. var orddeptnm = utlf_transNullToEmpty(ref.getColumn(i,"orddeptnm")); //진료과
  2025. var wardroom = utlf_transNullToEmpty(ref.getColumn(i,"wardroom")); //병동병실
  2026. var prcpdd = utlf_transNullToEmpty(ref.getColumn(i,"prcpdd")); //처방일자
  2027. var spccd = utlf_transNullToEmpty(ref.getColumn(i,"spccd")); //검체코드 //순차적으로다르다
  2028. var spcnm = utlf_transNullToEmpty(ref.getColumn(i,"spcnm")); //검체명 //순차적으로다르다
  2029. var spcbarcdno = utlf_transNullToEmpty(ref.getColumn(i,"spcbarcdno")); //검체바코드번호 //순차적으로다르다
  2030. var prcpdispnm = utlf_transNullToEmpty(ref.getColumn(i,"prcpdispnm")); //처방표시명(원처방)
  2031. var prcpdispnm2 = utlf_transNullToEmpty(ref.getColumn(i,"prcpdispnm2")); //처방표시명(추가처방)
  2032. var spcdispnm = utlf_transNullToEmpty(ref.getColumn(i,"spcdispnm")); //검체표시명 //순차적으로다르다
  2033. var orddrnm = utlf_transNullToEmpty(ref.getColumn(i,"orddrnm")); //진료의명
  2034. var isolabbrcd = utlf_transNullToEmpty(ref.getColumn(i,"isolabbrcd")); //감염정보
  2035. var prcphopedt = utlf_transNullToEmpty(ref.getColumn(i,"prcphopedt")); //희망일자
  2036. var bedposcnts = utlf_transNullToEmpty(ref.getColumn(i,"bedposcnts")); //응급실환자위치
  2037. var prcpgenrflag = utlf_transNullToEmpty(ref.getColumn(i,"prcpgenrflag")); //처방발생구분
  2038. var dispptno = utlf_transNullToEmpty(ref.getColumn(i,"dispptno")); //병리번호
  2039. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  2040. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  2041. if(sPrntKind == "15") { //인터맥
  2042. //프린터설정
  2043. //sSndMsg += "SYSVAR(18)=0" + "\r\n"; //다변설정 기본:0
  2044. sSndMsg += "SYSVAR(35)=1" + "\r\n"; //저장여부 0:영구저장,1:임시저장
  2045. //sSndMsg += "LTS& OFF" + "\r\n"; //배치인쇄시 유용,기본 off
  2046. sSndMsg += "INPUT OFF" + "\r\n"; //인터맥다이렉트프로토콜 비활성화
  2047. //sSndMsg += "FORMAT INPUT \"STX\" , \"ETX\",\"CR\"" + "\r\n";
  2048. //sSndMsg += "FORMAT INPUT CHR$(2),CHR$(3),CHR$(13)"; //layout run 명령어구문 정의
  2049. sSndMsg += "LAYOUT INPUT " +"\"" + "tmp:LBLSOFT.LAY" + "\"" + "\r\n"; //layout구성 시작
  2050. sSndMsg += "NASC -2:AN 7" + "\r\n"; //캐릭터셋지정 -2:ANSI : 위치지정 7:좌측상단
  2051. //sSndMsg += "CLIP OFF" + "\r\n"; //인쇄바같부분 비활성화 기본 :off
  2052. //sSndMsg += "CLIP BARCODE OFF" + "\r\n";//인쇄바같부분 비활성화 기본 :off
  2053. //sSndMsg += "XORMODE OFF" + "\r\n"; //교차필드인쇄부분 기본:off
  2054. //sSndMsg += "MAG 1,1" + "\r\n"; 확대:높이,폭 기본 1,1
  2055. //검체바코드
  2056. iXPos = Number(sLeftBank) + 20;
  2057. iYPos = Number(sTopBank) + 256;
  2058. sSndMsg += "PP " + iXPos + "," + iYPos + ":AN 7:DIR 1:BARSET " +"\"" + "CODE39" +"\"" + ",2,1,2,101:PB " + "\"" + spcbarcdno + "\"" + "\r\n";
  2059. //검체번호
  2060. iXPos = Number(sLeftBank) + 130;
  2061. iYPos = Number(sTopBank) + 153;
  2062. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,9:NI:PT " +"\"" + spcbarcdno + "\"" + "\r\n";
  2063. //PATHOLOGY(캡션)
  2064. iXPos = Number(sLeftBank) + 20;
  2065. iYPos = Number(sTopBank) + 122;
  2066. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + "PATHOLOGY" + "\"" + "\r\n";
  2067. //병동/병실
  2068. iXPos = Number(sLeftBank) + 140;
  2069. iYPos = Number(sTopBank) + 122;
  2070. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + wardroom + "\"" + "\r\n";
  2071. //진료의
  2072. iXPos = Number(sLeftBank) + 280;
  2073. iYPos = Number(sTopBank) + 140;
  2074. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  2075. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  2076. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  2077. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  2078. sSndMsg += "PT " +"\"" + orddrnm +"\"" + "\r\n"; //입력데이터제공
  2079. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  2080. //sSndMsg += "PF " + "\r\n"; //인쇄
  2081. //등록번호
  2082. iXPos = Number(sLeftBank) + 20;
  2083. iYPos = Number(sTopBank) + 98;
  2084. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,8:II:PT " +"\"" + pid + "\"" + "\r\n";
  2085. //환자명
  2086. iXPos = Number(sLeftBank) + 140;
  2087. iYPos = Number(sTopBank) + 119;
  2088. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  2089. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  2090. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  2091. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  2092. sSndMsg += "PT " +"\"" + patnm +"\"" + "\r\n"; //입력데이터제공
  2093. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  2094. //sSndMsg += "PF " + "\r\n"; //인쇄
  2095. //성별/나이
  2096. iXPos = Number(sLeftBank) + 280;
  2097. iYPos = Number(sTopBank) + 98;
  2098. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + sexage + "\"" + "\r\n";
  2099. //진료과약어
  2100. iXPos = Number(sLeftBank) + 350;
  2101. iYPos = Number(sTopBank) + 98;
  2102. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + orddeptnm + "\"" + "\r\n";
  2103. //검체순번/토탈갯수
  2104. iXPos = Number(sLeftBank) + 20;
  2105. iYPos = Number(sTopBank) + 74;
  2106. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + spcdispnm + "\"" + "\r\n";
  2107. //세부검체명
  2108. //iXPos = Number(sLeftBank) + 50;
  2109. //iYPos = Number(sTopBank) + 74;
  2110. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + tclslblnmlist + "\"" + "\r\n";
  2111. //원처방명
  2112. iXPos = Number(sLeftBank) + 20;
  2113. iYPos = Number(sTopBank) + 68;
  2114. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,7,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  2115. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  2116. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  2117. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  2118. sSndMsg += "PT " +"\"" + prcpdispnm +"\"" + "\r\n"; //입력데이터제공
  2119. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  2120. //추가처방명
  2121. iXPos = Number(sLeftBank) + 20;
  2122. iYPos = Number(sTopBank) + 54;
  2123. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,7,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  2124. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  2125. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  2126. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  2127. sSndMsg += "PT " +"\"" + prcpdispnm2 +"\"" + "\r\n"; //입력데이터제공
  2128. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  2129. //출력
  2130. sSndMsg += "LAYOUT END" + "\r\n"; //레이아웃구성을 중지하고 저장
  2131. sSndMsg += "LAYOUT RUN " +"\"" + "tmp:LBLSOFT.LAY" +"\"" + "\r\n"; //레이아웃시작
  2132. sSndMsg += "INPUT ON" + "\r\n"; //인터맥다이렉트 프로토콜 활성화
  2133. sSndMsg += "PF " + "\r\n"; //인쇄
  2134. sSndMsg += "PRINT KEY OFF" + "\r\n"; //프린트버튼 비활성화
  2135. if(sCommKind == "01") {
  2136. llz_objCommAX.SendMessageToLPT(sSndMsg);
  2137. //llz_objCommAX.Output = sSndMsg;
  2138. sSndMsg = "";
  2139. }
  2140. else if(sCommKind == "02") {
  2141. llz_objCommAX.SendMessage(sSndMsg);
  2142. //llz_objCommAX.Output = sSndMsg;
  2143. sSndMsg = "";
  2144. }
  2145. }
  2146. else if(sPrntKind == "16") { //루칸
  2147. //프린터설정
  2148. sSndMsg += "N" + "\r\n"; //이미지버퍼내용삭제
  2149. sSndMsg += "Q256,24" + "\r\n"; //용지세로 32mm,용지사이여백3mm
  2150. sSndMsg += "q432" + "\r\n"; //용지가로54mm
  2151. //검체바코드
  2152. iXPos = Number(sLeftBank) + 20;
  2153. iYPos = Number(sTopBank) + 0;
  2154. sSndMsg += "B" + iXPos + "," + iYPos + "," + "0,3,2,4,101,N," + "\"" + spcbarcdno + "\"" + "\r\n";
  2155. //검체번호
  2156. iXPos = Number(sLeftBank) + 130;
  2157. iYPos = Number(sTopBank) + 110;
  2158. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + spcbarcdno + "\"" + "\r\n";
  2159. //PATHOLOGY(캡션)
  2160. iXPos = Number(sLeftBank) + 20;
  2161. iYPos = Number(sTopBank) + 134;
  2162. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + "PATHOLOGY" + "\"" + "\r\n";
  2163. //병동/병실
  2164. iXPos = Number(sLeftBank) + 140;
  2165. iYPos = Number(sTopBank) + 134;
  2166. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + wardroom + "\"" + "\r\n";
  2167. //진료의
  2168. iXPos = Number(sLeftBank) + 280;
  2169. iYPos = Number(sTopBank) + 134;
  2170. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + orddrnm + "\"" + "\r\n";
  2171. //등록번호
  2172. iXPos = Number(sLeftBank) + 20;
  2173. iYPos = Number(sTopBank) + 158;
  2174. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,R," + "\"" + pid + "\"" + "\r\n";
  2175. //환자명
  2176. iXPos = Number(sLeftBank) + 140;
  2177. iYPos = Number(sTopBank) + 158;
  2178. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + patnm + "\"" + "\r\n";
  2179. //성별/나이
  2180. iXPos = Number(sLeftBank) + 280;
  2181. iYPos = Number(sTopBank) + 158;
  2182. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + sexage + "\"" + "\r\n";
  2183. //진료과약어
  2184. iXPos = Number(sLeftBank) + 350;
  2185. iYPos = Number(sTopBank) + 158;
  2186. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + orddeptnm + "\"" + "\r\n";
  2187. //검체순번/토탈갯수
  2188. iXPos = Number(sLeftBank) + 20;
  2189. iYPos = Number(sTopBank) + 182;
  2190. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + spcdispnm + "\"" + "\r\n";
  2191. //세부검체명
  2192. //iXPos = Number(sLeftBank) + 50;
  2193. //iYPos = Number(sTopBank) + 182;
  2194. //sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + tclslblnmlist + "\"" + "\r\n";
  2195. //원처방명
  2196. iXPos = Number(sLeftBank) + 20;
  2197. iYPos = Number(sTopBank) + 204;
  2198. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + prcpdispnm + "\"" + "\r\n";
  2199. //추가처방명
  2200. iXPos = Number(sLeftBank) + 20;
  2201. iYPos = Number(sTopBank) + 228;
  2202. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + prcpdispnm2 + "\"" + "\r\n";
  2203. //출력
  2204. sSndMsg += "P1"+ "\r\n";
  2205. if(sCommKind == "01") {
  2206. llz_objCommAX.SendMessageToLPT(sSndMsg);
  2207. //llz_objCommAX.Output = sSndMsg;
  2208. sSndMsg = "";
  2209. }
  2210. else if(sCommKind == "02") {
  2211. llz_objCommAX.SendMessage(sSndMsg);
  2212. //llz_objCommAX.Output = sSndMsg;
  2213. sSndMsg = "";
  2214. }
  2215. }
  2216. else if(sPrntKind == "17") { //아르고스
  2217. //프린터설정
  2218. sSndMsg += "N" + "\r\n"; //이미지버퍼내용삭제
  2219. sSndMsg += "JF" + "\r\n"; //용지정렬
  2220. sSndMsg += "Q256,24" + "\r\n"; //용지세로 32mm,용지사이여백3mm
  2221. sSndMsg += "q432" + "\r\n"; //용지가로54mm
  2222. //검체바코드
  2223. iXPos = Number(sLeftBank) + 40;
  2224. iYPos = Number(sTopBank) + 10;
  2225. sSndMsg += "B" + iXPos + "," + iYPos + "," + "0,3,2,4,101,N," + "\"" + spcbarcdno + "\"" + "\r\n";
  2226. //검체번호
  2227. iXPos = Number(sLeftBank) + 130;
  2228. iYPos = Number(sTopBank) + 115;
  2229. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + spcbarcdno + "\"" + "\r\n";
  2230. //PATHOLOGY(캡션)
  2231. iXPos = Number(sLeftBank) + 20;
  2232. iYPos = Number(sTopBank) + 134;
  2233. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + "PATHOLOGY" + "\"" + "\r\n";
  2234. //병동/병실
  2235. iXPos = Number(sLeftBank) + 140;
  2236. iYPos = Number(sTopBank) + 134;
  2237. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + wardroom + "\"" + "\r\n";
  2238. //진료의
  2239. iXPos = Number(sLeftBank) + 320;
  2240. iYPos = Number(sTopBank) + 130;
  2241. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + orddrnm + "\"" + "\r\n";
  2242. //등록번호
  2243. iXPos = Number(sLeftBank) + 20;
  2244. iYPos = Number(sTopBank) + 158;
  2245. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,R," + "\"" + pid + "\"" + "\r\n";
  2246. //환자명
  2247. iXPos = Number(sLeftBank) + 140;
  2248. iYPos = Number(sTopBank) + 154;
  2249. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,9,1,1,N," + "\"" + patnm + "\"" + "\r\n";
  2250. //성별/나이
  2251. iXPos = Number(sLeftBank) + 320;
  2252. iYPos = Number(sTopBank) + 158;
  2253. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + sexage + "\"" + "\r\n";
  2254. //진료과약어
  2255. iXPos = Number(sLeftBank) + 390;
  2256. iYPos = Number(sTopBank) + 158;
  2257. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + orddeptnm + "\"" + "\r\n";
  2258. //검체순번/토탈갯수
  2259. iXPos = Number(sLeftBank) + 20;
  2260. iYPos = Number(sTopBank) + 182;
  2261. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + spcdispnm + "\"" + "\r\n";
  2262. //세부검체명
  2263. //iXPos = Number(sLeftBank) + 50;
  2264. //iYPos = Number(sTopBank) + 182;
  2265. //sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + tclslblnmlist + "\"" + "\r\n";
  2266. //원처방명
  2267. iXPos = Number(sLeftBank) + 20;
  2268. iYPos = Number(sTopBank) + 204;
  2269. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + prcpdispnm + "\"" + "\r\n";
  2270. //추가처방명
  2271. iXPos = Number(sLeftBank) + 20;
  2272. iYPos = Number(sTopBank) + 228;
  2273. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + prcpdispnm2 + "\"" + "\r\n";
  2274. //출력
  2275. sSndMsg += "P1"+ "\r\n";
  2276. if(sCommKind == "01") {
  2277. llz_objCommAX.SendMessageToLPT(sSndMsg);
  2278. //llz_objCommAX.Output = sSndMsg;
  2279. sSndMsg = "";
  2280. }
  2281. else if(sCommKind == "02") {
  2282. trace(llz_objCommAX.SendMessage(sSndMsg));
  2283. //llz_objCommAX.Output = sSndMsg;
  2284. sSndMsg = "";
  2285. }
  2286. }
  2287. }
  2288. if(sCommKind == "02") {
  2289. //llz_objCommAX.PortOpen = false;
  2290. portOpenCheck = llz_objCommAX.PortClose(true);
  2291. }
  2292. }else if(portOpenCheck == "FALSE" && sCommKind == "02"){
  2293. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  2294. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  2295. + " \n 2.케이블 확인"
  2296. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  2297. return;
  2298. }
  2299. }
  2300. /**********************************************************************************
  2301. * 함수명 : lf_COMLIS_ResultValidation
  2302. * 설명 : 결과저장시 유효성체크 & 서버로 전달할 자료 Flag변경
  2303. * argument : 수정이 필요합니다. 필요한 부분은 SCHProject에 있는 fCOMLIS_ResultValidation 함수를 참고해서 수정 하세요.
  2304. **********************************************************************************/
  2305. function lf_COMLIS_ResultValidation(objDs, pRsltstat, pIsMsg){
  2306. var isRstErr = false;
  2307. var isSelected = false;
  2308. var nDsRowcount = objDs.rowcount;
  2309. var isUpdate = false;
  2310. var vMsg = "";
  2311. trace("pIsMsg="+pIsMsg);
  2312. if(pIsMsg){
  2313. if(pRsltstat == "1"){
  2314. vMsg = "결과저장";
  2315. }else if(pRsltstat == "2"){
  2316. var vMsg = "중간(예비)보고"
  2317. } else if (pRsltstat == "4") {
  2318. var vMsg = "최종보고"
  2319. }
  2320. }
  2321. var vTestCDLIST = "";
  2322. var vTestCDRsltLIST = "";
  2323. var vTestCDRsltCmtLIST = "";
  2324. objDs.updatecontrol = false;
  2325. for(var i=0; i<nDsRowcount; i++)
  2326. {
  2327. if(objDs.getColumn(i, "sel_value") == "true" && (!((objDs.getColumn(i, "conttestyn") == 'Y' || objDs.getColumn(i, "conttestyn") == 'T') && objDs.getColumn(i, "readonly") == "true"))){
  2328. isSelected = true;
  2329. var vTclsscrnm = objDs.getColumn(i, "tclsscrnnm");
  2330. var vTclskind = objDs.getColumn(i, "tclskind");
  2331. var vParentrsltinptyn = lf_nullColValue(objDs, i, "parentrsltinptyn", "");
  2332. var vReptrslt = objDs.getColumn(i, "reptrslt");
  2333. var updateTF = false;
  2334. if(pRsltstat == "4")
  2335. {
  2336. var vPanicMark = objDs.getColumn(i, "panicmark");
  2337. var vDeltaMark = objDs.getColumn(i, "deltamark");
  2338. var vCriticalMark = objDs.getColumn(i, "criticalmark");
  2339. var vAlertMark = objDs.getColumn(i, "alertmark");
  2340. var vRsltmark = lf_nullColValue(objDs, i, "rsltmark", "");
  2341. if(lf_nullColValue(objDs, i, "rsltstat", "") == "4" ||lf_nullColValue(objDs, i, "rsltstat", "") == "5")
  2342. {
  2343. updateTF = true;
  2344. }
  2345. }
  2346. if(vTclskind == "2")
  2347. {
  2348. if (pRsltstat != '10' && utlf_isNull(String(vReptrslt).getTrim())) {
  2349. sysf_messageBox("[" + vTclsscrnm + "]항목은 공백인 결과는 입력할 수 없습니다.","I","");
  2350. isRstErr = true;
  2351. break;
  2352. }
  2353. objDs.setRowType(i, Dataset.ROWTYPE_UPDATE);
  2354. isUpdate = true;
  2355. if(updateTF)
  2356. {
  2357. vTestCDLIST = vTestCDLIST +"'"+ objDs.getColumn(i, "testcd")+"',";
  2358. vTestCDRsltLIST = vTestCDRsltLIST + objDs.getColumn(i, "testcd") + "▦" +
  2359. objDs.getColumn(i, "reptrslt") + "▩";
  2360. vTestCDRsltCmtLIST = vTestCDRsltCmtLIST + objDs.getColumn(i, "testcd") + "▦" + objDs.getColumn(i, "tclsscrnnm") + "▦" +
  2361. objDs.getOrgColumn(i, "reptrslt") + "▦" + objDs.getColumn(i, "lastreptdt") + "▩";
  2362. alert("vTestCDLIST(1) = " + vTestCDLIST);
  2363. }
  2364. }else if(vTclskind == "3")
  2365. {
  2366. // Parent항목은 조건에 따라 Child항목만 체크
  2367. if(String(vParentrsltinptyn).getTrim() != "N")
  2368. { //Parent인데 입력가능한 항목들
  2369. var sREQPARENT = lf_nullColValue(objDs, i, "reqsub", ""); // Parent항목 결과필수 입력[default:'1']
  2370. var vTestcd = objDs.getColumn(i, "testcd");
  2371. var vN_Inptrslt = utlf_transNullToEmpty(objDs.getColumn(i, "inptrslt"));
  2372. var vO_Inptrslt = utlf_transNullToEmpty(ds_copy_grd_TestInfoCnts.lookup("testcd",vTestcd, "inptrslt")); //objDs.getColumn(objDs.findRow("testcd", vTestcd), "inptrslt");
  2373. //뭔지 모르겠음 TF 소스 ==>>model.getValue("/root/hidden/TestInfo/getTestInfoCnts[testcd ='" + vTestcd + "']/inptrslt");
  2374. if(vN_Inptrslt == vO_Inptrslt)
  2375. {
  2376. if((vN_Inptrslt != "C" && utlf_isNull(vO_Inptrslt)) ||
  2377. ((pRsltstat == lf_nullColValue(objDs, i, "rsltstat", "")) &&
  2378. ("Y" != objDs.getColumn(i, "retestyn")))){
  2379. }else{
  2380. objDs.setRowType(i, Dataset.ROWTYPE_UPDATE);
  2381. isUpdate = true;
  2382. if(updateTF)
  2383. {
  2384. vTestCDLIST = vTestCDLIST +"'"+ objDs.getColumn(i, "testcd")+"',";
  2385. vTestCDRsltLIST = vTestCDRsltLIST + objDs.getColumn(i, "testcd") + "▦" +
  2386. objDs.getColumn(i, "reptrslt") + "▩";
  2387. vTestCDRsltCmtLIST = vTestCDRsltCmtLIST + objDs.getColumn(i, "testcd") + "▦" + objDs.getColumn(i, "tclsscrnnm") + "▦" +
  2388. objDs.getOrgColumn(i, "reptrslt") + "▦" + objDs.getColumn(i, "lastreptdt") + "▩";
  2389. alert("vTestCDLIST(2) = " + vTestCDLIST);
  2390. }
  2391. }
  2392. }
  2393. else
  2394. {
  2395. objDs.setRowType(i, Dataset.ROWTYPE_UPDATE);
  2396. isUpdate = true;
  2397. if(updateTF) {
  2398. vTestCDLIST = vTestCDLIST +"'"+ objDs.getColumn(i, "testcd")+"',";
  2399. vTestCDRsltLIST = vTestCDRsltLIST + objDs.getColumn(i, "testcd") + "▦" +
  2400. objDs.getColumn(i, "reptrslt") + "▩";
  2401. vTestCDRsltCmtLIST = vTestCDRsltCmtLIST + objDs.getColumn(i, "testcd") + "▦" + objDs.getColumn(i, "tclsscrnnm") + "▦" +
  2402. objDs.getOrgColumn(i, "reptrslt") + "▦" + objDs.getColumn(i, "lastreptdt") + "▩";
  2403. alert("vTestCDLIST(3) = " + vTestCDLIST);
  2404. }
  2405. }
  2406. }
  2407. else
  2408. {
  2409. //Parent인데 입력 불가능한 항목들
  2410. objDs.setRowType(i, Dataset.ROWTYPE_UPDATE);
  2411. if(updateTF)
  2412. {
  2413. if(objDs.getColumn(j, "orgreptrslt") != objDs.getColumn(j, "inptrslt")){ //20141217 orgreptrslt(기존값)과 inptrslt(입력값) 비교
  2414. vTestCDLIST = vTestCDLIST +"'"+ objDs.getColumn(i, "testcd")+"',";
  2415. vTestCDRsltLIST = vTestCDRsltLIST + objDs.getColumn(i, "testcd") + "▦" +
  2416. utlf_transNullToEmpty(objDs.getColumn(i, "reptrslt")) + "▩";
  2417. vTestCDRsltCmtLIST = vTestCDRsltCmtLIST + objDs.getColumn(i, "testcd") + "▦" + objDs.getColumn(i, "tclsscrnnm") + "▦" +
  2418. utlf_transNullToEmpty(objDs.getOrgColumn(i, "reptrslt")) + "▦" + objDs.getColumn(i, "lastreptdt") + "▩";
  2419. alert("vTestCDLIST(4) = " + vTestCDLIST);
  2420. }
  2421. }
  2422. }
  2423. /* ↑↑↑↑↑↑↑↑↑ Parent항목 child항목 ↓↓↓↓↓↓↓↓↓*/
  2424. for(var j = i+1 ; j<nDsRowcount; j++)
  2425. {
  2426. var vTclsscrnm_SUB = objDs.getColumn(j, "tclsscrnnm");
  2427. var vTclskind_SUB = objDs.getColumn(j, "tclskind");
  2428. var sChildessnrsltyn = lf_nullColValue(objDs, j, "childessnrsltyn", ""); // Child항목 결과필수 입력[default:'' or '0']
  2429. if(vTclskind_SUB != "4" && vTclskind_SUB != "5" && vTclskind_SUB != "7"){
  2430. break;
  2431. }
  2432. if (sChildessnrsltyn.getTrim() == "1") {
  2433. // sub필수 항목은 공백입력 안됨...
  2434. if(pRsltstat != '10' && utlf_isNull(String(vReptrslt).getTrim()) ) {
  2435. sysf_messageBox("[" + vTclsscrnm_SUB + "]항목은 공백인 결과는 입력할 수 없습니다." , "I");
  2436. isRstErr = "true";
  2437. break;
  2438. }
  2439. }
  2440. var vTestcd = objDs.getColumn(j, "testcd");
  2441. var vN_Inptrslt = objDs.getColumn(j, "inptrslt");
  2442. var vO_Inptrslt = utlf_transNullToEmpty(ds_copy_grd_TestInfoCnts.lookup("testcd",vTestcd, "inptrslt")); //objDs.getColumn(objDs.findRow("testcd", vTestcd), "inptrslt");
  2443. //이해안됨 TF소스 =>> model.getValue("/root/hidden/TestInfo/getTestInfoCnts[testcd ='" + vTestcd + "']/inptrslt");
  2444. if(vN_Inptrslt == vO_Inptrslt)
  2445. {
  2446. if(((vTclskind_SUB != "4" && vTclskind_SUB != "5" && vTclskind_SUB != "7") && utlf_isNull(vN_Inptrslt)) ||
  2447. ((pRsltstat == objDs.getColumn(j, "rsltstat")) && ("Y" != objDs.getColumn(j, "retestyn")))){
  2448. }
  2449. else
  2450. {
  2451. objDs.setRowType(j, Dataset.ROWTYPE_UPDATE);
  2452. isUpdate = true;
  2453. if(updateTF)
  2454. {
  2455. if(utlf_transNullToEmpty(objDs.getColumn(j, "orgreptrslt")) != objDs.getColumn(j, "inptrslt"))
  2456. { //20141217 orgreptrslt(기존값)과 inptrslt(입력값) 비교
  2457. vTestCDLIST = vTestCDLIST +"'"+ objDs.getColumn(j, "testcd")+"',";
  2458. vTestCDRsltLIST = vTestCDRsltLIST + objDs.getColumn(j, "testcd") + "▦" +
  2459. utlf_transNullToEmpty(objDs.getColumn(j, "reptrslt")) + "▩";
  2460. vTestCDRsltCmtLIST = vTestCDRsltCmtLIST + objDs.getColumn(j, "testcd") + "▦" + objDs.getColumn(j, "tclsscrnnm") + "▦" +
  2461. utlf_transNullToEmpty(objDs.getOrgColumn(j, "reptrslt")) + "▦" + objDs.getColumn(j, "lastreptdt") + "▩";
  2462. alert("vTestCDLIST(5) = " + vTestCDLIST);
  2463. }
  2464. }
  2465. }
  2466. }else{
  2467. objDs.setRowType(j, Dataset.ROWTYPE_UPDATE);
  2468. isUpdate = true;
  2469. if(updateTF){
  2470. if(objDs.getColumn(j, "orgreptrslt") != objDs.getColumn(j, "inptrslt") && (objDs.getColumn(j, "orgreptrslt") != null)){ //20141217 orgreptrslt(기존값)과 inptrslt(입력값) 비교
  2471. vTestCDLIST = vTestCDLIST +"'"+ objDs.getColumn(j, "testcd")+"',";
  2472. vTestCDRsltLIST = vTestCDRsltLIST + objDs.getColumn(j, "testcd") + "▦" +
  2473. utlf_transNullToEmpty(objDs.getColumn(j, "reptrslt")) + "▩";
  2474. vTestCDRsltCmtLIST = vTestCDRsltCmtLIST + objDs.getColumn(j, "testcd") + "▦" + objDs.getColumn(j, "tclsscrnnm") + "▦" +
  2475. utlf_transNullToEmpty(objDs.getOrgColumn(j, "reptrslt")) + "▦" + objDs.getColumn(j, "lastreptdt") + "▩";
  2476. alert("vTestCDLIST(6) = " + vTestCDLIST);
  2477. }
  2478. }
  2479. }
  2480. /* * * * * * * * * * * * * * * * * * * * * * * * */
  2481. }//child for
  2482. if(isRstErr) break;
  2483. if(objDs.getColumn(j, "sel_value") == "true"){
  2484. if(objDs.getColumn(j, "tclskind") != "4" && objDs.getColumn(j, "tclskind") != "5"){
  2485. i = --j;
  2486. continue;
  2487. }else{
  2488. i = j;
  2489. }
  2490. }else{
  2491. i = j;
  2492. continue;
  2493. }
  2494. }
  2495. else
  2496. {
  2497. var vTestcd = objDs.getColumn(j, "testcd");
  2498. var vN_Inptrslt = objDs.getColumn(j, "inptrslt");
  2499. var vO_Inptrslt = utlf_transNullToEmpty(ds_copy_grd_TestInfoCnts.lookup("testcd",vTestcd, "inptrslt")); //objDs.getColumn(objDs.findRow("testcd", vTestcd), "inptrslt");
  2500. //이해안됨 TF소스 =>> model.getValue("/root/hidden/TestInfo/getTestInfoCnts[testcd ='" + vTestcd + "']/inptrslt");
  2501. if(vN_Inptrslt == vO_Inptrslt){
  2502. if(((vTclskind_SUB != "4" && vTclskind_SUB != "5" && vTclskind_SUB != "7") && utlf_isNull(vN_Inptrslt)) ||
  2503. ((pRsltstat == lf_nullColValue(objDs, j, "rsltstat", "")) && ("Y" != lf_nullColValue(objDs, j, "retestyn", "")))){
  2504. }else{
  2505. objDs.setRowType(i, Dataset.ROWTYPE_UPDATE);
  2506. isUpdate = true;
  2507. if(updateTF){
  2508. vTestCDLIST = vTestCDLIST +"'"+ objDs.getColumn(i, "testcd")+"',";
  2509. vTestCDRsltLIST = vTestCDRsltLIST + objDs.getColumn(i, "testcd") + "▦" +
  2510. objDs.getColumn(i, "reptrslt") + "▩";
  2511. vTestCDRsltCmtLIST = vTestCDRsltCmtLIST + objDs.getColumn(i, "testcd") + "▦" + objDs.getColumn(i, "tclsscrnnm") + "▦" +
  2512. objDs.getOrgColumn(i, "reptrslt") + "▦" + objDs.getColumn(i, "lastreptdt") + "▩";
  2513. alert("vTestCDLIST(7) = " + vTestCDLIST);
  2514. }
  2515. }
  2516. }else{
  2517. objDs.setRowType(i, Dataset.ROWTYPE_UPDATE);
  2518. isUpdate = true;
  2519. if(updateTF)
  2520. {
  2521. vTestCDLIST = vTestCDLIST +"'"+ objDs.getColumn(i, "testcd")+"',";
  2522. vTestCDRsltLIST = vTestCDRsltLIST + objDs.getColumn(i, "testcd") + "▦" +
  2523. objDs.getColumn(i, "reptrslt") + "▩";
  2524. vTestCDRsltCmtLIST = vTestCDRsltCmtLIST + objDs.getColumn(i, "testcd") + "▦" + objDs.getColumn(i, "tclsscrnnm") + "▦" +
  2525. objDs.getOrgColumn(i, "reptrslt") + "▦" + objDs.getColumn(i, "lastreptdt") + "▩";
  2526. alert("vTestCDLIST(8) = " + vTestCDLIST);
  2527. }
  2528. }
  2529. }
  2530. } // end if
  2531. } //end for
  2532. objDs.updatecontrol = true;
  2533. // if(ds_DJGGParm.rowcount<1){
  2534. // ds_DJGGParm.addRow();
  2535. // }
  2536. /*
  2537. if(utlf_isNull(this.objects.get_item("ds_hidden_DJGGParm"))){
  2538. dsf_createDsRow("ds_hidden_DJGGParm"
  2539. , [{col: "bcno" , val: ""}
  2540. , {col: "testlrgkind" , val: ""}
  2541. , {col: "microtestkind" , val: ""}
  2542. , {col: "bufDJGG" , val: ""}
  2543. , {col: "testcdlist" , val: ""}
  2544. , {col: "uprsltYN" , val: ""}
  2545. , {col: "rsltsaveYN" , val: ""}
  2546. , {col: "userid" , val: ""}]);
  2547. }
  2548. */
  2549. trace("isRstErr="+isRstErr);
  2550. trace("isSelected="+isSelected);
  2551. trace("pIsMsg="+pIsMsg);
  2552. trace("vMsg="+vMsg);
  2553. if(isRstErr){
  2554. if(isSelected){
  2555. if(pIsMsg){
  2556. sysf_messageBox(vMsg + "할 항목을 선택해 주십시오.","I","");
  2557. }
  2558. return "2"; // 선택한항목 없음
  2559. }
  2560. return "1"; // 입력결과 오류
  2561. }else
  2562. {
  2563. if(!isSelected)
  2564. {
  2565. if(pIsMsg)
  2566. {
  2567. sysf_messageBox(vMsg + "할 항목을 선택해 주십시오.","I","");
  2568. }
  2569. return "2"; // 선택한항목 없음
  2570. }
  2571. if(!isUpdate)
  2572. {
  2573. sysf_messageBox("수정된 결과값이 없습니다.","I","");
  2574. return "1"; // 입력결과 오류
  2575. }
  2576. if(!utlf_isNull(vTestCDLIST))
  2577. {
  2578. trace("ddddddddddddddddddddd");
  2579. ds_hidden_DJGGParrm.setColumn(0, "testcdlist", String(vTestCDLIST).substring(0, String(vTestCDLIST).length-1));
  2580. ds_hidden_DJGGParrm.setColumn(0, "uprsltYN", "Y");
  2581. ds_hidden_DJGGParrm.setColumn(0, "bufDJGG", vTestCDRsltLIST);
  2582. ds_hidden_DJGGParrm.setColumn(0, "orgBufDJGG", vTestCDRsltCmtLIST);
  2583. }else{
  2584. ds_hidden_DJGGParrm.setColumn(0, "uprsltYN", "N");
  2585. }
  2586. return "0"; // 정상
  2587. }
  2588. }
  2589. /**
  2590. * 보이는결과로 바꾸기
  2591. */
  2592. function fCOMLIS_CvtReptrslt(pInptrslt, pRsltkind, pUlen, pLlen, pType , pNvalrsltlimyn) {
  2593. var vReptrslt = pInptrslt;
  2594. if (!utlf_isNull(vReptrslt)) {
  2595. // 결과유형 체크
  2596. if (pRsltkind == "1") {
  2597. //숫자만 가능
  2598. if( !String(vReptrslt).isNumber() && !String(vReptrslt).isFloat() ) {
  2599. sysf_messageBox("숫자결과만 입력이 가능합니다.","I","");
  2600. return "err";
  2601. }
  2602. } else {
  2603. //문자+숫자혼합
  2604. }
  2605. //숫자결과 크기제한
  2606. if (String(vReptrslt).isNumber() || String(vReptrslt).isFloat()) {
  2607. if(String(pLlen).isNumber()){
  2608. //실수자리수 크기제한
  2609. if (eval(pLlen) > -1 && pNvalrsltlimyn == "Y") {
  2610. vReptrslt = fCOMLIS_RstRound(vReptrslt, pLlen, pType);
  2611. }
  2612. }
  2613. }
  2614. }
  2615. //if( vReptrslt=="" ) return "err";
  2616. return vReptrslt;
  2617. }
  2618. /**
  2619. * 올림, 반올림, 내림 처리
  2620. */
  2621. function fCOMLIS_RstRound(pRst, pLen, pType){
  2622. var vNumber = eval(pRst);
  2623. if (utlf_isNull(pLen)) return vNumber;
  2624. if (utlf_isNull(pType)) return vNumber;
  2625. if (pType == "-") return vNumber;
  2626. if (pLen != "0") {
  2627. if (pType == "2") {
  2628. // 올림
  2629. if (eval(pLen) > 0) {
  2630. vNumber = Math.ceil(Math.round(parseFloat(vNumber) * Math.pow(10, pLen))) / Math.pow(10, pLen);
  2631. } else {
  2632. return "";
  2633. }
  2634. } else if (pType == "1") {
  2635. // 반올림
  2636. if (eval(pLen) > 0) {
  2637. vNumber = Math.round(Math.round(parseFloat(vNumber) * Math.pow(10, pLen))) / Math.pow(10, pLen);
  2638. } else {
  2639. return "";
  2640. }
  2641. } else if (pType == "3") {
  2642. // 내림
  2643. if (eval(pLen) > 0) {
  2644. } else {
  2645. return "";
  2646. }
  2647. } else {
  2648. return "";
  2649. }
  2650. // 소수자리보다 작은경우 0으로 채운다..
  2651. var vTmpArray = eval(vNumber).toString().setReplaceWord("-", "").split(".");
  2652. if(vTmpArray.length == 2 ) {
  2653. vNumber = vTmpArray[0].toString() + "." + (vTmpArray[1].toString() + "0000000000").substr(0, eval(pLen));
  2654. } else {
  2655. vNumber = vTmpArray[0].toString() + "." + "0000000000".substr(0, eval(pLen));
  2656. }
  2657. } else if (pLen == "0") {
  2658. if (pType == "2") {
  2659. // 올림
  2660. vNumber = Math.ceil(parseFloat(vNumber));
  2661. } else if (pType == "1") {
  2662. // 반올림
  2663. vNumber = Math.round(parseFloat(vNumber));
  2664. } else if (pType == "3") {
  2665. // 내림
  2666. }
  2667. // 소수자리가 0인경우 정수부분만 취한다.
  2668. vNumber = vNumber.toString().getTruncate()
  2669. }
  2670. return vNumber;
  2671. }
  2672. /**
  2673. * Panic, Critical, Alert 판정
  2674. *
  2675. */
  2676. function fCOMLIS_JudgPCA(pResult, pJudgGbn, pRefL, pRefLS, pRefH, pRefHS, pJudgmark) {
  2677. var vRetJudgmark = "";
  2678. var isLower = true;
  2679. var isUpper = true;
  2680. // 결과가 숫자가 아닌경우 PCA판정 안함
  2681. if (!String(pResult).isNumber() && !String(pResult).isFloat()) {
  2682. return vRetJudgmark;
  2683. }
  2684. if (!String(pRefL).isNumber() && !String(pRefL).isFloat()) {
  2685. isLower = false;
  2686. }
  2687. if (!String(pRefH).isNumber() && !String(pRefH).isFloat()) {
  2688. isUpper = false;
  2689. }
  2690. /**
  2691. 판정구분(pJudgGbn)
  2692. [0] 사용안함
  2693. [1] 하한만 사용
  2694. [2] 상한만 사용
  2695. [3] 모두사용
  2696. [4] 하한만 사용 (Grade)
  2697. [5] 상한만 사용 (Grade)
  2698. [6] 모두 사용 (Grade)
  2699. [7] Grayzone 사용 --2006.05.22 ACK.HSM 추가
  2700. */
  2701. /** -- 2008.02.21 재한 추가
  2702. 부등호(pRefLS, pRefHS)
  2703. 0 : <
  2704. 1 : <=
  2705. 2 : >
  2706. 3 : >=
  2707. */
  2708. var resultF = parseFloat(pResult);
  2709. var reflF = parseFloat(pRefL);
  2710. var refhF = parseFloat(pRefH);
  2711. if (pJudgGbn == "1") {
  2712. if (isLower) {
  2713. if(pRefLS == "0")
  2714. vRetJudgmark = (resultF < reflF) ? pJudgmark : "";
  2715. else if(pRefLS == "1")
  2716. vRetJudgmark = (resultF <= reflF) ? pJudgmark : "";
  2717. }
  2718. } else if (pJudgGbn == "2") {
  2719. if (isUpper) {
  2720. if(pRefHS == "2")
  2721. vRetJudgmark = (resultF > refhF) ? pJudgmark : "";
  2722. else if(pRefHS == "3")
  2723. vRetJudgmark = (resultF >= refhF) ? pJudgmark : "";
  2724. }
  2725. } else if (pJudgGbn == "3") {
  2726. if (isLower && isUpper) {
  2727. if(pRefLS == "0" && pRefHS == "2")
  2728. vRetJudgmark = ((resultF < reflF) || (resultF > refhF)) ? pJudgmark : "";
  2729. else if(pRefLS == "0" && pRefHS == "3")
  2730. vRetJudgmark = ((resultF < reflF) || (resultF >= refhF)) ? pJudgmark : "";
  2731. else if(pRefLS == "1" && pRefHS == "2")
  2732. vRetJudgmark = ((resultF <= reflF) || (resultF > refhF)) ? pJudgmark : "";
  2733. else if(pRefLS == "1" && pRefHS == "3"){
  2734. vRetJudgmark = ((resultF <= reflF) || (resultF >= refhF)) ? pJudgmark : "";
  2735. }
  2736. }
  2737. } else if (pJudgGbn == "4") {
  2738. } else if (pJudgGbn == "5") {
  2739. } else if (pJudgGbn == "6") {
  2740. } else if (pJudgGbn == "7") {
  2741. if (isLower && isUpper)
  2742. vRetJudgmark = ((resultF >= reflF) && (resultF <= refhF)) ? pJudgmark : "";
  2743. }
  2744. return vRetJudgmark;
  2745. }
  2746. /**
  2747. * 결과 L/H 판정
  2748. *
  2749. * 사용XFM
  2750. * LLR_GSHMSangSe.xfm
  2751. */
  2752. function fCOMLIS_JudgLH(pResult, vJudgkind, pRefL, pRefLS, pRefH, pRefHS,pRefLT,pRvalflag) {
  2753. // 결과판정 Low/High만 수행
  2754. var vJudgmark = "";
  2755. if (vJudgkind != "0") {
  2756. var isLow = true;
  2757. var isHigh = true;
  2758. if (!String(pResult).isNumber() && !String(pResult).isFloat()) {
  2759. return vJudgmark;
  2760. }
  2761. if (!String(pRefL).isNumber() && !String(pRefL).isFloat()) {
  2762. isLow = false;
  2763. }
  2764. if (!String(pRefH).isNumber() && !String(pRefH).isFloat()) {
  2765. isHigh = false;
  2766. }
  2767. if (isLow) {
  2768. //하한값 체크
  2769. if (pRefLS == "0") {
  2770. // 결과 <= 참고치 = L
  2771. if (parseFloat(pResult) < parseFloat(pRefL))
  2772. vJudgmark = "L";
  2773. } else if (pRefLS == "1") {
  2774. // 결과 < 참고치 = L
  2775. if (parseFloat(pResult) <= parseFloat(pRefL))
  2776. vJudgmark = "L";
  2777. }
  2778. }
  2779. if (isHigh) {
  2780. //상한값 체크
  2781. if (pRefHS == "0") {
  2782. // 결과 >= 참고치 = H
  2783. if (parseFloat(pResult) > parseFloat(pRefH))
  2784. vJudgmark = "H";
  2785. } else if (pRefHS == "1") {
  2786. // 결과 > 참고치 = H
  2787. if (parseFloat(pResult) >= parseFloat(pRefH))
  2788. vJudgmark = "H";
  2789. }
  2790. }
  2791. }
  2792. return vJudgmark;
  2793. }
  2794. /**
  2795. * Delta 판정
  2796. *
  2797. */
  2798. function fCOMLIS_JudgDelta(pResult, pBFResult, pJudgGbn, pRefH, pDeltaday, pRstinterval) {
  2799. var vRetJudgmark = "";
  2800. var isLower = true;
  2801. var isUpper = true;
  2802. // 결과가 숫자가 아닌경우 Delta판정 안함
  2803. if (!String(pResult).isNumber() && !String(pResult).isFloat()) {
  2804. return vRetJudgmark;
  2805. }
  2806. // 이전 결과가 숫자가 아닌경우 Delta판정 안함
  2807. if (!String(pBFResult).isNumber() && !String(pBFResult).isFloat()) {
  2808. return vRetJudgmark;
  2809. }
  2810. // 이전 최종보고가 없거나 숫자가아닌경우 Delta판정 안함(최종보고일과의 차이가 Null인경우)
  2811. if (!String(pRstinterval).isNumber() && !String(pRstinterval).isFloat()) {
  2812. return vRetJudgmark;
  2813. }
  2814. // 이전 최종보고일과의 차이가 Delta판정기간을 초과한경우 Delta판정 안함
  2815. if ((String(pDeltaday).isNumber()) && (eval(pDeltaday + " < " + pRstinterval))) {
  2816. return vRetJudgmark;
  2817. }
  2818. if (!String(pRefH).isNumber() && !String(pRefH).isFloat()) {
  2819. return vRetJudgmark;
  2820. }
  2821. /**
  2822. 판정구분(pJudgGbn)
  2823. [1] 변화차 = 현재결과 - 이전결과
  2824. [2] 변화비율 = 변화차/이전결과 * 100
  2825. [3] 기간당변화차 = 변화차/기간
  2826. [4] 기간당변화비율 = 변화비율/기간
  2827. [5] 절대변화비율 = 변화차/이전결과
  2828. [6] Grade Delta = 현재Grade - 이전Grade
  2829. */
  2830. var resultF = parseFloat(pResult);
  2831. var bfresultF = parseFloat(pBFResult);
  2832. var refhF = parseFloat(pRefH);
  2833. var rstintervalF = parseFloat(pRstinterval);
  2834. // 판정구분에 따른 계산결과
  2835. var rstCalc = 0
  2836. var rstDiff = parseFloat(Math.abs(resultF - bfresultF)); // 변화차(절대값)
  2837. var rstDiffRate = (rstDiff / bfresultF) * 100 // 변화비율
  2838. if (pJudgGbn == "1") {
  2839. rstCalc = rstDiff;
  2840. } else if (pJudgGbn == "2") {
  2841. rstCalc = rstDiffRate;
  2842. } else if (pJudgGbn == "3") {
  2843. if (rstintervalF.toString() != "0")
  2844. rstCalc = rstDiff / rstintervalF;
  2845. } else if (pJudgGbn == "4") {
  2846. if (rstintervalF.toString() != "0")
  2847. rstCalc = rstDiffRate / rstintervalF;
  2848. } else if (pJudgGbn == "5") {
  2849. rstCalc = rstDiff / bfresultF;
  2850. } else if (pJudgGbn == "6") {
  2851. }
  2852. if (rstCalc != 0)
  2853. vRetJudgmark = (rstCalc > refhF) ? "D" : ""; // 판정 (상한값을 벗어나는경우만 Delta처리
  2854. return vRetJudgmark;
  2855. }
  2856. /**
  2857. * 사용자정의판정 결과변경
  2858. *
  2859. */
  2860. function fCOMLIS_CvtUjudgRst(pOrgResult, pResult, pJudgmark, pUjudglt) {
  2861. var vReptrslt = pResult;
  2862. var vJudggbn = String(pUjudglt[0]).split(",");
  2863. if (String(pResult).length == 0) return vReptrslt;
  2864. // 숫자 여부(실제결과가 숫자만 사용자정의판정을 한다.)
  2865. if (!String(pOrgResult).isNumber() && !String(pOrgResult).isFloat()) {
  2866. return vReptrslt;
  2867. }
  2868. if (vJudggbn[0] == "2") {
  2869. // 2단계 판정
  2870. if (pJudgmark == "H") {
  2871. vReptrslt = fCOMLIS_Ujudglt(vJudggbn[2], pResult, pUjudglt[2]);
  2872. } else {
  2873. vReptrslt = fCOMLIS_Ujudglt(vJudggbn[1], pResult, pUjudglt[1]);
  2874. }
  2875. } else if (vJudggbn[0] == "3") {
  2876. // 3단계 판정
  2877. if (pJudgmark == "L") {
  2878. vReptrslt = fCOMLIS_Ujudglt(vJudggbn[1], pResult, pUjudglt[1]);
  2879. } else if (pJudgmark == "H") {
  2880. vReptrslt = fCOMLIS_Ujudglt(vJudggbn[3], pResult, pUjudglt[3]);
  2881. } else {
  2882. vReptrslt = fCOMLIS_Ujudglt(vJudggbn[2], pResult, pUjudglt[2]);
  2883. }
  2884. }
  2885. return vReptrslt;
  2886. }
  2887. /**
  2888. * 사용자정의판정 구분에 따른 결과문자 반환
  2889. *
  2890. */
  2891. function fCOMLIS_Ujudglt(pUjudgtype, pResult, pUjudglt) {
  2892. var vRetval = pResult
  2893. if (pUjudgtype == "0") {
  2894. // [0] 판정문자는 판정으로만 : 결과 -> 결과1
  2895. } else if (pUjudgtype == "1") {
  2896. // [1] 판정문자를 결과에 대체 : 결과 -> 판정문
  2897. vRetval = pUjudglt;
  2898. } else if (pUjudgtype == "2") {
  2899. // [2] 판정문자를 결과에 포함 : 결과 -> 판정문자 (결과)
  2900. vRetval = pUjudglt + " (" + pResult + ")";
  2901. } else if (pUjudgtype == "3") {
  2902. // [3] 판정문자를 결과에 포함 : 결과 -> 판정문자 결과
  2903. vRetval = pUjudglt + " " + pResult ;
  2904. } else if (pUjudgtype == "4") {
  2905. // [4] 판정문자를 결과에 포함 : 결과 -> 결과 판정문자
  2906. vRetval = pResult + " " + pUjudglt ;
  2907. }
  2908. return vRetval;
  2909. }
  2910. /**
  2911. * 허용하한치 판정
  2912. *
  2913. */
  2914. function fCOMLIS_JudgLimit(pResult, pJudgType, pRefL, pRefLS, pRefLDK, pRefH, pRefHS, pRefHDK) {
  2915. var retResult = pResult;
  2916. var isLow = true;
  2917. var isHigh = true;
  2918. // 결과 숫자여부
  2919. if (!String(pResult).isNumber() && !String(pResult).isFloat()) {
  2920. return retResult;
  2921. }
  2922. // 허용 하한값 숫자여부
  2923. if (String(pRefL).isNumber() && !String(pRefL).isFloat()) {
  2924. isLow = false;
  2925. }
  2926. // 허용 상항값 숫자여부
  2927. if (String(pRefH).isNumber() && !String(pRefH).isFloat()) {
  2928. isHigh = false;
  2929. }
  2930. /** -- 2008.02.21 재한 추가
  2931. 부등호(pRefLS, pRefHS)
  2932. 0 : <
  2933. 1 : <=
  2934. 2 : >
  2935. 3 : >=
  2936. */
  2937. // 허용치 하한 or 모두
  2938. if ((pJudgType == "1" || pJudgType == "3") && isLow) {
  2939. /* 화면에 보이는 결과(pRefLDK) -- 2008.02.21 재한 수정
  2940. [0] 없음
  2941. [1] 결과를 '허용하한수치로'로 : 예) 20
  2942. [2] 결과를 '<허용하한수치로'로 : 예) < 20
  2943. [3] 결과를 '허용하한수치 이하로'로 : 예) 20이하
  2944. [4] 결과를 '허용하한수치 미만으로'로 : 예) 20미만
  2945. [5] 결과를 '재검중'로 : 예) 재검중
  2946. [6] 결과를 '측정불가'로 : 예) 측정불가
  2947. */
  2948. if(pRefLS == "0") {
  2949. if (parseFloat(pResult) < parseFloat(pRefL)) {
  2950. if (pRefLDK == "1") {
  2951. retResult = pRefL;
  2952. } else if (pRefLDK == "2") {
  2953. retResult = "< " + pRefL;
  2954. } else if (pRefLDK == "3") {
  2955. retResult = pRefL + " 이하";
  2956. } else if (pRefLDK == "4") {
  2957. retResult = pRefL + " 미만";
  2958. } else if (pRefLDK == "5") {
  2959. retResult = "재검중";
  2960. } else if (pRefLDK == "6") {
  2961. retResult = "측정불가";
  2962. }
  2963. }
  2964. }else if(pRefLS == "1") {
  2965. if (parseFloat(pResult) <= parseFloat(pRefL)) {
  2966. if (pRefLDK == "1") {
  2967. retResult = pRefL;
  2968. } else if (pRefLDK == "2") {
  2969. retResult = "< " + pRefL;
  2970. } else if (pRefLDK == "3") {
  2971. retResult = pRefL + " 이하";
  2972. } else if (pRefLDK == "4") {
  2973. retResult = pRefL + " 미만";
  2974. } else if (pRefLDK == "5") {
  2975. retResult = "재검중";
  2976. } else if (pRefLDK == "6") {
  2977. retResult = "측정불가";
  2978. }
  2979. }
  2980. }
  2981. }
  2982. // 허용치 상한 or 모두
  2983. if ((pJudgType == "2" || pJudgType == "3") && isHigh) {
  2984. /* 화면에 보이는 결과(pRefHDK) -- 2008.02.21 재한 수정
  2985. [0] 없음
  2986. [1] 결과를 '허용상한수치로'로 : 예) 2000
  2987. [2] 결과를 '>허용상한수치로'로 : 예) > 2000
  2988. [3] 결과를 '허용상한수치 이상으로'로 : 예) 2000이상
  2989. [4] 결과를 '허용상한수치 초과로'로 : 예) 2000초과
  2990. [5] 결과를 '재검중'로 : 예) 재검중
  2991. [6] 결과를 '측정불가'로 : 예) 측정불가
  2992. */
  2993. if(pRefHS == "2") {
  2994. if (parseFloat(pResult) > parseFloat(pRefH)) {
  2995. if (pRefHDK == "1") {
  2996. retResult = pRefH;
  2997. } else if (pRefHDK == "2") {
  2998. retResult = "> " + pRefH;
  2999. } else if (pRefHDK == "3") {
  3000. retResult = pRefH + " 이상";
  3001. } else if (pRefHDK == "4") {
  3002. retResult = pRefH + " 초과";
  3003. } else if (pRefHDK == "5") {
  3004. retResult = "재검중";
  3005. } else if (pRefHDK == "6") {
  3006. retResult = "측정불가";
  3007. }
  3008. }
  3009. }else if(pRefHS == "3") {
  3010. if (parseFloat(pResult) >= parseFloat(pRefH)) {
  3011. if (pRefHDK == "1") {
  3012. retResult = pRefH;
  3013. } else if (pRefHDK == "2") {
  3014. retResult = "> " + pRefH;
  3015. } else if (pRefHDK == "3") {
  3016. retResult = pRefH + " 이상";
  3017. } else if (pRefHDK == "4") {
  3018. retResult = pRefH + " 초과";
  3019. } else if (pRefHDK == "5") {
  3020. retResult = "재검중";
  3021. } else if (pRefHDK == "6") {
  3022. retResult = "측정불가";
  3023. }
  3024. }
  3025. }
  3026. }
  3027. return retResult;
  3028. }
  3029. function fCOMLIS_getMarkColor(pMark, pGbn){
  3030. var color = "";
  3031. if (pGbn == "B") {
  3032. // 배경색
  3033. if (pMark == "H") {
  3034. color = "#f7a08b#";
  3035. } else if (pMark == "L") {
  3036. color = "#b9e5fb";
  3037. } else if (pMark == "P") {
  3038. color = "#7BE6B7";
  3039. } else if (pMark == "D") {
  3040. color = "#dec6a4" ;
  3041. } else if (pMark == "C") {
  3042. color = "#ffe79d";
  3043. } else if (pMark == "A") {
  3044. color = "#fec34d";
  3045. }
  3046. } else if (pGbn == "F") {
  3047. // 전경색(글자색)
  3048. color[0] = 255; color[1] = 255; color[2] = 255;
  3049. if (pMark == "H") {
  3050. color[0] = 255; color[1] = 0; color[2] = 0;
  3051. //color[0] = 0; color[1] = 0; color[2] = 255;
  3052. } else if (pMark == "L") {
  3053. color[0] = 0; color[1] = 0; color[2] = 255;
  3054. //color[0] = 255; color[1] = 0; color[2] = 0;
  3055. } else if (pMark == "P") {
  3056. color[0] = 153; color[1] = 0; color[2] = 204;
  3057. } else if (pMark == "D") {
  3058. color[0] = 0; color[1] = 128; color[2] = 0;
  3059. } else if (pMark == "C") {
  3060. color[0] = 255; color[1] = 102; color[2] = 0;
  3061. } else if (pMark == "A") {
  3062. color[0] = 0; color[1] = 0; color[2] = 0;
  3063. }
  3064. }
  3065. return color;
  3066. }
  3067. /**********************************************************************************
  3068. * 함수명 : lf_bodyControl
  3069. * 설명 : 해당 컴포넌트 하위 컴포넌트들의 enable 설정
  3070. * argument : flag - 설정flag (true/false)
  3071. obj - 해당 컴포넌트(ex : this, this.div)
  3072. trueComponentName - enable true로 설정할 컴포넌트 name:str
  3073. **********************************************************************************/
  3074. function lf_bodyControl(flag,obj,trueComponentName){
  3075. var formComponentlist = obj.components;
  3076. for(var i=0; i<formComponentlist.length; i++){
  3077. if(formComponentlist[i] instanceof Edit || formComponentlist[i] instanceof Combo ||
  3078. formComponentlist[i] instanceof Button || formComponentlist[i] instanceof Calendar ||
  3079. formComponentlist[i] instanceof Radio || formComponentlist[i] instanceof TextArea ||
  3080. formComponentlist[i] instanceof CheckBox){
  3081. if(formComponentlist[i].name != trueComponentName){
  3082. formComponentlist[i].enable = flag;
  3083. }
  3084. }
  3085. }
  3086. }
  3087. /**********************************************************************************
  3088. * 함수명 : createColumn
  3089. * 설명 : Dataset의 column 생성
  3090. * argument : objDs - Dataset
  3091. strColID - 생성할 column 명 : str
  3092. **********************************************************************************/
  3093. function createColumn(objDs, strColID){
  3094. var isExist = false;
  3095. if(!isExistCol(objDs, strColID)){
  3096. objDs.addColumn(strColID,"string");
  3097. }
  3098. }
  3099. /**********************************************************************************
  3100. * 함수명 : isExistCol
  3101. * 설명 : Dataset의 해당 column 유무 확인
  3102. * argument : objDs - Dataset
  3103. strColID - 확인할 column 명 : str
  3104. **********************************************************************************/
  3105. function isExistCol(objDs, strColID){
  3106. var isExist = false;
  3107. var colID = "";
  3108. for(var i=0; i<objDs.getColCount(); i++){
  3109. colID = objDs.getColID(i);
  3110. if(colID == strColID){
  3111. isExist = true;
  3112. }
  3113. }
  3114. return isExist;
  3115. }
  3116. /**********************************************************************************
  3117. * 함수명 : getColPosition
  3118. * 설명 : Dataset의 해당 column의 colindex를 반환
  3119. * argument : objDs - Dataset
  3120. strColID - 확인할 column 명 : str
  3121. * return : col index
  3122. **********************************************************************************/
  3123. function getColPosition(objDs, strColID){
  3124. var col = -1;
  3125. if(isExistCol(objDs, strColID)){
  3126. for(var i=0; i<objDs.colcount; i++){
  3127. if(objDs.getColID(i) == strColID){
  3128. col = i;
  3129. }
  3130. }
  3131. }
  3132. return col;
  3133. }
  3134. /**********************************************************************************
  3135. * 함수명 : lf_nvl
  3136. * 설명 : 오브젝트가 null 일경우 대체 반환
  3137. * argument : objDs - Dataset
  3138. * return : str - 대체할 값
  3139. **********************************************************************************/
  3140. function lf_nvl(obj, str){
  3141. var returnValue = "";
  3142. if(utlf_isNull(obj)){
  3143. returnValue = str;
  3144. }else{
  3145. returnValue = obj;
  3146. }
  3147. return returnValue;
  3148. }
  3149. /**********************************************************************************
  3150. * 함수명 : lf_nullColValue
  3151. * 설명 : 해당 Dataset의 column이 없을경우 대체할 값 반환
  3152. * argument : objDs - Dataset
  3153. : index - index
  3154. : strColID - column name
  3155. : value - 대체할 값
  3156. * return : returnValule - 대체할 값
  3157. **********************************************************************************/
  3158. function lf_nullColValue(objDs, index, strColID, value){
  3159. var returnValule = "";
  3160. if(isExistCol(objDs, strColID)){
  3161. returnValule = objDs.getColumn(index, strColID);
  3162. }else{
  3163. returnValule = value;
  3164. }
  3165. return returnValule;
  3166. }
  3167. /**********************************************************************************
  3168. * 함수명 : lf_isExistDs
  3169. * 설명 : 해당 컴포넌트에 속해 있는 모든 데이터셋 중 원하는 데이터셋 존재유무
  3170. * argument : objDs - component (ex : this)
  3171. : strDs - 확인할 Dataset
  3172. : [returnType] - dataset을 반환 할지 여부("dataset" 이면 Dataset을 반환)
  3173. * return : returnValule - true, false 또는 Dataset
  3174. **********************************************************************************/
  3175. function lf_isExistDs(obj, strDs, returnType){
  3176. var curDepth = 0;
  3177. var returnFlag = false;
  3178. var tmpStr = "";
  3179. if(obj == null) return;
  3180. var arrayCompList = obj.all;
  3181. if(arrayCompList == "undefined") return;
  3182. for(var i=0, len=arrayCompList.length ; i < len; i++){
  3183. if(arrayCompList[i] instanceof Dataset){
  3184. if(arrayCompList[i].name == "undefined") continue;
  3185. if(arrayCompList[i].name == strDs){
  3186. if(returnType == "dataset"){
  3187. returnFlag = arrayCompList[i];
  3188. }else if(returnType != "dataset" || utlf_isNull(returnType)){
  3189. returnFlag = true;
  3190. }
  3191. break;
  3192. }
  3193. }else if(arrayCompList[i] instanceof Div || String(arrayCompList[i]).substring(0, 3) == "cp_"){ //Div 또는 공통 Composite 컨트롤 일 경우
  3194. curDepth++;
  3195. lf_isExistDs(arrayCompList[i], strDs);
  3196. curDepth --;
  3197. }else if(arrayCompList[i] instanceof Tab){ //Tab control일 경우
  3198. var TabPageList = arrayCompList[i].components;
  3199. curDepth++;
  3200. for(var j=0; j < TabPageList.length; j++){
  3201. lf_isExistDs(TabPageList[j], strDs);
  3202. }
  3203. curDepth --;
  3204. }
  3205. }
  3206. return returnFlag;
  3207. }
  3208. /**********************************************************************************
  3209. * 함수명 : copyDatasetCol
  3210. * 설명 : 새로운 데이터셋 컬럼에 기존 데이터셋 컬럼의 데이터 생성 복사
  3211. * argument : objDs - dataset
  3212. : strOldColID - 복사할 column의 name
  3213. : strNewColID - 생성할 column의 name
  3214. **********************************************************************************/
  3215. function copyDatasetCol(objDs, strOldColID, strNewColID){
  3216. if(isExistCol(objDs, strOldColID)){
  3217. createColumn(objDs, strNewColID);
  3218. for(var i=0; i<objDs.rowcount; i++){
  3219. objDs.setColumn(i, strNewColID, objDs.getColumn(i, strOldColID));
  3220. }
  3221. }
  3222. }
  3223. /**********************************************************************************
  3224. * 함수명 : copyDatasetCol
  3225. * 설명 : 새로운 데이터셋 컬럼에 기존 데이터셋 컬럼의 데이터 생성 복사
  3226. * argument : objDs - dataset
  3227. : strOldColID - 복사할 column의 name
  3228. : strNewColID - 생성할 column의 name
  3229. **********************************************************************************/
  3230. function lf_copyColInfo(dsDest:Dataset, dsSrc:Dataset, bReplace){
  3231. var nSrcColCnt = dsSrc.colcount;
  3232. if(utlf_isNull(bReplace)) bReplace = true;
  3233. if(bReplace) dsDest.clear();
  3234. for(var j=0 ; j<nSrcColCnt ; j++){
  3235. var sSrcColId = dsSrc.getColID(j);
  3236. var objSrcColInfo = dsSrc.getColumnInfo(sSrcColId);
  3237. dsDest.addColumn(sSrcColId, objSrcColInfo.type, objSrcColInfo.size);
  3238. }
  3239. }
  3240. /**********************************************************************************
  3241. * 함수명 : lf_UpPatinfo
  3242. * 설명 : 환자 상단정보
  3243. * argument : pid : 환자번호
  3244. **********************************************************************************/
  3245. function lf_UpPatinfo(pid){
  3246. var sInDsName = dsf_createDsRow("ds_temp_search"
  3247. , [{col: "pid", val: pid}]);
  3248. dsf_createDs("ds_temp_prcpinfo");
  3249. tranf_submit({
  3250. id: "TRLZZ00109"
  3251. , service: "diagtestapplib.LisCommon"
  3252. , method: "reqGetPidTopinfo"
  3253. , inds : "cond="+sInDsName
  3254. , outds: "ds_temp_prcpinfo=getPidTopinfo"
  3255. , callback: "cbf_TRLZZ00109"
  3256. , async: true
  3257. });
  3258. }
  3259. //콜백_Top정보 설정위한 환자 정보조회
  3260. function cbf_TRLZZ00109(strSvcID, nErrorCode, strErrorMag){
  3261. if(nErrorCode != 0){
  3262. sysf_messageBox("ID: " + strSvcID + " Error: " + strErrorMag, "E009", "");
  3263. }else{
  3264. if(!utlf_isNull(ds_temp_prcpinfo.getColumn(0, "pid"))){
  3265. frmf_setParameter('errflag', "Y");
  3266. var genrflag = ds_temp_prcpinfo.getColumn(0, "genrflag");
  3267. if(genrflag == "D") genrflag = "I";
  3268. if(genrflag == "S") genrflag = "O";
  3269. var mngtflag = genrflag; //조회구분
  3270. var pid = ds_temp_prcpinfo.getColumn(0, "pid"); //등록번호
  3271. var orddd = ds_temp_prcpinfo.getColumn(0, "orddd"); //진료일자
  3272. var cretno = ds_temp_prcpinfo.getColumn(0, "cretno"); //생성번호
  3273. var acptseqno = ds_temp_prcpinfo.getColumn(0, "acptseqno");
  3274. var todd = ds_temp_prcpinfo.getColumn(0, "todd");
  3275. var orgorddd = ds_temp_prcpinfo.getColumn(0, "orgorddd");
  3276. var instcd = ds_temp_prcpinfo.getColumn(0, "instcd"); //기관코드
  3277. var async = true; //비동기여부
  3278. var condparam = "";
  3279. if((genrflag == "I") || (genrflag =="E")){
  3280. condparam += mngtflag +'▦'+
  3281. pid +'▦'+
  3282. orddd +'▦'+
  3283. cretno +'▦'+
  3284. instcd +'▦'+
  3285. todd +'▦'+
  3286. async;
  3287. }else if((genrflag =="O") || (genrflag =="S")){
  3288. condparam += mngtflag +'▦'+
  3289. pid +'▦'+
  3290. orddd +'▦'+
  3291. cretno +'▦'+
  3292. instcd +'▦'+
  3293. async;
  3294. }
  3295. frmf_setParameter('condparam', condparam); // 글로벌변수에 저장
  3296. appf_initPatientInfo(condparam); //환자상단호출
  3297. }
  3298. }
  3299. }
  3300. /**********************************************************************************
  3301. * 함수명 : lf_lisTnsrBarcodeLabel
  3302. * 설명 : 혈액은행 바코드 출력 혈액준비, 혈액불출시
  3303. * argument : ref - 출력할 바코드정보 Dataset
  3304. prntinfo - 바코드설정정보 Dataset
  3305. **********************************************************************************/
  3306. function lf_lisTnsrBarcodeLabel(ref,prntinfo){
  3307. // var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  3308. var sPrntKind = prntinfo.getColumn(0,"prntkind"); //프린터종류
  3309. // var vInstance = document.models(0).instances(0);
  3310. var cntHR = ref.rowcount;
  3311. var portOpenCheck = "";
  3312. var iXPos = 0;
  3313. var iYPos = 0;
  3314. var sSndMsg = "";
  3315. if (sPrntKind == 0) return;
  3316. var sCommKind = utlf_transNullToEmpty(prntinfo.getColumn(0,"commkind"));
  3317. var sLeftBank = utlf_transNullToEmpty(prntinfo.getColumn(0,"left")); //왼쪽여백
  3318. var sTopBank = utlf_transNullToEmpty(prntinfo.getColumn(0,"top")); //위쪽여백
  3319. if(sCommKind == "01") {
  3320. var sSetUpVal = prntinfo.getColumn(0,"setupval"); //PRT LPT출력
  3321. }
  3322. else if(sCommKind == "02") { //COM serial출력
  3323. var sComm = prntinfo.getColumn(0,"comm"); //com port
  3324. var sDataBit = prntinfo.getColumn(0,"databit"); //data bit
  3325. var sStopBit = prntinfo.getColumn(0,"stopbit"); //stop bit
  3326. var sBaudRate = prntinfo.getColumn(0,"baudrate"); //baud rate
  3327. var sParity = prntinfo.getColumn(0,"parity"); //parity
  3328. llz_objCommAX.CommPort = sComm;
  3329. llz_objCommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  3330. portOpenCheck = llz_objCommAX.PortOpen(true);
  3331. }
  3332. else if(sCommKind == "03") { //TCP/IP출력
  3333. var sSetUpVal = prntinfo.getColumn(0,"setupval03");
  3334. var sEqmtCD = prntinfo.getColumn(0,"eqmtcd");
  3335. }
  3336. if( (portOpenCheck == "TRUE" && sCommKind == "02")
  3337. || sCommKind == "01"
  3338. || sCommKind == "03"){
  3339. for(i=0 ; i< cntHR ;i++){
  3340. var sStr = "";
  3341. var prepblodseqno = utlf_transNullToEmpty(ref.getColumn(i,"prepblodseqno")); //준비혈액일련번호
  3342. var blodno = utlf_transNullToEmpty(ref.getColumn(i,"blodno")); //혈액번호
  3343. var blodno2 = utlf_transNullToEmpty(ref.getColumn(i,"blodno2")); //혈액번호
  3344. var blodno3 = utlf_transNullToEmpty(ref.getColumn(i,"blodno3")); //혈액번호
  3345. var blodno4 = utlf_transNullToEmpty(ref.getColumn(i,"blodno4")); //혈액번호
  3346. var blodno5 = utlf_transNullToEmpty(ref.getColumn(i,"blodno5")); //혈액번호
  3347. var blodno6 = utlf_transNullToEmpty(ref.getColumn(i,"blodno6")); //혈액번호
  3348. var pid = utlf_transNullToEmpty(ref.getColumn(i,"pid")); //등록번호
  3349. var patnm = utlf_transNullToEmpty(ref.getColumn(i,"patnm")); //환자명
  3350. var sexage = utlf_transNullToEmpty(ref.getColumn(i,"sexage")); //성별나이
  3351. var roominfo = utlf_transNullToEmpty(ref.getColumn(i,"roominfo")); //진료과병실
  3352. var cmrslt = utlf_transNullToEmpty(ref.getColumn(i,"cmrslt")); //크로스매칭결과
  3353. var blodcomnm = utlf_transNullToEmpty(ref.getColumn(i,"blodcomnm")); //성분제제명
  3354. var aborh = utlf_transNullToEmpty(ref.getColumn(i,"aborh")); //공혈자혈액형
  3355. var btype = utlf_transNullToEmpty(ref.getColumn(i,"btype")); //수혈자혈액형
  3356. var iryn = utlf_transNullToEmpty(ref.getColumn(i,"iryn")); //방사선조사여부
  3357. var prtdd = utlf_transNullToEmpty(ref.getColumn(i,"prtdd")); //불출일자
  3358. var prttm = utlf_transNullToEmpty(ref.getColumn(i,"prttm")); //불출시간
  3359. var rprtdd = utlf_transNullToEmpty(ref.getColumn(i,"rprtdd")); //준비일자
  3360. var rprttm = utlf_transNullToEmpty(ref.getColumn(i,"rprttm")); //준비시간
  3361. var validd = utlf_transNullToEmpty(ref.getColumn(i,"validd")); //유효일자
  3362. var valitm = utlf_transNullToEmpty(ref.getColumn(i,"valitm")); //유효시간
  3363. var cmnm = utlf_transNullToEmpty(ref.getColumn(i,"cmnm")); //검사자
  3364. var delivenm = utlf_transNullToEmpty(ref.getColumn(i,"delivenm")); //불출자
  3365. var acptnm = utlf_transNullToEmpty(ref.getColumn(i,"acptnm")); //수령자
  3366. var filteryn = utlf_transNullToEmpty(ref.getColumn(i,"filteryn")); //필터여부
  3367. var cmnmdd = utlf_transNullToEmpty(ref.getColumn(i,"cmnmdd")); //검사일시
  3368. var acptdt = utlf_transNullToEmpty(ref.getColumn(i,"acptdt")); //출고일시(불출일시)
  3369. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  3370. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  3371. if(sPrntKind == "15") { //인터맥
  3372. trace("속도개선용==============");
  3373. trace(blodno);
  3374. trace(pid);
  3375. trace(prepblodseqno);
  3376. trace(patnm);
  3377. trace(sexage);
  3378. trace(roominfo);
  3379. trace(blodcomnm);
  3380. trace(cmnmdd);
  3381. trace(aborh);
  3382. trace("속도개선용==============");
  3383. //프린터설정
  3384. //sSndMsg += "SYSVAR(18)=0" + "\r\n"; //다변설정 기본:0
  3385. sSndMsg += "SYSVAR(35)=1" + "\r\n"; //저장여부 0:영구저장,1:임시저장
  3386. //sSndMsg += "LTS& OFF" + "\r\n"; //배치인쇄시 유용,기본 off
  3387. sSndMsg += "INPUT OFF" + "\r\n"; //인터맥다이렉트프로토콜 비활성화
  3388. //sSndMsg += "FORMAT INPUT \"STX\" , \"ETX\",\"CR\"" + "\r\n";
  3389. //sSndMsg += "FORMAT INPUT CHR$(2),CHR$(3),CHR$(13)"; //layout run 명령어구문 정의
  3390. sSndMsg += "LAYOUT INPUT " +"\"" + "tmp:LBLSOFT.LAY" + "\"" + "\r\n"; //layout구성 시작
  3391. sSndMsg += "NASC -2:AN 7" + "\r\n"; //캐릭터셋지정 -2:ANSI : 위치지정 7:좌측상단
  3392. //sSndMsg += "CLIP OFF" + "\r\n"; //인쇄바같부분 비활성화 기본 :off
  3393. //sSndMsg += "CLIP BARCODE OFF" + "\r\n";//인쇄바같부분 비활성화 기본 :off
  3394. //sSndMsg += "XORMODE OFF" + "\r\n"; //교차필드인쇄부분 기본:off
  3395. //sSndMsg += "MAG 1,1" + "\r\n"; 확대:높이,폭 기본 1,1
  3396. //등록번호
  3397. //iXPos = Number(sLeftBank) + 170;
  3398. //iYPos = Number(sTopBank) + 465;
  3399. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + pid + "\"" + "\r\n";
  3400. iXPos = Number(sLeftBank) + 142;
  3401. iYPos = Number(sTopBank) + 472;
  3402. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,12:NI:PT " +"\"" + pid + "\"" + "\r\n";
  3403. //성명
  3404. //iXPos = Number(sLeftBank) + 475;
  3405. //iYPos = Number(sTopBank) + 465;
  3406. //sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  3407. //sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  3408. //sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  3409. //sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  3410. //sSndMsg += "PT " +"\"" + patnm +"\"" + "\r\n"; //입력데이터제공
  3411. //sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  3412. //sSndMsg += "PF " + "\r\n"; //인쇄
  3413. iXPos = Number(sLeftBank) + 480;
  3414. if(patnm.length == utlf_getStringLength(patnm)){
  3415. iYPos = Number(sTopBank) + 475;
  3416. }
  3417. else{//한글
  3418. iYPos = Number(sTopBank) + 498;
  3419. }
  3420. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,12,0,100" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  3421. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  3422. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  3423. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  3424. sSndMsg += "PT " +"\"" + patnm +"\"" + "\r\n"; //입력데이터제공
  3425. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  3426. //sSndMsg += "PF " + "\r\n"; //인쇄
  3427. //진료과/병동
  3428. //iXPos = Number(sLeftBank) + 170;
  3429. //iYPos = Number(sTopBank) + 430;
  3430. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + roominfo + "\"" + "\r\n";
  3431. iXPos = Number(sLeftBank) + 160;
  3432. iYPos = Number(sTopBank) + 434;
  3433. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 BT" +"\"" + " ,9:NI:PT " +"\"" + roominfo + "\"" + "\r\n";
  3434. //성별/나이
  3435. //iXPos = Number(sLeftBank) + 470;
  3436. //iYPos = Number(sTopBank) + 430;
  3437. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + sexage + "\"" + "\r\n";
  3438. iXPos = Number(sLeftBank) + 490;
  3439. iYPos = Number(sTopBank) + 434;
  3440. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 BT" +"\"" + " ,9:NI:PT " +"\"" + sexage + "\"" + "\r\n";
  3441. //환자혈액형(수혈자혈액형)
  3442. iXPos = Number(sLeftBank) + 170;
  3443. iYPos = Number(sTopBank) + 402;
  3444. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,12:NI:PT " +"\"" + btype + "\"" + "\r\n";
  3445. //출고혈액형(공혈자혈액형)
  3446. //iXPos = Number(sLeftBank) + 475;
  3447. //iYPos = Number(sTopBank) + 390;
  3448. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + aborh + "\"" + "\r\n";
  3449. iXPos = Number(sLeftBank) + 500;
  3450. iYPos = Number(sTopBank) + 402;
  3451. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,12:NI:PT " +"\"" + aborh + "\"" + "\r\n";
  3452. // if(sCommKind == "01") {
  3453. // //CommAX.SendMessageToLPT(sSndMsg);
  3454. // llz_objCommAX.SendMessageToLPT(sSndMsg);
  3455. // sSndMsg = "";
  3456. // }
  3457. // else if(sCommKind == "02") {
  3458. // //CommAX.SendMessage(sSndMsg);
  3459. // llz_objCommAX.SendMessage(sSndMsg);
  3460. // sSndMsg = "";
  3461. // }
  3462. //혈액종류(성분제제명)
  3463. //iXPos = Number(sLeftBank) + 170;
  3464. //iYPos = Number(sTopBank) + 360;
  3465. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + blodcomnm + "\"" + "\r\n";
  3466. iXPos = Number(sLeftBank) + 138;
  3467. if(blodcomnm.length == utlf_getStringLength(blodcomnm)){
  3468. iYPos = Number(sTopBank) + 365;
  3469. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 BT" +"\"" + " ,10:NI:PT " +"\"" + blodcomnm + "\"" + "\r\n";
  3470. }
  3471. else{//한글
  3472. iYPos = Number(sTopBank) + 382;
  3473. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,12,0,100" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  3474. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  3475. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  3476. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  3477. sSndMsg += "PT " +"\"" + blodcomnm +"\"" + "\r\n"; //입력데이터제공
  3478. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  3479. //sSndMsg += "PF " + "\r\n"; //인쇄
  3480. }
  3481. //X-Matching major
  3482. //iXPos = Number(sLeftBank) + 235;
  3483. //iYPos = Number(sTopBank) + 300;
  3484. //sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  3485. //sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  3486. //sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  3487. //sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  3488. //sSndMsg += "PT " +"\"" + cmrslt +"\"" + "\r\n"; //입력데이터제공
  3489. //sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  3490. ////sSndMsg += "PF " + "\r\n"; //인쇄
  3491. iXPos = Number(sLeftBank) + 225;
  3492. iYPos = Number(sTopBank) + 325;
  3493. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,10,0,100" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  3494. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  3495. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  3496. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  3497. sSndMsg += "PT " +"\"" + cmrslt +"\"" + "\r\n"; //입력데이터제공
  3498. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  3499. //sSndMsg += "PF " + "\r\n"; //인쇄
  3500. //X-Matching minor(미정)
  3501. //iXPos = Number(sLeftBank) + 235;
  3502. //iYPos = Number(sTopBank) + 266;
  3503. //sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  3504. //sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  3505. //sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  3506. //sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  3507. //sSndMsg += "PT " +"\"" + cmrslt +"\"" + "\r\n"; //입력데이터제공
  3508. //sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  3509. //sSndMsg += "PF " + "\r\n"; //인쇄
  3510. iXPos = Number(sLeftBank) + 225;
  3511. iYPos = Number(sTopBank) + 295;
  3512. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,10,0,100" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  3513. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  3514. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  3515. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  3516. sSndMsg += "PT " +"\"" + cmrslt +"\"" + "\r\n"; //입력데이터제공
  3517. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  3518. //sSndMsg += "PF " + "\r\n"; //인쇄
  3519. //혈액번호1
  3520. //iXPos = Number(sLeftBank) + 475;
  3521. //iYPos = Number(sTopBank) + 360;
  3522. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + blodno + "\"" + "\r\n";
  3523. iXPos = Number(sLeftBank) + 445;
  3524. iYPos = Number(sTopBank) + 370;
  3525. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,11:NI:PT " +"\"" + blodno + "\"" + "\r\n";
  3526. //혈액번호2
  3527. //iXPos = Number(sLeftBank) + 475;
  3528. //iYPos = Number(sTopBank) + 330;
  3529. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + blodno2 + "\"" + "\r\n";
  3530. iXPos = Number(sLeftBank) + 445;
  3531. iYPos = Number(sTopBank) + 340;
  3532. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,11:NI:PT " +"\"" + blodno2 + "\"" + "\r\n";
  3533. //혈액번호3
  3534. //iXPos = Number(sLeftBank) + 475;
  3535. //iYPos = Number(sTopBank) + 300;
  3536. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + blodno3 + "\"" + "\r\n";
  3537. iXPos = Number(sLeftBank) + 445;
  3538. iYPos = Number(sTopBank) + 310;
  3539. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,11:NI:PT " +"\"" + blodno3 + "\"" + "\r\n";
  3540. //혈액번호4
  3541. //iXPos = Number(sLeftBank) + 475;
  3542. //iYPos = Number(sTopBank) + 270;
  3543. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + blodno4 + "\"" + "\r\n";
  3544. iXPos = Number(sLeftBank) + 445;
  3545. iYPos = Number(sTopBank) + 280;
  3546. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,11:NI:PT " +"\"" + blodno4 + "\"" + "\r\n";
  3547. //혈액번호5
  3548. //iXPos = Number(sLeftBank) + 475;
  3549. //iYPos = Number(sTopBank) + 240;
  3550. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + blodno5 + "\"" + "\r\n";
  3551. iXPos = Number(sLeftBank) + 445;
  3552. iYPos = Number(sTopBank) + 250;
  3553. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,11:NI:PT " +"\"" + blodno5 + "\"" + "\r\n";
  3554. //혈액번호6
  3555. //iXPos = Number(sLeftBank) + 475;
  3556. //iYPos = Number(sTopBank) + 210;
  3557. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + blodno6 + "\"" + "\r\n";
  3558. iXPos = Number(sLeftBank) + 445;
  3559. iYPos = Number(sTopBank) + 220;
  3560. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,11:NI:PT " +"\"" + blodno6 + "\"" + "\r\n";
  3561. if(sCommKind == "01") {
  3562. //CommAX.SendMessageToLPT(sSndMsg);
  3563. llz_objCommAX.SendMessageToLPT(sSndMsg);
  3564. sSndMsg = "";
  3565. }
  3566. else if(sCommKind == "02") {
  3567. //CommAX.SendMessage(sSndMsg);
  3568. llz_objCommAX.SendMessage(sSndMsg);
  3569. sSndMsg = "";
  3570. }
  3571. //방사선/필터
  3572. //iXPos = Number(sLeftBank) + 170;
  3573. //iYPos = Number(sTopBank) + 205;
  3574. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + iryn + "/" + filteryn + "\"" + "\r\n";
  3575. iXPos = Number(sLeftBank) + 190;
  3576. iYPos = Number(sTopBank) + 216;
  3577. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,10,0,100" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  3578. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  3579. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  3580. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  3581. sSndMsg += "PT " +"\"" + iryn + "/" + filteryn +"\"" + "\r\n"; //입력데이터제공
  3582. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  3583. //sSndMsg += "PF " + "\r\n"; //인쇄
  3584. //혈액백 확인(일단 무조건 OK표시)
  3585. //iXPos = Number(sLeftBank) + 475;
  3586. //iYPos = Number(sTopBank) + 175;
  3587. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + "OK" + "\"" + "\r\n";
  3588. iXPos = Number(sLeftBank) + 400;
  3589. iYPos = Number(sTopBank) + 216;
  3590. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,10,0,100" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  3591. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  3592. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  3593. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  3594. sSndMsg += "PT " +"\"" + "OK" +"\"" + "\r\n"; //입력데이터제공
  3595. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  3596. //sSndMsg += "PF " + "\r\n"; //인쇄
  3597. //검사자
  3598. //iXPos = Number(sLeftBank) + 170;
  3599. //iYPos = Number(sTopBank) + 165;
  3600. //sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  3601. //sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  3602. //sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  3603. //sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  3604. //sSndMsg += "PT " +"\"" + cmnm +"\"" + "\r\n"; //입력데이터제공
  3605. //sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  3606. //sSndMsg += "PF " + "\r\n"; //인쇄
  3607. iXPos = Number(sLeftBank) + 165;
  3608. iYPos = Number(sTopBank) + 200;
  3609. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " 10,0,100" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  3610. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  3611. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  3612. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  3613. sSndMsg += "PT " +"\"" + cmnm +"\"" + "\r\n"; //입력데이터제공
  3614. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  3615. //sSndMsg += "PF " + "\r\n"; //인쇄
  3616. //검사일시
  3617. //iXPos = Number(sLeftBank) + 455;
  3618. //iYPos = Number(sTopBank) + 165;
  3619. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + cmnmdd + "\"" + "\r\n";
  3620. iXPos = Number(sLeftBank) + 430;
  3621. iYPos = Number(sTopBank) + 176;
  3622. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 BT" +"\"" + " ,9:NI:PT " +"\"" + cmnmdd + "\"" + "\r\n";
  3623. //출고자(불출자)
  3624. //iXPos = Number(sLeftBank) + 170;
  3625. //iYPos = Number(sTopBank) + 130;
  3626. //sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  3627. //sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  3628. //sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  3629. //sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  3630. //sSndMsg += "PT " +"\"" + delivenm +"\"" + "\r\n"; //입력데이터제공
  3631. //sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  3632. //sSndMsg += "PF " + "\r\n"; //인쇄
  3633. iXPos = Number(sLeftBank) + 165;
  3634. iYPos = Number(sTopBank) + 162;
  3635. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,10,0,100" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  3636. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  3637. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  3638. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  3639. sSndMsg += "PT " +"\"" + delivenm +"\"" + "\r\n"; //입력데이터제공
  3640. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  3641. //sSndMsg += "PF " + "\r\n"; //인쇄
  3642. //출고일시(불출일시)
  3643. //iXPos = Number(sLeftBank) + 455;
  3644. //iYPos = Number(sTopBank) + 130;
  3645. //sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + acptdt + "\"" + "\r\n";
  3646. iXPos = Number(sLeftBank) + 430;
  3647. iYPos = Number(sTopBank) + 142;
  3648. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 BT" +"\"" + " ,9:NI:PT " +"\"" + acptdt + "\"" + "\r\n";
  3649. //수령자
  3650. //iXPos = Number(sLeftBank) + 170;
  3651. //iYPos = Number(sTopBank) + 95;
  3652. //sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,8,0,90" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  3653. //sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  3654. //sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  3655. //sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  3656. //sSndMsg += "PT " +"\"" + acptnm +"\"" + "\r\n"; //입력데이터제공
  3657. //sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  3658. //sSndMsg += "PF " + "\r\n"; //인쇄
  3659. iXPos = Number(sLeftBank) + 165;
  3660. iYPos = Number(sTopBank) + 120;
  3661. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,10,0,100" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  3662. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  3663. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  3664. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  3665. sSndMsg += "PT " +"\"" + acptnm +"\"" + "\r\n"; //입력데이터제공
  3666. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  3667. //sSndMsg += "PF " + "\r\n"; //인쇄
  3668. //출력
  3669. sSndMsg += "LAYOUT END" + "\r\n"; //레이아웃구성을 중지하고 저장
  3670. sSndMsg += "LAYOUT RUN " +"\"" + "tmp:LBLSOFT.LAY" +"\"" + "\r\n"; //레이아웃시작
  3671. sSndMsg += "INPUT ON" + "\r\n"; //인터맥다이렉트 프로토콜 활성화
  3672. sSndMsg += "PF " + "\r\n"; //인쇄
  3673. sSndMsg += "PRINT KEY OFF" + "\r\n"; //프린트버튼 비활성화
  3674. if(sCommKind == "01") {
  3675. //CommAX.SendMessageToLPT(sSndMsg);
  3676. llz_objCommAX.SendMessageToLPT(sSndMsg);
  3677. sSndMsg = "";
  3678. }
  3679. else if(sCommKind == "02") {
  3680. //CommAX.SendMessage(sSndMsg);
  3681. llz_objCommAX.SendMessage(sSndMsg);
  3682. sSndMsg = "";
  3683. }
  3684. }
  3685. else if(sPrntKind == "16") { //루칸
  3686. //프린터설정
  3687. sSndMsg = "N" + "\r\n"; //이미지버퍼내용삭제
  3688. sSndMsg += "Q480,24" + "\r\n"; //용지세로 60mm,용지사이여백3mm
  3689. sSndMsg += "q640" + "\r\n"; //용지가로80mm
  3690. //등록번호
  3691. iXPos = Number(sLeftBank) + 170;
  3692. iYPos = Number(sTopBank) + 15;
  3693. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" +pid + "\"" + "\r\n";
  3694. //성명
  3695. iXPos = Number(sLeftBank) + 475;
  3696. iYPos = Number(sTopBank) + 15;
  3697. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" +patnm + "\"" + "\r\n";
  3698. //진료과/병동
  3699. iXPos = Number(sLeftBank) + 170;
  3700. iYPos = Number(sTopBank) + 50;
  3701. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + roominfo + "\"" + "\r\n";
  3702. //성별/나이
  3703. iXPos = Number(sLeftBank) + 470;
  3704. iYPos = Number(sTopBank) + 50;
  3705. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + sexage + "\"" + "\r\n";
  3706. //환자혈액형(수혈자혈액형)
  3707. iXPos = Number(sLeftBank) + 170;
  3708. iYPos = Number(sTopBank) + 90;
  3709. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + btype + "\"" + "\r\n";
  3710. //출고혈액형(공혈자혈액형)
  3711. iXPos = Number(sLeftBank) + 475;
  3712. iYPos = Number(sTopBank) + 90;
  3713. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + aborh + "\"" + "\r\n";
  3714. //혈액종류(성분제제명)
  3715. iXPos = Number(sLeftBank) + 170;
  3716. iYPos = Number(sTopBank) + 120;
  3717. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + blodcomnm + "\"" + "\r\n";
  3718. //X-Matching major
  3719. iXPos = Number(sLeftBank) + 235;
  3720. iYPos = Number(sTopBank) + 180;
  3721. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + cmrslt + "\"" + "\r\n";
  3722. //X-Matching minor(미정)
  3723. iXPos = Number(sLeftBank) + 235;
  3724. iYPos = Number(sTopBank) + 214;
  3725. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + cmrslt + "\"" + "\r\n";
  3726. //혈액번호1
  3727. iXPos = Number(sLeftBank) + 475;
  3728. iYPos = Number(sTopBank) + 120;
  3729. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + blodno + "\"" + "\r\n";
  3730. //혈액번호2
  3731. iXPos = Number(sLeftBank) + 475;
  3732. iYPos = Number(sTopBank) + 150;
  3733. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + blodno2 + "\"" + "\r\n";
  3734. //혈액번호3
  3735. iXPos = Number(sLeftBank) + 475;
  3736. iYPos = Number(sTopBank) + 180;
  3737. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + blodno3 + "\"" + "\r\n";
  3738. //혈액번호4
  3739. iXPos = Number(sLeftBank) + 475;
  3740. iYPos = Number(sTopBank) + 210;
  3741. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + blodno4 + "\"" + "\r\n";
  3742. //혈액번호5
  3743. iXPos = Number(sLeftBank) + 475;
  3744. iYPos = Number(sTopBank) + 240;
  3745. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + blodno5 + "\"" + "\r\n";
  3746. //혈액번호6
  3747. iXPos = Number(sLeftBank) + 475;
  3748. iYPos = Number(sTopBank) + 270;
  3749. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + blodno5 + "\"" + "\r\n";
  3750. //방사선/필터
  3751. iXPos = Number(sLeftBank) + 170;
  3752. iYPos = Number(sTopBank) + 275;
  3753. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + iryn + "/" + filteryn + "\"" + "\r\n";
  3754. //혈액백 확인(일단 무조건 OK표시)
  3755. iXPos = Number(sLeftBank) + 475;
  3756. iYPos = Number(sTopBank) + 305;
  3757. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + "OK" + "\"" + "\r\n";
  3758. //검사자
  3759. iXPos = Number(sLeftBank) + 170;
  3760. iYPos = Number(sTopBank) + 315;
  3761. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + cmnm + "\"" + "\r\n";
  3762. //검사일시
  3763. iXPos = Number(sLeftBank) + 455;
  3764. iYPos = Number(sTopBank) + 315;
  3765. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + cmnmdd + "\"" + "\r\n";
  3766. //출고자(불출자)
  3767. iXPos = Number(sLeftBank) + 170;
  3768. iYPos = Number(sTopBank) + 350;
  3769. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + delivenm + "\"" + "\r\n";
  3770. //출고일시(불출일시)
  3771. iXPos = Number(sLeftBank) + 455;
  3772. iYPos = Number(sTopBank) + 350;
  3773. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + acptdt + "\"" + "\r\n";
  3774. //수령자
  3775. iXPos = Number(sLeftBank) + 170;
  3776. iYPos = Number(sTopBank) + 385;
  3777. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + acptnm + "\"" + "\r\n";
  3778. //출력
  3779. sSndMsg += "P1"+ "\r\n";
  3780. if(sCommKind == "01") {
  3781. //CommAX.SendMessageToLPT(sSndMsg);
  3782. llz_objCommAX.SendMessageToLPT(sSndMsg);
  3783. sSndMsg = "";
  3784. }
  3785. else if(sCommKind == "02") {
  3786. //CommAX.SendMessage(sSndMsg);
  3787. llz_objCommAX.SendMessage(sSndMsg);
  3788. sSndMsg = "";
  3789. }
  3790. }
  3791. else if(sPrntKind == "17") { //아르고스
  3792. //프린터설정
  3793. sSndMsg = "N" + "\r\n"; //이미지버퍼내용삭제
  3794. sSndMsg = "JF" + "\r\n"; //용지정렬
  3795. sSndMsg += "Q480,24" + "\r\n"; //용지세로 60mm,용지사이여백3mm
  3796. sSndMsg += "q640" + "\r\n"; //용지가로80mm
  3797. sSndMsg += "OD"+ "\r\n";
  3798. //등록번호
  3799. iXPos = Number(sLeftBank) + 120;
  3800. iYPos = Number(sTopBank) + 30;
  3801. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" +pid + "\"" + "\r\n";
  3802. //성명
  3803. iXPos = Number(sLeftBank) + 425;
  3804. iYPos = Number(sTopBank) + 30;
  3805. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" +patnm + "\"" + "\r\n";
  3806. //진료과/병동
  3807. iXPos = Number(sLeftBank) + 120;
  3808. iYPos = Number(sTopBank) + 65;
  3809. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + roominfo + "\"" + "\r\n";
  3810. //성별/나이
  3811. iXPos = Number(sLeftBank) + 425;
  3812. iYPos = Number(sTopBank) + 65;
  3813. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + sexage + "\"" + "\r\n";
  3814. //환자혈액형(수혈자혈액형)
  3815. iXPos = Number(sLeftBank) + 120;
  3816. iYPos = Number(sTopBank) + 95;
  3817. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + btype + "\"" + "\r\n";
  3818. //출고혈액형(공혈자혈액형)
  3819. iXPos = Number(sLeftBank) + 425;
  3820. iYPos = Number(sTopBank) + 100;
  3821. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + aborh + "\"" + "\r\n";
  3822. //혈액종류(성분제제명)
  3823. iXPos = Number(sLeftBank) + 120;
  3824. iYPos = Number(sTopBank) + 140;
  3825. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + blodcomnm + "\"" + "\r\n";
  3826. //X-Matching major
  3827. iXPos = Number(sLeftBank) + 190;
  3828. iYPos = Number(sTopBank) + 200;
  3829. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + cmrslt + "\"" + "\r\n";
  3830. //X-Matching minor(미정)
  3831. iXPos = Number(sLeftBank) + 190;
  3832. iYPos = Number(sTopBank) + 225;
  3833. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + cmrslt + "\"" + "\r\n";
  3834. //혈액번호1
  3835. iXPos = Number(sLeftBank) + 425;
  3836. iYPos = Number(sTopBank) + 130;
  3837. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + blodno + "\"" + "\r\n";
  3838. //혈액번호2
  3839. iXPos = Number(sLeftBank) + 425;
  3840. iYPos = Number(sTopBank) + 160;
  3841. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + blodno2 + "\"" + "\r\n";
  3842. //혈액번호3
  3843. iXPos = Number(sLeftBank) + 425;
  3844. iYPos = Number(sTopBank) + 190;
  3845. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + blodno3 + "\"" + "\r\n";
  3846. //혈액번호4
  3847. iXPos = Number(sLeftBank) + 425;
  3848. iYPos = Number(sTopBank) + 220;
  3849. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + blodno4 + "\"" + "\r\n";
  3850. //혈액번호5
  3851. iXPos = Number(sLeftBank) + 425;
  3852. iYPos = Number(sTopBank) + 250;
  3853. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + blodno5 + "\"" + "\r\n";
  3854. //혈액번호6
  3855. iXPos = Number(sLeftBank) + 425;
  3856. iYPos = Number(sTopBank) + 280;
  3857. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + blodno5 + "\"" + "\r\n";
  3858. ////////////////////////////////////
  3859. //방사선/필터
  3860. iXPos = Number(sLeftBank) + 170;
  3861. iYPos = Number(sTopBank) + 280;
  3862. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + iryn + "/" + filteryn + "\"" + "\r\n";
  3863. //혈액백 확인(일단 무조건 OK표시)
  3864. iXPos = Number(sLeftBank) + 425;
  3865. iYPos = Number(sTopBank) + 280;
  3866. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + "OK" + "\"" + "\r\n";
  3867. //검사자
  3868. iXPos = Number(sLeftBank) + 120;
  3869. iYPos = Number(sTopBank) + 320;
  3870. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + cmnm + "\"" + "\r\n";
  3871. //검사일시
  3872. iXPos = Number(sLeftBank) + 425;
  3873. iYPos = Number(sTopBank) + 320;
  3874. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,1,1,1,N," + "\"" + cmnmdd + "\"" + "\r\n";
  3875. //출고자(불출자)
  3876. iXPos = Number(sLeftBank) + 120;
  3877. iYPos = Number(sTopBank) + 355;
  3878. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + delivenm + "\"" + "\r\n";
  3879. //출고일시(불출일시)
  3880. iXPos = Number(sLeftBank) + 425;
  3881. iYPos = Number(sTopBank) + 355;
  3882. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,1,1,1,N," + "\"" + acptdt + "\"" + "\r\n";
  3883. //수령자
  3884. iXPos = Number(sLeftBank) + 120;
  3885. iYPos = Number(sTopBank) + 390;
  3886. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + acptnm + "\"" + "\r\n";
  3887. //출력
  3888. sSndMsg += "P1"+ "\r\n";
  3889. if(sCommKind == "01") {
  3890. llz_objCommAX.SendMessageToLPT(sSndMsg);
  3891. sSndMsg = "";
  3892. }
  3893. else if(sCommKind == "02") {
  3894. llz_objCommAX.SendMessage(sSndMsg);
  3895. trace("");
  3896. sSndMsg = "";
  3897. }
  3898. }
  3899. }
  3900. if(sCommKind == "02") {
  3901. portOpenCheck = llz_objCommAX.PortClose(true);
  3902. }
  3903. }else if(portOpenCheck == "FALSE" && sCommKind == "02"){
  3904. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  3905. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  3906. + " \n 2.케이블 확인"
  3907. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  3908. return;
  3909. }
  3910. }
  3911. /**********************************************************************************
  3912. * 함수명 : lf_lisTnsrBarcodeLabel2
  3913. * 설명 : 혈액은행 바코드 출력 혈액준비, 혈액불출시
  3914. * argument : ref - 출력할 바코드정보 Dataset
  3915. prntinfo - 바코드설정정보 Dataset
  3916. **********************************************************************************/
  3917. function lf_lisTnsrBarcodeLabel2(ref,prntinfo){
  3918. // var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  3919. var sPrntKind = prntinfo.getColumn(0,"prntkind"); //프린터종류
  3920. // var vInstance = document.models(0).instances(0);
  3921. var cntHR = ref.rowcount;
  3922. var portOpenCheck = "";
  3923. var iXPos = 0;
  3924. var iYPos = 0;
  3925. var sSndMsg = "";
  3926. if (sPrntKind == 0) return;
  3927. var sCommKind = utlf_transNullToEmpty(prntinfo.getColumn(0,"commkind"));
  3928. var sLeftBank = utlf_transNullToEmpty(prntinfo.getColumn(0,"left")); //왼쪽여백
  3929. var sTopBank = utlf_transNullToEmpty(prntinfo.getColumn(0,"top")); //위쪽여백
  3930. if(sCommKind == "01") {
  3931. var sSetUpVal = prntinfo.getColumn(0,"setupval"); //PRT LPT출력
  3932. }
  3933. else if(sCommKind == "02") { //COM serial출력
  3934. var sComm = prntinfo.getColumn(0,"comm"); //com port
  3935. var sDataBit = prntinfo.getColumn(0,"databit"); //data bit
  3936. var sStopBit = prntinfo.getColumn(0,"stopbit"); //stop bit
  3937. var sBaudRate = prntinfo.getColumn(0,"baudrate"); //baud rate
  3938. var sParity = prntinfo.getColumn(0,"parity"); //parity
  3939. llz_objCommAX.CommPort = sComm;
  3940. llz_objCommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  3941. portOpenCheck = llz_objCommAX.PortOpen(true);
  3942. }
  3943. else if(sCommKind == "03") { //TCP/IP출력
  3944. var sSetUpVal = prntinfo.getColumn(0,"setupval03");
  3945. var sEqmtCD = prntinfo.getColumn(0,"eqmtcd");
  3946. }
  3947. if( (portOpenCheck == "TRUE" && sCommKind == "02")
  3948. || sCommKind == "01"
  3949. || sCommKind == "03"){
  3950. for(i=0 ; i< cntHR ;i++){
  3951. var sStr = "";
  3952. var prepblodseqno = utlf_transNullToEmpty(ref.getColumn(i,"prepblodseqno")); //준비혈액일련번호
  3953. var blodno = utlf_transNullToEmpty(ref.getColumn(i,"blodno")); //혈액번호
  3954. var blodno2 = utlf_transNullToEmpty(ref.getColumn(i,"blodno2")); //혈액번호
  3955. var blodno3 = utlf_transNullToEmpty(ref.getColumn(i,"blodno3")); //혈액번호
  3956. var blodno4 = utlf_transNullToEmpty(ref.getColumn(i,"blodno4")); //혈액번호
  3957. var blodno5 = utlf_transNullToEmpty(ref.getColumn(i,"blodno5")); //혈액번호
  3958. var blodno6 = utlf_transNullToEmpty(ref.getColumn(i,"blodno6")); //혈액번호
  3959. var pid = utlf_transNullToEmpty(ref.getColumn(i,"pid")); //등록번호
  3960. var patnm = utlf_transNullToEmpty(ref.getColumn(i,"patnm")); //환자명
  3961. var sexage = utlf_transNullToEmpty(ref.getColumn(i,"sexage")); //성별나이
  3962. var roominfo = utlf_transNullToEmpty(ref.getColumn(i,"roominfo")); //진료과병실
  3963. var cmrslt = utlf_transNullToEmpty(ref.getColumn(i,"cmrslt")); //크로스매칭결과
  3964. var blodcomnm = utlf_transNullToEmpty(ref.getColumn(i,"blodcomnm")); //성분제제명
  3965. var aborh = utlf_transNullToEmpty(ref.getColumn(i,"aborh")); //공혈자혈액형
  3966. var btype = utlf_transNullToEmpty(ref.getColumn(i,"btype")); //수혈자혈액형
  3967. var iryn = utlf_transNullToEmpty(ref.getColumn(i,"iryn")); //방사선조사여부
  3968. var prtdd = utlf_transNullToEmpty(ref.getColumn(i,"prtdd")); //불출일자
  3969. var prttm = utlf_transNullToEmpty(ref.getColumn(i,"prttm")); //불출시간
  3970. var rprtdd = utlf_transNullToEmpty(ref.getColumn(i,"rprtdd")); //준비일자
  3971. var rprttm = utlf_transNullToEmpty(ref.getColumn(i,"rprttm")); //준비시간
  3972. var validd = utlf_transNullToEmpty(ref.getColumn(i,"validd")); //유효일자
  3973. var valitm = utlf_transNullToEmpty(ref.getColumn(i,"valitm")); //유효시간
  3974. var cmnm = utlf_transNullToEmpty(ref.getColumn(i,"cmnm")); //검사자
  3975. var delivenm = utlf_transNullToEmpty(ref.getColumn(i,"delivenm")); //불출자
  3976. var acptnm = utlf_transNullToEmpty(ref.getColumn(i,"acptnm")); //수령자
  3977. var filteryn = utlf_transNullToEmpty(ref.getColumn(i,"filteryn")); //필터여부
  3978. var cmnmdd = utlf_transNullToEmpty(ref.getColumn(i,"cmnmdd")); //검사일시
  3979. var acptdt = utlf_transNullToEmpty(ref.getColumn(i,"acptdt")); //출고일시(불출일시)
  3980. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  3981. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  3982. if(sPrntKind == "15") { //인터맥
  3983. //프린터설정
  3984. sSndMsg += "SYSVAR(35)=1" + "\r\n"; //저장여부 0:영구저장,1:임시저장
  3985. sSndMsg += "INPUT OFF" + "\r\n"; //인터맥다이렉트프로토콜 비활성화
  3986. sSndMsg += "LAYOUT INPUT " +"\"" + "tmp:LBLSOFT.LAY" + "\"" + "\r\n"; //layout구성 시작
  3987. sSndMsg += "NASC -2:AN 7" + "\r\n"; //캐릭터셋지정 -2:ANSI : 위치지정 7:좌측상단
  3988. //등록번호
  3989. iXPos = Number(sLeftBank) + 20;
  3990. iYPos = Number(sTopBank) + 270;
  3991. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,14:NI:PT " +"\"" + pid + "\"" + "\r\n";
  3992. //혈액형
  3993. iXPos = Number(sLeftBank) + 250;
  3994. iYPos = Number(sTopBank) + 270;
  3995. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,14:NI:PT " +"\"" + btype + "\"" + "\r\n";
  3996. //이름
  3997. iXPos = Number(sLeftBank) + 20;
  3998. if(patnm.length == utlf_getStringLength(patnm)){
  3999. iYPos = Number(sTopBank) + 220;
  4000. }else{//한글
  4001. iYPos = Number(sTopBank) + 240;
  4002. }
  4003. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,14,0,100" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  4004. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  4005. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  4006. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  4007. sSndMsg += "PT " +"\"" + patnm +"\"" + "\r\n"; //입력데이터제공
  4008. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  4009. //성별/나이
  4010. iXPos = Number(sLeftBank) + 210;
  4011. iYPos = Number(sTopBank) + 210;
  4012. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 BT" +"\"" + " ,10:NI:PT " +"\"" + sexage + "\"" + "\r\n";
  4013. //병동/병실
  4014. iXPos = Number(sLeftBank) + 300;
  4015. iYPos = Number(sTopBank) + 210;
  4016. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 BT" +"\"" + " ,10:NI:PT " +"\"" + roominfo + "\"" + "\r\n";
  4017. //준비중일시
  4018. iXPos = Number(sLeftBank) + 20;
  4019. iYPos = Number(sTopBank) + 150;
  4020. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 BT" +"\"" + " ,10:NI:PT " +"\"" + cmnmdd + "\"" + "\r\n";
  4021. //혈액종류(성분제제명)
  4022. iXPos = Number(sLeftBank) + 20;
  4023. if(blodcomnm.length == utlf_getStringLength(blodcomnm)){
  4024. iYPos = Number(sTopBank) + 100;
  4025. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,10:NI:PT " +"\"" + blodcomnm + "\"" + "\r\n";
  4026. }
  4027. else{//한글
  4028. iYPos = Number(sTopBank) + 110;
  4029. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,12,0,100" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  4030. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  4031. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  4032. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  4033. sSndMsg += "PT " +"\"" + blodcomnm +"\"" + "\r\n"; //입력데이터제공
  4034. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  4035. //sSndMsg += "PF " + "\r\n"; //인쇄
  4036. }
  4037. //혈액번호
  4038. iXPos = Number(sLeftBank) + 20;
  4039. iYPos = Number(sTopBank) + 60;
  4040. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,13:NI:PT " +"\"" + blodno + "\"" + "\r\n";
  4041. //출력
  4042. sSndMsg += "LAYOUT END" + "\r\n"; //레이아웃구성을 중지하고 저장
  4043. sSndMsg += "LAYOUT RUN " +"\"" + "tmp:LBLSOFT.LAY" +"\"" + "\r\n"; //레이아웃시작
  4044. sSndMsg += "INPUT ON" + "\r\n"; //인터맥다이렉트 프로토콜 활성화
  4045. sSndMsg += "PF " + "\r\n"; //인쇄
  4046. sSndMsg += "PRINT KEY OFF" + "\r\n"; //프린트버튼 비활성화
  4047. if(sCommKind == "01") {
  4048. //CommAX.SendMessageToLPT(sSndMsg);
  4049. llz_objCommAX.SendMessageToLPT(sSndMsg);
  4050. sSndMsg = "";
  4051. }
  4052. else if(sCommKind == "02") {
  4053. //CommAX.SendMessage(sSndMsg);
  4054. llz_objCommAX.SendMessage(sSndMsg);
  4055. sSndMsg = "";
  4056. }
  4057. }
  4058. else if(sPrntKind == "16") { //루칸
  4059. //프린터설정
  4060. // sSndMsg = "N" + "\r\n"; //이미지버퍼내용삭제
  4061. // sSndMsg += "Q480,24" + "\r\n"; //용지세로 60mm,용지사이여백3mm
  4062. // sSndMsg += "q640" + "\r\n"; //용지가로80mm
  4063. sSndMsg += "N" + "\r\n"; //이미지버퍼내용삭제
  4064. sSndMsg += "Q256,24" + "\r\n"; //용지세로 32mm,용지사이여백3mm
  4065. sSndMsg += "q432" + "\r\n"; //용지가로54mm
  4066. //등록번호
  4067. iXPos = Number(sLeftBank) + 20;
  4068. iYPos = Number(sTopBank) + 10;
  4069. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,2,N," + "\"" +pid + "\"" + "\r\n";
  4070. //혈앨형
  4071. iXPos = Number(sLeftBank) + 250;
  4072. iYPos = Number(sTopBank) + 10;
  4073. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,2,N," + "\"" +btype + "\"" + "\r\n";
  4074. //이름
  4075. iXPos = Number(sLeftBank) + 20;
  4076. iYPos = Number(sTopBank) + 70;
  4077. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,2,N," + "\"" + patnm + "\"" + "\r\n";
  4078. //성별/나이
  4079. iXPos = Number(sLeftBank) + 170;
  4080. iYPos = Number(sTopBank) + 85;
  4081. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + sexage + "\"" + "\r\n";
  4082. //진료과/병동
  4083. iXPos = Number(sLeftBank) + 280;
  4084. iYPos = Number(sTopBank) + 85;
  4085. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + roominfo + "\"" + "\r\n";
  4086. //준비중일시
  4087. iXPos = Number(sLeftBank) + 20;
  4088. iYPos = Number(sTopBank) + 140;
  4089. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + cmnmdd + "\"" + "\r\n";
  4090. //혈액종류(성분제제명)
  4091. iXPos = Number(sLeftBank) + 20;
  4092. iYPos = Number(sTopBank) + 180;
  4093. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + blodcomnm + "\"" + "\r\n";
  4094. //혈액번호
  4095. iXPos = Number(sLeftBank) + 20;
  4096. iYPos = Number(sTopBank) + 220;
  4097. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,2,N," + "\"" + blodno + "\"" + "\r\n";
  4098. //출력
  4099. sSndMsg += "P1"+ "\r\n";
  4100. if(sCommKind == "01") {
  4101. //CommAX.SendMessageToLPT(sSndMsg);
  4102. llz_objCommAX.SendMessageToLPT(sSndMsg);
  4103. sSndMsg = "";
  4104. }
  4105. else if(sCommKind == "02") {
  4106. //CommAX.SendMessage(sSndMsg);
  4107. llz_objCommAX.SendMessage(sSndMsg);
  4108. sSndMsg = "";
  4109. }
  4110. }
  4111. else if(sPrntKind == "17") { //아르고스
  4112. //프린터설정
  4113. sSndMsg = "N" + "\r\n"; //이미지버퍼내용삭제
  4114. sSndMsg = "JF" + "\r\n"; //용지정렬
  4115. sSndMsg += "Q480,24" + "\r\n"; //용지세로 60mm,용지사이여백3mm
  4116. sSndMsg += "q640" + "\r\n"; //용지가로80mm
  4117. sSndMsg += "OD"+ "\r\n";
  4118. //등록번호
  4119. iXPos = Number(sLeftBank) + 235;
  4120. iYPos = Number(sTopBank) + 20;
  4121. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,3,N," + "\"" +pid + "\"" + "\r\n";
  4122. //혈액형
  4123. iXPos = Number(sLeftBank) + 440;
  4124. iYPos = Number(sTopBank) + 20;
  4125. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,3,N," + "\"" +btype + "\"" + "\r\n";
  4126. //이름
  4127. iXPos = Number(sLeftBank) + 235;
  4128. iYPos = Number(sTopBank) + 70;
  4129. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,2,4,N," + "\"" +patnm + "\"" + "\r\n";
  4130. //성별/나이
  4131. iXPos = Number(sLeftBank) + 440;
  4132. iYPos = Number(sTopBank) + 100;
  4133. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + sexage + "\"" + "\r\n";
  4134. //병동/병실
  4135. iXPos = Number(sLeftBank) + 520;
  4136. iYPos = Number(sTopBank) + 100;
  4137. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + roominfo + "\"" + "\r\n";
  4138. //준비중일시
  4139. iXPos = Number(sLeftBank) + 235;
  4140. iYPos = Number(sTopBank) + 145;
  4141. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + cmnmdd + "\"" + "\r\n";
  4142. //혈액종류(성분제제명)
  4143. iXPos = Number(sLeftBank) + 235;
  4144. iYPos = Number(sTopBank) + 185;
  4145. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,1,N," + "\"" + blodcomnm + "\"" + "\r\n";
  4146. //혈액번호
  4147. iXPos = Number(sLeftBank) + 235;
  4148. iYPos = Number(sTopBank) + 225;
  4149. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,1,2,N," + "\"" + blodno + "\"" + "\r\n";
  4150. //출력
  4151. sSndMsg += "P1"+ "\r\n";
  4152. if(sCommKind == "01") {
  4153. llz_objCommAX.SendMessageToLPT(sSndMsg);
  4154. sSndMsg = "";
  4155. }
  4156. else if(sCommKind == "02") {
  4157. llz_objCommAX.SendMessage(sSndMsg);
  4158. trace("");
  4159. sSndMsg = "";
  4160. }
  4161. }
  4162. }
  4163. if(sCommKind == "02") {
  4164. //llz_objCommAX.PortOpen(false);
  4165. portOpenCheck = llz_objCommAX.PortClose(true);
  4166. }
  4167. }else if(portOpenCheck == "FALSE" && sCommKind == "02"){
  4168. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  4169. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  4170. + " \n 2.케이블 확인"
  4171. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  4172. return;
  4173. }
  4174. }
  4175. /**********************************************************************************
  4176. * 함수명 : lf_lisSpcSlideLabelPrint
  4177. * 설명 : 혈액은행 바코드 출력 혈액준비, 혈액불출시
  4178. * argument : ref - 출력할 바코드정보 Dataset
  4179. prntinfo - 바코드설정정보 Dataset
  4180. **********************************************************************************/
  4181. function lf_lisSpcSlideLabelPrint(ref,prntinfo){
  4182. var sPrntKind = prntinfo.getColumn(0,"prntkind"); //프린터종류
  4183. var cntHR = ref.rowcount;
  4184. var portOpenCheck = "";
  4185. var iXPos = 0;
  4186. var iYPos = 0;
  4187. var sSndMsg = "";
  4188. if (sPrntKind == 0) return;
  4189. var sCommKind = utlf_transNullToEmpty(prntinfo.getColumn(0,"commkind"));
  4190. var sLeftBank = utlf_transNullToEmpty(prntinfo.getColumn(0,"left")); //왼쪽여백
  4191. var sTopBank = utlf_transNullToEmpty(prntinfo.getColumn(0,"top")); //위쪽여백
  4192. if(sCommKind == "01") {
  4193. var sSetUpVal = prntinfo.getColumn(0,"setupval"); //PRT LPT출력
  4194. }
  4195. else if(sCommKind == "02") { //COM serial출력
  4196. var sComm = prntinfo.getColumn(0,"comm"); //com port
  4197. var sDataBit = prntinfo.getColumn(0,"databit"); //data bit
  4198. var sStopBit = prntinfo.getColumn(0,"stopbit"); //stop bit
  4199. var sBaudRate = prntinfo.getColumn(0,"baudrate"); //baud rate
  4200. var sParity = prntinfo.getColumn(0,"parity"); //parity
  4201. llz_objCommAX.CommPort = sComm;
  4202. llz_objCommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  4203. portOpenCheck = llz_objCommAX.PortOpen(true);
  4204. }
  4205. else if(sCommKind == "03") { //TCP/IP출력
  4206. var sSetUpVal = prntinfo.getColumn(0,"setupval03");
  4207. var sEqmtCD = prntinfo.getColumn(0,"eqmtcd");
  4208. }
  4209. if( (portOpenCheck == "TRUE" && sCommKind == "02")
  4210. || sCommKind == "01"
  4211. || sCommKind == "03"){
  4212. for(i=0 ; i< cntHR ;i++){
  4213. var sSpclno = utlf_transNullToEmpty(ref.getColumn(i,"spclno"));
  4214. var sName = utlf_transNullToEmpty(ref.getColumn(i,"name"));
  4215. var sPatnm = utlf_transNullToEmpty(ref.getColumn(i,"patnm"));
  4216. var sSpcacptdt = utlf_transNullToEmpty(ref.getColumn(i,"spcacptdt"));
  4217. var cnt = utlf_transNullToEmpty(ref.getColumn(i,"cnt"));
  4218. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  4219. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  4220. if(sPrntKind == "15") { //인터맥
  4221. //프린터설정
  4222. sSndMsg += "SYSVAR(35)=1" + "\r\n"; //저장여부 0:영구저장,1:임시저장
  4223. sSndMsg += "INPUT OFF" + "\r\n"; //인터맥다이렉트프로토콜 비활성화
  4224. sSndMsg += "LAYOUT INPUT " +"\"" + "tmp:LBLSOFT.LAY" + "\"" + "\r\n"; //layout구성 시작
  4225. sSndMsg += "NASC -2:AN 7" + "\r\n"; //캐릭터셋지정 -2:ANSI : 위치지정 7:좌측상단
  4226. //특수검사연번호
  4227. iXPos = Number(sLeftBank) + 20;
  4228. iYPos = Number(sTopBank) + 120;
  4229. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + sSpclno + "\"" + "\r\n";
  4230. //명칭
  4231. iXPos = Number(sLeftBank) + 20;
  4232. iYPos = Number(sTopBank) + 90;
  4233. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + sName + "\"" + "\r\n";
  4234. //환자명
  4235. iXPos = Number(sLeftBank) + 20;
  4236. if(sPatnm.length == utlf_getStringLength(sPatnm)){
  4237. iYPos = Number(sTopBank) + 60;
  4238. }
  4239. else{//한글
  4240. iYPos = Number(sTopBank) + 55;
  4241. }
  4242. sSndMsg += "FONTD " +"\"" +"Haansoft Dotum" +"\"" + " ,12,0,100" + "\r\n"; //더블바이트폰트의 크기,기울기,폭을 선택
  4243. sSndMsg += "NASCD " +"\"" + "c:KSC5601.NCD" +"\"" + "\r\n"; //더블바이트 캐릭터셋지정
  4244. sSndMsg += "PP " + iXPos + "," + iYPos + "\r\n"; //위치지정
  4245. sSndMsg += "NI " + "\r\n"; //일반인쇄로 재설정
  4246. sSndMsg += "PT " +"\"" + sPatnm +"\"" + "\r\n"; //입력데이터제공
  4247. sSndMsg += "NASCD" +"\"" + "\"" + "\r\n"; //더블바이트 캐릭터셋초기화
  4248. //접수일자
  4249. iXPos = Number(sLeftBank) + 20;
  4250. iYPos = Number(sTopBank) + 20;
  4251. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + sSpcacptdt + "\"" + "\r\n";
  4252. //출력
  4253. sSndMsg += "LAYOUT END" + "\r\n"; //레이아웃구성을 중지하고 저장
  4254. sSndMsg += "LAYOUT RUN " +"\"" + "tmp:LBLSOFT.LAY" +"\"" + "\r\n"; //레이아웃시작
  4255. sSndMsg += "INPUT ON" + "\r\n"; //인터맥다이렉트 프로토콜 활성화
  4256. sSndMsg += "PF " + cnt + "\r\n"; //인쇄
  4257. sSndMsg += "PRINT KEY OFF" + "\r\n"; //프린트버튼 비활성화
  4258. if(sCommKind == "01") {
  4259. llz_objCommAX.SendMessageToLPT(sSndMsg);
  4260. sSndMsg = "";
  4261. }
  4262. else if(sCommKind == "02") {
  4263. llz_objCommAX.SendMessage(sSndMsg);
  4264. sSndMsg = "";
  4265. }
  4266. }else if(sPrntKind == "16") { //루칸
  4267. //프린터설정
  4268. sSndMsg = "N" + "\r\n"; //이미지버퍼내용삭제
  4269. sSndMsg += "Q256,24" + "\r\n"; //용지세로 32mm,용지사이여백3mm
  4270. sSndMsg += "q432" + "\r\n"; //용지가로54mm
  4271. //특수검사연번호
  4272. iXPos = Number(sLeftBank) + 20;
  4273. iYPos = Number(sTopBank) + 10;
  4274. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,4,1,1,N," + "\"" + sSpclno + "\"" + "\r\n";
  4275. //명칭
  4276. iXPos = Number(sLeftBank) + 20;
  4277. iYPos = Number(sTopBank) + 45;
  4278. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,4,1,1,N," + "\"" + sName + "\"" + "\r\n";
  4279. //환자명
  4280. iXPos = Number(sLeftBank) + 20;
  4281. iYPos = Number(sTopBank) + 75;
  4282. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,2,2,N," + "\"" + sPatnm + "\"" + "\r\n";
  4283. //접수일자
  4284. iXPos = Number(sLeftBank) + 20;
  4285. iYPos = Number(sTopBank) + 115;
  4286. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,4,1,1,N," + "\"" + sSpcacptdt + "\"" + "\r\n";
  4287. //출력
  4288. sSndMsg += "P"+cnt+",1" + "\r\n";
  4289. if(sCommKind == "01") {
  4290. llz_objCommAX.SendMessageToLPT(sSndMsg);
  4291. sSndMsg = "";
  4292. }
  4293. else if(sCommKind == "02") {
  4294. llz_objCommAX.SendMessage(sSndMsg);
  4295. sSndMsg = "";
  4296. }
  4297. }else if(sPrntKind == "17") { //아르고스
  4298. //프린터설정
  4299. sSndMsg = "N" + "\r\n"; //이미지버퍼내용삭제
  4300. sSndMsg += "JF" + "\r\n"; //용지정렬
  4301. sSndMsg += "Q144,24" + "\r\n"; //용지세로 18mm,용지사이여백 3mm
  4302. sSndMsg += "q184" + "\r\n"; //용지가 23mm
  4303. //특수검사연번호
  4304. iXPos = Number(sLeftBank) + 20;
  4305. iYPos = Number(sTopBank) + 10;
  4306. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,4,1,1,N," + "\"" + sSpclno + "\"" + "\r\n";
  4307. //명칭
  4308. iXPos = Number(sLeftBank) + 20;
  4309. iYPos = Number(sTopBank) + 45;
  4310. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,4,1,1,N," + "\"" + sName + "\"" + "\r\n";
  4311. //환자명
  4312. iXPos = Number(sLeftBank) + 20;
  4313. iYPos = Number(sTopBank) + 75;
  4314. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,10,2,2,N," + "\"" + sPatnm + "\"" + "\r\n";
  4315. //접수일자
  4316. iXPos = Number(sLeftBank) + 20;
  4317. iYPos = Number(sTopBank) + 115;
  4318. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,4,1,1,N," + "\"" + sSpcacptdt + "\"" + "\r\n";
  4319. //출력
  4320. sSndMsg += "P1"+ "," + cnt + "\r\n";
  4321. if(sCommKind == "01") {
  4322. llz_objCommAX.SendMessageToLPT(sSndMsg);
  4323. sSndMsg = "";
  4324. }
  4325. else if(sCommKind == "02") {
  4326. llz_objCommAX.SendMessage(sSndMsg);
  4327. sSndMsg = "";
  4328. }
  4329. }else if(sPrntKind == "1" || sPrntKind == "5"){ //Zebra ZPL
  4330. //프린터설정
  4331. sSndMsg = "^XA" + "\r\n"; //Format 시작
  4332. //특수검사연번호
  4333. iXPos = Number(sLeftBank) + 24;
  4334. iYPos = Number(sTopBank) + 20;
  4335. sSndMsg += "^FO"+ iXPos + "," + iYPos + "^AFN,40,24" + "^FD"+sSpclno+"^FS" + "\r\n"; // font size 세로5mm, 가로3mm
  4336. //명칭
  4337. iXPos = Number(sLeftBank) + 24;
  4338. iYPos = Number(sTopBank) + 60;
  4339. sSndMsg += "^FO"+ iXPos + "," + iYPos + "^AFN,40,24" + "^FD"+sName+"^FS" + "\r\n";
  4340. //환자명
  4341. iXPos = Number(sLeftBank) + 24;
  4342. iYPos = Number(sTopBank) + 100;
  4343. sSndMsg += "^FO"+ iXPos + "," + iYPos + "^AFN,40,24" + "^FD"+sPatnm+"^FS" + "\r\n";
  4344. //접수일자
  4345. iXPos = Number(sLeftBank) + 24;
  4346. iYPos = Number(sTopBank) + 140;
  4347. sSndMsg += "^FO"+ iXPos + "," + iYPos + "^AFN,40,24" + "^FD"+sSpcacptdt+"^FS" + "\r\n";
  4348. //출력
  4349. sSndMsg += "^XZ"; //Format 종료
  4350. trace("sSndMsg: "+sSndMsg);
  4351. if(sCommKind == "01") {
  4352. llz_objCommAX.SendMessageToLPT(sSndMsg);
  4353. sSndMsg = "";
  4354. }
  4355. else if(sCommKind == "02") {
  4356. llz_objCommAX.SendMessage(sSndMsg);
  4357. sSndMsg = "";
  4358. }
  4359. }
  4360. }
  4361. if(sCommKind == "02") {
  4362. portOpenCheck = llz_objCommAX.PortClose(true);
  4363. }
  4364. }else if(portOpenCheck == "FALSE" && sCommKind == "02"){
  4365. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  4366. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  4367. + " \n 2.케이블 확인"
  4368. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  4369. return;
  4370. }
  4371. }
  4372. /**********************************************************************************
  4373. * Name : gf_getHospitalInfo
  4374. * Description : 병원명칭, 대표전화/fax번호, 병원주소 등 병원정보조회
  4375. * Argument : None
  4376. * return Type : Null
  4377. * Author : Autumn
  4378. **********************************************************************************/
  4379. function gf_getHospitalInfo(sInstCd)
  4380. {
  4381. dsf_createDs("ds_hospital_info");
  4382. /*
  4383. ds_hospital_info.getColumn(0, "hospnm" ); 병원명
  4384. ds_hospital_info.getColumn(0, "bizmngrgstno"); 사업자등록번호
  4385. ds_hospital_info.getColumn(0, "prsdnm" ); 병원장명
  4386. ds_hospital_info.getColumn(0, "reprtel1" ); 대표전화1
  4387. ds_hospital_info.getColumn(0, "reprtel2" ); 대표전화2
  4388. ds_hospital_info.getColumn(0, "reprfaxno" ); 대표fax
  4389. ds_hospital_info.getColumn(0, "zipcd1" ); 우편번호1
  4390. ds_hospital_info.getColumn(0, "zipcd2" ); 우편번호2
  4391. ds_hospital_info.getColumn(0, "zipcdseq" ); 우편번호 일련번호
  4392. ds_hospital_info.getColumn(0, "detladdr" ); 병원주소(전체)
  4393. ds_hospital_info.getColumn(0, "hospengnm" ); 영문병원명
  4394. ds_hospital_info.getColumn(0, "prsdengnm" ); 영문병원장명
  4395. ds_hospital_info.getColumn(0, "engaddr" ); 영문주소
  4396. */
  4397. var sInDsName = dsf_createDsRow("in_ds_search"
  4398. , [{col: "instcd", val: sInstCd}]);
  4399. // 서브밋호출
  4400. tranf_submit({
  4401. id: "TRLZZ00102"
  4402. , service: "diagtestapplib.LisCommon"
  4403. , method: "reqGetHospitalInfo"
  4404. , inds : "refData=" + sInDsName
  4405. , outds: "ds_hospital_info=hospinfo"
  4406. , async: false
  4407. });
  4408. }
  4409. /**********************************************************************************
  4410. * Name : gf_getHospitalInfo
  4411. * Description : 병원명칭, 대표전화/fax번호, 병원주소 등 병원정보조회
  4412. * Argument : None
  4413. * return Type : Null
  4414. * Author : Autumn
  4415. **********************************************************************************/
  4416. function gf_getHospitalInfoMerge(sFlag)
  4417. {
  4418. var sReturn;
  4419. if (ds_hospital_info.rowcount < 1) {
  4420. return "";
  4421. }
  4422. switch (sFlag) {
  4423. case "HNGADDR": // 123-456 부천시 ~
  4424. sReturn = ds_hospital_info.getColumn(0, "zipcd1") + "-" + ds_hospital_info.getColumn(0, "zipcd2") + " " +
  4425. ds_hospital_info.getColumn(0, "detladdr");
  4426. break;
  4427. case "ENGADDR": // 영문주소
  4428. sReturn = ds_hospital_info.getColumn(0, "engaddr");
  4429. break;
  4430. case "TEL1": // TEL : 대표전화1
  4431. sReturn = "Tel : " + ds_hospital_info.getColumn(0, "reprtel1");
  4432. break;
  4433. case "TEL2": // TEL : 대표전화2
  4434. sReturn = "Tel : " + ds_hospital_info.getColumn(0, "reprtel2");
  4435. break;
  4436. case "TEL3": // TEL : 대표전화1 + " / " + 대표전화2
  4437. sReturn = "Tel : " + ds_hospital_info.getColumn(0, "reprtel1") + " / " + ds_hospital_info.getColumn(0, "reprtel2");
  4438. break;
  4439. case "TELFAX": // TEL : 대표전화1 + " / " + FAX번호
  4440. sReturn = "Tel : " + ds_hospital_info.getColumn(0, "reprtel1") + " / FAX : " + ds_hospital_info.getColumn(0, "reprfaxno");
  4441. break;
  4442. default:
  4443. sReturn = "";
  4444. break;
  4445. }
  4446. return sReturn;
  4447. }
  4448. /**********************************************************************************
  4449. * Name : lf_sendMessage
  4450. * Description : CVR발송
  4451. * Argument : bcno 바코드번호
  4452. rsltstat 결과상태 ( 2:중간보고, 4:최종보고)
  4453. * return Type : Null
  4454. * Author : Autumn
  4455. **********************************************************************************/
  4456. function lf_sendMessage(bcno,testcdList){
  4457. trace("cvr메시지함수");
  4458. dsf_createDs("ds_grid_grd_Message");
  4459. var sInDsName = dsf_createDsRow("ds_temp_search"
  4460. , [{col: "bcno", val:bcno }
  4461. , {col: "testcd", val:testcdList }]);
  4462. // 서브밋호출
  4463. tranf_submit({
  4464. id: ""
  4465. , service: "rsltmngtapp.RsltMngt"
  4466. , method: "reqGetCVRMessage"
  4467. , inds : "cond="+sInDsName
  4468. , outds : "ds_grid_grd_Message=getCVRMessage"
  4469. , async: false
  4470. });
  4471. if(ds_grid_grd_Message.rowcount > 0){
  4472. var objArg = new Object();
  4473. objArg.message = ds_grid_grd_Message;
  4474. frmf_modal("SPLLR91700","SPLLR91700",objArg);
  4475. }else{
  4476. return;
  4477. }
  4478. }
  4479. /**********************************************************************************
  4480. * 함수명 : lf_lisQCBarcodePrint
  4481. * 설명 : QC정도관리 바코드출력,
  4482. * argument : ref - 출력할 바코드정보 Dataset
  4483. prntinfo - 바코드설정정보 Dataset
  4484. **********************************************************************************/
  4485. function lf_lisQCBarcodePrint(ref,prntinfo){
  4486. var cntHR = ref.rowcount;
  4487. var sPrntKind = prntinfo.getColumn(0,"prntkind"); //프린터종류
  4488. var portOpenCheck = "";
  4489. var iXPos = 0;
  4490. var iYPos = 0;
  4491. var sSndMsg = "";
  4492. if (sPrntKind == 0) return;
  4493. var sCommKind = utlf_transNullToEmpty(prntinfo.getColumn(0,"commkind"));
  4494. var sLeftBank = utlf_transNullToEmpty(prntinfo.getColumn(0,"left")); //왼쪽여백
  4495. var sTopBank = utlf_transNullToEmpty(prntinfo.getColumn(0,"top")); //위쪽여백
  4496. if(sCommKind == "01") {
  4497. var sSetUpVal = prntinfo.getColumn(0,"setupval"); //PRT LPT출력
  4498. }
  4499. else if(sCommKind == "02") { //COM serial출력
  4500. var sComm = prntinfo.getColumn(0,"comm"); //com port
  4501. var sDataBit = prntinfo.getColumn(0,"databit"); //data bit
  4502. var sStopBit = prntinfo.getColumn(0,"stopbit"); //stop bit
  4503. var sBaudRate = prntinfo.getColumn(0,"baudrate"); //baud rate
  4504. var sParity = prntinfo.getColumn(0,"parity"); //parity
  4505. llz_objCommAX.CommPort = sComm;
  4506. llz_objCommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  4507. portOpenCheck = llz_objCommAX.PortOpen(true);
  4508. trace(portOpenCheck);
  4509. }
  4510. else if(sCommKind == "03") { //TCP/IP출력
  4511. var sSetUpVal = prntinfo.getColumn(0,"setupval03");
  4512. var sEqmtCD = prntinfo.getColumn(0,"eqmtcd");
  4513. }
  4514. if( (portOpenCheck == "TRUE" && sCommKind == "02")
  4515. || sCommKind == "01"
  4516. || sCommKind == "03"){
  4517. for(i=0 ; i< cntHR;i++){
  4518. var sStr = "";
  4519. var bcno = utlf_transNullToEmpty(ref.getColumn(i,"bcno")); //검체번호
  4520. var acptdt = utlf_transNullToEmpty(ref.getColumn(i,"acptdt")); //접수일자
  4521. var matrnm = utlf_transNullToEmpty(ref.getColumn(i,"matrnm")); //물질명
  4522. var levlnm = utlf_transNullToEmpty(ref.getColumn(i,"levlnm")); //레벨명
  4523. var lotno = utlf_transNullToEmpty(ref.getColumn(i,"lotno")); //lotno
  4524. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  4525. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  4526. if(sPrntKind == "15") { //인터맥
  4527. //프린터설정
  4528. //sSndMsg += "SYSVAR(18)=0" + "\r\n"; //다변설정 기본:0
  4529. sSndMsg += "SYSVAR(35)=1" + "\r\n"; //저장여부 0:영구저장,1:임시저장
  4530. //sSndMsg += "LTS& OFF" + "\r\n"; //배치인쇄시 유용,기본 off
  4531. sSndMsg += "INPUT OFF" + "\r\n"; //인터맥다이렉트프로토콜 비활성화
  4532. //sSndMsg += "FORMAT INPUT \"STX\" , \"ETX\",\"CR\"" + "\r\n";
  4533. //sSndMsg += "FORMAT INPUT CHR$(2),CHR$(3),CHR$(13)"; //layout run 명령어구문 정의
  4534. sSndMsg += "LAYOUT INPUT " +"\"" + "tmp:LBLSOFT.LAY" + "\"" + "\r\n"; //layout구성 시작
  4535. sSndMsg += "NASC -2:AN 7" + "\r\n"; //캐릭터셋지정 -2:ANSI : 위치지정 7:좌측상단
  4536. //sSndMsg += "CLIP OFF" + "\r\n"; //인쇄바같부분 비활성화 기본 :off
  4537. //sSndMsg += "CLIP BARCODE OFF" + "\r\n";//인쇄바같부분 비활성화 기본 :off
  4538. //sSndMsg += "XORMODE OFF" + "\r\n"; //교차필드인쇄부분 기본:off
  4539. //sSndMsg += "MAG 1,1" + "\r\n"; 확대:높이,폭 기본 1,1
  4540. //검체번호
  4541. iXPos = Number(sLeftBank) + 20;
  4542. iYPos = Number(sTopBank) + 286;
  4543. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + bcno + "\"" + "\r\n";
  4544. //접수시각 acptdt
  4545. iXPos = Number(sLeftBank) + 100;
  4546. iYPos = Number(sTopBank) + 286;
  4547. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + acptdt + "\"" + "\r\n";
  4548. //바코드
  4549. iXPos = Number(sLeftBank) + 20;
  4550. iYPos = Number(sTopBank) + 246;
  4551. sSndMsg += "PP " + iXPos + "," + iYPos + ":AN 7:DIR 1:BARSET " +"\"" + "CODE39" +"\"" + ",2,1,2,101:PB " + "\"" + bcno + "\"" + "\r\n";
  4552. //물질명
  4553. iXPos = Number(sLeftBank) + 20;
  4554. iYPos = Number(sTopBank) + 134;
  4555. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + matrnm + "\"" + "\r\n";
  4556. //레벨명
  4557. iXPos = Number(sLeftBank) + 20;
  4558. iYPos = Number(sTopBank) + 92;
  4559. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + levlnm + "\"" + "\r\n";
  4560. //lotno
  4561. iXPos = Number(sLeftBank) + 20;
  4562. iYPos = Number(sTopBank) + 50;
  4563. sSndMsg += "PP " + iXPos + "," + iYPos + ":FT " +"\"" + "Swiss 721 Bold Condensed BT" +"\"" + " ,7:NI:PT " +"\"" + lotno + "\"" + "\r\n";
  4564. //출력
  4565. sSndMsg += "LAYOUT END" + "\r\n"; //레이아웃구성을 중지하고 저장
  4566. sSndMsg += "LAYOUT RUN " +"\"" + "tmp:LBLSOFT.LAY" +"\"" + "\r\n"; //레이아웃시작
  4567. sSndMsg += "INPUT ON" + "\r\n"; //인터맥다이렉트 프로토콜 활성화
  4568. sSndMsg += "PF " + "\r\n"; //인쇄
  4569. sSndMsg += "PRINT KEY OFF" + "\r\n"; //프린트버튼 비활성화
  4570. if(sCommKind == "01") {
  4571. llz_objCommAX.SendMessageToLPT(sSndMsg);
  4572. //llz_objCommAX.Output = sSndMsg;
  4573. sSndMsg = "";
  4574. }
  4575. else if(sCommKind == "02") {
  4576. llz_objCommAX.SendMessage(sSndMsg);
  4577. //llz_objCommAX.Output = sSndMsg;
  4578. sSndMsg = "";
  4579. }
  4580. }
  4581. else if(sPrntKind == "16") { //루칸
  4582. //프린터설정
  4583. sSndMsg += "N" + "\r\n"; //이미지버퍼내용삭제
  4584. sSndMsg += "Q256,24" + "\r\n"; //용지세로 32mm,용지사이여백3mm
  4585. sSndMsg += "q432" + "\r\n"; //용지가로54mm
  4586. //검체번호
  4587. iXPos = Number(sLeftBank) + 20;
  4588. iYPos = Number(sTopBank) + 0;
  4589. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + bcno + "\"" + "\r\n";
  4590. //출력시각 acptdt
  4591. iXPos = Number(sLeftBank) + 200;
  4592. iYPos = Number(sTopBank) + 0;
  4593. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + acptdt + "\"" + "\r\n";
  4594. //검체바코드
  4595. iXPos = Number(sLeftBank) + 30;
  4596. iYPos = Number(sTopBank) + 30;
  4597. sSndMsg += "B" + iXPos + "," + iYPos + "," + "0,3,2,4,91,N," + "\"" + bcno + "\"" + "\r\n";
  4598. //물질명
  4599. iXPos = Number(sLeftBank) + 20;
  4600. iYPos = Number(sTopBank) + 132;
  4601. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + matrnm + "\"" + "\r\n";
  4602. //레벨명
  4603. iXPos = Number(sLeftBank) + 20;
  4604. iYPos = Number(sTopBank) + 172;
  4605. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + levlnm + "\"" + "\r\n";
  4606. //lotno
  4607. iXPos = Number(sLeftBank) + 20;
  4608. iYPos = Number(sTopBank) + 212;
  4609. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,8,1,1,N," + "\"" + lotno + "\"" + "\r\n";
  4610. //출력
  4611. sSndMsg += "P1"+ "\r\n";
  4612. if(sCommKind == "01") {
  4613. llz_objCommAX.SendMessageToLPT(sSndMsg);
  4614. //llz_objCommAX.Output = sSndMsg;
  4615. sSndMsg = "";
  4616. }
  4617. else if(sCommKind == "02") {
  4618. llz_objCommAX.SendMessage(sSndMsg);
  4619. //llz_objCommAX.Output = sSndMsg;
  4620. sSndMsg = "";
  4621. }
  4622. }
  4623. else if(sPrntKind == "17") { //아르고스
  4624. //프린터설정
  4625. sSndMsg += "N" + "\r\n"; //이미지버퍼내용삭제
  4626. sSndMsg += "JF" + "\r\n"; //용지정렬
  4627. sSndMsg += "Q256,24" + "\r\n"; //용지세로 32mm,용지사이여백3mm
  4628. sSndMsg += "q432" + "\r\n"; //용지가로54mm
  4629. //검체번호
  4630. iXPos = Number(sLeftBank) + 10;
  4631. iYPos = Number(sTopBank) + 10;
  4632. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + bcno + "\"" + "\r\n";
  4633. //출력시각 acptdt
  4634. iXPos = Number(sLeftBank) + 170;
  4635. iYPos = Number(sTopBank) + 10;
  4636. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,1,N," + "\"" + acptdt + "\"" + "\r\n";
  4637. //검체바코드
  4638. iXPos = Number(sLeftBank) + 10;
  4639. iYPos = Number(sTopBank) + 40;
  4640. sSndMsg += "B" + iXPos + "," + iYPos + "," + "0,3,2,4,101,N," + "\"" + bcno + "\"" + "\r\n";
  4641. //물질코드명
  4642. iXPos = Number(sLeftBank) + 10;
  4643. iYPos = Number(sTopBank) + 155;
  4644. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,2,N," + "\"" + matrnm + "\"" + "\r\n";
  4645. //레벨명
  4646. iXPos = Number(sLeftBank) + 10;
  4647. iYPos = Number(sTopBank) + 195;
  4648. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,2,N," + "\"" + levlnm + "\"" + "\r\n";
  4649. //lotno
  4650. iXPos = Number(sLeftBank) + 10;
  4651. iYPos = Number(sTopBank) + 235;
  4652. sSndMsg += "A" + iXPos + "," + iYPos + "," + "0,2,1,2,N," + "\"" + lotno + "\"" + "\r\n";
  4653. //출력
  4654. sSndMsg += "P1"+ "\r\n";
  4655. if(sCommKind == "01") {
  4656. llz_objCommAX.SendMessageToLPT(sSndMsg);
  4657. //llz_objCommAX.Output = sSndMsg;
  4658. sSndMsg = "";
  4659. }
  4660. else if(sCommKind == "02") {
  4661. trace(llz_objCommAX.SendMessage(sSndMsg));
  4662. //llz_objCommAX.Output = sSndMsg;
  4663. sSndMsg = "";
  4664. }
  4665. }
  4666. else {
  4667. trace("========");
  4668. return;
  4669. }
  4670. }
  4671. if(sCommKind == "02") {
  4672. //llz_objCommAX.PortOpen = false;
  4673. portOpenCheck = llz_objCommAX.PortClose(true);
  4674. }
  4675. }else if(portOpenCheck == "FALSE" && sCommKind == "02"){
  4676. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  4677. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  4678. + " \n 2.케이블 확인"
  4679. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  4680. return;
  4681. }
  4682. }
  4683. /****************************************************************************************
  4684. * Argument : Dataset
  4685. * Description : lis 사용자정보 조회
  4686. * ex : lf_getLISUserInfo(ds_data_userinfo); //로그인 사용자 정보
  4687. : lf_getLISUserInfo(ds_data_userinfo, "42682"); //42682 사용자 정보
  4688. ****************************************************************************************/
  4689. function lf_getLISUserInfo(objDs:Dataset, sUserid){
  4690. var sInDsName = dsf_createDsRow("ds_temp_search"
  4691. , [{col: "userid", val: sUserid}]);//]);
  4692. objDs.clearData();
  4693. // 서브밋호출
  4694. tranf_submit({
  4695. id: "TRLLF02102"
  4696. , service: "diagtestbaseinfomngtapp.GeneralTestBaseInfoMngt"
  4697. , method: "reqGetUserInfo"
  4698. , inds : "cond="+sInDsName
  4699. , outds: objDs.name + "=userlist"
  4700. , callback: "cbf_common"
  4701. , async: false
  4702. });
  4703. }
  4704. /**********************************************************************************
  4705. * Name : lf_chkCvr
  4706. * Description : TAT사유등록
  4707. * Argument : bcno
  4708. * return Type :
  4709. * Author : KNK
  4710. **********************************************************************************/
  4711. function lf_chkCVR(bcno){
  4712. dsf_createDsRow("ds_temp_search"
  4713. , [{col: "bcno", val:bcno }]);
  4714. // 서브밋호출
  4715. dsf_createDs("ds_temp_data");
  4716. tranf_submit({
  4717. id : ""
  4718. , service: "rsltmngtapp.TatMngt"
  4719. , method : "reqGetBcnoTatInfo"
  4720. , inds : "req=ds_temp_search"
  4721. , outds : "ds_temp_data=getBcnoTatInfo"
  4722. , async : false
  4723. });
  4724. //TAT사유등록에 필요한 값이 있으면 모달창 띄움
  4725. dsf_createDs("ds_param_bcnotatinfo");
  4726. ds_param_bcnotatinfo.copyData(ds_temp_data);
  4727. ds_param_bcnotatinfo.clearData();
  4728. var acptgaplastdt = ""; //접수 최종보고간 일시
  4729. var acptgapmdltdt = ""; //접수 중간결과간 일시
  4730. var tatappyn = ""; //TAT사유등록 대상여부
  4731. var mdlreptterm = ""; //중간보고 TAT OVER타임기준
  4732. var lstreptterm = ""; //최종보고 TAT OVER타임기준
  4733. var testcmtcd = ""; //TAT사유코드
  4734. for(var i=0; i<ds_temp_data.rowcount; i++) {
  4735. acptgaplastdt = ds_temp_data.getColumn(i, "acptgaplastdt");
  4736. acptgapmdltdt = ds_temp_data.getColumn(i, "acptgapmdltdt");
  4737. tatappyn = ds_temp_data.getColumn(i, "tatappyn");
  4738. mdlreptterm = ds_temp_data.getColumn(i, "mdlreptterm");
  4739. lstreptterm = ds_temp_data.getColumn(i, "lstreptterm");
  4740. testcmtcd = ds_temp_data.getColumn(i, "testcmtcd");
  4741. // tatappyn = "Y";
  4742. // mdlreptterm = 0;
  4743. // lstreptterm = 1;
  4744. //기존에 소견등록값이 없을때에만 TAT 사유창에 띄워줌
  4745. if( utlf_isNull(testcmtcd) || testcmtcd == "-" ) {
  4746. //if( true ) {
  4747. if( tatappyn == "Y" && (mdlreptterm > 0 || lstreptterm > 0) ) {
  4748. //접수-최종간 설정값이 있으면 무조건 이걸 기준으로 한다.
  4749. if( lstreptterm > 0 ) {
  4750. if(acptgaplastdt * 24 > lstreptterm ) {
  4751. //trace( "최종TAT에 걸리다");
  4752. var nRow = ds_param_bcnotatinfo.addRow();
  4753. ds_param_bcnotatinfo.copyRow(nRow, ds_temp_data, i);
  4754. }
  4755. lstreptterm = 0;
  4756. } else {
  4757. if(acptgapmdltdt * 24 > mdlreptterm ) {
  4758. //trace( "중간TAT에 걸리다");
  4759. var nRow = ds_param_bcnotatinfo.addRow();
  4760. ds_param_bcnotatinfo.copyRow(nRow, ds_temp_data, i);
  4761. }
  4762. }
  4763. }
  4764. }
  4765. }
  4766. if(ds_param_bcnotatinfo.rowcount > 0){
  4767. var objArg = new Object();
  4768. objArg.ds_param_bcnotatinfo = ds_param_bcnotatinfo;
  4769. frmf_modal("SPLRR92800","SPLRR92800",objArg);
  4770. }else{
  4771. return;
  4772. }
  4773. }
  4774. /**********************************************************************************
  4775. * 함수명 : 사용자메뉴권한부서코드 조회한다
  4776. * 설명 : 사용자메뉴권한부서코드 조회한다
  4777. * argument : ref :
  4778. * return Type : 부서코드
  4779. **********************************************************************************/
  4780. var lgv_sUserdeptflagcd = "";
  4781. function lf_getDbDeptcd(strGetCodeInfo, strCallBackID){
  4782. if(strGetCodeInfo.indexOf("0000|") < 0){
  4783. strGetCodeInfo = strGetCodeInfo + "|0000|";
  4784. }
  4785. var strCodeArray = strGetCodeInfo.split("|");
  4786. var sOutds = "";
  4787. for(iRow = 0 ; iRow < strCodeArray.length-1; iRow++){
  4788. dsf_createDs("ds_init_lb" + strCodeArray[iRow]);
  4789. sOutds += "ds_init_lb" + strCodeArray[iRow] + "=" + strCodeArray[iRow] + " ";
  4790. }
  4791. var sInDsName = dsf_createDsRow("ds_temp_search"
  4792. , [{col: "codeflag", val: strGetCodeInfo}]);
  4793. var oParam = {};
  4794. oParam.id = "TRLZZ00101";
  4795. oParam.service = "diagtestapplib.DiagTestBaseInfoMngt";
  4796. oParam.method = "reqGetInitCodeInfo";
  4797. oParam.inds = "cond="+ sInDsName;
  4798. oParam.outds = sOutds ;
  4799. oParam.async = false;
  4800. oParam.callback = strCallBackID;
  4801. tranf_submit(oParam);
  4802. if(!utlf_isNull(this.objects["ds_init_lb0000"])&& ds_init_lb0000.rowcount > 0)
  4803. {
  4804. lgv_sUserdeptflagcd = ds_init_lb0000.getColumn(0,"nm");
  4805. }
  4806. }
  4807. function lzzfMakeBrcdPrntObjHanDo(sobjNm,pIsNew){
  4808. objDomParser = new DomParser;
  4809. if( !utlf_isNull(this.objects["ds_data_setupinfo"]) && ds_data_setupinfo.rowcount > 0){
  4810. var prtkind = ds_data_setupinfo.getColumn(0, "prntkind");
  4811. var portnm = ds_data_setupinfo.getColumn(0, "commkind");
  4812. var prtnm = "";
  4813. var comnum = "";
  4814. var comset = "";
  4815. if( !utlf_isNull(this.objects["ds_data_comm01"]) && ds_data_comm01.rowcount > 0 ){
  4816. prtnm = ds_data_comm01.getColumn(0,"setupval");
  4817. }
  4818. if( !utlf_isNull(this.objects["ds_data_comm02"]) && ds_data_comm02.rowcount > 0 ){
  4819. comnum = ds_data_comm02.getColumn(0,"comm");
  4820. comset = ds_data_comm02.getColumn(0,"baudrate");
  4821. comset = comset + "," + ds_data_comm02.getColumn(0,"parity");
  4822. comset = comset + "," + ds_data_comm02.getColumn(0,"databit");
  4823. comset = comset + "," + ds_data_comm02.getColumn(0,"stopbit");
  4824. }else{
  4825. comset = comset + ",";
  4826. comset = comset + ",";
  4827. comset = comset + ",";
  4828. }
  4829. }else{
  4830. var prntsetupinfo = ds_barcdprntsetup.getColumn(0,"prntsetupinfo"); //프린터설정 XML형식
  4831. // 공통함수 ds_data_ 로 시작하는 데이타셋 생성. 값이 존재하는 데이타셋 만 생성
  4832. var pParamObj = new Object();
  4833. pParamObj.pathYN = "N";
  4834. pParamObj.nullColumnYN = "N";
  4835. lf_convertXmlToDs(prntsetupinfo, pParamObj);
  4836. var prtkind = "";
  4837. var portnm = "";
  4838. var prtnm = "";
  4839. var comnum = "";
  4840. var comset = "";
  4841. if( !utlf_isNull(this.objects["ds_data_setupinfo"]) && ds_data_setupinfo.rowcount > 0 ){
  4842. prtkind = ds_data_setupinfo.getColumn(0, "prntkind");
  4843. portnm = ds_data_setupinfo.getColumn(0, "commkind");
  4844. }
  4845. if( !utlf_isNull(this.objects["ds_data_comm01"]) && ds_data_comm01.rowcount > 0 ){
  4846. prtnm = ds_data_comm01.getColumn(0,"setupval");
  4847. }
  4848. if( !utlf_isNull(this.objects["ds_data_comm02"]) && ds_data_comm02.rowcount > 0 ){
  4849. comnum = ds_data_comm02.getColumn(0,"comm");
  4850. comset = ds_data_comm02.getColumn(0,"baudrate");
  4851. comset = comset + "," + ds_data_comm02.getColumn(0,"parity");
  4852. comset = comset + "," + ds_data_comm02.getColumn(0,"databit");
  4853. comset = comset + "," + ds_data_comm02.getColumn(0,"stopbit");
  4854. }else{
  4855. comset = comset + ",";
  4856. comset = comset + ",";
  4857. comset = comset + ",";
  4858. }
  4859. }
  4860. this.removeChild(sobjNm);
  4861. if( (prtkind == "9" && portnm == "01") || (prtkind == "11" && portnm == "01") || prtkind == "10" || prtkind == "2" || prtkind == "6" || prtkind == "7" || pIsNew == "NEW"){
  4862. // this.addChild(objNm,"; clsid:{b721f534-d025-466b-8a28-7cf40e700acd}; visibility:hidden; left:100px; top:100px; width:100px; height:100px; ");
  4863. var objNm = new ActiveX(sobjNm, 100,100,100,100);
  4864. objNm.progid = "{b721f534-d025-466b-8a28-7cf40e700acd}";
  4865. this.addChild(sobjNm, objNm);
  4866. objNm.show();
  4867. if(prtkind == "1") prtkind = 0;
  4868. else if(prtkind == "5") prtkind = 1;
  4869. else if(prtkind == "2") prtkind = 2;
  4870. else if(prtkind == "6") prtkind = 3;
  4871. else if(prtkind == "7") prtkind = 4;
  4872. else if(prtkind == "9") prtkind = 4;
  4873. else if(prtkind == "10") prtkind = 4;
  4874. else if(prtkind == "11") prtkind = 4;
  4875. else prtkind = 9;
  4876. if(portnm == "02") portnm = "1";
  4877. else portnm = "2";
  4878. eval(sobjNm + ".setPrt(prtkind, portnm, prtnm, comnum, comset);");
  4879. //objNm.setPrt(prtkind, portnm, prtnm, comnum, comset);
  4880. //PORT.setPrt(3, "LPT");
  4881. }
  4882. else{
  4883. //1.0.0.26
  4884. //{5fe8e390-d882-4ca4-9798-01b1eb10e0f3}
  4885. // body.createChild("xforms:object", "id:"+objNm+"; clsid:{5fe8e390-d882-4ca4-9798-01b1eb10e0f3}; visibility:hidden; left:100px; top:100px; width:100px; height:100px; ");
  4886. var objNm = new ActiveX(sobjNm, 100,100,100,100);
  4887. objNm.progid = "{5fe8e390-d882-4ca4-9798-01b1eb10e0f3}";
  4888. var nIndex = this.addChild(sobjNm, objNm);
  4889. objNm.show();
  4890. }
  4891. }
  4892. // //오토바코드 object생성
  4893. // function lzzfMakeAutoBrcdPrntObj(sobjNm){
  4894. //
  4895. //
  4896. // trace("!!!!!!!!!!!!!!");
  4897. // trace("this.name : " + this.name);
  4898. //
  4899. // //body.removeChild(objNm);
  4900. // this.removeChild(sobjNm);
  4901. //
  4902. //
  4903. // //1.0.0.26
  4904. // //{5fe8e390-d882-4ca4-9798-01b1eb10e0f3}
  4905. // //body.createChild("xforms:object", "id:"+objNm+"; clsid:{AE459DE6-EC02-46A5-AD0D-4F028359CC8D}; visibility:hidden; left:100px; top:100px; width:100px; height:100px; ");
  4906. //
  4907. // var objNm = new ActiveX(sobjNm, 0,0,0,0);
  4908. // objNm.progid = "{AE459DE6-EC02-46A5-AD0D-4F028359CC8D}";
  4909. // var nIndex = this.addChild(sobjNm, objNm);
  4910. // objNm.show();
  4911. // trace("lzzfMakeAutoBrcdPrntObj "+nIndex);
  4912. //
  4913. // return objNm;
  4914. //
  4915. // }
  4916. function lf_CarePrintOutH(pX, pY, pFont, pBold, pData, pReverse) {
  4917. var sBuf = lf_CareFontSize(pFont, pBold);
  4918. //sBuf += CommAX.PrtImgOut("GRAPH003", pData); //채혈자
  4919. //sBuf += fCareFiendOrigin(pX, pY);
  4920. //sBuf += "^XGGRAPH003," + pFont + "," + pFont + "^FS";
  4921. sBuf += CommAX.PrtImgOut(pX, pY, pData, pFont, pFont);
  4922. sBuf += CommAX.HanImageData();
  4923. return sBuf;
  4924. }
  4925. function lf_CareFontSize(pFont, pBold) {
  4926. var sBuf = "";
  4927. var pW = 0;
  4928. var pH = 0;
  4929. if(pFont == 1){
  4930. pH = 10;
  4931. pW = 10;
  4932. } else if(pFont == 2){
  4933. pH = 20;
  4934. pW = 20;
  4935. } else if(pFont == 3){
  4936. pH = 30;
  4937. pW = 30;
  4938. } else if(pFont == 4){
  4939. pH = 40;
  4940. pW = 40;
  4941. } else if(pFont == 5){
  4942. pH = 50;
  4943. pW = 50;
  4944. } else if(pFont == 6){
  4945. pH = 60;
  4946. pW = 60;
  4947. } else if(pFont == 7){
  4948. pH = 70;
  4949. pW = 70;
  4950. } else if(pFont == 8){
  4951. pH = 80;
  4952. pW = 80;
  4953. } else if(pFont == 9){
  4954. pH = 90;
  4955. pW = 90;
  4956. }else{
  4957. }
  4958. if(pBold == "Y"){
  4959. sBuf = "^CFA,"+pH+","+pW;
  4960. }else{
  4961. sBuf = "^CFE"+pH+","+pW;
  4962. }
  4963. return sBuf;
  4964. }
  4965. // pKCount - 보관검체 출력수
  4966. // pPCount - 병리바코드갯수, 접수관리 화면에서는 분주 바코드 출력수
  4967. // scrflag - 병동 환자별 채혈시 true
  4968. function lf_LisSpcBarcodePrint(ds_pRef:Dataset,sds_data_path, pKCount, pPCount, scrflag, reprintflag){
  4969. try{
  4970. trace(frmf_getMainFormScreenID());
  4971. //var scridPrint = frmf_getScreenID();
  4972. var scridPrint = frmf_getMainFormScreenID();
  4973. if (scridPrint != 'SMLLJ00400') {
  4974. objects[sds_data_path +"ds_main_KeepBcnoPrint_printinfo"].clearData();//Auto Label에 보내는 값을 저장한 인스턴트 초기화
  4975. objects[sds_data_path +"ds_main_KeepBcnoPrint_printinfo"].setColumn(0,"sendmessage",'aaaa');//Auto Label에 보내는 값을 저장한 인스턴트 초기화
  4976. }
  4977. //ds_main_KeepBcnoPrint_printinfo.setColumn(0,"sendmessage",""); //Auto Label에 보내는 값을 저장한 인스턴트 초기화
  4978. var sPrntKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"prntkind");
  4979. trace('auto 1 sPrntKind = '+sPrntKind);
  4980. var aFlag = new Array(); //한글 영문 구분
  4981. var aStr = "";
  4982. //var iWidth = 0;
  4983. var iXPos = 0;
  4984. var iYPos = 0;
  4985. var portOpenTF = "";
  4986. var KCount = 0;
  4987. var PCount = 0;
  4988. var test_he = "";
  4989. var test_rtn = "";
  4990. if(utlf_isNull(pKCount)){
  4991. KCount = 0;
  4992. }else{
  4993. KCount = pKCount;
  4994. }
  4995. if(utlf_isNull(pPCount)){
  4996. PCount = 0;
  4997. }else{
  4998. PCount = pPCount;
  4999. }
  5000. // trace(frmf_getMainFormScreenID());
  5001. // //var scridPrint = frmf_getScreenID();
  5002. // var scridPrint = frmf_getMainFormScreenID();
  5003. trace('auto 2 ds_pRef.rowcount = '+ds_pRef.rowcount);
  5004. if(ds_pRef.rowcount > 0 && sPrntKind != 0){
  5005. var sCommKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"commkind");
  5006. var sLeftBank = objects[sds_data_path + "ds_data_blank"].getColumn(0,"left");
  5007. var sTopBank = objects[sds_data_path + "ds_data_blank"].getColumn(0,"top");
  5008. trace('auto 3 sCommKind = '+sCommKind);
  5009. trace('KCount = '+KCount);
  5010. if(sCommKind == "01") {
  5011. var sSetUpVal = objects[sds_data_path + "ds_data_comm01"].getColumn(0,"setupval");
  5012. portOpenTF = "TRUE";
  5013. } else if(sCommKind == "02") {
  5014. var sComm = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"comm");
  5015. var sDataBit = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"databit");
  5016. var sStopBit = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"stopbit");
  5017. var sBaudRate = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"baudrate");
  5018. var sParity = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"parity");
  5019. CommAX.CommPort = sComm;
  5020. CommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  5021. //보관검체 출력 갯수가 존재하면 port 오픈 하지 않는다.
  5022. //이미 오픈 되어 있음. 보관검체 출력후 진검 바코드 갯수 체크하여 포트 클로즈 하지 않는다.
  5023. if(KCount > 0){
  5024. //이미 포트 오픈 되어 있으므로 "TRUE" 셋팅
  5025. portOpenTF = "TRUE";
  5026. }else if(KCount == 0){
  5027. //port open 반환값 -> String 문자 포트 오픈 성공이면 "TRUE" , 실패하면 "FALSE"
  5028. portOpenTF = CommAX.PortOpen("true");
  5029. trace("portOpenTF ="+portOpenTF);
  5030. portOpenTF = "TRUE";
  5031. }
  5032. } else if(sCommKind == "03") {
  5033. var sSetUpVal = objects[sds_data_path + "ds_data_comm03"].getColumn(0,"setupval");
  5034. var sEqmtCd = objects[sds_data_path + "ds_data_comm03"].getColumn(0,"eqmtcd");
  5035. }
  5036. trace('auto 4 sSetUpVal = '+sSetUpVal+' / '+sEqmtCd+' / '+portOpenTF);
  5037. if( (portOpenTF == "TRUE" && sCommKind == "02")
  5038. || (sCommKind == "01")
  5039. || (sCommKind == "03")){
  5040. portOpenTF = "TRUE";
  5041. if(sPrntKind == "1") { //zebra
  5042. trace('test1');
  5043. for(i=0 ; i< ds_pRef.rowcount ;i++){
  5044. var sSndMsg = "";
  5045. trace('test2');
  5046. var sTsectlblnm = utlf_transNullToEmpty(ds_pRef.getColumn(i,"tsectlblnm"));
  5047. var sBcno = ds_pRef.getColumn(i,"bcno");
  5048. var sBarcdprntdt = ds_pRef.getColumn(i,"barcdprntdt");
  5049. var sPatnm = ds_pRef.getColumn(i,"patnm");
  5050. var sPid = ds_pRef.getColumn(i,"pid");
  5051. var sSexage = ds_pRef.getColumn(i,"sexage");
  5052. var sDeptroom = ds_pRef.getColumn(i,"deptroom");
  5053. var sSpclblnm = ds_pRef.getColumn(i,"spclblnm");
  5054. var sTubelblnm = ds_pRef.getColumn(i,"tubelblnm");
  5055. var sSecttsect = ds_pRef.getColumn(i,"secttsect");
  5056. var sTclslblnmlist = utlf_transNullToEmpty(ds_pRef.getColumn(i,"tclslblnmlist"));
  5057. var sInfcinfolist = utlf_transNullToEmpty(ds_pRef.getColumn(i,"infcinfolist"));
  5058. var sErprcpflag = ds_pRef.getColumn(i,"erprcpflag");
  5059. var barcdcntflag = utlf_transNullToEmpty(ds_pRef.getColumn(i,"cntflag"));
  5060. var bcollbarcdprntcnt = ds_pRef.getColumn(i,"bcollbarcdprntcnt");
  5061. var spcacptbarcdprntcnt = ds_pRef.getColumn(i,"spcacptbarcdprntcnt");
  5062. var microbarcdprntcnt = ds_pRef.getColumn(i,"microbarcdprntcnt");
  5063. //2.0추가 remark 출력 추가
  5064. var prcpdelivefact = ds_pRef.getColumn(i,"prcpdelivefact");
  5065. var sbcoll = "채혈자";
  5066. var keepspc = false;
  5067. var checkABO = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "ABO");
  5068. var checkAST = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "AST");
  5069. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  5070. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  5071. if (utlf_isNull(ds_pRef.getColumn(i,"dnornm"))){
  5072. var dnorNm = "";
  5073. var dSexage = "";
  5074. }else{
  5075. var dnorNm = ds_pRef.getColumn(i,"dnornm");
  5076. var dSexage = ds_pRef.getColumn(i,"dnorsexage");
  5077. }
  5078. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  5079. if(sErprcpflag == "1" || sErprcpflag == "2" || sErprcpflag == "Y"){
  5080. //검사계명
  5081. iXPos = Number(sLeftBank);
  5082. iYPos = Number(sTopBank) + 1;
  5083. sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 15, 240, 10);
  5084. }
  5085. sTsectlblnm = sTsectlblnm.replace("▨", ",");
  5086. //---------
  5087. iWidth = 0;
  5088. aStr = "";
  5089. aFlag = new Array();
  5090. iXPos = Number(sLeftBank) + 15;
  5091. aStr = lpzfGetHanGul(sTsectlblnm, aFlag);
  5092. if(!utlf_isNull(aStr))
  5093. {
  5094. for (var iNo=0; iNo < aStr.length; iNo++) {
  5095. //----------------------
  5096. if (aFlag[iNo] == "E") {
  5097. iYPos = Number(sTopBank) + 2;
  5098. sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  5099. iWidth = iWidth + (Number(aStr[iNo].length) * 12);
  5100. } else {
  5101. iYPos = Number(sTopBank) + 2;
  5102. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  5103. sSndMsg += CommAX.HanImageData();
  5104. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  5105. }
  5106. }
  5107. }
  5108. else
  5109. {
  5110. iXPos = Number(sLeftBank) + 15;
  5111. iYPos = Number(sTopBank) + 2;
  5112. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  5113. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBcno + "*"); //바코드번호
  5114. }
  5115. iXPos = Number(sLeftBank) + 130;
  5116. iYPos = Number(sTopBank) + 5;
  5117. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  5118. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBcno + "*"); //바코드번호
  5119. iXPos = Number(sLeftBank) + 275;
  5120. iYPos = Number(sTopBank) + 5;
  5121. sSndMsg += lzzfBP_ChangeFont("C", 5, 5); // 폰트 설정
  5122. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBarcdprntdt); //라벨발행일시
  5123. iXPos = Number(sLeftBank) + 60;
  5124. iYPos = Number(sTopBank) + 30;
  5125. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  5126. sSndMsg += lzzfBP_BarCode_Code39(iXPos, iYPos, "N", 100, "*" + sBcno + "*"); // 바코드
  5127. iWidth = 0;
  5128. aStr = "";
  5129. aFlag = new Array();
  5130. iXPos = Number(sLeftBank) + 20;
  5131. sPatnm = sPatnm.substr(0, 20)
  5132. aStr = lpzfGetHanGul(sPatnm, aFlag);
  5133. if(!utlf_isNull(aStr))
  5134. {
  5135. for (var iNo=0; iNo < aStr.length; iNo++) {
  5136. //----------------------
  5137. if (aFlag[iNo] == "E") {
  5138. iYPos = Number(sTopBank) + 133;
  5139. sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  5140. iWidth = iWidth + (Number(aStr[iNo].length) * 12);
  5141. } else {
  5142. iYPos = Number(sTopBank) + 130;
  5143. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  5144. sSndMsg += CommAX.HanImageData();
  5145. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  5146. }
  5147. }
  5148. }
  5149. else
  5150. {
  5151. iXPos = Number(sLeftBank) + 20;
  5152. iYPos = Number(sTopBank) + 133;
  5153. sSndMsg += lzzfBP_ChangeFont("C", 10, 10);
  5154. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPatnm); // 바코드
  5155. }
  5156. if(barcdcntflag == "acpt" ){
  5157. if(spcacptbarcdprntcnt > 0){
  5158. if(sCommKind == "01") {
  5159. var aa = CommAX.SendMessageToLPT(sSndMsg);
  5160. trace("aaaa :"+aa);
  5161. sSndMsg = "";
  5162. } else if(sCommKind == "02") {
  5163. var aa = CommAX.SendMessage(sSndMsg);
  5164. trace("bbb :"+aa);
  5165. sSndMsg = "";
  5166. }
  5167. }
  5168. }else{
  5169. if(sCommKind == "01") {
  5170. var aa = CommAX.SendMessageToLPT(sSndMsg);
  5171. trace("ccc :"+aa);
  5172. sSndMsg = "";
  5173. } else if(sCommKind == "02") {
  5174. var aa = CommAX.SendMessage(sSndMsg);
  5175. trace("ddd :"+aa);
  5176. sSndMsg = "";
  5177. }
  5178. }
  5179. iXPos = Number(sLeftBank) + 190;
  5180. iYPos = Number(sTopBank) + 135;
  5181. sSndMsg += lzzfBP_ChangeFont("C", 14, 14); // 폰트 설정
  5182. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //환자등록번호
  5183. iXPos = Number(sLeftBank) + 300;
  5184. iYPos = Number(sTopBank) + 135;
  5185. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  5186. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSexage);
  5187. iXPos = Number(sLeftBank) + 20;
  5188. iYPos = Number(sTopBank) + 160;
  5189. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  5190. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDeptroom); //진료과병실
  5191. iXPos = Number(sLeftBank) + 160;
  5192. iYPos = Number(sTopBank) + 160;
  5193. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  5194. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  5195. iXPos = Number(sLeftBank) + 280;
  5196. iYPos = Number(sTopBank) + 160;
  5197. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  5198. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sTubelblnm); //용기명
  5199. iXPos = Number(sLeftBank) + 20;
  5200. iYPos = Number(sTopBank) + 180;
  5201. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  5202. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSecttsect); //계검사계
  5203. if(barcdcntflag == "acpt" ){
  5204. if(spcacptbarcdprntcnt > 0){
  5205. if(sCommKind == "01") {
  5206. CommAX.SendMessageToLPT(sSndMsg);
  5207. sSndMsg = "";
  5208. } else if(sCommKind == "02") {
  5209. CommAX.SendMessage(sSndMsg);
  5210. sSndMsg = "";
  5211. }
  5212. }
  5213. }else{
  5214. if(sCommKind == "01") {
  5215. CommAX.SendMessageToLPT(sSndMsg);
  5216. sSndMsg = "";
  5217. } else if(sCommKind == "02") {
  5218. CommAX.SendMessage(sSndMsg);
  5219. sSndMsg = "";
  5220. }
  5221. }
  5222. sTclslblnmlist = sTclslblnmlist.replace("▨", ",");
  5223. //---------
  5224. iWidth = 0;
  5225. aStr = "";
  5226. aFlag = new Array();
  5227. iXPos = Number(sLeftBank) + 90;
  5228. aStr = lpzfGetHanGul(sTclslblnmlist, aFlag);
  5229. if(!utlf_isNull(aStr))
  5230. {
  5231. for (var iNo=0; iNo < aStr.length; iNo++) {
  5232. //----------------------
  5233. if (aFlag[iNo] == "E") {
  5234. iYPos = Number(sTopBank) + 178;
  5235. sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // 검체표시명(영문)
  5236. iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  5237. } else {
  5238. iYPos = Number(sTopBank) + 175;
  5239. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  5240. sSndMsg += CommAX.HanImageData();
  5241. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  5242. }
  5243. }
  5244. }
  5245. else
  5246. {
  5247. iXPos = Number(sLeftBank) + 20;
  5248. iYPos = Number(sTopBank) + 178;
  5249. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  5250. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sTclslblnmlist);
  5251. }
  5252. if(barcdcntflag == "acpt" ){
  5253. if(spcacptbarcdprntcnt > 0){
  5254. if(sCommKind == "01") {
  5255. CommAX.SendMessageToLPT(sSndMsg);
  5256. sSndMsg = "";
  5257. } else if(sCommKind == "02") {
  5258. CommAX.SendMessage(sSndMsg);
  5259. sSndMsg = "";
  5260. }
  5261. }
  5262. }else{
  5263. if(sCommKind == "01") {
  5264. CommAX.SendMessageToLPT(sSndMsg);
  5265. sSndMsg = "";
  5266. } else if(sCommKind == "02") {
  5267. CommAX.SendMessage(sSndMsg);
  5268. sSndMsg = "";
  5269. }
  5270. }
  5271. //---------공여자 또는 리마크 때문에..2009.01.28.윤재한 수정
  5272. dnorNm = dnorNm + dSexage;
  5273. iWidth = 0;
  5274. aStr = "";
  5275. aFlag = new Array();
  5276. iXPos = Number(sLeftBank) + 20;
  5277. aStr = lpzfGetHanGul(dnorNm, aFlag); //공여자명은 한글, 리마크는 영문
  5278. if(!utlf_isNull(aStr))
  5279. {
  5280. for (var iNo=0; iNo < aStr.length; iNo++) {
  5281. //----------------------
  5282. if (aFlag[iNo] == "E") {
  5283. iYPos = Number(sTopBank) + 232;
  5284. sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // 검체표시명(영문)
  5285. iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  5286. } else {
  5287. iYPos = Number(sTopBank) + 232;
  5288. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  5289. sSndMsg += CommAX.HanImageData();
  5290. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  5291. }
  5292. }
  5293. }
  5294. //if(sTclslblnmlist.substr(0, 3) == "ABO") {
  5295. if(checkABO) {
  5296. //외래채혈일때
  5297. if(scridPrint=="SMLLC00100" && scrflag){
  5298. keepspc = true;
  5299. }
  5300. //병동,환자별일때
  5301. else if((scridPrint=="SMLLC00200" || scridPrint=="SMLLC00300") && scrflag && checkAST){
  5302. keepspc = true;
  5303. }
  5304. iXPos = Number(sLeftBank) + 110;
  5305. iYPos = Number(sTopBank) + 202;
  5306. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, "채혈자 : ", 1, 1);
  5307. sSndMsg += CommAX.HanImageData();
  5308. }
  5309. iXPos = Number(sLeftBank) + 20;
  5310. iYPos = Number(sTopBank) + 202;
  5311. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  5312. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sInfcinfolist); //계검사계
  5313. ///2.0 remark 출력 start
  5314. if((!utlf_isNull(prcpdelivefact)) && ((prcpdelivefact.length) == 1)){
  5315. prcpdelivefact = prcpdelivefact.replace("-", ""); //Remark
  5316. }
  5317. if(utlf_isNull(prcpdelivefact)){
  5318. prcpdelivefact = "";
  5319. }
  5320. iWidth = 0;
  5321. aStr = "";
  5322. aFlag = new Array();
  5323. iXPos = Number(sLeftBank) + 180;
  5324. aStr = lpzfGetHanGul(prcpdelivefact, aFlag); //공여자명은 한글, 리마크는 영문
  5325. if(!utlf_isNull(aStr))
  5326. {
  5327. for (var iNo=0; iNo < aStr.length; iNo++) {
  5328. //----------------------
  5329. if (aFlag[iNo] == "E") {
  5330. iYPos = Number(sTopBank) + 232;
  5331. sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // remark
  5332. iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  5333. } else {
  5334. iYPos = Number(sTopBank) + 232;
  5335. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  5336. sSndMsg += CommAX.HanImageData();
  5337. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  5338. }
  5339. }
  5340. }
  5341. if(barcdcntflag == "acpt" ){
  5342. if(spcacptbarcdprntcnt > 0){
  5343. if(sCommKind == "01") {
  5344. CommAX.SendMessageToLPT(sSndMsg);
  5345. sSndMsg = "";
  5346. } else if(sCommKind == "02") {
  5347. CommAX.SendMessage(sSndMsg);
  5348. sSndMsg = "";
  5349. }
  5350. }
  5351. }else{
  5352. if(sCommKind == "01") {
  5353. CommAX.SendMessageToLPT(sSndMsg);
  5354. sSndMsg = "";
  5355. } else if(sCommKind == "02") {
  5356. CommAX.SendMessage(sSndMsg);
  5357. sSndMsg = "";
  5358. }
  5359. }
  5360. ///2.0 remark 출력 end
  5361. //자동화일때 밑에 줄 끄어요~
  5362. if(sSecttsect.substr(0, 1) == "A"){
  5363. //검사계명
  5364. iXPos = Number(sLeftBank);
  5365. iYPos = Number(sTopBank) + 260;
  5366. sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 400, 10, 5);
  5367. }
  5368. if(barcdcntflag == "acpt" ){
  5369. if(spcacptbarcdprntcnt > 0){
  5370. sSndMsg += lzzfBP_EndFormat(spcacptbarcdprntcnt); // 접수바코드출력수
  5371. if(sCommKind == "01") {
  5372. CommAX.SendMessageToLPT(sSndMsg);
  5373. } else if(sCommKind == "02") {
  5374. CommAX.SendMessage(sSndMsg);
  5375. }
  5376. }
  5377. }else{
  5378. sSndMsg += lzzfBP_EndFormat(bcollbarcdprntcnt);
  5379. if(sCommKind == "01") {
  5380. CommAX.SendMessageToLPT(sSndMsg);
  5381. } else if(sCommKind == "02") {
  5382. CommAX.SendMessage(sSndMsg);
  5383. }
  5384. }
  5385. if(keepspc) {
  5386. fKeepBcnoPrint("B");
  5387. }
  5388. }//end for
  5389. }//end if(sPrntKind == "1")
  5390. else if(sPrntKind == "9" || sPrntKind == "5") { //zebra GX430
  5391. for(i=0 ; i< ds_pRef.rowcount;i++){
  5392. var sSndMsg = "";
  5393. var sTsectlblnm = utlf_transNullToEmpty(ds_pRef.getColumn(i,"tsectlblnm"));
  5394. var sBcno = ds_pRef.getColumn(i,"bcno");
  5395. var sBarcdprntdt = ds_pRef.getColumn(i,"barcdprntdt");
  5396. var sPatnm = ds_pRef.getColumn(i,"patnm");
  5397. var sPid = ds_pRef.getColumn(i,"pid");
  5398. var sSexage = ds_pRef.getColumn(i,"sexage");
  5399. var sDeptroom = ds_pRef.getColumn(i,"deptroom");
  5400. var sSpclblnm = ds_pRef.getColumn(i,"spclblnm");
  5401. var sTubelblnm = ds_pRef.getColumn(i,"tubelblnm");
  5402. var sSecttsect = ds_pRef.getColumn(i,"secttsect");
  5403. var sTclslblnmlist = utlf_transNullToEmpty(ds_pRef.getColumn(i,"tclslblnmlist"));
  5404. var sInfcinfolist = ds_pRef.getColumn(i,"infcinfolist");
  5405. var sErprcpflag = ds_pRef.getColumn(i,"erprcpflag");
  5406. var barcdcntflag = utlf_transNullToEmpty(ds_pRef.getColumn(i,"cntflag"));
  5407. var bcollbarcdprntcnt = ds_pRef.getColumn(i,"bcollbarcdprntcnt");
  5408. var spcacptbarcdprntcnt = ds_pRef.getColumn(i,"spcacptbarcdprntcnt");
  5409. var microbarcdprntcnt = ds_pRef.getColumn(i,"microbarcdprntcnt");
  5410. var prcphopedd = ds_pRef.getColumn(i,"prcphopedd");
  5411. var bedposcnts = ds_pRef.getColumn(i,"bedposcnts");
  5412. var sbcoll = "채혈자";
  5413. var keepspc = false;
  5414. trace('sPatnm :'+sPatnm);
  5415. if (!utlf_isNull(sTclslblnmlist) ){
  5416. var checkABO = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "ABO");
  5417. var checkAST = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "AST");
  5418. }
  5419. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  5420. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  5421. if (utlf_isNull(ds_pRef.getColumn(i,"dnornm"))){
  5422. var dnorNm = "";
  5423. var dSexage = "";
  5424. }else{
  5425. var dnorNm = ds_pRef.getColumn(i,"dnornm");
  5426. var dSexage = ds_pRef.getColumn(i,"dnorsexage");
  5427. }
  5428. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  5429. if(sErprcpflag == "1" || sErprcpflag == "2" || sErprcpflag == "Y"){
  5430. //검사계명
  5431. iXPos = Number(sLeftBank);
  5432. iYPos = Number(sTopBank) + 1;
  5433. sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 15, 240, 10);
  5434. }
  5435. if (!utlf_isNull(sTsectlblnm) ){
  5436. sTsectlblnm = sTsectlblnm.replace("▨", ",");
  5437. }
  5438. //---------
  5439. iWidth = 0;
  5440. aStr = "";
  5441. aFlag = new Array();
  5442. iXPos = Number(sLeftBank) + 15;
  5443. aStr = lpzfGetHanGul(sTsectlblnm, aFlag);
  5444. if(!utlf_isNull(aStr))
  5445. {
  5446. for (var iNo=0; iNo < aStr.length; iNo++) {
  5447. //----------------------
  5448. if (aFlag[iNo] == "E") {
  5449. iYPos = Number(sTopBank) + 2;
  5450. sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  5451. iWidth = iWidth + (Number(aStr[iNo].length) * 12);
  5452. } else {
  5453. iYPos = Number(sTopBank) + 2;
  5454. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 2, 1);
  5455. sSndMsg += CommAX.HanImageData();
  5456. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  5457. }
  5458. }
  5459. }
  5460. iXPos = Number(sLeftBank) + 220;
  5461. iYPos = Number(sTopBank) + 5;
  5462. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  5463. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBcno + "*"); //바코드번호
  5464. iXPos = Number(sLeftBank) + 500;
  5465. iYPos = Number(sTopBank) + 5;
  5466. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  5467. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  5468. iXPos = Number(sLeftBank) + 90;
  5469. iYPos = Number(sTopBank) + 30;
  5470. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  5471. sSndMsg += lzzfBP_BarCode_Code39_300dpi(iXPos, iYPos, "N", 120, "*" + sBcno + "*"); // 바코드
  5472. iXPos = Number(sLeftBank) + 20;
  5473. iYPos = Number(sTopBank) + 160;
  5474. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  5475. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //환자등록번호
  5476. if(barcdcntflag == "acpt" ){
  5477. if(spcacptbarcdprntcnt > 0){
  5478. if(sCommKind == "01") {
  5479. CommAX.SendMessageToLPT(sSndMsg);
  5480. sSndMsg = "";
  5481. } else if(sCommKind == "02") {
  5482. CommAX.SendMessage(sSndMsg);
  5483. sSndMsg = "";
  5484. }
  5485. }
  5486. }else{
  5487. if(sCommKind == "01") {
  5488. CommAX.SendMessageToLPT(sSndMsg);
  5489. sSndMsg = "";
  5490. } else if(sCommKind == "02") {
  5491. CommAX.SendMessage(sSndMsg);
  5492. sSndMsg = "";
  5493. }
  5494. }
  5495. iWidth = 0;
  5496. aStr = "";
  5497. aFlag = new Array();
  5498. iXPos = Number(sLeftBank) + 250;
  5499. sPatnm = sPatnm.substr(0, 20)
  5500. // aStr = lpzfGetHanGul(sPatnm, aFlag);
  5501. // if(!utlf_isNull(aStr))
  5502. // {
  5503. // for (var iNo=0; iNo < aStr.length; iNo++) {
  5504. //
  5505. // //----------------------
  5506. // if (aFlag[iNo] == "E") {
  5507. // iYPos = Number(sTopBank) + 160;
  5508. // sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  5509. // iWidth = iWidth + (Number(aStr[iNo].length) * 12);
  5510. // } else {
  5511. // iYPos = Number(sTopBank) + 157;
  5512. // sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 2, 1); //20120504 환자명 수정
  5513. // sSndMsg += CommAX.HanImageData();
  5514. // iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  5515. // }
  5516. // }
  5517. // }
  5518. //----110531 환자명 영문출력 수정 유민규
  5519. if(!utlf_isNull(sPatnm)) {
  5520. for (var j = 0; j < sPatnm.length; j++) {
  5521. oneChar = sPatnm.charAt(j);
  5522. test_rtn = "";
  5523. test_he = "";
  5524. test_rtn = lpzfGetHanGul3(oneChar);
  5525. test_he = test_rtn.substring(0,1);
  5526. trace("oneChar "+oneChar+" / "+test_he);
  5527. if(!utlf_isNull(test_he))
  5528. {
  5529. //----------------------
  5530. if (test_he == "E") {
  5531. iYPos = Number(sTopBank) + 160;
  5532. sSndMsg += "^CFC30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS"; // 검사코드리스트명(영문)
  5533. iWidth = iWidth + (Number(oneChar.length) * 12);
  5534. } else {
  5535. iYPos = Number(sTopBank) + 160;
  5536. // sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, oneChar, 2, 1); //20120504 환자명 수정
  5537. // sSndMsg += CommAX.HanImageData();
  5538. // iWidth = iWidth + (Number(oneChar) * 30);
  5539. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,15,15^FH^FD" + oneChar + "^FS^CI1"; // 검사코드리스트(한글)
  5540. iWidth = iWidth + (Number(oneChar.length) * 30);
  5541. }
  5542. }
  5543. trace("oneChar2 "+oneChar+" / "+test_he+" / "+sSndMsg);
  5544. }
  5545. }
  5546. iXPos = Number(sLeftBank) + 20;
  5547. iYPos = Number(sTopBank) + 185;
  5548. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  5549. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sTubelblnm); //용기명
  5550. if(sBcno.substr(0, 1) == "E" && !utlf_isNull(bedposcnts)){
  5551. iXPos = Number(sLeftBank) + 450;
  5552. iYPos = Number(sTopBank) + 160;
  5553. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, bedposcnts, 1, 1); //구역베드
  5554. sSndMsg += CommAX.HanImageData();
  5555. }else{
  5556. iXPos = Number(sLeftBank) + 450;
  5557. iYPos = Number(sTopBank) + 160;
  5558. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  5559. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDeptroom); //진료과병실
  5560. }
  5561. iXPos = Number(sLeftBank) + 480;
  5562. iYPos = Number(sTopBank) + 185;
  5563. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  5564. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, prcphopedd); //처방희망일시
  5565. if(barcdcntflag == "acpt" ){
  5566. if(spcacptbarcdprntcnt > 0){
  5567. if(sCommKind == "01") {
  5568. CommAX.SendMessageToLPT(sSndMsg);
  5569. sSndMsg = "";
  5570. } else if(sCommKind == "02") {
  5571. CommAX.SendMessage(sSndMsg);
  5572. sSndMsg = "";
  5573. }
  5574. }
  5575. }else{
  5576. if(sCommKind == "01") {
  5577. CommAX.SendMessageToLPT(sSndMsg);
  5578. sSndMsg = "";
  5579. } else if(sCommKind == "02") {
  5580. CommAX.SendMessage(sSndMsg);
  5581. sSndMsg = "";
  5582. }
  5583. }
  5584. if(!utlf_isNull(sTclslblnmlist)) {
  5585. sTclslblnmlist = sTclslblnmlist.replace("▨", ",");
  5586. }
  5587. //---------
  5588. iWidth = 0;
  5589. aStr = "";
  5590. aFlag = new Array();
  5591. iXPos = Number(sLeftBank);
  5592. iYPos = Number(sTopBank) + 212;
  5593. if(!utlf_isNull(sTclslblnmlist)) {
  5594. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sTclslblnmlist.substr(0, 20), 1, 1); //검사항목라벨명
  5595. sSndMsg += CommAX.HanImageData();
  5596. if(barcdcntflag == "acpt" ){
  5597. if(spcacptbarcdprntcnt > 0){
  5598. if(sCommKind == "01") {
  5599. CommAX.SendMessageToLPT(sSndMsg);
  5600. sSndMsg = "";
  5601. } else if(sCommKind == "02") {
  5602. CommAX.SendMessage(sSndMsg);
  5603. sSndMsg = "";
  5604. }
  5605. }
  5606. }else{
  5607. if(sCommKind == "01") {
  5608. CommAX.SendMessageToLPT(sSndMsg);
  5609. sSndMsg = "";
  5610. } else if(sCommKind == "02") {
  5611. CommAX.SendMessage(sSndMsg);
  5612. sSndMsg = "";
  5613. }
  5614. }
  5615. }
  5616. //---------공여자 또는 리마크 때문에..2009.01.28.윤재한 수정
  5617. dnorNm = dnorNm + dSexage;
  5618. iWidth = 0;
  5619. aStr = "";
  5620. aFlag = new Array();
  5621. iXPos = Number(sLeftBank) + 20;
  5622. aStr = lpzfGetHanGul(dnorNm, aFlag); //공여자명은 한글, 리마크는 영문
  5623. if(!utlf_isNull(aStr))
  5624. {
  5625. for (var iNo=0; iNo < aStr.length; iNo++) {
  5626. //----------------------
  5627. if (aFlag[iNo] == "E") {
  5628. iYPos = Number(sTopBank) + 272;
  5629. sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // 검체표시명(영문)
  5630. iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  5631. } else {
  5632. iYPos = Number(sTopBank) + 272;
  5633. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  5634. sSndMsg += CommAX.HanImageData();
  5635. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  5636. }
  5637. }
  5638. }
  5639. trace("checkABO "+checkABO+' / '+ scridPrint+' / '+scrflag+' / '+checkAST);
  5640. //if(sTclslblnmlist.substr(0, 3) == "ABO") {
  5641. if(checkABO) {
  5642. //외래채혈일때
  5643. if(scridPrint=="SMLLC00100" && scrflag){
  5644. keepspc = true;
  5645. }
  5646. //병동,환자별일때
  5647. else if((scridPrint=="SMLLC00200" || scridPrint=="SMLLC00300") && scrflag && checkAST){
  5648. keepspc = true;
  5649. }
  5650. }
  5651. if(utlf_isNull(sInfcinfolist)) {
  5652. sInfcinfolist = "";
  5653. }
  5654. if(!utlf_isNull(sInfcinfolist)) {
  5655. iXPos = Number(sLeftBank) + 20;
  5656. iYPos = Number(sTopBank) + 240;
  5657. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  5658. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sInfcinfolist);
  5659. }
  5660. //자동화일때 밑에 줄 끄어요~
  5661. if(sSecttsect.substr(0, 1) == "A"){
  5662. //검사계명
  5663. iXPos = Number(sLeftBank);
  5664. iYPos = Number(sTopBank) + 290;
  5665. sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 400, 10, 5);
  5666. }
  5667. if(barcdcntflag == "acpt" ){
  5668. if(spcacptbarcdprntcnt > 0){
  5669. sSndMsg += lzzfBP_EndFormat(spcacptbarcdprntcnt); // 접수바코드출력수
  5670. if(sCommKind == "01") {
  5671. CommAX.SendMessageToLPT(sSndMsg);
  5672. } else if(sCommKind == "02") {
  5673. CommAX.SendMessage(sSndMsg);
  5674. }
  5675. }
  5676. }else{
  5677. sSndMsg += lzzfBP_EndFormat(bcollbarcdprntcnt);
  5678. if(sCommKind == "01") {
  5679. CommAX.SendMessageToLPT(sSndMsg);
  5680. } else if(sCommKind == "02") {
  5681. CommAX.SendMessage(sSndMsg);
  5682. }
  5683. }
  5684. if(keepspc) {
  5685. fKeepBcnoPrint("B");
  5686. }
  5687. }//end for
  5688. }//end if(sPrntKind == "1")
  5689. else if(sPrntKind == "3" && sCommKind == "03"){ //Auto labeler(Ginus)이고 TCP/IP 일때
  5690. var sSndMsg = '';
  5691. trace('auto 5 print start= '+ds_pRef.rowcount);
  5692. for(i=0 ; i< ds_pRef.rowcount;i++){
  5693. var sPid = ds_pRef.getColumn(i,"pid");
  5694. var sPatnm = ds_pRef.getColumn(i,"patnm");
  5695. if (reprintflag == "Y") {
  5696. var sSexage = ds_pRef.getColumn(i,"sexage");
  5697. var sSex = sSexage.substr(0,1);
  5698. var sAge = sSexage.substr(2,10);
  5699. }else{
  5700. var sSex = ds_pRef.getColumn(i,"sex");
  5701. var sAge = ds_pRef.getColumn(i,"age");
  5702. }
  5703. var sInfcinfolist = ds_pRef.getColumn(i,"infcinfolist");
  5704. var sSpcfcntslist = ds_pRef.getColumn(i,"spcfcntslist");
  5705. //var sSpcfcntslist = ds_pRef.getColumn(i,"spclblnm");
  5706. var sBcno = ds_pRef.getColumn(i,"bcno");
  5707. var sLpflag = ds_pRef.getColumn(i,"lpflag");
  5708. var sDeptnm = ds_pRef.getColumn(i,"deptnm");
  5709. //var sDeptnm = ds_pRef.getColumn(i,"dept");
  5710. var sWardroom = ds_pRef.getColumn(i,"wardroom");
  5711. //var sWardroom = ds_pRef.getColumn(i,"roomcd");
  5712. var sTubecd = ds_pRef.getColumn(i,"tubecd");
  5713. var sTubelblnm = ds_pRef.getColumn(i,"tubelblnm");
  5714. var sSecttsect = ds_pRef.getColumn(i,"secttsect");
  5715. var sTsectlblnm = utlf_transNullToEmpty(ds_pRef.getColumn(i,"tsectlblnm"));
  5716. var sBarcdprntdt = ds_pRef.getColumn(i,"barcdprntdt");
  5717. var sTclscdlist = ds_pRef.getColumn(i,"tclscdlist");
  5718. var sTclslblnmlist = ds_pRef.getColumn(i,"tclslblnmlist");
  5719. var sSpclblnm = ds_pRef.getColumn(i,"spclblnm");
  5720. var sErprcpflag = ds_pRef.getColumn(i,"erprcpflag");
  5721. var barcdcntflag = ds_pRef.getColumn(i,"cntflag");
  5722. var bcollbarcdprntcnt = ds_pRef.getColumn(i,"bcollbarcdprntcnt");
  5723. var spcacptbarcdprntcnt = ds_pRef.getColumn(i,"spcacptbarcdprntcnt");
  5724. var microbarcdprntcnt = ds_pRef.getColumn(i,"microbarcdprntcnt");
  5725. //병리 인스턴스
  5726. var sSpctranseqno = ds_pRef.getColumn(i,"spctranseqno");
  5727. var sSpctotalcnt = ds_pRef.getColumn(i,"spctotalcnt");
  5728. var sOrgprcpnm = ds_pRef.getColumn(i,"orgprcpnm");
  5729. var sAddprcpnm = ds_pRef.getColumn(i,"addprcpnm");
  5730. var sOrddrnm = ds_pRef.getColumn(i,"orddrnm");
  5731. var sBcollcau = ds_pRef.getColumn(i,"bcollcau");
  5732. var sPrcpdd = ds_pRef.getColumn(i,"prcpdd"); //병리 바코드 처방일자 추가(2009-09-08)
  5733. var keepspc = false;
  5734. if(!utlf_isNull(sTclslblnmlist)) {
  5735. var checkABO = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "ABO");
  5736. var checkAST = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "AST");
  5737. }
  5738. if (utlf_isNull(ds_pRef.getColumn(i,"dnornm"))){
  5739. var dnorNm = "";
  5740. }else{
  5741. var dnorNm = ds_pRef.getColumn(i,"dnornm") + ds_pRef.getColumn(i,"dnorsexage");
  5742. }
  5743. if((i == 0) ||
  5744. (ds_pRef.getColumn(i-1,"pid") != ds_pRef.getColumn(i,"pid"))) { //등록번호가 다르다(일괄발행시)
  5745. sSndMsg = "^^^P"; //환자정보 시작
  5746. //등록번호, 환자명, 성별, 나이
  5747. sSndMsg += "^PI" + sPid + "^PN" + sPatnm + "^PS" + sSex + "^PA" + sAge;
  5748. //장비번호 선택
  5749. sSndMsg += "^PB" + sEqmtCd;
  5750. //감염정보
  5751. if(!utlf_isNull(sInfcinfolist)) {
  5752. sSndMsg += "^P3" + sInfcinfolist;
  5753. }
  5754. //환자특이사항
  5755. if(!utlf_isNull(sSpcfcntslist)) {
  5756. sSndMsg += "^P4" + sSpcfcntslist;
  5757. }
  5758. //채혈시 주의사항
  5759. if(!utlf_isNull(sBcollcau)) {
  5760. sSndMsg += "^P5" + sBcollcau;
  5761. }
  5762. sSndMsg += "^^^_P"; //환자정보 끝.
  5763. sSndMsg += "^^^S"; //채혈정보 시작.
  5764. }
  5765. sSndMsg += "^SS"; //채혈정보 DATA 시작.
  5766. sSndMsg += "^SA" + sBcno + "^SB" + sLpflag; //검체번호, 진검병리구분
  5767. //진료과, 병동/병실, 용기코드
  5768. if (utlf_isNull(sWardroom)){
  5769. sWardroom = "";
  5770. }
  5771. sSndMsg += "^SC" + sDeptnm + "^SD" + sWardroom + "^SE" + sTubecd;
  5772. //용기명
  5773. if(!utlf_isNull(sTubelblnm)) {
  5774. sSndMsg += "^SF" + sTubelblnm;
  5775. }
  5776. //시행부서코드, 시행부서명칭, 바코드출력일시, 검사항목코드리스트
  5777. sSndMsg += "^SG" + sSecttsect + "^SH" + sTsectlblnm + "^SI" + sBarcdprntdt + "^SJ" + sTclscdlist;
  5778. //검사항목명칭리스트, 검체명칭
  5779. sSndMsg += "^SK" + sTclslblnmlist + "^SL" + sSpclblnm;
  5780. //응급여부
  5781. if(sErprcpflag == "1" || sErprcpflag == "2" || sErprcpflag == "Y"){
  5782. sSndMsg += "^SMY";
  5783. }
  5784. else{
  5785. sSndMsg += "^SMN";
  5786. }
  5787. ////공여자(리마크)
  5788. if(!utlf_isNull(dnorNm)) {
  5789. sSndMsg += "^SN" + dnorNm;
  5790. }
  5791. //병리인 경우
  5792. if(sLpflag == "P") {
  5793. //검체순번, 검체토탈갯구, 원처방명, 추가처방명, 진료의사명, 처방일자(2009-09-08 추가)
  5794. sSndMsg += "^SO" + sSpctranseqno + "^SP" + sSpctotalcnt + "^SQ" + sOrgprcpnm + "^SR" + sAddprcpnm + "^ST" + sOrddrnm + "^S2" + sPrcpdd;
  5795. }
  5796. // trace("sSndMsg1 "+i+' / '+sSndMsg.length+' / '+sSndMsg);
  5797. sSndMsg += "^SU" + bcollbarcdprntcnt; //바코드갯수
  5798. sSndMsg += "^_SS"; //채혈정보 DATA 종료
  5799. //trace("sSndMsg2 "+i+' / '+sSndMsg.length+' / '+sSndMsg);
  5800. trace('auto 8 print start= checkABO '+checkABO+' / '+scrflag +' / '+scridPrint);
  5801. //if(sTclslblnmlist.substr(0, 3) == "ABO") {
  5802. if(checkABO) {
  5803. //외래채혈일때
  5804. if(scridPrint=="SMLLC00100" && scrflag){
  5805. keepspc = true;
  5806. }
  5807. //병동,환자별일때
  5808. else if((scridPrint=="SMLLC00200" || scridPrint=="SMLLC00300") && scrflag && checkAST){
  5809. keepspc = true;
  5810. }
  5811. }
  5812. trace("auto keepspc "+i+' / '+keepspc);
  5813. if(keepspc) {
  5814. //ABO 바코드 밑에 보관검체 출력하기 위해. 인스턴트에 지금까지의 sendmessage 값을 저장
  5815. //model.makeValue("/root/hidden/sendmessage", model.getValue("/root/hidden/sendmessage") + sSndMsg);
  5816. dsf_makeValue(ds_hidden,"sendmessage","string","");
  5817. trace('dsf make :'+ds_hidden.saveXML());
  5818. var v_sendmessage = utlf_transNullToEmpty(ds_hidden.getColumn(0,"sendmessage"));
  5819. ds_hidden.setColumn(0,"sendmessage",v_sendmessage+sSndMsg);
  5820. fKeepBcnoPrint("B");
  5821. //sSndMsg = model.getValue("/root/hidden/sendmessage");
  5822. sSndMsg = ds_hidden.getColumn(0,"sendmessage");
  5823. //보관검체까지의 값을 sendmessage 변수에 넣는다.(한꺼번에 전송을 위하여)
  5824. }
  5825. if((i == (ds_pRef.rowcount-1)) || (ds_pRef.getColumn(i+1,"pid") != ds_pRef.getColumn(i,"pid"))) { //등록번호가 다르다(일괄발행시)
  5826. sSndMsg += "^^^_S"; //채혈정보 종료
  5827. }
  5828. }//end for
  5829. trace('auto 9 print end= '+sSetUpVal +' / '+sSndMsg);
  5830. AutoLabel.TRANSDATA(0, sSetUpVal, sSndMsg); //전송
  5831. }//end else if(sPrntKind == "3" && sCommKind == "03")
  5832. else if(sPrntKind == "4" && sCommKind == "03"){ //Auto labeler(Robo)이고 TCP/IP 일때
  5833. }//end else if(sPrntKind == "4" && sCommKind == "03")
  5834. //portopen이 true이고 통신유형이 com이고 출력할 병리 바코드가 없을때 port close
  5835. if( portOpenTF == "TRUE" && sCommKind == "02" && PCount == 0){
  5836. CommAX.PortOpen("false");
  5837. }
  5838. }else if((portOpenTF = "FALSE" && sCommKind == "02")){
  5839. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  5840. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  5841. + " \n 2.케이블 확인"
  5842. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  5843. return;
  5844. }
  5845. }
  5846. } catch(ee) {
  5847. sysf_messageBox("바코드출력에", "E009");
  5848. sysf_catchTrace(ee);
  5849. return;
  5850. }
  5851. }
  5852. // 핵의학 채혈 접수용
  5853. function lf_LisSpcBarcodePrint_test(ds_pRef:Dataset,sds_data_path, pKCount, pPCount, scrflag, reprintflag){
  5854. try{
  5855. trace(frmf_getMainFormScreenID());
  5856. //var scridPrint = frmf_getScreenID();
  5857. var scridPrint = frmf_getMainFormScreenID();
  5858. if (scridPrint != 'SMLLJ00400') {
  5859. objects[sds_data_path +"ds_main_KeepBcnoPrint_printinfo"].clearData();//Auto Label에 보내는 값을 저장한 인스턴트 초기화
  5860. objects[sds_data_path +"ds_main_KeepBcnoPrint_printinfo"].setColumn(0,"sendmessage",'aaaa');//Auto Label에 보내는 값을 저장한 인스턴트 초기화
  5861. }
  5862. //ds_main_KeepBcnoPrint_printinfo.setColumn(0,"sendmessage",""); //Auto Label에 보내는 값을 저장한 인스턴트 초기화
  5863. var sPrntKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"prntkind");
  5864. trace('핵의학 테스트 1 sPrntKind = '+sPrntKind);
  5865. var aFlag = new Array(); //한글 영문 구분
  5866. var aStr = "";
  5867. //var iWidth = 0;
  5868. var iXPos = 0;
  5869. var iYPos = 0;
  5870. var portOpenTF = "";
  5871. var KCount = 0;
  5872. var PCount = 0;
  5873. var test_he = "";
  5874. var test_rtn = "";
  5875. if(utlf_isNull(pKCount)){
  5876. KCount = 0;
  5877. }else{
  5878. KCount = pKCount;
  5879. }
  5880. if(utlf_isNull(pPCount)){
  5881. PCount = 0;
  5882. }else{
  5883. PCount = pPCount;
  5884. }
  5885. // trace(frmf_getMainFormScreenID());
  5886. // //var scridPrint = frmf_getScreenID();
  5887. // var scridPrint = frmf_getMainFormScreenID();
  5888. trace('auto 2 ds_pRef.rowcount = '+ds_pRef.rowcount);
  5889. if(ds_pRef.rowcount > 0 && sPrntKind != 0){
  5890. var sCommKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"commkind");
  5891. var sLeftBank = objects[sds_data_path + "ds_data_blank"].getColumn(0,"left");
  5892. var sTopBank = objects[sds_data_path + "ds_data_blank"].getColumn(0,"top");
  5893. trace('auto 3 sCommKind = '+sCommKind);
  5894. trace('KCount = '+KCount);
  5895. if(sCommKind == "01") {
  5896. var sSetUpVal = objects[sds_data_path + "ds_data_comm01"].getColumn(0,"setupval");
  5897. portOpenTF = "TRUE";
  5898. } else if(sCommKind == "02") {
  5899. var sComm = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"comm");
  5900. var sDataBit = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"databit");
  5901. var sStopBit = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"stopbit");
  5902. var sBaudRate = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"baudrate");
  5903. var sParity = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"parity");
  5904. CommAX.CommPort = sComm;
  5905. CommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  5906. //보관검체 출력 갯수가 존재하면 port 오픈 하지 않는다.
  5907. //이미 오픈 되어 있음. 보관검체 출력후 진검 바코드 갯수 체크하여 포트 클로즈 하지 않는다.
  5908. if(KCount > 0){
  5909. //이미 포트 오픈 되어 있으므로 "TRUE" 셋팅
  5910. portOpenTF = "TRUE";
  5911. }else if(KCount == 0){
  5912. //port open 반환값 -> String 문자 포트 오픈 성공이면 "TRUE" , 실패하면 "FALSE"
  5913. portOpenTF = CommAX.PortOpen("true");
  5914. trace("portOpenTF ="+portOpenTF);
  5915. portOpenTF = "TRUE";
  5916. }
  5917. } else if(sCommKind == "03") {
  5918. var sSetUpVal = objects[sds_data_path + "ds_data_comm03"].getColumn(0,"setupval");
  5919. var sEqmtCd = objects[sds_data_path + "ds_data_comm03"].getColumn(0,"eqmtcd");
  5920. }
  5921. trace('auto 4 sSetUpVal = '+sSetUpVal+' / '+sEqmtCd+' / '+portOpenTF);
  5922. if( (portOpenTF == "TRUE" && sCommKind == "02")
  5923. || (sCommKind == "01")
  5924. || (sCommKind == "03")){
  5925. portOpenTF = "TRUE";
  5926. //if( (sPrntKind == "1" || sPrntKind == "11") ) { //zebra
  5927. if( (sPrntKind != "0") ) { //zebra
  5928. trace('test1');
  5929. for(i=0 ; i< ds_pRef.rowcount ;i++){
  5930. var sSndMsg = "";
  5931. trace('test2');
  5932. var sTsectlblnm = utlf_transNullToEmpty(ds_pRef.getColumn(i,"tsectlblnm"));
  5933. var sBcno = ds_pRef.getColumn(i,"bcno");
  5934. var sBarcdprntdt = ds_pRef.getColumn(i,"barcdprntdt");
  5935. var sPatnm = ds_pRef.getColumn(i,"patnm");
  5936. var sPid = ds_pRef.getColumn(i,"pid");
  5937. var sSexage = ds_pRef.getColumn(i,"sexage");
  5938. var sDeptroom = ds_pRef.getColumn(i,"deptroom");
  5939. var sSpclblnm = ds_pRef.getColumn(i,"spclblnm");
  5940. var sTubelblnm = ds_pRef.getColumn(i,"tubelblnm");
  5941. var sSecttsect = ds_pRef.getColumn(i,"secttsect");
  5942. var sTclslblnmlist = utlf_transNullToEmpty(ds_pRef.getColumn(i,"tclslblnmlist"));
  5943. var sInfcinfolist = utlf_transNullToEmpty(ds_pRef.getColumn(i,"infcinfolist"));
  5944. var sErprcpflag = ds_pRef.getColumn(i,"erprcpflag");
  5945. var barcdcntflag = utlf_transNullToEmpty(ds_pRef.getColumn(i,"cntflag"));
  5946. var bcollbarcdprntcnt = ds_pRef.getColumn(i,"bcollbarcdprntcnt");
  5947. var spcacptbarcdprntcnt = ds_pRef.getColumn(i,"spcacptbarcdprntcnt");
  5948. var microbarcdprntcnt = ds_pRef.getColumn(i,"microbarcdprntcnt");
  5949. //2.0추가 remark 출력 추가
  5950. var prcpdelivefact = ds_pRef.getColumn(i,"prcpdelivefact");
  5951. var sbcoll = "채혈자";
  5952. var keepspc = false;
  5953. var checkABO = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "ABO");
  5954. var checkAST = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "AST");
  5955. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  5956. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  5957. if (utlf_isNull(ds_pRef.getColumn(i,"dnornm"))){
  5958. var dnorNm = "";
  5959. var dSexage = "";
  5960. }else{
  5961. var dnorNm = ds_pRef.getColumn(i,"dnornm");
  5962. var dSexage = ds_pRef.getColumn(i,"dnorsexage");
  5963. }
  5964. iXPos = Number(sLeftBank);
  5965. iYPos = Number(sTopBank);
  5966. sSndMsg = "^XA^SEE:UHANGUL.DAT^FS";
  5967. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  5968. iXPos = Number(sLeftBank);
  5969. iYPos = Number(sTopBank) + 5;
  5970. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  5971. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBcno + "*"); //바코드번호
  5972. iXPos = Number(sLeftBank);
  5973. iYPos = Number(sTopBank) + 25;
  5974. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  5975. sSndMsg += lzzfBP_FieldDataH(iXPos, iYPos, "*테스트*"); //바코드번호
  5976. iXPos = Number(sLeftBank);
  5977. iYPos = Number(sTopBank) + 45;
  5978. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  5979. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*AAAA테스트*"); //바코드번호
  5980. sSndMsg += lzzfBP_EndFormat();
  5981. if(sCommKind == "01") {
  5982. CommAX.SendMessageToLPT(sSndMsg);
  5983. } else if(sCommKind == "02") {
  5984. CommAX.SendMessage(sSndMsg);
  5985. }
  5986. // sSndMsg += lzzfBP_ChangeFont("C", 30, 10); // 폰트 설정
  5987. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBcno); //혈액번호
  5988. //
  5989. // // iXPos = Number(sLeftBank) + 10;
  5990. // // iYPos = Number(sTopBank) + 20;
  5991. // // sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatNm, 2, 2);
  5992. // // sSndMsg += CommAX.HanImageData();
  5993. // //
  5994. // sSndMsg += lzzfBP_EndFormat();
  5995. //
  5996. // trace("sSndMsg :"+sSndMsg);
  5997. // if(sCommKind == "01") {
  5998. // CommAX.SendMessageToLPT(sSndMsg);
  5999. // sSndMsg = "";
  6000. // } else if(sCommKind == "02") {
  6001. // CommAX.SendMessage(sSndMsg);
  6002. // sSndMsg = "";
  6003. // }
  6004. // if(sErprcpflag == "1" || sErprcpflag == "2" || sErprcpflag == "Y"){
  6005. // //검사계명
  6006. // iXPos = Number(sLeftBank);
  6007. // iYPos = Number(sTopBank) + 1;
  6008. // //sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 15, 240, 10);
  6009. // sSndMsg += String.fromCharCode(27) +"V" + iYPos + String.fromCharCode(27) +"H" + iXPos + String.fromCharCode(27) +"FW10V0220";
  6010. //
  6011. // }
  6012. //
  6013. //
  6014. // sTsectlblnm = sTsectlblnm.replace("▨", ",");
  6015. //
  6016. // //---------
  6017. // iWidth = 0;
  6018. // aStr = "";
  6019. // aFlag = new Array();
  6020. //
  6021. // iXPos = Number(sLeftBank) + 15;
  6022. //
  6023. // aStr = lpzfGetHanGul(sTsectlblnm, aFlag);
  6024. // if(!utlf_isNull(aStr))
  6025. // {
  6026. // for (var iNo=0; iNo < aStr.length; iNo++) {
  6027. //
  6028. // //----------------------
  6029. // if (aFlag[iNo] == "E") {
  6030. // iYPos = Number(sTopBank) + 2;
  6031. // sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  6032. // iWidth = iWidth + (Number(aStr[iNo].length) * 12);
  6033. // } else {
  6034. // iYPos = Number(sTopBank) + 2;
  6035. // sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  6036. // sSndMsg += CommAX.HanImageData();
  6037. // iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  6038. // }
  6039. // }
  6040. // }
  6041. // else
  6042. // {
  6043. // iXPos = Number(sLeftBank) + 15;
  6044. // iYPos = Number(sTopBank) + 2;
  6045. // sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  6046. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBcno + "*"); //바코드번호
  6047. //
  6048. // }
  6049. //
  6050. // iXPos = Number(sLeftBank) + 130;
  6051. // iYPos = Number(sTopBank) + 5;
  6052. // sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  6053. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBcno + "*"); //바코드번호
  6054. //
  6055. //
  6056. // iXPos = Number(sLeftBank) + 275;
  6057. // iYPos = Number(sTopBank) + 5;
  6058. // sSndMsg += lzzfBP_ChangeFont("C", 5, 5); // 폰트 설정
  6059. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBarcdprntdt); //라벨발행일시
  6060. //
  6061. // iXPos = Number(sLeftBank) + 60;
  6062. // iYPos = Number(sTopBank) + 30;
  6063. // sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  6064. // sSndMsg += lzzfBP_BarCode_Code39(iXPos, iYPos, "N", 100, "*" + sBcno + "*"); // 바코드
  6065. //
  6066. //
  6067. // iWidth = 0;
  6068. // aStr = "";
  6069. // aFlag = new Array();
  6070. //
  6071. // iXPos = Number(sLeftBank) + 20;
  6072. // sPatnm = sPatnm.substr(0, 20)
  6073. // aStr = lpzfGetHanGul(sPatnm, aFlag);
  6074. // if(!utlf_isNull(aStr))
  6075. // {
  6076. // for (var iNo=0; iNo < aStr.length; iNo++) {
  6077. //
  6078. // //----------------------
  6079. // if (aFlag[iNo] == "E") {
  6080. // iYPos = Number(sTopBank) + 133;
  6081. // sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  6082. // iWidth = iWidth + (Number(aStr[iNo].length) * 12);
  6083. // } else {
  6084. // iYPos = Number(sTopBank) + 130;
  6085. // sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  6086. // sSndMsg += CommAX.HanImageData();
  6087. // iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  6088. // }
  6089. // }
  6090. // }
  6091. // else
  6092. // {
  6093. // iXPos = Number(sLeftBank) + 20;
  6094. // iYPos = Number(sTopBank) + 133;
  6095. // sSndMsg += lzzfBP_ChangeFont("C", 10, 10);
  6096. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPatnm); // 바코드
  6097. // }
  6098. //
  6099. // if(barcdcntflag == "acpt" ){
  6100. // if(spcacptbarcdprntcnt > 0){
  6101. // if(sCommKind == "01") {
  6102. // var aa = CommAX.SendMessageToLPT(sSndMsg);
  6103. // trace("aaaa :"+aa);
  6104. // sSndMsg = "";
  6105. // } else if(sCommKind == "02") {
  6106. // var aa = CommAX.SendMessage(sSndMsg);
  6107. // trace("bbb :"+aa);
  6108. // sSndMsg = "";
  6109. // }
  6110. // }
  6111. // }else{
  6112. // if(sCommKind == "01") {
  6113. // var aa = CommAX.SendMessageToLPT(sSndMsg);
  6114. // trace("ccc :"+aa);
  6115. // sSndMsg = "";
  6116. // } else if(sCommKind == "02") {
  6117. // var aa = CommAX.SendMessage(sSndMsg);
  6118. // trace("ddd :"+aa);
  6119. // sSndMsg = "";
  6120. // }
  6121. // }
  6122. //
  6123. // iXPos = Number(sLeftBank) + 190;
  6124. // iYPos = Number(sTopBank) + 135;
  6125. // sSndMsg += lzzfBP_ChangeFont("C", 14, 14); // 폰트 설정
  6126. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //환자등록번호
  6127. //
  6128. //
  6129. // iXPos = Number(sLeftBank) + 300;
  6130. // iYPos = Number(sTopBank) + 135;
  6131. // sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  6132. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSexage);
  6133. //
  6134. //
  6135. // iXPos = Number(sLeftBank) + 20;
  6136. // iYPos = Number(sTopBank) + 160;
  6137. // sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  6138. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDeptroom); //진료과병실
  6139. //
  6140. //
  6141. // iXPos = Number(sLeftBank) + 160;
  6142. // iYPos = Number(sTopBank) + 160;
  6143. // // sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  6144. // // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  6145. //
  6146. //
  6147. //
  6148. // iWidth = 0;
  6149. // aStr = "";
  6150. // aFlag = new Array();
  6151. //
  6152. // aStr = lpzfGetHanGul(sSpclblnm, aFlag);
  6153. // if(!utlf_isNull(aStr))
  6154. // {
  6155. // for (var iNo=0; iNo < aStr.length; iNo++) {
  6156. //
  6157. // //----------------------
  6158. // if (aFlag[iNo] == "E") {
  6159. // sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  6160. // iWidth = iWidth + (Number(aStr[iNo].length) * 12);
  6161. // } else {
  6162. // sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  6163. // sSndMsg += CommAX.HanImageData();
  6164. // iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  6165. // }
  6166. // }
  6167. // }
  6168. // else
  6169. // {
  6170. // sSndMsg += lzzfBP_ChangeFont("C", 10, 10);
  6171. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm);
  6172. // }
  6173. //
  6174. //
  6175. // iXPos = Number(sLeftBank) + 280;
  6176. // iYPos = Number(sTopBank) + 160;
  6177. // // sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  6178. // // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sTubelblnm); //용기명
  6179. //
  6180. //
  6181. // iWidth = 0;
  6182. // aStr = "";
  6183. // aFlag = new Array();
  6184. //
  6185. // aStr = lpzfGetHanGul(sTubelblnm, aFlag);
  6186. // if(!utlf_isNull(aStr))
  6187. // {
  6188. // for (var iNo=0; iNo < aStr.length; iNo++) {
  6189. //
  6190. // //----------------------
  6191. // if (aFlag[iNo] == "E") {
  6192. // sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  6193. // iWidth = iWidth + (Number(aStr[iNo].length) * 12);
  6194. // } else {
  6195. // sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  6196. // sSndMsg += CommAX.HanImageData();
  6197. // iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  6198. // }
  6199. // }
  6200. // }
  6201. // else
  6202. // {
  6203. // sSndMsg += lzzfBP_ChangeFont("C", 10, 10);
  6204. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sTubelblnm);
  6205. // }
  6206. //
  6207. //
  6208. // iXPos = Number(sLeftBank) + 20;
  6209. // iYPos = Number(sTopBank) + 180;
  6210. // // sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  6211. // // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSecttsect); //계검사계
  6212. //
  6213. //
  6214. // iWidth = 0;
  6215. // aStr = "";
  6216. // aFlag = new Array();
  6217. //
  6218. // aStr = lpzfGetHanGul(sSecttsect, aFlag);
  6219. // if(!utlf_isNull(aStr))
  6220. // {
  6221. // for (var iNo=0; iNo < aStr.length; iNo++) {
  6222. //
  6223. // //----------------------
  6224. // if (aFlag[iNo] == "E") {
  6225. // sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  6226. // iWidth = iWidth + (Number(aStr[iNo].length) * 12);
  6227. // } else {
  6228. // sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  6229. // sSndMsg += CommAX.HanImageData();
  6230. // iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  6231. // }
  6232. // }
  6233. // }
  6234. // else
  6235. // {
  6236. // sSndMsg += lzzfBP_ChangeFont("C", 10, 10);
  6237. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSecttsect);
  6238. // }
  6239. //
  6240. // if(barcdcntflag == "acpt" ){
  6241. // if(spcacptbarcdprntcnt > 0){
  6242. // if(sCommKind == "01") {
  6243. // CommAX.SendMessageToLPT(sSndMsg);
  6244. // sSndMsg = "";
  6245. // } else if(sCommKind == "02") {
  6246. // CommAX.SendMessage(sSndMsg);
  6247. // sSndMsg = "";
  6248. // }
  6249. // }
  6250. // }else{
  6251. // if(sCommKind == "01") {
  6252. // CommAX.SendMessageToLPT(sSndMsg);
  6253. // sSndMsg = "";
  6254. // } else if(sCommKind == "02") {
  6255. // CommAX.SendMessage(sSndMsg);
  6256. // sSndMsg = "";
  6257. // }
  6258. // }
  6259. //
  6260. // sTclslblnmlist = sTclslblnmlist.replace("▨", ",");
  6261. //
  6262. // //---------
  6263. // iWidth = 0;
  6264. // aStr = "";
  6265. // aFlag = new Array();
  6266. // iXPos = Number(sLeftBank) + 90;
  6267. // aStr = lpzfGetHanGul(sTclslblnmlist, aFlag);
  6268. // if(!utlf_isNull(aStr))
  6269. // {
  6270. // for (var iNo=0; iNo < aStr.length; iNo++) {
  6271. //
  6272. // //----------------------
  6273. // if (aFlag[iNo] == "E") {
  6274. // iYPos = Number(sTopBank) + 178;
  6275. // sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  6276. // iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  6277. // } else {
  6278. // iYPos = Number(sTopBank) + 175;
  6279. // sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  6280. // sSndMsg += CommAX.HanImageData();
  6281. // iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  6282. // }
  6283. // }
  6284. // }
  6285. // else
  6286. // {
  6287. // iXPos = Number(sLeftBank) + 20;
  6288. // iYPos = Number(sTopBank) + 178;
  6289. // sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  6290. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sTclslblnmlist);
  6291. // }
  6292. //
  6293. // if(barcdcntflag == "acpt" ){
  6294. // if(spcacptbarcdprntcnt > 0){
  6295. // if(sCommKind == "01") {
  6296. // CommAX.SendMessageToLPT(sSndMsg);
  6297. // sSndMsg = "";
  6298. // } else if(sCommKind == "02") {
  6299. // CommAX.SendMessage(sSndMsg);
  6300. // sSndMsg = "";
  6301. // }
  6302. // }
  6303. // }else{
  6304. // if(sCommKind == "01") {
  6305. // CommAX.SendMessageToLPT(sSndMsg);
  6306. // sSndMsg = "";
  6307. // } else if(sCommKind == "02") {
  6308. // CommAX.SendMessage(sSndMsg);
  6309. // sSndMsg = "";
  6310. // }
  6311. // }
  6312. //
  6313. // //---------공여자 또는 리마크 때문에..2009.01.28.윤재한 수정
  6314. // dnorNm = dnorNm + dSexage;
  6315. // iWidth = 0;
  6316. // aStr = "";
  6317. // aFlag = new Array();
  6318. // iXPos = Number(sLeftBank) + 20;
  6319. // aStr = lpzfGetHanGul(dnorNm, aFlag); //공여자명은 한글, 리마크는 영문
  6320. // if(!utlf_isNull(aStr))
  6321. // {
  6322. // for (var iNo=0; iNo < aStr.length; iNo++) {
  6323. //
  6324. // //----------------------
  6325. // if (aFlag[iNo] == "E") {
  6326. // iYPos = Number(sTopBank) + 232;
  6327. // sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // 검체표시명(영문)
  6328. // iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  6329. // } else {
  6330. // iYPos = Number(sTopBank) + 232;
  6331. // sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  6332. // sSndMsg += CommAX.HanImageData();
  6333. // iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  6334. // }
  6335. // }
  6336. // }
  6337. // //if(sTclslblnmlist.substr(0, 3) == "ABO") {
  6338. // if(checkABO) {
  6339. // //외래채혈일때
  6340. // if(scridPrint=="SMLLC00100" && scrflag){
  6341. // keepspc = true;
  6342. // }
  6343. // //병동,환자별일때
  6344. // else if((scridPrint=="SMLLC00200" || scridPrint=="SMLLC00300") && scrflag && checkAST){
  6345. // keepspc = true;
  6346. // }
  6347. // iXPos = Number(sLeftBank) + 110;
  6348. // iYPos = Number(sTopBank) + 202;
  6349. // sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, "채혈자 : ", 1, 1);
  6350. // sSndMsg += CommAX.HanImageData();
  6351. //
  6352. // }
  6353. //
  6354. //
  6355. //
  6356. //
  6357. // iXPos = Number(sLeftBank) + 20;
  6358. // iYPos = Number(sTopBank) + 202;
  6359. // // sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  6360. // // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sInfcinfolist);
  6361. //
  6362. // iWidth = 0;
  6363. // aStr = "";
  6364. // aFlag = new Array();
  6365. // aStr = lpzfGetHanGul(sInfcinfolist, aFlag); //공여자명은 한글, 리마크는 영문
  6366. // if(!utlf_isNull(aStr))
  6367. // {
  6368. // for (var iNo=0; iNo < aStr.length; iNo++) {
  6369. //
  6370. // //----------------------
  6371. // if (aFlag[iNo] == "E") {
  6372. // sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // remark
  6373. // iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  6374. // } else {
  6375. // sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  6376. // sSndMsg += CommAX.HanImageData();
  6377. // iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  6378. // }
  6379. // }
  6380. // }
  6381. //
  6382. //
  6383. // ///2.0 remark 출력 start
  6384. // if((!utlf_isNull(prcpdelivefact)) && ((prcpdelivefact.length) == 1)){
  6385. // prcpdelivefact = prcpdelivefact.replace("-", ""); //Remark
  6386. // }
  6387. //
  6388. // if(utlf_isNull(prcpdelivefact)){
  6389. // prcpdelivefact = "";
  6390. // }
  6391. //
  6392. //
  6393. // iWidth = 0;
  6394. // aStr = "";
  6395. // aFlag = new Array();
  6396. // iXPos = Number(sLeftBank) + 180;
  6397. // aStr = lpzfGetHanGul(prcpdelivefact, aFlag); //공여자명은 한글, 리마크는 영문
  6398. // if(!utlf_isNull(aStr))
  6399. // {
  6400. // for (var iNo=0; iNo < aStr.length; iNo++) {
  6401. //
  6402. // //----------------------
  6403. // if (aFlag[iNo] == "E") {
  6404. // iYPos = Number(sTopBank) + 232;
  6405. // sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // remark
  6406. // iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  6407. // } else {
  6408. // iYPos = Number(sTopBank) + 232;
  6409. // sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  6410. // sSndMsg += CommAX.HanImageData();
  6411. // iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  6412. // }
  6413. // }
  6414. // }
  6415. //
  6416. // if(barcdcntflag == "acpt" ){
  6417. // if(spcacptbarcdprntcnt > 0){
  6418. // if(sCommKind == "01") {
  6419. // CommAX.SendMessageToLPT(sSndMsg);
  6420. // sSndMsg = "";
  6421. // } else if(sCommKind == "02") {
  6422. // CommAX.SendMessage(sSndMsg);
  6423. // sSndMsg = "";
  6424. // }
  6425. // }
  6426. // }else{
  6427. // if(sCommKind == "01") {
  6428. // CommAX.SendMessageToLPT(sSndMsg);
  6429. // sSndMsg = "";
  6430. // } else if(sCommKind == "02") {
  6431. // CommAX.SendMessage(sSndMsg);
  6432. // sSndMsg = "";
  6433. // }
  6434. // }
  6435. //
  6436. // ///2.0 remark 출력 end
  6437. //
  6438. // //자동화일때 밑에 줄 끄어요~
  6439. // if(sSecttsect.substr(0, 1) == "A"){
  6440. // //검사계명
  6441. // iXPos = Number(sLeftBank);
  6442. // iYPos = Number(sTopBank) + 260;
  6443. // sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 400, 10, 5);
  6444. //
  6445. //
  6446. // }
  6447. //
  6448. //
  6449. // if(barcdcntflag == "acpt" ){
  6450. // if(spcacptbarcdprntcnt > 0){
  6451. // sSndMsg += lzzfBP_EndFormat(spcacptbarcdprntcnt); // 접수바코드출력수
  6452. // if(sCommKind == "01") {
  6453. // CommAX.SendMessageToLPT(sSndMsg);
  6454. // } else if(sCommKind == "02") {
  6455. // CommAX.SendMessage(sSndMsg);
  6456. // }
  6457. // }
  6458. // }else{
  6459. // sSndMsg += lzzfBP_EndFormat(bcollbarcdprntcnt);
  6460. // if(sCommKind == "01") {
  6461. // CommAX.SendMessageToLPT(sSndMsg);
  6462. // } else if(sCommKind == "02") {
  6463. // CommAX.SendMessage(sSndMsg);
  6464. // }
  6465. // }
  6466. //
  6467. // if(keepspc) {
  6468. // fKeepBcnoPrint("B");
  6469. // }
  6470. }//end for
  6471. }
  6472. //portopen이 true이고 통신유형이 com이고 출력할 병리 바코드가 없을때 port close
  6473. if( portOpenTF == "TRUE" && sCommKind == "02" && PCount == 0){
  6474. CommAX.PortOpen("false");
  6475. }
  6476. }else if((portOpenTF = "FALSE" && sCommKind == "02")){
  6477. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  6478. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  6479. + " \n 2.케이블 확인"
  6480. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  6481. return;
  6482. }
  6483. }
  6484. } catch(ee) {
  6485. sysf_messageBox("바코드출력에", "E009");
  6486. sysf_catchTrace(ee);
  6487. return;
  6488. }
  6489. }
  6490. // pKCount - 보관검체 출력수
  6491. // pPCount - 병리바코드갯수, 접수관리 화면에서는 분주 바코드 출력수
  6492. // scrflag - 병동 환자별 채혈시 true
  6493. function lf_LisSpcBarcodePrint2(ds_pRef:Dataset,sds_data_path, pKCount, pPCount, scrflag){
  6494. try{
  6495. trace('start');
  6496. if( utlf_isNull(sds_data_path) ) sds_data_path = "";
  6497. var sPrntKind = eval(sds_data_path + "ds_data_setupinfo").getColumn(0,"prntkind");
  6498. trace("sPrntKind == " + sPrntKind);
  6499. var aFlag = new Array(); //한글 영문 구분
  6500. var aStr = "";
  6501. //var iWidth = 0;
  6502. var iXPos = 0;
  6503. var iYPos = 0;
  6504. //var portOpenTF = "";
  6505. var KCount = 0;
  6506. var PCount = 0;
  6507. if(utlf_isNull(pKCount)){
  6508. KCount = 0;
  6509. }else{
  6510. KCount = pKCount;
  6511. }
  6512. if(utlf_isNull(pPCount)){
  6513. PCount = 0;
  6514. }else{
  6515. PCount = pPCount;
  6516. }
  6517. var scridPrint = frmf_getMainFormScreenID();
  6518. trace("ds_pRef.rowcount :" + ds_pRef.rowcount);
  6519. if(ds_pRef.rowcount > 0 && sPrntKind != 0){
  6520. //var sCommKind = model.getValue(barcdRef + "[1]/commkind");
  6521. var sLeftBank = eval(sds_data_path + "ds_data_blank").getColumn(0,"left");
  6522. var sTopBank = eval(sds_data_path + "ds_data_blank").getColumn(0,"top");
  6523. for(i=0 ; i< ds_pRef.rowcount;i++){
  6524. if(sPrntKind == "10"){ //zebra EPL
  6525. var sSndMsg = "";
  6526. var sTsectlblnm = utlf_transNullToEmpty(ds_pRef.getColumn(i,"tsectlblnm"));
  6527. var sBcno = ds_pRef.getColumn(i,"bcno");
  6528. var sBarcdprntdt = ds_pRef.getColumn(i,"barcdprntdt");
  6529. var sPatnm = ds_pRef.getColumn(i,"patnm");
  6530. var sPid = ds_pRef.getColumn(i,"pid");
  6531. var sSexage = ds_pRef.getColumn(i,"sexage");
  6532. var sDeptroom = ds_pRef.getColumn(i,"deptroom");
  6533. var sSpclblnm = ds_pRef.getColumn(i,"spclblnm");
  6534. var sTubelblnm = ds_pRef.getColumn(i,"tubelblnm");
  6535. var sSecttsect = ds_pRef.getColumn(i,"secttsect");
  6536. var sTclslblnmlist = ds_pRef.getColumn(i,"tclslblnmlist");
  6537. var sInfcinfolist = ds_pRef.getColumn(i,"infcinfolist");
  6538. var sErprcpflag = ds_pRef.getColumn(i,"erprcpflag");
  6539. var barcdcntflag = ds_pRef.getColumn(i,"cntflag");
  6540. var bcollbarcdprntcnt = ds_pRef.getColumn(i,"bcollbarcdprntcnt");
  6541. var spcacptbarcdprntcnt = ds_pRef.getColumn(i,"spcacptbarcdprntcnt");
  6542. var microbarcdprntcnt = ds_pRef.getColumn(i,"microbarcdprntcnt");
  6543. var prcphopedd = ds_pRef.getColumn(i,"prcphopedd");
  6544. var bedposcnts = ds_pRef.getColumn(i,"bedposcnts");
  6545. var sbcoll = "채혈자";
  6546. var keepspc = false;
  6547. var checkABO = "";
  6548. var checkAST = "";
  6549. if(!utlf_isNull(sTclslblnmlist)) {
  6550. checkABO = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "ABO");
  6551. checkAST = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "AST");
  6552. }
  6553. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  6554. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  6555. if (utlf_isNull(ds_pRef.getColumn(i,"dnornm"))){
  6556. var dnorNm = "";
  6557. var dSexage = "";
  6558. }else{
  6559. var dnorNm = ds_pRef.getColumn(i,"dnornm");
  6560. var dSexage = ds_pRef.getColumn(i,"dnorsexage");
  6561. }
  6562. sSndMsg += "N" + "\n";
  6563. sSndMsg += "JF" + "\n";
  6564. sSndMsg += "D9" + "\n";
  6565. sSndMsg += "S2" + "\n";
  6566. sSndMsg += "Q223,27" + "\n";
  6567. sSndMsg += "q456" + "\n";
  6568. iXPos = Number(sLeftBank);
  6569. iYPos = Number(sTopBank);
  6570. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,1,1,N," + "\"" + sTsectlblnm + "\""+ "\n";
  6571. iXPos = Number(sLeftBank) + 140;
  6572. iYPos = Number(sTopBank) + 5;
  6573. sSndMsg += "A" + iXPos + "," + iYPos + ",0,2,1,1,N," + "\"" + "*" + sBcno + "*" + "\""+ "\n";
  6574. iXPos = Number(sLeftBank) + 300;
  6575. iYPos = Number(sTopBank) + 0;
  6576. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + sSpclblnm + "\""+ "\n";
  6577. iXPos = Number(sLeftBank) + 25;
  6578. iYPos = Number(sTopBank) + 28;
  6579. sSndMsg += "B" + iXPos + "," + iYPos + ",0,3,2,5,93,N," + "\"" + sBcno + "\""+ "\n";
  6580. iXPos = Number(sLeftBank);
  6581. iYPos = Number(sTopBank) + 124;
  6582. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + sPid + "\""+ "\n";
  6583. iXPos = Number(sLeftBank) + 120;
  6584. iYPos = Number(sTopBank) + 120;
  6585. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,2,1,N," + "\"" + sPatnm + "\""+ "\n"; // 글짜크기 변경 20120504
  6586. iXPos = Number(sLeftBank) + 330;
  6587. iYPos = Number(sTopBank) + 124;
  6588. sSndMsg += "A" + iXPos + "," + iYPos + ",0,1,1,1,N," + "\"" + prcphopedd + "\""+ "\n";
  6589. iXPos = Number(sLeftBank);
  6590. iYPos = Number(sTopBank) + 147;
  6591. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + sTubelblnm + "\""+ "\n";
  6592. iXPos = Number(sLeftBank) + 170;
  6593. iYPos = Number(sTopBank) + 147;
  6594. if(sBcno.substr(0, 1) == "E" && bedposcnts != ""){
  6595. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,1,1,N," + "\"" + bedposcnts + "\""+ "\n";
  6596. } else {
  6597. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + sDeptroom + "\""+ "\n";
  6598. }
  6599. iXPos = Number(sLeftBank);
  6600. iYPos = Number(sTopBank) + 167;
  6601. if(!utlf_isNull(sTclslblnmlist)) {
  6602. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,1,1,N," + "\"" + sTclslblnmlist + "\""+ "\n";
  6603. }
  6604. iXPos = Number(sLeftBank);
  6605. //감염정보 특수문자 추가 20120402
  6606. if(!utlf_isNull(sInfcinfolist)){
  6607. sInfcinfolist = "*"+ sInfcinfolist +"*";
  6608. } else {
  6609. sInfcinfolist = "";
  6610. }
  6611. iYPos = Number(sTopBank) + 190;
  6612. sSndMsg += "A" + iXPos + "," + iYPos + ",0,4,1,1,N," + "\"" + sInfcinfolist + "\""+ "\n"; //20120328
  6613. sSndMsg += ""+ "\n";
  6614. sSndMsg += "P"+ bcollbarcdprntcnt + "\n";
  6615. trace("sSndMsg == " + sSndMsg);
  6616. CommAX.SendMsg(sSndMsg);
  6617. }else if(sPrntKind == "9") { //zebra GX430
  6618. var sSndMsg = "^XA^SEE:UHANGUL.DAT^FS^CWQ,E:kfont3.FNT^FS";
  6619. var sTsectlblnm = utlf_transNullToEmpty(ds_pRef.getColumn(i,"tsectlblnm"));
  6620. var sTsectlblnm2 = ds_pRef.getColumn(i,"tsectlblnm2");
  6621. var sBcno = ds_pRef.getColumn(i,"bcno");
  6622. var sBarcdprntdt = ds_pRef.getColumn(i,"barcdprntdt");
  6623. var sPatnm = ds_pRef.getColumn(i,"patnm");
  6624. var sPatnm2 = ds_pRef.getColumn(i,"patnm2");
  6625. var sPid = ds_pRef.getColumn(i,"pid");
  6626. var sSexage = ds_pRef.getColumn(i,"sexage");
  6627. var sDeptroom = ds_pRef.getColumn(i,"deptroom");
  6628. var sSpclblnm = ds_pRef.getColumn(i,"spclblnm");
  6629. var sTubelblnm = ds_pRef.getColumn(i,"tubelblnm");
  6630. var sSecttsect = ds_pRef.getColumn(i,"secttsect");
  6631. var sTclslblnmlist = utlf_transNullToEmpty(ds_pRef.getColumn(i,"tclslblnmlist"));
  6632. trace("sTclslblnmlist == " + ds_pRef.getColumn(i,"tclslblnmlist"));
  6633. var sTclslblnmlist2 = utlf_transNullToEmpty(ds_pRef.getColumn(i,"tclslblnmlist2"));
  6634. var sInfcinfolist = ds_pRef.getColumn(i,"infcinfolist");
  6635. var sErprcpflag = ds_pRef.getColumn(i,"erprcpflag");
  6636. var barcdcntflag = ds_pRef.getColumn(i,"cntflag");
  6637. var bcollbarcdprntcnt = ds_pRef.getColumn(i,"bcollbarcdprntcnt");
  6638. var spcacptbarcdprntcnt = ds_pRef.getColumn(i,"spcacptbarcdprntcnt");
  6639. var microbarcdprntcnt = ds_pRef.getColumn(i,"microbarcdprntcnt");
  6640. var prcphopedd = ds_pRef.getColumn(i,"prcphopedd");
  6641. var bedposcnts = ds_pRef.getColumn(i,"bedposcnts");
  6642. var sbcoll = "채혈자";
  6643. var keepspc = false;
  6644. //2.0추가 remark 출력 추가
  6645. var prcpdelivefact = ds_pRef.getColumn(i,"prcpdelivefact");
  6646. trace('pinrt9== '+sPrntKind+" / "+sPatnm);
  6647. var checkABO = "";
  6648. var checkAST = "";
  6649. var test_he;
  6650. var test_rtn;
  6651. if(!utlf_isNull(sTclslblnmlist)) {
  6652. checkABO = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "ABO");
  6653. checkAST = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "AST");
  6654. }
  6655. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  6656. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  6657. if (utlf_isNull(ds_pRef.getColumn(i,"dnornm"))){
  6658. var dnorNm = "";
  6659. var dSexage = "";
  6660. }else{
  6661. var dnorNm = ds_pRef.getColumn(i,"dnornm");
  6662. var dSexage = ds_pRef.getColumn(i,"dnorsexage");
  6663. }
  6664. sSndMsg += lzzfBP_StartFormat(0, 0);
  6665. if(sErprcpflag == "1" || sErprcpflag == "2" || sErprcpflag == "Y"){
  6666. iXPos = Number(sLeftBank);
  6667. iYPos = Number(sTopBank) + 1;
  6668. sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 15, 240, 10);
  6669. }
  6670. iXPos = Number(sLeftBank) + 200;
  6671. iYPos = Number(sTopBank) + 5;
  6672. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  6673. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBcno + "*"); //바코드번호
  6674. iXPos = Number(sLeftBank)+ 1;
  6675. iYPos = Number(sTopBank) + 1;
  6676. sSndMsg += "^CI14^FO" + iXPos + ","+ iYPos + "^AQN,30,30^FH^FD"+ sTsectlblnm +"^FS^CI1";
  6677. iXPos = Number(sLeftBank) + 500;
  6678. iYPos = Number(sTopBank) + 5;
  6679. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  6680. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  6681. iXPos = Number(sLeftBank) + 70;
  6682. iYPos = Number(sTopBank) + 30;
  6683. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  6684. sSndMsg += lzzfBP_BarCode_Code39_300dpi(iXPos, iYPos, "N", 120, "*" + sBcno + "*"); // 바코드
  6685. iXPos = Number(sLeftBank) + 20;
  6686. iYPos = Number(sTopBank) + 160;
  6687. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  6688. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //환자등록번호
  6689. iWidth = 0;
  6690. aStr = "";
  6691. aFlag = new Array();
  6692. iXPos = Number(sLeftBank) + 250;
  6693. if(!utlf_isNull(sPatnm)) {
  6694. for (var j = 0; j < sPatnm.length; j++) {
  6695. oneChar = sPatnm.charAt(j);
  6696. test_rtn = "";
  6697. test_he = "";
  6698. test_rtn = lpzfGetHanGul3(oneChar);
  6699. test_he = test_rtn.substring(0,1);
  6700. if(!utlf_isNull(test_he))
  6701. {
  6702. //----------------------
  6703. if (test_he == "E") {
  6704. iYPos = Number(sTopBank) + 160;
  6705. sSndMsg += "^CFC30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS"; // 검사코드리스트명(영문)
  6706. iWidth = iWidth + (Number(oneChar.length) * 12);
  6707. } else {
  6708. iYPos = Number(sTopBank) + 160;
  6709. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,30,30^FH^FD" + oneChar + "^FS^CI1"; // 검사코드리스트(한글)
  6710. iWidth = iWidth + (Number(oneChar.length) * 30);
  6711. }
  6712. }
  6713. }
  6714. }else{
  6715. iXPos = Number(sLeftBank) + 250;
  6716. iYPos = Number(sTopBank) + 160;
  6717. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  6718. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPatnm);
  6719. }
  6720. // aStr = lpzfGetHanGul(sPatnm, aFlag);
  6721. //
  6722. // if(!utlf_isNull(aStr))
  6723. // {
  6724. // for (var iNo=0; iNo < aStr.length; iNo++) {
  6725. //
  6726. // //----------------------
  6727. //
  6728. // if (aFlag[iNo] == "E") {
  6729. // iYPos = Number(sTopBank) + 160;
  6730. // sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  6731. // iWidth = iWidth + (Number(aStr[iNo].length) * 12);
  6732. //
  6733. // } else {
  6734. // iYPos = Number(sTopBank) + 160;
  6735. // sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,20,20^FH^FD" + aStr[iNo] + "^FS^CI1"; // 검체표시명(한글)
  6736. // iWidth = iWidth + (Number(utlf_transNullToEmpty(aStr[iNo]).length) * 30);
  6737. // }
  6738. //
  6739. // }
  6740. // }else{
  6741. // iXPos = Number(sLeftBank) + 250;
  6742. // iYPos = Number(sTopBank) + 160;
  6743. // sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  6744. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPatnm);
  6745. // }
  6746. if(!utlf_isNull(sTclslblnmlist)) {
  6747. sTclslblnmlist = sTclslblnmlist.replace("▨", ",");
  6748. }
  6749. iWidth = 0;
  6750. aStr = "";
  6751. aFlag = new Array();
  6752. iXPos = Number(sLeftBank) + 20;
  6753. trace("sTclslblnmlist == " + sTclslblnmlist);
  6754. //trace("astr = " + aStr);
  6755. if(!utlf_isNull(sTclslblnmlist)) {
  6756. for (var j = 0; j < sTclslblnmlist.length; j++) {
  6757. oneChar = sTclslblnmlist.charAt(j);
  6758. test_rtn = "";
  6759. test_he = "";
  6760. test_rtn = lpzfGetHanGul3(oneChar);
  6761. test_he = test_rtn.substring(0,1);
  6762. // if(!utlf_isNull(test_he))
  6763. // {
  6764. // //----------------------
  6765. // if (test_he == "E") {
  6766. // iYPos = Number(sTopBank) + 215;
  6767. // iXPos = Number(sLeftBank) + Number(iWidth);
  6768. // sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  6769. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, oneChar); //
  6770. // iWidth = iWidth + (Number(oneChar.length) *16);
  6771. // } else {
  6772. // iYPos = Number(sTopBank) + 215;
  6773. // sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,30,30^FH^FD" + oneChar + "^FS^CI1"; // 검사코드리스트(한글)
  6774. // iWidth = iWidth + (Number(oneChar.length) * 4);
  6775. // }
  6776. // }
  6777. if(!utlf_isNull(test_he))
  6778. {
  6779. //----------------------
  6780. if (test_he == "E") {
  6781. iYPos = Number(sTopBank) + 225;
  6782. //sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS"; // 검사코드리스트명(영문)
  6783. sSndMsg += "^CFC30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS"; // 검사코드리스트명(영문)
  6784. iWidth = iWidth + (Number(oneChar.length) * 24);
  6785. } else {
  6786. iYPos = Number(sTopBank) + 225;
  6787. sSndMsg += "^CI14^FO" +(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,30,30^FH^FD" + oneChar + "^FS^CI1"; // 검사코드리스트(한글)
  6788. iWidth = iWidth + (Number(oneChar.length) * 28);
  6789. }
  6790. }
  6791. }
  6792. }
  6793. // aStr = lpzfGetHanGul(sTclslblnmlist, aFlag); //공여자명은 한글, 리마크는 영문
  6794. // if(!utlf_isNull(aStr))
  6795. // {
  6796. // for (var iNo=0; iNo < aStr.length; iNo++) {
  6797. //
  6798. // //----------------------
  6799. // if (aFlag[iNo] == "E") {
  6800. // iYPos = Number(sTopBank) + 215;
  6801. // iXPos = Number(sLeftBank) + Number(iWidth);
  6802. // sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  6803. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, aStr[iNo]); //용기명
  6804. // iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  6805. // } else {
  6806. // iYPos = Number(sTopBank) + 215;
  6807. // sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,30,30^FH^FD" + aStr[iNo] + "^FS^CI1"; // 검체표시명(한글)
  6808. // iWidth = iWidth + (Number(aStr[iNo].length) * 28);
  6809. // }
  6810. // }
  6811. // }
  6812. // else
  6813. // {
  6814. // iXPos = Number(sLeftBank) + 20;
  6815. // iYPos = Number(sTopBank) + 215;
  6816. // sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  6817. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sTclslblnmlist);
  6818. // }
  6819. iXPos = Number(sLeftBank) + 20;
  6820. // iYPos = Number(sTopBank) + 185;
  6821. // sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  6822. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sTubelblnm); //용기명
  6823. iWidth = 0;
  6824. if(!utlf_isNull(sTubelblnm)) {
  6825. for (var j = 0; j < sTubelblnm.length; j++) {
  6826. oneChar = sTubelblnm.charAt(j);
  6827. test_rtn = "";
  6828. test_he = "";
  6829. test_rtn = lpzfGetHanGul3(oneChar);
  6830. test_he = test_rtn.substring(0,1);
  6831. // if(!utlf_isNull(test_he))
  6832. // {
  6833. // //----------------------
  6834. // if (test_he == "E") {
  6835. // iYPos = Number(sTopBank) + 185;
  6836. // iXPos = Number(sLeftBank) + Number(iWidth);
  6837. // sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  6838. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, oneChar); //용기명
  6839. // iWidth = iWidth + (Number(oneChar.length) * 18);
  6840. // } else {
  6841. // iYPos = Number(sTopBank) + 185;
  6842. // sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,30,30^FH^FD" + oneChar + "^FS^CI1"; // 검사코드리스트(한글)
  6843. // iWidth = iWidth + (Number(oneChar.length) * 20);
  6844. // }
  6845. // }
  6846. if(!utlf_isNull(test_he))
  6847. {
  6848. //----------------------
  6849. if (test_he == "E") {
  6850. iYPos = Number(sTopBank) + 190;
  6851. //sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS"; // 검사코드리스트명(영문)
  6852. sSndMsg += "^CFC30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS"; // 검사코드리스트명(영문)
  6853. iWidth = iWidth + (Number(oneChar.length) * 24);
  6854. } else {
  6855. iYPos = Number(sTopBank) + 190;
  6856. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,30,30^FH^FD" + oneChar + "^FS^CI1"; // 검사코드리스트(한글)
  6857. iWidth = iWidth + (Number(oneChar.length) * 28);
  6858. }
  6859. }
  6860. }
  6861. }
  6862. if(sBcno.substr(0, 1) == "E" && (!utlf_isNull(bedposcnts))){
  6863. iWidth = 0;
  6864. aStr = "";
  6865. aFlag = new Array();
  6866. iXPos = Number(sLeftBank) + 450;
  6867. aStr = lpzfGetHanGul(bedposcnts, aFlag); //구역배드
  6868. for (var iNo=0; iNo < aStr.length; iNo++) {
  6869. //----------------------
  6870. if (aFlag[iNo] == "E") {
  6871. iYPos = Number(sTopBank) + 160;
  6872. sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  6873. iWidth = iWidth + (Number(aStr[iNo].length) * 18);
  6874. } else {
  6875. iYPos = Number(sTopBank) + 160;
  6876. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  6877. sSndMsg += CommAX.HanImageData();
  6878. iWidth = iWidth + (Number(aStr[iNo].length) * 20);
  6879. }
  6880. }
  6881. }else{
  6882. iXPos = Number(sLeftBank) + 450;
  6883. iYPos = Number(sTopBank) + 160;
  6884. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  6885. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDeptroom); //진료과병실
  6886. }
  6887. iXPos = Number(sLeftBank) + 480;
  6888. //iYPos = Number(sTopBank) + 185;
  6889. iYPos = Number(sTopBank) + 190;
  6890. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  6891. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, prcphopedd); //처방희망 일시
  6892. //---------공여자 또는 리마크 때문에..2009.01.28.윤재한 수정
  6893. dnorNm = dnorNm + dSexage;
  6894. iWidth = 0;
  6895. aStr = "";
  6896. aFlag = new Array();
  6897. iXPos = Number(sLeftBank) + 20;
  6898. aStr = lpzfGetHanGul(dnorNm, aFlag); //공여자명은 한글, 리마크는 영문
  6899. if(!utlf_isNull(aStr))
  6900. {
  6901. for (var iNo=0; iNo < aStr.length; iNo++) {
  6902. //----------------------
  6903. if (aFlag[iNo] == "E") {
  6904. iYPos = Number(sTopBank) + 272;
  6905. sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // 검체표시명(영문)
  6906. iWidth = iWidth + (Number(aStr[iNo].length) * 18);
  6907. } else {
  6908. iYPos = Number(sTopBank) + 272;
  6909. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  6910. sSndMsg += CommAX.HanImageData();
  6911. iWidth = iWidth + (Number(aStr[iNo].length) * 20);
  6912. }
  6913. }
  6914. }
  6915. trace('print9 checkABO:'+checkABO+' / '+scrflag);
  6916. //if(sTclslblnmlist.substr(0, 3) == "ABO") {
  6917. if(checkABO) {
  6918. //외래채혈일때
  6919. if(scridPrint=="SMLLC00100" && scrflag){
  6920. keepspc = true;
  6921. }
  6922. //병동,환자별일때
  6923. else if((scridPrint=="SMLLC00200" || scridPrint=="SMLLC00300") && scrflag && checkAST){
  6924. keepspc = true;
  6925. }
  6926. }
  6927. //감염정보 특수문자 추가 20120402
  6928. if(!utlf_isNull(sInfcinfolist)){
  6929. sInfcinfolist = "*"+ sInfcinfolist +"*";
  6930. } else {
  6931. sInfcinfolist = "";
  6932. }
  6933. iXPos = Number(sLeftBank) + 20;
  6934. iYPos = Number(sTopBank) + 260;
  6935. //iYPos = Number(sTopBank) + 240;
  6936. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정 20120328
  6937. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sInfcinfolist);
  6938. trace('aaa '+prcpdelivefact);
  6939. if((!utlf_isNull(prcpdelivefact)) && ((prcpdelivefact.length) == 1)){
  6940. prcpdelivefact = prcpdelivefact.replace("-", ""); //Remark
  6941. }
  6942. if(utlf_isNull(prcpdelivefact)){
  6943. prcpdelivefact = "";
  6944. }
  6945. iWidth = 0;
  6946. iXPos = Number(sLeftBank) + 180;
  6947. if(!utlf_isNull(prcpdelivefact)) {
  6948. for (var j = 0; j < prcpdelivefact.length; j++) {
  6949. oneChar = prcpdelivefact.charAt(j);
  6950. test_rtn = "";
  6951. test_he = "";
  6952. test_rtn = lpzfGetHanGul3(oneChar);
  6953. test_he = test_rtn.substring(0,1);
  6954. if(!utlf_isNull(test_he))
  6955. {
  6956. //----------------------
  6957. if (test_he == "E") {
  6958. iYPos = Number(sTopBank) + 260;
  6959. //sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS"; // 검사코드리스트명(영문)
  6960. sSndMsg += "^CFC30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS"; // 검사코드리스트명(영문)
  6961. iWidth = iWidth + (Number(oneChar.length) * 24);
  6962. } else {
  6963. iYPos = Number(sTopBank) + 260;
  6964. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,30,30^FH^FD" + oneChar + "^FS^CI1"; // 검사코드리스트(한글)
  6965. iWidth = iWidth + (Number(oneChar.length) * 28);
  6966. }
  6967. }
  6968. }
  6969. }
  6970. //자동화일때 밑에 줄 끄어요~
  6971. if(sSecttsect.substr(0, 1) == "A"){
  6972. //검사계명
  6973. iXPos = Number(sLeftBank);
  6974. iYPos = Number(sTopBank) + 290;
  6975. sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 400, 10, 5);
  6976. }
  6977. sSndMsg += lzzfBP_EndFormat(bcollbarcdprntcnt);
  6978. CommAX.SendMsg(sSndMsg);
  6979. trace("sSndMsg == "+ sSndMsg);
  6980. // if(keepspc) {
  6981. // trace('aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa');
  6982. // fKeepBcnoPrint("B");
  6983. // }
  6984. }else if(sPrntKind == "11") { //zebra GX420
  6985. trace('print11 =='+sPrntKind);
  6986. for(i=0 ; i< ds_pRef.rowcount;i++){
  6987. var sSndMsg = "^XA^SEE:UHANGUL.DAT^FS^CWQ,E:kfont3.FNT^FS";
  6988. //trace('cnt '+ i+' / '+ds_pRef.rowcount);
  6989. var sTsectlblnm = utlf_transNullToEmpty(ds_pRef.getColumn(i,"tsectlblnm"));
  6990. var sBcno = ds_pRef.getColumn(i,"bcno");
  6991. var sBarcdprntdt = ds_pRef.getColumn(i,"barcdprntdt");
  6992. var sPatnm = ds_pRef.getColumn(i,"patnm");
  6993. var sPid = ds_pRef.getColumn(i,"pid");
  6994. var sSexage = ds_pRef.getColumn(i,"sexage");
  6995. var sDeptroom = ds_pRef.getColumn(i,"deptroom");
  6996. var sSpclblnm = ds_pRef.getColumn(i,"spclblnm");
  6997. var sTubelblnm = ds_pRef.getColumn(i,"tubelblnm");
  6998. var sSecttsect = ds_pRef.getColumn(i,"secttsect");
  6999. var sTclslblnmlist = ds_pRef.getColumn(i,"tclslblnmlist");
  7000. var sInfcinfolist = ds_pRef.getColumn(i,"infcinfolist");
  7001. var sErprcpflag = ds_pRef.getColumn(i,"erprcpflag");
  7002. //var barcdcntflag = ds_pRef.getColumn(i,"cntflag");
  7003. var bcollbarcdprntcnt = ds_pRef.getColumn(i,"bcollbarcdprntcnt");
  7004. var spcacptbarcdprntcnt = ds_pRef.getColumn(i,"spcacptbarcdprntcnt");
  7005. var microbarcdprntcnt = ds_pRef.getColumn(i,"microbarcdprntcnt");
  7006. var prcphopedd = ds_pRef.getColumn(i,"prcphopedd");
  7007. var bedposcnts = ds_pRef.getColumn(i,"bedposcnts");
  7008. //2.0추가 remark 출력 추가
  7009. var prcpdelivefact = ds_pRef.getColumn(i,"prcpdelivefact");
  7010. var sbcoll = "채혈자";
  7011. var keepspc = false;
  7012. var checkABO = "";
  7013. var checkAST = "";
  7014. var test_he;
  7015. var test_rtn;
  7016. if(!utlf_isNull(sTclslblnmlist)) {
  7017. checkABO = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "ABO");
  7018. checkAST = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "AST");
  7019. }
  7020. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  7021. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  7022. if (utlf_isNull(ds_pRef.getColumn(i,"dnornm"))){
  7023. var dnorNm = "";
  7024. var dSexage = "";
  7025. }else{
  7026. var dnorNm = ds_pRef.getColumn(i,"dnornm");
  7027. var dSexage = ds_pRef.getColumn(i,"dnorsexage");
  7028. }
  7029. if (utlf_isNull(ds_pRef.getColumn(i,"bedposcnts"))){
  7030. bedposcnts = "";
  7031. }
  7032. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  7033. if(sErprcpflag == "1" || sErprcpflag == "2" || sErprcpflag == "Y"){
  7034. //검사계명
  7035. iXPos = Number(sLeftBank);
  7036. iYPos = Number(sTopBank) + 1;
  7037. sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 15, 240, 10);
  7038. }
  7039. sTsectlblnm = sTsectlblnm.replace("▨", ",");
  7040. //---------
  7041. iWidth = 0;
  7042. aStr = "";
  7043. aFlag = new Array();
  7044. iXPos = Number(sLeftBank) + 15;
  7045. trace("sTsectlblnm =="+sTsectlblnm);
  7046. aStr = lpzfGetHanGul(sTsectlblnm, aFlag); ///부서
  7047. if(!utlf_isNull(aStr))
  7048. {
  7049. for (var iNo=0; iNo < aStr.length; iNo++) {
  7050. //----------------------
  7051. if (aFlag[iNo] == "E") {
  7052. iYPos = Number(sTopBank) + 2;
  7053. sSndMsg += "^CFF20,20^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  7054. iWidth = iWidth + (Number(aStr[iNo].length) * 12);
  7055. } else {
  7056. iYPos = Number(sTopBank) + 2;
  7057. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,20,20^FH^FD" + aStr[iNo] + "^FS^CI1"; //
  7058. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  7059. }
  7060. }
  7061. }else{
  7062. iXPos = Number(sLeftBank) + 15;
  7063. //iYPos = Number(sTopBank) + 135;
  7064. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  7065. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sTsectlblnm);
  7066. }
  7067. iXPos = Number(sLeftBank) + 130;
  7068. iYPos = Number(sTopBank) + 5;
  7069. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  7070. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBcno + "*"); //바코드번호
  7071. iXPos = Number(sLeftBank) + 275;
  7072. iYPos = Number(sTopBank) + 5;
  7073. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  7074. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  7075. iXPos = Number(sLeftBank) + 60;
  7076. iYPos = Number(sTopBank) + 26;
  7077. sSndMsg += lzzfBP_ChangeFont("F", 5, 5);
  7078. sSndMsg += lzzfBP_BarCode_Code39(iXPos, iYPos, "N", 100, "*" + sBcno + "*"); // 바코드
  7079. iWidth = 0;
  7080. aStr = "";
  7081. aFlag = new Array();
  7082. iXPos = Number(sLeftBank) + 170;
  7083. if(!utlf_isNull(sPatnm)){
  7084. sPatnm = sPatnm.substr(0, 20);
  7085. }
  7086. trace("sPatnm =="+sPatnm)
  7087. if(!utlf_isNull(sPatnm)) {
  7088. for (var j = 0; j < sPatnm.length; j++) {
  7089. oneChar = sPatnm.charAt(j);
  7090. test_rtn = "";
  7091. test_he = "";
  7092. test_rtn = lpzfGetHanGul3(oneChar);
  7093. test_he = test_rtn.substring(0,1);
  7094. //trace("test_rtn"+' / '+j+' / '+test_rtn);
  7095. if(!utlf_isNull(test_he))
  7096. {
  7097. //----------------------
  7098. if (test_he == "E") {
  7099. iYPos = Number(sTopBank) + 135;
  7100. sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS";
  7101. iWidth = iWidth + (Number(oneChar.length) * 14);
  7102. } else {
  7103. iYPos = Number(sTopBank) + 135;
  7104. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,30,30^FH^FD" + oneChar + "^FS^CI1"; // 검사코드리스트(한글)
  7105. iWidth = iWidth + (Number(oneChar.length) * 30);
  7106. }
  7107. }
  7108. }
  7109. }else{
  7110. iXPos = Number(sLeftBank) + 170;
  7111. iYPos = Number(sTopBank) + 135;
  7112. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  7113. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPatnm);
  7114. }
  7115. // aStr = lpzfGetHanGul(sPatnm, aFlag);
  7116. // if(!utlf_isNull(aStr))
  7117. // {
  7118. // for (var iNo=0; iNo < aStr.length; iNo++) {
  7119. //
  7120. // //----------------------
  7121. // if (aFlag[iNo] == "E") {
  7122. // iYPos = Number(sTopBank) + 135;
  7123. // sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  7124. // iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  7125. // } else {
  7126. // iYPos = Number(sTopBank) + 135;
  7127. // sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,30,30^FH^FD" + aStr[iNo] + "^FS^CI1";
  7128. // //sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,20,20^FH^FD" + aStr[iNo] + "^FS^CI1"; //20160818
  7129. // iWidth = iWidth + (Number(aStr[iNo].length) * 30);
  7130. // }
  7131. // }
  7132. // }else{
  7133. // iXPos = Number(sLeftBank) + 170;
  7134. // iYPos = Number(sTopBank) + 135;
  7135. // sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  7136. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPatnm);
  7137. // }
  7138. //trace("print start1");
  7139. //GX420 환자명 영문표시 안되는 것 유민규 110608
  7140. iXPos = Number(sLeftBank) + 20;
  7141. iYPos = Number(sTopBank) + 135;
  7142. sSndMsg += lzzfBP_ChangeFont("C", 14, 14); // 폰트 설정
  7143. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //환자등록번호
  7144. trace("bedposcnts =="+bedposcnts);
  7145. if ((!utlf_isNull(sBcno)) && (!utlf_isNull(sBcno)) ){
  7146. if(sBcno.substr(0, 1) == "E" && bedposcnts != ""){
  7147. iWidth = 0;
  7148. aStr = "";
  7149. aFlag = new Array();
  7150. iXPos = Number(sLeftBank) + 300;
  7151. aStr = lpzfGetHanGul(bedposcnts, aFlag); //구역배드
  7152. if(!utlf_isNull(aStr))
  7153. {
  7154. for (var iNo=0; iNo < aStr.length; iNo++) {
  7155. if (aFlag[iNo] == "E") {
  7156. iYPos = Number(sTopBank) + 135;
  7157. sSndMsg += "^CFF20,20^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // 구역배드명(영문)
  7158. iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  7159. } else {
  7160. iYPos = Number(sTopBank) + 135;
  7161. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,20,20^FH^FD" + aStr[iNo] + "^FS^CI1"; // 구역배드명(한글)
  7162. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  7163. }
  7164. }
  7165. }
  7166. }else{
  7167. iXPos = Number(sLeftBank) + 300;
  7168. iYPos = Number(sTopBank) + 135;
  7169. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  7170. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDeptroom); //진료과병실
  7171. }
  7172. }else{
  7173. iXPos = Number(sLeftBank) + 300;
  7174. iYPos = Number(sTopBank) + 135;
  7175. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  7176. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDeptroom); //진료과병실
  7177. }
  7178. //trace("print start2");
  7179. iXPos = Number(sLeftBank) + 20;
  7180. iYPos = Number(sTopBank) + 160;
  7181. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  7182. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sTubelblnm); //용기명
  7183. //iXPos = Number(sLeftBank) + 280;
  7184. iXPos = Number(sLeftBank) + 300;
  7185. iYPos = Number(sTopBank) + 160;
  7186. sSndMsg += lzzfBP_ChangeFont("C", 5, 5); // 폰트 설정
  7187. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, prcphopedd); //라벨발행일시
  7188. trace("sTclslblnmlist =="+sTclslblnmlist);
  7189. if(!utlf_isNull(sTclslblnmlist)) {
  7190. sTclslblnmlist = sTclslblnmlist.replace("▨", ","); //검사코드리스트
  7191. }else{
  7192. sTclslblnmlist = "";
  7193. }
  7194. //---------
  7195. iWidth = 0;
  7196. aStr = "";
  7197. aFlag = new Array();
  7198. iXPos = Number(sLeftBank) + 20;
  7199. //aStr = lpzfGetHanGul(sTclslblnmlist, aFlag);
  7200. aStr = "";
  7201. aFlag = new Array();
  7202. if(!utlf_isNull(sTclslblnmlist)) {
  7203. for (var j = 0; j < sTclslblnmlist.length; j++) {
  7204. oneChar = sTclslblnmlist.charAt(j);
  7205. test_rtn = "";
  7206. test_he = "";
  7207. test_rtn = lpzfGetHanGul3(oneChar);
  7208. test_he = test_rtn.substring(0,1);
  7209. if(!utlf_isNull(test_he))
  7210. {
  7211. //----------------------
  7212. if (test_he == "E") {
  7213. iYPos = Number(sTopBank) + 178;
  7214. sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS"; // 검사코드리스트명(영문)
  7215. //sSndMsg += "^CFF20,20^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS"; // 검사코드리스트명(영문)
  7216. iWidth = iWidth + (Number(oneChar.length) * 14);
  7217. } else {
  7218. iYPos = Number(sTopBank) + 178;
  7219. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,15,15^FH^FD" + oneChar + "^FS^CI1"; // 검사코드리스트(한글)
  7220. iWidth = iWidth + (Number(oneChar.length) * 24);
  7221. }
  7222. }
  7223. }
  7224. }
  7225. // if(!utlf_isNull(aStr))
  7226. // {
  7227. // for (var iNo=0; iNo < aStr.length; iNo++) {
  7228. //
  7229. // trace("aFlag =="+iNo+' / '+aFlag[iNo]);
  7230. // //----------------------
  7231. // if (aFlag[iNo] == "E") {
  7232. // iYPos = Number(sTopBank) + 178;
  7233. // sSndMsg += "^CFF20,20^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // 검사코드리스트명(영문)
  7234. // iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  7235. // } else {
  7236. // iYPos = Number(sTopBank) + 178;
  7237. // sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,10,10^FH^FD" + aStr[iNo] + "^FS^CI1"; // 검사코드리스트(한글)
  7238. // iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  7239. // }
  7240. // }
  7241. // }else{
  7242. //
  7243. // iXPos = Number(sLeftBank) + 20;
  7244. // iYPos = Number(sTopBank) + 178;
  7245. // sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  7246. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sTclslblnmlist); //검사코드리스트명
  7247. // }
  7248. //---------공여자 또는 리마크 때문에..2009.01.28.윤재한 수정
  7249. dnorNm = dnorNm + dSexage;
  7250. iWidth = 0;
  7251. aStr = "";
  7252. aFlag = new Array();
  7253. iXPos = Number(sLeftBank) + 20;
  7254. aStr = lpzfGetHanGul(dnorNm, aFlag); //공여자명은 한글, 리마크는 영문
  7255. if(!utlf_isNull(aStr))
  7256. {
  7257. for (var iNo=0; iNo < aStr.length; iNo++) {
  7258. //----------------------
  7259. if (aFlag[iNo] == "E") {
  7260. iYPos = Number(sTopBank) + 232;
  7261. sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // 공여자명(영문)
  7262. iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  7263. } else {
  7264. iYPos = Number(sTopBank) + 232;
  7265. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,30,30^FH^FD" + aStr[iNo] + "^FS^CI1"; // 공여자명(한글)
  7266. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  7267. }
  7268. }
  7269. }else{
  7270. iXPos = Number(sLeftBank) + 20;
  7271. iYPos = Number(sTopBank) + 232;
  7272. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  7273. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, dnorNm); //공여자명은 한글, 리마크는 영문
  7274. }
  7275. //trace("print start4");
  7276. //if(sTclslblnmlist.substr(0, 3) == "ABO") {
  7277. if(checkABO) {
  7278. //외래채혈일때
  7279. if(scridPrint=="SMLLC00100" && scrflag){
  7280. keepspc = true;
  7281. }
  7282. //병동,환자별일때
  7283. else if((scridPrint=="SMLLC00200" || scridPrint=="SMLLC00300") && scrflag && checkAST){
  7284. keepspc = true;
  7285. }
  7286. iXPos = Number(sLeftBank) + 110;
  7287. iYPos = Number(sTopBank) + 202;
  7288. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, "채혈자 : ", 1, 1);
  7289. sSndMsg += CommAX.HanImageData();
  7290. }
  7291. //감염정보 특수문자 추가 20120402
  7292. if(!utlf_isNull(sInfcinfolist)){
  7293. sInfcinfolist = "*"+ sInfcinfolist +"*";
  7294. } else {
  7295. sInfcinfolist = "";
  7296. }
  7297. //trace("print start5");
  7298. iXPos = Number(sLeftBank) + 20;
  7299. iYPos = Number(sTopBank) + 196;
  7300. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정 20120328
  7301. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sInfcinfolist); //계검사계
  7302. trace('bbbb '+prcpdelivefact);
  7303. if ((!utlf_isNull(prcpdelivefact)) && ((prcpdelivefact.length) == 1)){
  7304. prcpdelivefact = prcpdelivefact.replace("-", ""); //Remark
  7305. }
  7306. if(utlf_isNull(prcpdelivefact)){
  7307. prcpdelivefact = "";
  7308. }
  7309. iXPos = Number(sLeftBank) + 160;
  7310. // iYPos = Number(sTopBank) + 196;
  7311. if(!utlf_isNull(prcpdelivefact)) {
  7312. for (var j = 0; j < prcpdelivefact.length; j++) {
  7313. oneChar = prcpdelivefact.charAt(j);
  7314. test_rtn = "";
  7315. test_he = "";
  7316. test_rtn = lpzfGetHanGul3(oneChar);
  7317. test_he = test_rtn.substring(0,1);
  7318. if(!utlf_isNull(test_he))
  7319. {
  7320. //----------------------
  7321. if (test_he == "E") {
  7322. iYPos = Number(sTopBank) + 196;
  7323. sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS"; // 검사코드리스트명(영문)
  7324. //sSndMsg += "^CFF20,20^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS"; // 검사코드리스트명(영문)
  7325. iWidth = iWidth + (Number(oneChar.length) * 14);
  7326. } else {
  7327. iYPos = Number(sTopBank) + 196;
  7328. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,15,15^FH^FD" + oneChar + "^FS^CI1"; // 검사코드리스트(한글)
  7329. iWidth = iWidth + (Number(oneChar.length) * 24);
  7330. }
  7331. }
  7332. }
  7333. }
  7334. //자동화일때 밑에 줄 끄어요~
  7335. if ((!utlf_isNull(sSecttsect)) && (sSecttsect.substr(0, 1) == "A")){
  7336. //검사계명
  7337. iXPos = Number(sLeftBank);
  7338. iYPos = Number(sTopBank) + 260;
  7339. sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 400, 10, 5);
  7340. }
  7341. else{
  7342. }
  7343. sSndMsg += lzzfBP_EndFormat(bcollbarcdprntcnt);
  7344. CommAX.SendMsg(sSndMsg);
  7345. if(keepspc) {
  7346. fKeepBcnoPrint("B");
  7347. }
  7348. }//end for
  7349. }//end if(sPrntKind == "1")
  7350. else{
  7351. var sSndMsg = "";
  7352. var sTsectlblnm = utlf_transNullToEmpty(ds_pRef.getColumn(i,"tsectlblnm"));
  7353. var sBcno = ds_pRef.getColumn(i,"bcno");
  7354. var sBarcdprntdt = ds_pRef.getColumn(i,"barcdprntdt");
  7355. var sPatnm = ds_pRef.getColumn(i,"patnm");
  7356. var sPid = ds_pRef.getColumn(i,"pid");
  7357. var sSexage = ds_pRef.getColumn(i,"sexage");
  7358. var sDeptroom = ds_pRef.getColumn(i,"deptroom");
  7359. var sSpclblnm = ds_pRef.getColumn(i,"spclblnm");
  7360. var sTubelblnm = ds_pRef.getColumn(i,"tubelblnm");
  7361. var sSecttsect = ds_pRef.getColumn(i,"secttsect");
  7362. var sTclslblnmlist = ds_pRef.getColumn(i,"tclslblnmlist");
  7363. trace("ds_sTclslblnmlist == " + ds_pRef.getColumn(i,"tclslblnmlist"));
  7364. var sInfcinfolist = ds_pRef.getColumn(i,"infcinfolist");
  7365. var sErprcpflag = ds_pRef.getColumn(i,"erprcpflag");
  7366. var barcdcntflag = ds_pRef.getColumn(i,"cntflag");
  7367. var bcollbarcdprntcnt = ds_pRef.getColumn(i,"bcollbarcdprntcnt");
  7368. var spcacptbarcdprntcnt = ds_pRef.getColumn(i,"spcacptbarcdprntcnt");
  7369. var microbarcdprntcnt = ds_pRef.getColumn(i,"microbarcdprntcnt");
  7370. var sbcoll = "채혈자";
  7371. var keepspc = false;
  7372. var checkABO = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "ABO");
  7373. var checkAST = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "AST");
  7374. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  7375. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  7376. if (utlf_isNull(ds_pRef.getColumn(i,"dnornm"))){
  7377. var dnorNm = "";
  7378. var dSexage = "";
  7379. }else{
  7380. var dnorNm = ds_pRef.getColumn(i,"dnornm");
  7381. var dSexage = ds_pRef.getColumn(i,"dnorsexage");
  7382. }
  7383. sSndMsg = String.fromCharCode(27) +"A" + String.fromCharCode(27) +"A103500500"; // 시작위치 셋팅
  7384. if(sErprcpflag == "1" || sErprcpflag == "2" || sErprcpflag == "Y"){
  7385. //검사계명
  7386. iXPos = Number(sLeftBank);
  7387. iYPos = Number(sTopBank) + 1;
  7388. sSndMsg += String.fromCharCode(27) +"V" + iYPos + String.fromCharCode(27) +"H" + iXPos + String.fromCharCode(27) +"FW10V0220";
  7389. }
  7390. sTsectlblnm = sTsectlblnm.replace("▨", ",");
  7391. //---------
  7392. iWidth = 0;
  7393. aStr = "";
  7394. aFlag = new Array();
  7395. iXPos = Number(sLeftBank) + 15;
  7396. iYPos = Number(sTopBank) + 5;
  7397. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sTsectlblnm);
  7398. iXPos = Number(sLeftBank) + 140;
  7399. iYPos = Number(sTopBank) + 5;
  7400. sSndMsg += String.fromCharCode(27) +"V" + iYPos + String.fromCharCode(27) +"H" + iXPos + String.fromCharCode(27) +"S*" + sBcno + "*"; //바코드번호
  7401. iXPos = Number(sLeftBank) + 275;
  7402. iYPos = Number(sTopBank) + 5;
  7403. sSndMsg += String.fromCharCode(27) +"V" + iYPos + String.fromCharCode(27) +"H" + iXPos + String.fromCharCode(27) +"S" + sBarcdprntdt; //라벨발행일시
  7404. iXPos = Number(sLeftBank) + 60;
  7405. iYPos = Number(sTopBank) + 30;
  7406. sSndMsg += String.fromCharCode(27) +"V" + iYPos + String.fromCharCode(27) +"H" + iXPos + String.fromCharCode(27) +"BG02100" + sBcno; // 바코드
  7407. iXPos = Number(sLeftBank) + 20;
  7408. iYPos = Number(sTopBank) + 130;
  7409. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sPatnm.substr(0, 20));
  7410. iXPos = Number(sLeftBank) + 160;
  7411. iYPos = Number(sTopBank) + 135;
  7412. sSndMsg += String.fromCharCode(27) +"V" + iYPos + String.fromCharCode(27) +"H" + iXPos + String.fromCharCode(27) +"S" + sPid;//환자등록번호
  7413. iXPos = Number(sLeftBank) + 300;
  7414. iYPos = Number(sTopBank) + 135;
  7415. sSndMsg += String.fromCharCode(27) +"V" + iYPos + String.fromCharCode(27) +"H" + iXPos + String.fromCharCode(27) +"S" + sSexage;
  7416. iXPos = Number(sLeftBank) + 20;
  7417. iYPos = Number(sTopBank) + 160;
  7418. sSndMsg += String.fromCharCode(27) +"V" + iYPos + String.fromCharCode(27) +"H" + iXPos + String.fromCharCode(27) +"S" + sDeptroom; //진료과병실
  7419. iXPos = Number(sLeftBank) + 160;
  7420. iYPos = Number(sTopBank) + 160;
  7421. sSndMsg += String.fromCharCode(27) +"V" + iYPos + String.fromCharCode(27) +"H" + iXPos + String.fromCharCode(27) +"S" + sSpclblnm; //검체명
  7422. iXPos = Number(sLeftBank) + 260;
  7423. iYPos = Number(sTopBank) + 160;
  7424. sSndMsg += String.fromCharCode(27) +"V" + iYPos + String.fromCharCode(27) +"H" + iXPos + String.fromCharCode(27) +"S" + sTubelblnm; //용기명
  7425. iXPos = Number(sLeftBank) + 20;
  7426. iYPos = Number(sTopBank) + 180;
  7427. sSndMsg += String.fromCharCode(27) +"V" + iYPos + String.fromCharCode(27) +"H" + iXPos + String.fromCharCode(27) +"S" + sSecttsect; //계검사계
  7428. sTclslblnmlist = sTclslblnmlist.replace("▨", ",");
  7429. trace("sTclslblnmlist == " + sTclslblnmlist);
  7430. iXPos = Number(sLeftBank) + 70;
  7431. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sTclslblnmlist)
  7432. //---------공여자 또는 리마크 때문에..2009.01.28.윤재한 수정
  7433. dnorNm = dnorNm + dSexage;
  7434. CommAX.PrtImgOut(iXPos, iYPos, dnorNm); //공여자명은 한글, 리마크는 영문
  7435. //if(sTclslblnmlist.substr(0, 3) == "ABO") {
  7436. if(checkABO) {
  7437. //외래채혈일때
  7438. if(scridPrint=="SMLLC00100" && scrflag){
  7439. keepspc = true;
  7440. }
  7441. //병동,환자별일때
  7442. else if((scridPrint=="SMLLC00200" || scridPrint=="SMLLC00300") && scrflag && checkAST){
  7443. keepspc = true;
  7444. }
  7445. iXPos = Number(sLeftBank) + 160;
  7446. iYPos = Number(sTopBank) + 180;
  7447. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, "채혈자:");
  7448. }
  7449. iXPos = Number(sLeftBank) + 20;
  7450. iYPos = Number(sTopBank) + 202;
  7451. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sInfcinfolist); //감염정보
  7452. //자동화일때 밑에 줄 끄어요~
  7453. if(sSecttsect.substr(0, 1) == "A"){
  7454. //검사계명
  7455. iXPos = Number(sLeftBank);
  7456. iYPos = Number(sTopBank) + 260;
  7457. sSndMsg += String.fromCharCode(27) +"V" + "220" + String.fromCharCode(27) +"H" + "0" + String.fromCharCode(27) +"FW10H0350";
  7458. }
  7459. if(barcdcntflag == "acpt" ){
  7460. sSndMsg += String.fromCharCode(27) +"Q" + spcacptbarcdprntcnt + String.fromCharCode(27) +"Z";
  7461. CommAX.SendMsg(sSndMsg);
  7462. }else{
  7463. sSndMsg += String.fromCharCode(27) + "Q" + bcollbarcdprntcnt + String.fromCharCode(27) +"Z";
  7464. CommAX.SendMsg(sSndMsg);
  7465. }
  7466. if(keepspc) {
  7467. fKeepBcnoPrint("B");
  7468. }
  7469. }
  7470. }//end for
  7471. }
  7472. } catch(ee) {
  7473. sysf_messageBox("바코드출력에", "E009");
  7474. sysf_catchTrace(ee);
  7475. return;
  7476. }
  7477. }
  7478. /**
  7479. * @group :
  7480. * @ver : 2008.07.03
  7481. * @by : 윤재한
  7482. * @---------------------------------------------------
  7483. * @type : function
  7484. * @access : public
  7485. * @desc : 보관검체 출력
  7486. * @param : ref - 보관검체 인스턴스
  7487. * count - 진검바코드 갯수
  7488. * @return :
  7489. * @---------------------------------------------------
  7490. * 채혈화면에서 보관검체출력시 TRLLC80101
  7491. * 혈액은행 보관검체 등록시 TXLBT10902
  7492. */
  7493. function fKeLabel(objDsRef, count){
  7494. var barcdRef = "ds_data_setupinfo";
  7495. var sPrntKind = ds_data_setupinfo.getColumn(0, "prntkind");
  7496. var portOpenCheck = "";
  7497. var LCount = 0;
  7498. var iXPos = 0;
  7499. var iYPos = 0;
  7500. if( utlf_isNull(count) ){
  7501. LCount = 0;
  7502. }else{
  7503. LCount = count;
  7504. }
  7505. var sSndMsg = "";
  7506. if (sPrntKind == 0) return;
  7507. var sCommKind = ds_data_setupinfo.getColumn(0, "commkind");
  7508. var sLeftBank = ds_data_blank.getColumn(0, "left");
  7509. var sTopBank = ds_data_blank.getColumn(0, "top");
  7510. if(sCommKind == "01") {
  7511. var sSetUpVal = ds_data_comm01.getColumn(0, "setupval");
  7512. } else if(sCommKind == "02") {
  7513. var sComm = ds_data_comm02.getColumn(0, "comm");
  7514. var sDataBit = ds_data_comm02.getColumn(0, "databit");
  7515. var sStopBit = ds_data_comm02.getColumn(0, "stopbit");
  7516. var sBaudRate = ds_data_comm02.getColumn(0, "baudrate");
  7517. var sParity = ds_data_comm02.getColumn(0, "parity");
  7518. CommAX.CommPort = sComm;
  7519. CommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  7520. portOpenCheck = CommAX.PortOpen("true");
  7521. } else if(sCommKind == "03") {
  7522. var sSetUpVal = ds_data_comm03.getColumn(0, "setupval");
  7523. var sEqmtCD = ds_data_comm03.getColumn(0, "eqmtcd");
  7524. }
  7525. if( (portOpenCheck == "TRUE" && sCommKind == "02")
  7526. || sCommKind == "01"
  7527. || sCommKind == "03"){
  7528. var sStr = "보관검체";
  7529. var sRoomcd = objDsRef.getColumn(0, "roomcd");
  7530. var sPid = objDsRef.getColumn(0, "pid");
  7531. var sPatnm = objDsRef.getColumn(0, "patnm");
  7532. var sPatsex = objDsRef.getColumn(0, "patsex");
  7533. var sPatage = objDsRef.getColumn(0, "patage");
  7534. var sPatsexage = sPatsex + "/" + sPatage;
  7535. var sOrddeptNm= objDsRef.getColumn(0, "orddeptnm").substring(0,2);
  7536. var sBtype = objDsRef.getColumn(0, "btype");
  7537. var sInfcinfolist = objDsRef.getColumn(0, "infcinfolist"); //감염정보 추가 20120503
  7538. var sBcollNm = "채혈자:" ;//+ model.getvalue(ref +"/bcollnm");
  7539. var sDt = objDsRef.getColumn(0, "dt");
  7540. var sPidW = 85;
  7541. var sBarcodeW = 120; // 110였음
  7542. var sBtypeW = 10;
  7543. var sBGGCno = objDsRef.getColumn(0, "bggc");
  7544. if( !utlf_isNull(sInfcinfolist) ){
  7545. sInfcinfolist = "*"+ sInfcinfolist +"*";
  7546. }
  7547. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  7548. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  7549. if(sPid.length == 10){
  7550. sBarcodeW = 90;// 90이었음
  7551. sBtypeW = 10;
  7552. }
  7553. if(sPrntKind == "1") { //zebra
  7554. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  7555. iXPos = Number(sLeftBank);
  7556. iYPos = Number(sTopBank);
  7557. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sStr, 1, 1);
  7558. sSndMsg += CommAX.HanImageData();
  7559. iXPos = Number(sLeftBank) + 180;
  7560. iYPos = Number(sTopBank) + 8;
  7561. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  7562. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sRoomcd);
  7563. iXPos = Number(sLeftBank) + 260;
  7564. iYPos = Number(sTopBank) + 8;
  7565. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  7566. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPatsexage);
  7567. if(sCommKind == "01") {
  7568. CommAX.SendMessageToLPT(sSndMsg);
  7569. sSndMsg = "";
  7570. } else if(sCommKind == "02") {
  7571. CommAX.SendMessage(sSndMsg);
  7572. sSndMsg = "";
  7573. }
  7574. iXPos = Number(sLeftBank) + 10;
  7575. iYPos = Number(sTopBank) + 25;
  7576. //sSndMsg += lzzfBP_ChangeFont("C", 10, 14); // 폰트 설정
  7577. //sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid);
  7578. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm, 1.6, 1.6);
  7579. sSndMsg += CommAX.HanImageData();
  7580. if(sCommKind == "01") {
  7581. CommAX.SendMessageToLPT(sSndMsg);
  7582. sSndMsg = "";
  7583. } else if(sCommKind == "02") {
  7584. CommAX.SendMessage(sSndMsg);
  7585. sSndMsg = "";
  7586. }
  7587. iXPos = Number(sLeftBank) + 190;
  7588. iYPos = Number(sTopBank) + 30;
  7589. //sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm, 1, 1);
  7590. //sSndMsg += CommAX.HanImageData();
  7591. //sSndMsg += lzzfBP_ChangeFont("C", 10, 14); // 폰트 설정
  7592. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  7593. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid);
  7594. if(sCommKind == "01") {
  7595. CommAX.SendMessageToLPT(sSndMsg);
  7596. sSndMsg = "";
  7597. } else if(sCommKind == "02") {
  7598. CommAX.SendMessage(sSndMsg);
  7599. sSndMsg = "";
  7600. }
  7601. iXPos = Number(sLeftBank) + sBtypeW;
  7602. iYPos = Number(sTopBank) + 110; // 75 였음
  7603. sSndMsg += lzzfBP_ChangeFont("C", 85, 20); // 폰트 설정
  7604. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBtype); // 혈액형
  7605. iXPos = Number(sLeftBank);
  7606. iYPos = Number(sTopBank) + 75; // 160 였음
  7607. if( !utlf_isNull(sBGGCno) ){ // 2009-03-07 정은 수정
  7608. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  7609. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBGGCno); // 보관검체
  7610. }
  7611. if(sCommKind == "01") {
  7612. CommAX.SendMessageToLPT(sSndMsg);
  7613. sSndMsg = "";
  7614. } else if(sCommKind == "02") {
  7615. CommAX.SendMessage(sSndMsg);
  7616. sSndMsg = "";
  7617. }
  7618. iXPos = Number(sLeftBank) + sBarcodeW;
  7619. iYPos = Number(sTopBank) + 75;
  7620. sSndMsg += lzzfBP_FiendOrigin(iXPos, iYPos);//위치
  7621. sSndMsg += "^BY2,2.0"; //
  7622. sSndMsg += "^B3" + "N" + ",N," + "85" + ",N,N^FD" + "*" + sPid + "*" + "^FS";//바코드 크기
  7623. if(sCommKind == "01") {
  7624. CommAX.SendMessageToLPT(sSndMsg);
  7625. sSndMsg = "";
  7626. } else if(sCommKind == "02") {
  7627. CommAX.SendMessage(sSndMsg);
  7628. sSndMsg = "";
  7629. }
  7630. iXPos = Number(sLeftBank) + 180;
  7631. iYPos = Number(sTopBank) + 170;
  7632. sSndMsg += lzzfBP_ChangeFont("C", 5, 5); // 폰트 설정
  7633. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*"+sPid+"*");
  7634. if(sCommKind == "01") {
  7635. CommAX.SendMessageToLPT(sSndMsg);
  7636. sSndMsg = "";
  7637. } else if(sCommKind == "02") {
  7638. CommAX.SendMessage(sSndMsg);
  7639. sSndMsg = "";
  7640. }
  7641. iXPos = Number(sLeftBank) + 10;
  7642. iYPos = Number(sTopBank) + 200;
  7643. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  7644. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDt);
  7645. if(sCommKind == "01") {
  7646. CommAX.SendMessageToLPT(sSndMsg);
  7647. sSndMsg = "";
  7648. } else if(sCommKind == "02") {
  7649. CommAX.SendMessage(sSndMsg);
  7650. sSndMsg = "";
  7651. }
  7652. iXPos = Number(sLeftBank) + 220;
  7653. iYPos = Number(sTopBank) + 190;
  7654. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sBcollNm, 1, 1);
  7655. sSndMsg += CommAX.HanImageData();
  7656. sSndMsg += lzzfBP_EndFormat();
  7657. if(sCommKind == "01") {
  7658. CommAX.SendMessageToLPT(sSndMsg);
  7659. } else if(sCommKind == "02") {
  7660. CommAX.SendMessage(sSndMsg);
  7661. }
  7662. //출력할 진검 바코드가 없을시에만 port close
  7663. if(portOpenCheck == "TRUE" && sCommKind == "02" && LCount == 0){
  7664. CommAX.PortOpen("false");
  7665. }
  7666. } else if(sPrntKind == "3") { //Auto Label(Ginus)
  7667. if(LCount == 0) {//출력할 진검 바코드가 없을시에만 환자정보
  7668. sSndMsg += "^^^P"; //환자정보 시작
  7669. //환자번호, 환자이름, 성별, 나이
  7670. sSndMsg += "^PI" + sPid + "^PN" + sPatnm + "^PS" + sPatsex + "^PA" + sPatage;
  7671. //장비번호 선택
  7672. sSndMsg += "^PB" + sEqmtCD;
  7673. sSndMsg += "^^^_P"; //환자정보 종료
  7674. sSndMsg += "^^^S"; //채혈정보 시작
  7675. }
  7676. sSndMsg += "^SS"; //data 시작
  7677. //바코드번호(등록번호), S:보관검체, 진료과, 병실
  7678. sSndMsg += "^SA" + sPid + "^SBS" + "^SC" + sOrddeptNm + "^SD" + sRoomcd;
  7679. //용기코드(보관검체용으로 고정), 바코드출력일시, 혈액형
  7680. sSndMsg += "^SEAB" + "^SI" + sDt + "^S1" + sBtype;
  7681. sSndMsg += "^_SS"; //data 종료
  7682. if(LCount != 0) { //진검바코드가 있을경우 진검바코드내용 + 보관검체내용
  7683. ds_hidden.setColumn(0, "sendmessage", ds_hidden.getColumn(0, "sendmessage") + sSndMsg);
  7684. }
  7685. if(LCount == 0) {//출력할 진검 바코드가 없을시에만 전송
  7686. sSndMsg += "^^^_S"; //채혈정보 종료
  7687. var sReturnValue = AutoLabel.TRANSDATA(0, sSetUpVal, sSndMsg); //전송
  7688. }
  7689. } //end else if(sPrntKind == "3")
  7690. else if(sPrntKind == "4") { //Auto Label(Robo)
  7691. }
  7692. else if(sPrntKind == "9") { //Zebra 300dpi
  7693. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  7694. iXPos = Number(sLeftBank);
  7695. iYPos = Number(sTopBank);
  7696. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sStr, 1, 1);
  7697. sSndMsg += CommAX.HanImageData();
  7698. iXPos = Number(sLeftBank) + 180;
  7699. iYPos = Number(sTopBank) + 8;
  7700. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  7701. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sRoomcd);
  7702. iXPos = Number(sLeftBank) + 360;
  7703. iYPos = Number(sTopBank) + 8;
  7704. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  7705. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPatsexage);
  7706. if(sCommKind == "01") {
  7707. CommAX.SendMessageToLPT(sSndMsg);
  7708. sSndMsg = "";
  7709. } else if(sCommKind == "02") {
  7710. CommAX.SendMessage(sSndMsg);
  7711. sSndMsg = "";
  7712. }
  7713. iXPos = Number(sLeftBank) + 10;
  7714. iYPos = Number(sTopBank) + 25;
  7715. //sSndMsg += lzzfBP_ChangeFont("C", 10, 14); // 폰트 설정
  7716. //sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid);
  7717. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm, 1.6, 1.6);
  7718. sSndMsg += CommAX.HanImageData();
  7719. if(sCommKind == "01") {
  7720. CommAX.SendMessageToLPT(sSndMsg);
  7721. sSndMsg = "";
  7722. } else if(sCommKind == "02") {
  7723. CommAX.SendMessage(sSndMsg);
  7724. sSndMsg = "";
  7725. }
  7726. iXPos = Number(sLeftBank) + 190;
  7727. iYPos = Number(sTopBank) + 30;
  7728. //sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm, 1, 1);
  7729. //sSndMsg += CommAX.HanImageData();
  7730. //sSndMsg += lzzfBP_ChangeFont("C", 10, 14); // 폰트 설정
  7731. sSndMsg += lzzfBP_ChangeFont("C", 40, 30); // 폰트 설정
  7732. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid);
  7733. if(sCommKind == "01") {
  7734. CommAX.SendMessageToLPT(sSndMsg);
  7735. sSndMsg = "";
  7736. } else if(sCommKind == "02") {
  7737. CommAX.SendMessage(sSndMsg);
  7738. sSndMsg = "";
  7739. }
  7740. iXPos = Number(sLeftBank) + sBtypeW;
  7741. iYPos = Number(sTopBank) + 120; // 75 였음
  7742. sSndMsg += lzzfBP_ChangeFont("C", 95, 40); // 폰트 설정
  7743. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBtype); // 혈액형
  7744. iXPos = Number(sLeftBank);
  7745. iYPos = Number(sTopBank) + 75; // 160 였음
  7746. if( !utlf_isNull(sBGGCno) ){ // 2009-03-07 정은 수정
  7747. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  7748. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBGGCno); // 보관검체
  7749. }
  7750. if(sCommKind == "01") {
  7751. CommAX.SendMessageToLPT(sSndMsg);
  7752. sSndMsg = "";
  7753. } else if(sCommKind == "02") {
  7754. CommAX.SendMessage(sSndMsg);
  7755. sSndMsg = "";
  7756. }
  7757. iXPos = Number(sLeftBank) + sBarcodeW;
  7758. iYPos = Number(sTopBank) + 75;
  7759. sSndMsg += lzzfBP_FiendOrigin(iXPos, iYPos);//위치
  7760. sSndMsg += "^BY3,2.4,130"; //
  7761. sSndMsg += "^B3" + "N" + ",N," + "125" + ",N,N^FD" + "*" + sPid + "*" + "^FS";//바코드 크기
  7762. if(sCommKind == "01") {
  7763. CommAX.SendMessageToLPT(sSndMsg);
  7764. sSndMsg = "";
  7765. } else if(sCommKind == "02") {
  7766. CommAX.SendMessage(sSndMsg);
  7767. sSndMsg = "";
  7768. }
  7769. iXPos = Number(sLeftBank) + 200;
  7770. iYPos = Number(sTopBank) + 215;
  7771. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  7772. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*"+sPid+"*");
  7773. if(sCommKind == "01") {
  7774. CommAX.SendMessageToLPT(sSndMsg);
  7775. sSndMsg = "";
  7776. } else if(sCommKind == "02") {
  7777. CommAX.SendMessage(sSndMsg);
  7778. sSndMsg = "";
  7779. }
  7780. iXPos = Number(sLeftBank) + 10;
  7781. iYPos = Number(sTopBank) + 240;
  7782. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  7783. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDt);
  7784. if(sCommKind == "01") {
  7785. CommAX.SendMessageToLPT(sSndMsg);
  7786. sSndMsg = "";
  7787. } else if(sCommKind == "02") {
  7788. CommAX.SendMessage(sSndMsg);
  7789. sSndMsg = "";
  7790. }
  7791. iXPos = Number(sLeftBank) + 20;
  7792. iYPos = Number(sTopBank) + 260;
  7793. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sBcollNm, 1, 1);
  7794. sSndMsg += CommAX.HanImageData();
  7795. iXPos = Number(sLeftBank) + 250;
  7796. iYPos = Number(sTopBank) + 260;
  7797. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, "채혈일자 : ", 1, 1);
  7798. sSndMsg += CommAX.HanImageData();
  7799. sSndMsg += lzzfBP_EndFormat();
  7800. if(sCommKind == "01") {
  7801. CommAX.SendMessageToLPT(sSndMsg);
  7802. } else if(sCommKind == "02") {
  7803. CommAX.SendMessage(sSndMsg);
  7804. }
  7805. //출력할 진검 바코드가 없을시에만 port close
  7806. if(portOpenCheck == "TRUE" && sCommKind == "02" && LCount == 0){
  7807. CommAX.PortOpen("false");
  7808. }
  7809. }
  7810. }else if(portOpenCheck == "TRUE" && sCommKind == "02"){
  7811. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  7812. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  7813. + " \n 2.케이블 확인"
  7814. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  7815. return;
  7816. }
  7817. }
  7818. /**
  7819. * @group :
  7820. * @ver : 2008.07.03
  7821. * @by : 윤재한
  7822. * @---------------------------------------------------
  7823. * @type : function
  7824. * @access : public
  7825. * @desc : 보관검체 출력
  7826. * @param : ref - 보관검체 인스턴스
  7827. * count - 진검바코드 갯수
  7828. * @return :
  7829. * @---------------------------------------------------
  7830. * 채혈화면에서 보관검체출력시 TRLLC80101
  7831. * 혈액은행 보관검체 등록시 TXLBT10902
  7832. */
  7833. function fKeLabel2(ds_pRef:Dataset, count,sds_data_path){
  7834. if( utlf_isNull(sds_data_path) ){
  7835. sds_data_path = "";
  7836. }
  7837. var sPrntKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"prntkind");
  7838. var portOpenCheck = "";
  7839. var LCount = 0;
  7840. var iXPos = 0;
  7841. var iYPos = 0;
  7842. if( utlf_isNull(count) ){
  7843. LCount = 0;
  7844. }else{
  7845. LCount = count;
  7846. }
  7847. var sSndMsg = "";
  7848. if (sPrntKind == 0) return;
  7849. if(ds_pRef.rowcount < 1) return;
  7850. var sCommKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"commkind");
  7851. var sLeftBank = objects[sds_data_path + "ds_data_blank"].getColumn(0,"left");
  7852. var sTopBank = objects[sds_data_path + "ds_data_blank"].getColumn(0,"top");
  7853. if(sPrntKind == "10"){
  7854. var sStr = "보관검체";
  7855. var sRoomcd = ds_pRef.getColumn(0, "roomcd");
  7856. var sPid = ds_pRef.getColumn(0, "pid");
  7857. var sPatnm = ds_pRef.getColumn(0, "patnm");
  7858. var sPatsex = ds_pRef.getColumn(0, "patsex");
  7859. var sPatage = ds_pRef.getColumn(0, "patage");
  7860. var sPatsexage = sPatsex + "/" + sPatage;
  7861. var sOrddeptNm= ds_pRef.getColumn(0, "orddeptnm").substring(0,2);
  7862. var sBtype = ds_pRef.getColumn(0, "btype");
  7863. var sInfcinfolist = ds_pRef.getColumn(0, "infcinfolist"); //감염정보 추가 20120503
  7864. var sBcollNm = "채혈자:" ;//+ model.getvalue(ref +"/bcollnm");
  7865. var sDt = ds_pRef.getColumn(0, "dt");
  7866. var sPidW = 85;
  7867. var sBarcodeW = 120; // 110였음
  7868. var sBtypeW = 10;
  7869. var sBGGCno = ds_pRef.getColumn(0, "bggc");
  7870. if( !utlf_isNull(sInfcinfolist) ){
  7871. sInfcinfolist = "*"+ sInfcinfolist +"*";
  7872. }
  7873. //sSndMsg = "^@" + "\n";
  7874. //sSndMsg = "^default" + "\n";
  7875. sSndMsg += "N" + "\n";
  7876. sSndMsg += "JF" + "\n";
  7877. sSndMsg += "D9" + "\n";
  7878. sSndMsg += "S2" + "\n";
  7879. sSndMsg += "Q223,27" + "\n";
  7880. sSndMsg += "q456" + "\n";
  7881. iXPos = Number(sLeftBank);
  7882. iYPos = Number(sTopBank);
  7883. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,1,1,N," + "\"" + sStr + "\""+ "\n";
  7884. //iXPos = Number(sLeftBank) + 140;
  7885. //iYPos = Number(sTopBank) + 5;
  7886. //sSndMsg += "A" + iXPos + "," + iYPos + ",0,2,1,1,N," + "\"" + "*" + sBcno + "*" + "\""+ "\n";
  7887. iXPos = Number(sLeftBank) + 300;
  7888. iYPos = Number(sTopBank);
  7889. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + "Serum" + "\""+ "\n";
  7890. iXPos = Number(sLeftBank) + 25;
  7891. iYPos = Number(sTopBank) + 28;
  7892. sSndMsg += "B" + iXPos + "," + iYPos + ",0,3,2,5,93,N," + "\"" + sPid + "\""+ "\n";
  7893. iXPos = Number(sLeftBank) + 300;
  7894. iYPos = Number(sTopBank) + 35;
  7895. sSndMsg += "A" + iXPos + "," + iYPos + ",0,5,1,1,N," + "\"" + sBtype + "\""+ "\n";
  7896. iXPos = Number(sLeftBank);
  7897. iYPos = Number(sTopBank) + 124;
  7898. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + sPid + "\""+ "\n";
  7899. iXPos = Number(sLeftBank) + 120;
  7900. iYPos = Number(sTopBank) + 120;
  7901. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,1,1,N," + "\"" + sPatnm + "\""+ "\n";
  7902. iXPos = Number(sLeftBank) + 220;
  7903. iYPos = Number(sTopBank) + 120;
  7904. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,1,1,N," + "\"" + "채혈일시:" + "\""+ "\n";
  7905. iXPos = Number(sLeftBank) + 330;
  7906. iYPos = Number(sTopBank) + 125;
  7907. sSndMsg += "A" + iXPos + "," + iYPos + ",0,1,1,1,N," + "\"" + sDt.substr(5) + "\""+ "\n";
  7908. iXPos = Number(sLeftBank);
  7909. iYPos = Number(sTopBank) + 145;
  7910. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + "Plain 6ml" + "\""+ "\n";
  7911. iXPos = Number(sLeftBank);
  7912. iYPos = Number(sTopBank) + 165;
  7913. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,1,1,N," + "\"" + "검체채취일시:" + "\""+ "\n";
  7914. //감염정보 추가 20120503
  7915. iXPos = Number(sLeftBank) + 390;
  7916. iYPos = Number(sTopBank) + 165;
  7917. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + sInfcinfolist + "\""+ "\n";
  7918. iXPos = Number(sLeftBank);
  7919. iYPos = Number(sTopBank) + 190;
  7920. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,1,1,N," + "\"" + "채혈자:" + "\""+ "\n";
  7921. iXPos = Number(sLeftBank) + 200;
  7922. iYPos = Number(sTopBank) + 190;
  7923. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,1,1,N," + "\"" + "확인자:" + "\""+ "\n";
  7924. sSndMsg += "P1"+ "\n";
  7925. CommAX.SendMsg(sSndMsg);
  7926. }else if(sPrntKind == "11"){
  7927. sSndMsg = "^XA^SEE:UHANGUL.DAT^FS^CWQ,E:kfont3.FNT^FS";
  7928. var sStr = "보관검체";
  7929. var sRoomcd = ds_pRef.getColumn(0, "roomcd");
  7930. var sPid = ds_pRef.getColumn(0, "pid");
  7931. var sPatnm = ds_pRef.getColumn(0, "patnm");
  7932. var sPatsex = ds_pRef.getColumn(0, "patsex");
  7933. var sPatage = ds_pRef.getColumn(0, "patage");
  7934. var sPatsexage = sPatsex + "/" + sPatage;
  7935. var sOrddeptNm= ds_pRef.getColumn(0, "orddeptnm").substring(0,2);
  7936. var sBtype = ds_pRef.getColumn(0, "btype");
  7937. var sInfcinfolist = ds_pRef.getColumn(0, "infcinfolist"); //감염정보 추가 20120503
  7938. var sBcollNm = "채혈자:" ;//+ model.getvalue(ref +"/bcollnm");
  7939. var sDt = ds_pRef.getColumn(0, "dt");
  7940. var sPidW = 85;
  7941. var sBarcodeW = 120; // 110였음
  7942. var sBtypeW = 10;
  7943. var sBGGCno = "";
  7944. if( !utlf_isNull(ds_pRef.getColumnInfo("bggc")) ){
  7945. sBGGCno = ds_pRef.getColumn(0, "bggc");
  7946. }
  7947. if( !utlf_isNull(sInfcinfolist) ){
  7948. sInfcinfolist = "*"+ sInfcinfolist +"*";
  7949. }
  7950. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  7951. iXPos = Number(sLeftBank) + 240;
  7952. iYPos = Number(sTopBank) + 5;
  7953. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  7954. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "Serum");
  7955. iXPos = Number(sLeftBank);
  7956. iYPos = Number(sTopBank);
  7957. sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,25,25^FH^FD" + sStr + "^FS^CI1";
  7958. iXPos = Number(sLeftBank) + 10;
  7959. iYPos = Number(sTopBank) + 25;
  7960. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  7961. sSndMsg += lzzfBP_BarCode_Code39(iXPos, iYPos, "N", 85, "*" + sPid + "*"); // 바코드
  7962. iXPos = Number(sLeftBank) + 5;
  7963. iYPos = Number(sTopBank) + 115;
  7964. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  7965. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid);
  7966. iXPos = Number(sLeftBank) + 110;
  7967. iYPos = Number(sTopBank) + 115;
  7968. sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,25,25^FH^FD" + sPatnm + "^FS^CI1";
  7969. iXPos = Number(sLeftBank) + 205;
  7970. iYPos = Number(sTopBank) + 115;
  7971. sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,15,15^FH^FD" + "채혈일시:" + "^FS^CI1";
  7972. iXPos = Number(sLeftBank) + 310;
  7973. iYPos = Number(sTopBank) + 35; // 75 였음
  7974. sSndMsg += lzzfBP_ChangeFont("C", 70, 30); // 폰트 설정
  7975. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBtype); // 혈액형
  7976. iXPos = Number(sLeftBank) + 275;
  7977. iYPos = Number(sTopBank) + 115;
  7978. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  7979. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDt.substr(5));
  7980. iXPos = Number(sLeftBank) + 5;
  7981. iYPos = Number(sTopBank) + 135;
  7982. sSndMsg += lzzfBP_ChangeFont("C",10, 10); // 폰트 설정
  7983. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "Plain 6ml");
  7984. //iXPos = Number(sLeftBank) + 190;
  7985. //iYPos = Number(sTopBank) + 190;
  7986. //sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sBcollNm, 1, 1);
  7987. //sSndMsg += CommAX.HanImageData();
  7988. iXPos = Number(sLeftBank) + 200;
  7989. iYPos = Number(sTopBank) + 135;
  7990. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  7991. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sRoomcd);
  7992. iXPos = Number(sLeftBank) + 2;
  7993. iYPos = Number(sTopBank) + 160;
  7994. sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,20,20^FH^FD" + "검체채취일시:" + "^FS^CI1";
  7995. //감염정보 추가 20120503
  7996. iXPos = Number(sLeftBank) + 345;
  7997. iYPos = Number(sTopBank) + 160;
  7998. sSndMsg += lzzfBP_ChangeFont("C",20, 20); // 폰트 설정
  7999. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sInfcinfolist );
  8000. iXPos = Number(sLeftBank) + 2;
  8001. iYPos = Number(sTopBank) + 185;
  8002. sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,20,20^FH^FD" + "채혈자:" + "^FS^CI1";
  8003. iXPos = Number(sLeftBank) + 200;
  8004. iYPos = Number(sTopBank) + 185;
  8005. sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,20,20^FH^FD" + "확인자:" + "^FS^CI1";
  8006. sSndMsg += "^XZ"
  8007. CommAX.SendMsg(sSndMsg);
  8008. }else if(sPrntKind == "9"){
  8009. sSndMsg = "^XA^SEE:UHANGUL.DAT^FS^CWQ,E:kfont3.FNT^FS";
  8010. var sStr = "보관검체";
  8011. var sRoomcd = ds_pRef.getColumn(0, "roomcd");
  8012. var sPid = ds_pRef.getColumn(0, "pid");
  8013. var sPatnm = ds_pRef.getColumn(0, "patnm");
  8014. var sPatsex = ds_pRef.getColumn(0, "patsex");
  8015. var sPatage = ds_pRef.getColumn(0, "patage");
  8016. var sPatsexage = sPatsex + "/" + sPatage;
  8017. var sOrddeptNm= ds_pRef.getColumn(0, "orddeptnm").substring(0,2);
  8018. var sBtype = ds_pRef.getColumn(0, "btype");
  8019. var sInfcinfolist = ds_pRef.getColumn(0, "infcinfolist"); //감염정보 추가 20120503
  8020. var sBcollNm = "채혈자:" ;//+ model.getvalue(ref +"/bcollnm");
  8021. var sDt = ds_pRef.getColumn(0, "dt");
  8022. var sPidW = 85;
  8023. var sBarcodeW = 120; // 110였음
  8024. var sBtypeW = 10;
  8025. var sBGGCno = ds_pRef.getColumn(0, "bggc");
  8026. // trace("sPatnm :"+sPatnm);
  8027. if( !utlf_isNull(sInfcinfolist) ){
  8028. sInfcinfolist = "*"+ sInfcinfolist +"*";
  8029. }
  8030. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  8031. iXPos = Number(sLeftBank) + 400;
  8032. iYPos = Number(sTopBank) + 5;
  8033. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  8034. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "Serum");
  8035. iXPos = Number(sLeftBank);
  8036. iYPos = Number(sTopBank);
  8037. sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,40,40^FH^FD" + sStr + "^FS^CI1";
  8038. iXPos = Number(sLeftBank) + 20;
  8039. iYPos = Number(sTopBank) + 40;
  8040. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  8041. sSndMsg += lzzfBP_BarCode_Code39_300dpi(iXPos, iYPos, "N", 120, "*" + sPid + "*"); // 바코드
  8042. iXPos = Number(sLeftBank) + 5;
  8043. iYPos = Number(sTopBank) + 165;
  8044. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  8045. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid);
  8046. //iXPos = Number(sLeftBank) + 190;
  8047. //iYPos = Number(sTopBank) + 165;
  8048. //sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,35,35^FH^FD" + sPatnm + "^FS^CI1";
  8049. //Start-- 성명 동명이인 표시에 따른 한글+영문 변경 by 김금련_20130213
  8050. iWidth = 0;
  8051. aStr = "";
  8052. aFlag = new Array();
  8053. iXPos = Number(sLeftBank) + 190;
  8054. sPatnm = sPatnm.substr(0, 20);
  8055. // aStr = lpzfGetHanGul(sPatnm, aFlag);
  8056. // if(!utlf_isNull(aStr))
  8057. // {
  8058. // for (var iNo=0; iNo < aStr.length; iNo++) {
  8059. //
  8060. // //----------------------
  8061. // if (aFlag[iNo] == "E") {
  8062. // iXPos = Number(sLeftBank) + 223;
  8063. // iYPos = Number(sTopBank) + 165;
  8064. // sSndMsg += "^CFD40,40^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  8065. // iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  8066. // } else {
  8067. // iYPos = Number(sTopBank) + 165;
  8068. // //sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  8069. // //sSndMsg += CommAX.HanImageData();
  8070. // sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,35,35^FH^FD" + aStr[iNo] + "^FS^CI1";
  8071. // iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  8072. // }
  8073. // }
  8074. // }
  8075. //END-- 성명 동명이인 표시에 따른 한글+영문 변경 by 김금련_20130213
  8076. aStr = "";
  8077. aFlag = new Array();
  8078. if(!utlf_isNull(sPatnm)) {
  8079. for (var j = 0; j < sPatnm.length; j++) {
  8080. oneChar = sPatnm.charAt(j);
  8081. test_rtn = "";
  8082. test_he = "";
  8083. test_rtn = lpzfGetHanGul3(oneChar);
  8084. test_he = test_rtn.substring(0,1);
  8085. if(!utlf_isNull(test_he))
  8086. {
  8087. //----------------------
  8088. if (test_he == "E") {
  8089. iXPos = Number(sLeftBank) + 223;
  8090. iYPos = Number(sTopBank) + 165;
  8091. sSndMsg += "^CFD40,40^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS";
  8092. iWidth = iWidth + (Number(oneChar.length) * 12);
  8093. } else {
  8094. iYPos = Number(sTopBank) + 165;
  8095. //sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,35,35^FH^FD" +oneChar + "^FS^CI1";
  8096. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,35,35^FH^FD" + oneChar + "^FS^CI1"; // 검사코드리스트(한글)
  8097. iWidth = iWidth + (Number(oneChar.length) * 24);
  8098. }
  8099. }
  8100. }
  8101. }else{
  8102. iXPos = Number(sLeftBank) + 223;
  8103. iYPos = Number(sTopBank) + 165;
  8104. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  8105. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPatnm);
  8106. }
  8107. //
  8108. iXPos = Number(sLeftBank) + 320;
  8109. iYPos = Number(sTopBank) + 165;
  8110. // iXPos = Number(sLeftBank) + 400;
  8111. // iYPos = Number(sTopBank) + 150;
  8112. sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,20,20^FH^FD" + "채혈일시:" + "^FS^CI1";
  8113. iXPos = Number(sLeftBank) + 430;
  8114. iYPos = Number(sTopBank) + 50; // 75 였음
  8115. sSndMsg += lzzfBP_ChangeFont("C", 100, 40); // 폰트 설정
  8116. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBtype); // 혈액형
  8117. iXPos = Number(sLeftBank) + 440;
  8118. iYPos = Number(sTopBank) + 165;
  8119. // iXPos = Number(sLeftBank) + 500;
  8120. // iYPos = Number(sTopBank) + 150;
  8121. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  8122. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDt.substr(5));
  8123. iXPos = Number(sLeftBank) + 5;
  8124. iYPos = Number(sTopBank) + 195;
  8125. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  8126. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "Plain 6ml");
  8127. //iXPos = Number(sLeftBank) + 190;
  8128. //iYPos = Number(sTopBank) + 190;
  8129. //sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sBcollNm, 1, 1);
  8130. //sSndMsg += CommAX.HanImageData();
  8131. iXPos = Number(sLeftBank) + 320;
  8132. iYPos = Number(sTopBank) + 195;
  8133. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  8134. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sRoomcd);
  8135. iXPos = Number(sLeftBank) + 2;
  8136. iYPos = Number(sTopBank) + 230;
  8137. sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,30,30^FH^FD" + "검체채취일시:" + "^FS^CI1";
  8138. //감염정보 추가 20120503
  8139. iXPos = Number(sLeftBank) + 490;
  8140. iYPos = Number(sTopBank) + 230;
  8141. sSndMsg += lzzfBP_ChangeFont("C",20, 20); // 폰트 설정
  8142. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sInfcinfolist );
  8143. iXPos = Number(sLeftBank) + 2;
  8144. iYPos = Number(sTopBank) + 260;
  8145. sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,30,30^FH^FD" + "채혈자:" + "^FS^CI1";
  8146. iXPos = Number(sLeftBank) + 320;
  8147. iYPos = Number(sTopBank) + 260;
  8148. sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,30,30^FH^FD" + "확인자:" + "^FS^CI1";
  8149. sSndMsg += "^XZ"
  8150. CommAX.SendMsg(sSndMsg);
  8151. }else{
  8152. var sStr = "보관검체";
  8153. var sRoomcd = ds_pRef.getColumn(0, "roomcd");
  8154. var sPid = ds_pRef.getColumn(0, "pid");
  8155. var sPatnm = ds_pRef.getColumn(0, "patnm");
  8156. var sPatsex = ds_pRef.getColumn(0, "patsex");
  8157. var sPatage = ds_pRef.getColumn(0, "patage");
  8158. var sPatsexage = sPatsex + "/" + sPatage;
  8159. var sOrddeptNm= ds_pRef.getColumn(0, "orddeptnm").substring(0,2);
  8160. var sBtype = ds_pRef.getColumn(0, "btype");
  8161. var sInfcinfolist = ds_pRef.getColumn(0, "infcinfolist"); //감염정보 추가 20120503
  8162. var sBcollNm = "채혈자:" ;//+ model.getvalue(ref +"/bcollnm");
  8163. var sDt = ds_pRef.getColumn(0, "dt");
  8164. var sPidW = 85;
  8165. var sBarcodeW = 120; // 110였음
  8166. var sBtypeW = 10;
  8167. var sBGGCno = ds_pRef.getColumn(0, "bggc");
  8168. if( !utlf_isNull(sInfcinfolist) ){
  8169. sInfcinfolist = "*"+ sInfcinfolist +"*";
  8170. }
  8171. if( utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  8172. if( utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  8173. if(sPid.length == 10){
  8174. sBarcodeW = 90;// 90이었음
  8175. sBtypeW = 10;
  8176. }
  8177. sSndMsg = String.fromCharCode(27) + "A" + String.fromCharCode(27) + "A103500500"; // 시작위치 셋팅
  8178. iXPos = Number(sLeftBank);
  8179. iYPos = Number(sTopBank);
  8180. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sStr);
  8181. iXPos = Number(sLeftBank) + 160;
  8182. iYPos = Number(sTopBank) + 8;
  8183. sSndMsg += String.fromCharCode(27) + "V" + iYPos + String.fromCharCode(27) + "H" + iXPos + String.fromCharCode(27) + "S" + sRoomcd;
  8184. iXPos = Number(sLeftBank) + 260;
  8185. iYPos = Number(sTopBank) + 8;
  8186. sSndMsg += String.fromCharCode(27) + "V" + iYPos + String.fromCharCode(27) + "H" + iXPos + String.fromCharCode(27) + "S" + sPatsexage;
  8187. iXPos = Number(sLeftBank) + 10;
  8188. iYPos = Number(sTopBank) + 35;
  8189. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sPatnm, 2, 2);
  8190. iXPos = Number(sLeftBank) + 200;
  8191. iYPos = Number(sTopBank) + 35;
  8192. sSndMsg += String.fromCharCode(27) + "V" + iYPos + String.fromCharCode(27) + "H" + iXPos + String.fromCharCode(27) + "L0203" + String.fromCharCode(27) + "S" + sPid + String.fromCharCode(27) + "L0101";;
  8193. iXPos = Number(sLeftBank) + sBtypeW;
  8194. iYPos = Number(sTopBank) + 110; // 75 였음
  8195. sSndMsg += String.fromCharCode(27) + "V" + iYPos + String.fromCharCode(27) + "H" + iXPos + String.fromCharCode(27) + "L0303" + String.fromCharCode(27) + "M" + sBtype + String.fromCharCode(27) + "L0101";
  8196. iXPos = Number(sLeftBank) + 10;
  8197. iYPos = Number(sTopBank) + 90; // 160 였음
  8198. if( !utlf_isNull(sBGGCno) ){ // 2009-03-07 정은 수정
  8199. sSndMsg += String.fromCharCode(27) + "V" + iYPos + String.fromCharCode(27) + "H" + iXPos + String.fromCharCode(27) + "S" + sBGGCno;
  8200. }
  8201. iXPos = Number(sLeftBank) + sBarcodeW + 20;
  8202. iYPos = Number(sTopBank) + 80;
  8203. sSndMsg += String.fromCharCode(27) + "V" + iYPos + String.fromCharCode(27) + "H" + iXPos + String.fromCharCode(27) + "BG02070" + sPid; // 바코드
  8204. iXPos = Number(sLeftBank) + 170;
  8205. iYPos = Number(sTopBank) + 170;
  8206. sSndMsg += String.fromCharCode(27) + "V" + iYPos + String.fromCharCode(27) + "H" + iXPos + String.fromCharCode(27) + "S" + "*"+sPid+"*";
  8207. iXPos = Number(sLeftBank) + 10;
  8208. iYPos = Number(sTopBank) + 200;
  8209. sSndMsg += String.fromCharCode(27) + "V" + iYPos + String.fromCharCode(27) + "H" + iXPos + String.fromCharCode(27) + "S" + sDt;
  8210. iXPos = Number(sLeftBank) + 220;
  8211. iYPos = Number(sTopBank) + 190;
  8212. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sBcollNm);
  8213. sSndMsg += String.fromCharCode(27) + "Q" + "1" + String.fromCharCode(27) + "Z";
  8214. CommAX.SendMsg(sSndMsg);
  8215. }
  8216. }
  8217. /**
  8218. * @group :
  8219. * @ver : 2010.01.14
  8220. * @by : 박정은
  8221. * @---------------------------------------------------
  8222. * @type : function
  8223. * @access : public
  8224. * @desc : 보관검체 출력
  8225. * @param : ref - 보관검체 인스턴스
  8226. * count - 진검바코드 갯수
  8227. * @return :
  8228. * @---------------------------------------------------
  8229. * 채혈화면에서 보관검체출력시 TRLLC80101
  8230. * 혈액은행 보관검체 등록시 TXLBT10902
  8231. */
  8232. function fKeLabel_B472(objDsRef, count){
  8233. var barcdRef = "ds_data_setupinfo";
  8234. var sPrntKind = ds_data_setupinfo.getColumn(0, "prntkind");
  8235. var portOpenCheck = "";
  8236. var LCount = 0;
  8237. var iXPos = 0;
  8238. var iYPos = 0;
  8239. if( utlf_isNull(count) ){
  8240. LCount = 0;
  8241. }else{
  8242. LCount = count;
  8243. }
  8244. var sSndMsg = "";
  8245. if (sPrntKind == 0) return;
  8246. var sCommKind = model.getValue(barcdRef + "[1]/commkind");
  8247. var sLeftBank = model.getValue(barcdRef + "[1]/blank/left");
  8248. var sTopBank = model.getValue(barcdRef + "[1]/blank/top");
  8249. var sB472sizegbn = model.getValue(barcdRef + "[1]/blank/b472size");
  8250. if(sCommKind == "01") {
  8251. var sSetUpVal = model.getValue(barcdRef + "[1]/comm01/setupval");
  8252. } else if(sCommKind == "02") {
  8253. var sComm = model.getValue(barcdRef + "[1]/comm02/comm");
  8254. var sDataBit = model.getValue(barcdRef + "[1]/comm02/databit");
  8255. var sStopBit = model.getValue(barcdRef + "[1]/comm02/stopbit");
  8256. var sBaudRate = model.getValue(barcdRef + "[1]/comm02/baudrate");
  8257. var sParity = model.getValue(barcdRef + "[1]/comm02/parity");;
  8258. CommAX.CommPort = sComm;
  8259. CommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  8260. portOpenCheck = CommAX.PortOpen("true");
  8261. } else if(sCommKind == "03") {
  8262. var sSetUpVal = model.getValue(barcdRef + "[1]/comm03/setupval");
  8263. var sEqmtCD = model.getValue(barcdRef + "[1]/comm03/eqmtcd");
  8264. }
  8265. if( (portOpenCheck == "TRUE" && sCommKind == "02")
  8266. || sCommKind == "01" || sCommKind == "07"
  8267. || sCommKind == "03"){
  8268. //var sStr = "보관검체";
  8269. var sRoomcd = model.getvalue(ref +"/roomcd");
  8270. var sPid = model.getvalue(ref +"/pid");
  8271. var sPatnm = model.getvalue(ref +"/patnm");
  8272. var sPatsex = model.getvalue(ref +"/patsex");
  8273. var sPatage = model.getvalue(ref +"/patage");
  8274. var sPatsexage = sPatsex + "/" + sPatage;
  8275. var sOrddeptNm= model.getvalue(ref +"/orddeptnm").substring(0,2);
  8276. var sBtype = model.getvalue(ref +"/btype");
  8277. var sBcollNm = "채혈자:" ;//+ model.getvalue(ref +"/bcollnm");
  8278. var sDt = model.getvalue(ref +"/dt");
  8279. var sPidW = 85;
  8280. var sBarcodeW = 120; // 110였음
  8281. var sBtypeW = 10;
  8282. var sBGGCno = model.getvalue(ref +"/bggc");
  8283. var sB472size = "";
  8284. if (sLeftBank == "" || sLeftBank == "-") sLeftBank = 0;
  8285. if (sTopBank == "" || sTopBank == "-") sTopBank = 0;
  8286. if(sPid.length == 10){
  8287. sBarcodeW = 90;// 90이었음
  8288. sBtypeW = 10;
  8289. }
  8290. //sSndMsg += "{D0350,0550,0330|}"; // 라벨사이즈
  8291. if(sB472sizegbn == "2"){ // 320 630
  8292. sB472size = "0340,0620,0340"; // 기존라벨
  8293. }else{
  8294. sB472size = "0350,0550,0330"; // nUsize
  8295. }
  8296. sSndMsg += "{D" + sB472size + "|}"; // 라벨사이즈
  8297. sSndMsg += "{C|}"; // 버퍼클리어
  8298. sSndMsg += "{AX;-000,-000,+00|}"; // 피트량
  8299. iXPos = Number(sLeftBank);
  8300. iYPos = Number(sTopBank);
  8301. sSndMsg += lzzfBP_HanDisp24("보관검체", iXPos, iYPos);
  8302. iXPos = Number(sLeftBank) + 220;
  8303. iYPos = Number(sTopBank) +20;
  8304. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, sRoomcd);
  8305. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sRoomcd);
  8306. iXPos = Number(sLeftBank) + 370;
  8307. iYPos = Number(sTopBank) + 20;
  8308. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, sPatsexage);
  8309. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sPatsexage);
  8310. iXPos = Number(sLeftBank) ;
  8311. iYPos = Number(sTopBank) + 35;
  8312. //sSndMsg += lzzfBP_HanDisp24(sPatnm, iXPos, iYPos); // 환자명 한글 24사이즈 기본
  8313. sSndMsg += lzzfBP_HanDisp48(sPatnm.substr(0,4), iXPos, iYPos); // 환자명 한글 48사이즈
  8314. iXPos = Number(sLeftBank) + 230;
  8315. iYPos = Number(sTopBank) + 75;
  8316. sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 40, 40, sPid); // 환자번호 크게
  8317. //sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sPid);
  8318. iXPos = Number(sLeftBank)+5;
  8319. iYPos = Number(sTopBank) + 135; // 160 였음
  8320. if(sBGGCno != ""){ // 2009-03-07 정은 수정
  8321. sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 40, 40, sBGGCno);
  8322. //sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sBGGCno);
  8323. }
  8324. iXPos = Number(sLeftBank) + sBtypeW;
  8325. iYPos = Number(sTopBank) + 200; // 75 였음
  8326. sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 60, 60, sBtype);
  8327. //sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sBtype);
  8328. iXPos = Number(sLeftBank)+150;
  8329. iYPos = Number(sTopBank)+90;
  8330. sSndMsg += lzzfBP_BarCode_Code39_B472(iXPos, iYPos, 5, 4, "*" + sPid + "*", 120); // 바코드
  8331. iXPos = Number(sLeftBank) + 240;
  8332. iYPos = Number(sTopBank) + 240;
  8333. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, "*"+sPid+"*");
  8334. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, "*"+sPid+"*");
  8335. iXPos = Number(sLeftBank) + 5;
  8336. iYPos = Number(sTopBank) + 275;
  8337. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, sDt);
  8338. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sDt);
  8339. iXPos = Number(sLeftBank) + 250;
  8340. iYPos = Number(sTopBank) + 250;
  8341. sSndMsg += lzzfBP_HanDisp24(sBcollNm, iXPos, iYPos); // 채혈자
  8342. sSndMsg += "{XS;I,0001,0002C5101|}"; // end
  8343. if(sCommKind == "01") {
  8344. CommAX.SendMessageToLPT(sSndMsg);
  8345. } else if(sCommKind == "02") {
  8346. CommAX.SendMessage(sSndMsg);
  8347. }
  8348. //출력할 진검 바코드가 없을시에만 port close
  8349. if(portOpenCheck == "TRUE" && sCommKind == "02" && LCount == 0){
  8350. CommAX.PortOpen("false");
  8351. }
  8352. }else if(portOpenCheck == "TRUE" && sCommKind == "02"){
  8353. messageBox("아래 사항을 확인후 재출력해주십시오."
  8354. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  8355. + " \n 2.케이블 확인"
  8356. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  8357. return;
  8358. }
  8359. }
  8360. function lf_LisSpcBarcodePrint3(ds_pRef:Dataset,sds_data_path, pKCount, pPCount, scrflag){
  8361. var sPrntKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"prntkind");
  8362. var aFlag = new Array(); //한글 영문 구분
  8363. var aStr = "";
  8364. //var iWidth = 0;
  8365. var iXPos = 0;
  8366. var iYPos = 0;
  8367. //var portOpenTF = "";
  8368. var KCount = 0;
  8369. var PCount = 0;
  8370. if(utlf_isNull(pKCount)){
  8371. KCount = 0;
  8372. }else{
  8373. KCount = pKCount;
  8374. }
  8375. if(utlf_isNull(pPCount)){
  8376. PCount = 0;
  8377. }else{
  8378. PCount = pPCount;
  8379. }
  8380. var scridPrint = frmf_getScreenID();
  8381. if(ds_pRef.rowcount > 0 && sPrntKind != 0){
  8382. var sCommKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"commkind");
  8383. var sLeftBank = objects[sds_data_path + "ds_data_blank"].getColumn(0,"left");
  8384. var sTopBank = objects[sds_data_path + "ds_data_blank"].getColumn(0,"top");
  8385. var sB472sizegbn = objects[sds_data_path + "ds_data_blank"].getColumn(0,"b472size");
  8386. if(sCommKind == "01") {
  8387. var sSetUpVal = objects[sds_data_path + "ds_data_comm01"].getColumn(0,"setupval");
  8388. } else if(sCommKind == "02") {
  8389. var sComm = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"comm");
  8390. var sDataBit = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"databit");
  8391. var sStopBit = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"stopbit");
  8392. var sBaudRate = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"baudrate");
  8393. var sParity = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"parity");
  8394. CommAX.CommPort = sComm;
  8395. CommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  8396. //보관검체 출력 갯수가 존재하면 port 오픈 하지 않는다.
  8397. //이미 오픈 되어 있음. 보관검체 출력후 진검 바코드 갯수 체크하여 포트 클로즈 하지 않는다.
  8398. if(KCount > 0){
  8399. //이미 포트 오픈 되어 있으므로 "TRUE" 셋팅
  8400. portOpenTF = "TRUE";
  8401. }else if(KCount == 0){
  8402. //port open 반환값 -> String 문자 포트 오픈 성공이면 "TRUE" , 실패하면 "FALSE"
  8403. portOpenTF = CommAX.PortOpen("true");
  8404. }
  8405. } else if(sCommKind == "03") {
  8406. var sSetUpVal = objects[sds_data_path + "ds_data_comm03"].getColumn(0,"setupval");
  8407. var sEqmtCd = objects[sds_data_path + "ds_data_comm03"].getColumn(0,"eqmtcd");
  8408. }
  8409. if( (portOpenTF == "TRUE" && sCommKind == "02")
  8410. || (sCommKind == "01")
  8411. || (sCommKind == "03")){
  8412. for(i=0 ; i< ds_pRef.rowcount ;i++){
  8413. var sSndMsg = "";
  8414. var sTsectlblnm = utlf_transNullToEmpty(ds_pRef.getColumn(i,"tsectlblnm"));
  8415. var sBcno = ds_pRef.getColumn(i,"bcno");
  8416. var sBarcdprntdt = ds_pRef.getColumn(i,"barcdprntdt");
  8417. var sPatnm = ds_pRef.getColumn(i,"patnm");
  8418. var sPid = ds_pRef.getColumn(i,"pid");
  8419. var sSexage = ds_pRef.getColumn(i,"sexage");
  8420. var sDeptroom = ds_pRef.getColumn(i,"deptroom");
  8421. var sSpclblnm = ds_pRef.getColumn(i,"spclblnm");
  8422. var sTubelblnm = ds_pRef.getColumn(i,"tubelblnm");
  8423. var sSecttsect = ds_pRef.getColumn(i,"secttsect");
  8424. var sTclslblnmlist = ds_pRef.getColumn(i,"tclslblnmlist");
  8425. var sInfcinfolist = ds_pRef.getColumn(i,"infcinfolist");
  8426. var sErprcpflag = ds_pRef.getColumn(i,"erprcpflag");
  8427. var barcdcntflag = ds_pRef.getColumn(0,"cntflag");
  8428. var bcollbarcdprntcnt = ds_pRef.getColumn(i,"bcollbarcdprntcnt");
  8429. var spcacptbarcdprntcnt = ds_pRef.getColumn(i,"spcacptbarcdprntcnt");
  8430. var microbarcdprntcnt = ds_pRef.getColumn(i,"microbarcdprntcnt");
  8431. var sbcoll = "채혈자";
  8432. var keepspc = false;
  8433. var sB472size = "";
  8434. var checkABO = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "ABO");
  8435. var checkAST = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "AST");
  8436. var sTclslblnmlist2 = "";
  8437. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  8438. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  8439. if (utlf_isNull(ds_pRef.getColumn(i,"dnornm"))){
  8440. var dnorNm = "";
  8441. var dSexage = "";
  8442. }else{
  8443. var dnorNm = ds_pRef.getColumn(i,"dnornm");
  8444. var dSexage = ds_pRef.getColumn(i,"dnorsexage");
  8445. }
  8446. //sSndMsg += "{D0350,0550,0330|}"; // 라벨사이즈
  8447. if(sB472sizegbn == "2"){ // 320 630
  8448. sB472size = "0340,0620,0340"; // 기존라벨
  8449. }else{
  8450. sB472size = "0350,0550,0330"; // nUsize
  8451. }
  8452. sSndMsg += "{D" + sB472size + "|}"; // 라벨사이즈
  8453. // 버퍼클리어
  8454. sSndMsg += "{C|}";
  8455. // 피트량
  8456. sSndMsg += "{AX;-000,-000,+00|}";
  8457. //검사계명
  8458. iXPos = Number(sLeftBank)+10;
  8459. iYPos = Number(sTopBank);
  8460. sSndMsg += lzzfBP_HanDisp24(sTsectlblnm, iXPos, iYPos);
  8461. if(sErprcpflag == "1" || sErprcpflag == "2" || sErprcpflag == "Y"){
  8462. //응급표시
  8463. iXPos1 = Number(sLeftBank);
  8464. iXPos2 = Number(sLeftBank);
  8465. iYPos1 = Number(sTopBank) ;
  8466. iYPos2 = Number(sTopBank) + 280;
  8467. var ppX1 = iXPos1.toString().getLeftPad(4, "0");
  8468. var ppX2 = iXPos1.toString().getLeftPad(4, "0");
  8469. var ppY1 = iYPos1.toString().getLeftPad(4, "0");
  8470. var ppY2 = iYPos2.toString().getLeftPad(4, "0");
  8471. sSndMsg += "{LC;"+ppX1+","+ppY1+","+ppX2+","+ppY2+",1,8|}";
  8472. }
  8473. iXPos = Number(sLeftBank)+140;
  8474. iYPos = Number(sTopBank)+20;
  8475. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, "*" + sBcno + "*"); //바코드번호
  8476. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, "*" + sBcno + "*"); //바코드번호
  8477. iXPos = Number(sLeftBank)+60;
  8478. iYPos = Number(sTopBank)+30;
  8479. sSndMsg += lzzfBP_BarCode_Code39_B472(iXPos, iYPos, 5, 4, "*" + sBcno + "*",110); // 바코드
  8480. if(barcdcntflag == "acpt" ){
  8481. if(spcacptbarcdprntcnt > 0){
  8482. CommAX.SendMessage(sSndMsg);
  8483. }
  8484. }else{
  8485. if(bcollbarcdprntcnt > 0){
  8486. CommAX.SendMessage(sSndMsg);
  8487. }
  8488. }
  8489. iXPos = Number(sLeftBank)+350;
  8490. iYPos = Number(sTopBank)+20;
  8491. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, sBarcdprntdt); //라벨발행일시
  8492. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sBarcdprntdt); //라벨발행일시
  8493. iXPos = Number(sLeftBank)+10;
  8494. iYPos = Number(sTopBank)+155;
  8495. sSndMsg += lzzfBP_HanDisp24(sPatnm.substr(0, 7), iXPos, iYPos); // 환자명 한글
  8496. iXPos = Number(sLeftBank)+225;
  8497. iYPos = Number(sTopBank)+175;
  8498. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, sPid); //환자등록번호
  8499. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sPid); //환자등록번호
  8500. iXPos = Number(sLeftBank)+400;
  8501. iYPos = Number(sTopBank)+175;
  8502. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, sSexage); //성병나이
  8503. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sSexage); //성병나이
  8504. iXPos = Number(sLeftBank)+10;
  8505. iYPos = Number(sTopBank)+210;
  8506. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, sDeptroom); //진료과병실
  8507. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sDeptroom); //진료과병실
  8508. iXPos = Number(sLeftBank)+210;
  8509. iYPos = Number(sTopBank)+210;
  8510. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, sSpclblnm); //검체명
  8511. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sSpclblnm); //검체명
  8512. iXPos = Number(sLeftBank)+380;
  8513. iYPos = Number(sTopBank)+210;
  8514. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, sTubelblnm); //용기명
  8515. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sTubelblnm); //용기명
  8516. iXPos = Number(sLeftBank)+10;
  8517. iYPos = Number(sTopBank)+245;
  8518. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, sSecttsect); //계검사계
  8519. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sSecttsect); //계검사계
  8520. iXPos = Number(sLeftBank)+70;
  8521. iYPos = Number(sTopBank)+220;
  8522. sSndMsg += lzzfBP_HanDisp24(sTclslblnmlist, iXPos, iYPos); // 검사명 한글
  8523. if (!utlf_isNull(ds_pRef.getColumn(i,"dnornm"))){
  8524. iXPos = Number(sLeftBank)+10;
  8525. iYPos = Number(sTopBank)+255;
  8526. sSndMsg += lzzfBP_HanDisp24(dnorNm.substr(0, 12), iXPos, iYPos); // 공여자명 한글
  8527. iXPos = Number(sLeftBank)+110;
  8528. iYPos = Number(sTopBank)+260;
  8529. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20,20, dSexage); // 공여자성별나이 헌혈화면만 보냄
  8530. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, dSexage); //공여자성별나이 헌혈화면만 보냄
  8531. }
  8532. if(checkABO) {
  8533. //외래채혈일때
  8534. if(scridPrint=="SMLLC00100" && scrflag){
  8535. keepspc = true;
  8536. }
  8537. //병동,환자별일때
  8538. else if((scridPrint=="SMLLC00200" || scridPrint=="SMLLC00300") && scrflag && checkAST){
  8539. keepspc = true;
  8540. }
  8541. iXPos = Number(sLeftBank)+10 ;
  8542. iYPos = Number(sTopBank)+250;
  8543. sSndMsg += lzzfBP_HanDisp24("채혈자 : ", iXPos, iYPos);
  8544. }
  8545. if(!utlf_isNull(sInfcinfolist)){
  8546. iXPos = Number(sLeftBank)+10;
  8547. iYPos = Number(sTopBank)+250;
  8548. sSndMsg += lzzfBP_HanDisp24(sInfcinfolist, iXPos, iYPos);
  8549. }
  8550. //자동화일때 밑에 줄 끄어요~
  8551. if(sSecttsect.substr(0, 1) == "A"){
  8552. //검사계명
  8553. iXPos = Number(sLeftBank) + 435;
  8554. iYPos1 = Number(sTopBank) + 299;
  8555. iYPos2 = Number(sTopBank) + 300;
  8556. var ppX = iXPos.toString().getLeftPad(4, "0");
  8557. var ppY1 = iYPos1.toString().getLeftPad(4, "0");
  8558. var ppY2 = iYPos2.toString().getLeftPad(4, "0");
  8559. sSndMsg += "{LC;0000,"+ppY1+","+ppX+","+ppY2+",1,8|}";
  8560. }
  8561. if(barcdcntflag == "acpt" ){
  8562. if(spcacptbarcdprntcnt > 0){
  8563. sSndMsg += lzzfBP_EndFormat_B472(spcacptbarcdprntcnt);
  8564. CommAX.SendMessage(sSndMsg);
  8565. }
  8566. }else{
  8567. if(bcollbarcdprntcnt > 0){
  8568. sSndMsg += lzzfBP_EndFormat_B472(bcollbarcdprntcnt);
  8569. CommAX.SendMessage(sSndMsg);
  8570. }
  8571. }
  8572. if(keepspc) {
  8573. fKeepBcnoPrint("B");
  8574. }
  8575. }//end for
  8576. //portopen이 true이고 통신유형이 com이고 출력할 병리 바코드가 없을때 port close
  8577. if( portOpenTF == "TRUE" && sCommKind == "02" && PCount == 0){
  8578. CommAX.PortOpen("false");
  8579. }
  8580. }else if((portOpenTF = "FALSE" && sCommKind == "02")){
  8581. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  8582. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  8583. + " \n 2.케이블 확인"
  8584. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  8585. return;
  8586. }
  8587. }
  8588. }
  8589. // sato 병리 채혈 바코드
  8590. function lf_LisPlgySpcBarcodePrint(pLCount,sds_data_path) {
  8591. try{
  8592. if( utlf_isNull(sds_data_path) ) sds_data_path = "";
  8593. var sSndMsg = "";
  8594. var sPrcpDD = "";
  8595. var sTemp = "";
  8596. var sTempStr = "";
  8597. var strNode = "/root/main/TestInfo/plgybarcdinfo";
  8598. var iLeft = eval(sds_data_path + "ds_data_blank").getColumn(0,"left");
  8599. var iTop = eval(sds_data_path + "ds_data_blank").getColumn(0,"top");
  8600. var iXPos = 0;
  8601. var iYPos = 0;
  8602. var iWidth = 0;
  8603. var aFlag = new Array();
  8604. var aStr = "";
  8605. var LCount = 0;
  8606. var portOpenTF = "";
  8607. if(utlf_isNull(pLCount) || pLCount == 0){
  8608. LCount = 0;
  8609. }else if(pLCount > 0){
  8610. LCount = pLCount;
  8611. }
  8612. //-----------------------------------------
  8613. if (utlf_isNull(iLeft) || iLeft == "-") iLeft = 0;
  8614. if (utlf_isNull(iTop) || iTop == "-") iTop = 0;
  8615. //------------------------------
  8616. // 2008-10-12 : 병리과 여백 조정
  8617. iLeft = Number(iLeft) + Number(20);
  8618. iTop = Number(iTop) + Number(10);
  8619. //----------------
  8620. // Serial Port Open
  8621. //fExeCommPortOpen();
  8622. //var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  8623. var sPrntKind = eval(sds_data_path + "ds_data_setupinfo").getColumn(0,"prntkind");
  8624. if(sPrntKind != "0"){
  8625. //---------------
  8626. // 바코드내용 출력
  8627. for (var iRowNo=0; iRowNo < eval(sds_data_path + "ds_plgybarcdinfo").rowcount; iRowNo++) {
  8628. sPrcpDD = String(eval(sds_data_path + "ds_plgybarcdinfo").getColumn(iRowNo, "prcpdd"));
  8629. sPrcpDD = sPrcpDD.substr(0,4) + "-" + sPrcpDD.substr(4,2) + "-" + sPrcpDD.substr(6,2);
  8630. sSndMsg = String.fromCharCode(27) +"A" + String.fromCharCode(27) +"A103500500"; // 시작위치 셋팅
  8631. //-------------------------
  8632. iXPos = Number(iLeft) + 20;
  8633. iYPos = Number(iTop) + 5;
  8634. sSndMsg += String.fromCharCode(27) +"V" + iYPos + String.fromCharCode(27) +"H" + iXPos + String.fromCharCode(27) +"BG02100" + eval(sds_data_path + "ds_plgybarcdinfo").getColumn(iRowNo, "spcbarcdno");
  8635. iXPos = Number(iLeft) + 130;
  8636. iYPos = Number(iTop) + 110;
  8637. sSndMsg += String.fromCharCode(27) +"V" + iYPos + String.fromCharCode(27) +"H" + iXPos + String.fromCharCode(27) +"S" + eval(sds_data_path + "ds_plgybarcdinfo").getColumn(iRowNo, "spcbarcdno");
  8638. //--------------------
  8639. iXPos = Number(iLeft);
  8640. iYPos = Number(iTop) + 130;
  8641. sSndMsg += String.fromCharCode(27) +"V" + iYPos + String.fromCharCode(27) +"H" + iXPos + String.fromCharCode(27) +"S" + "PATHOLOGY";
  8642. iXPos = Number(iLeft) + 110;
  8643. iYPos = Number(iTop) + 130;
  8644. sTempStr = eval(sds_data_path + "ds_plgybarcdinfo").getColumn(iRowNo, "wardroom");
  8645. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sTempStr);
  8646. /*
  8647. //-------------------------
  8648. iXPos = Number(iLeft) + 310;
  8649. iYPos = Number(iTop) + 127;
  8650. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, model.getValue(strNode+"["+iRowNo+"]/orddrnm"));
  8651. */
  8652. iXPos = Number(iLeft) + 220;
  8653. iYPos = Number(iTop) + 130;
  8654. sSndMsg += String.fromCharCode(27) +"V" + iYPos + String.fromCharCode(27) +"H" + iXPos + String.fromCharCode(27) + "S" + sPrcpDD;
  8655. iXPos = Number(iLeft) + 330;
  8656. iYPos = Number(iTop) + 130;
  8657. sSndMsg += String.fromCharCode(27) +"V" + iYPos + String.fromCharCode(27) +"H" + iXPos + String.fromCharCode(27) +"M" + eval(sds_data_path + "ds_plgybarcdinfo").getColumn(iRowNo, "isolabbrcd");
  8658. //--------------------------
  8659. iXPos = Number(iLeft);
  8660. iYPos = Number(iTop) + 155;
  8661. sSndMsg += String.fromCharCode(27) +"V" + iYPos + String.fromCharCode(27) +"H" + iXPos + String.fromCharCode(27) +"S" + eval(sds_data_path + "ds_plgybarcdinfo").getColumn(iRowNo, "pid");
  8662. //-------------------------
  8663. iXPos = Number(iLeft) + 110;
  8664. iYPos = Number(iTop) + 150;
  8665. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, eval(sds_data_path + "ds_plgybarcdinfo").getColumn(iRowNo, "patnm"));
  8666. //-------------------------
  8667. iXPos = Number(iLeft) + 220;
  8668. iYPos = Number(iTop) + 155;
  8669. sSndMsg += String.fromCharCode(27) +"V" + iYPos + String.fromCharCode(27) +"H" + iXPos + String.fromCharCode(27) +"S" + eval(sds_data_path + "ds_plgybarcdinfo").getColumn(iRowNo, "sexage");
  8670. //-------------------------
  8671. iXPos = Number(iLeft) + 280;
  8672. iYPos = Number(iTop) + 155;
  8673. sTempStr = eval(sds_data_path + "ds_plgybarcdinfo").getColumn(iRowNo, "orddeptnm");
  8674. sSndMsg += String.fromCharCode(27) +"V" + iYPos + String.fromCharCode(27) +"H" + iXPos + String.fromCharCode(27) +"S" + sTempStr;
  8675. iXPos = Number(iLeft);
  8676. iYPos = Number(iTop) + 175;
  8677. sTempStr = eval(sds_data_path + "ds_plgybarcdinfo").getColumn(iRowNo, "spcdispnm");
  8678. sTempStr = sTempStr.replace("▨", ",");
  8679. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sTempStr);
  8680. //==========================
  8681. iXPos = Number(iLeft);
  8682. iYPos = Number(iTop) + 200;
  8683. //---------------------------------------------------------
  8684. sTempStr = eval(sds_data_path + "ds_plgybarcdinfo").getColumn(iRowNo, "prcpdispnm");
  8685. sTempStr = sTempStr.replace("▨", ",");
  8686. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sTempStr);
  8687. //-------------------------
  8688. iXPos = Number(iLeft);
  8689. iYPos = Number(iTop) + 225;
  8690. sTempStr = eval(sds_data_path + "ds_plgybarcdinfo").getColumn(iRowNo, "prcpdispnm2"); //검사명(추가처방)
  8691. sTempStr = sTempStr.replace("▨", ",");
  8692. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sTempStr);
  8693. sSndMsg += String.fromCharCode(27) +"Q" + "1" + String.fromCharCode(27) +"Z";
  8694. CommAX.SendMsg(sSndMsg);
  8695. }
  8696. }
  8697. } catch(ee) {
  8698. sysf_messageBox("병리바코드출력에", "E009");
  8699. sysf_catchTrace(ee);
  8700. return;
  8701. }
  8702. }
  8703. /**
  8704. * @group : PathologyWeb Common
  8705. * @ver : 2010.01.12 (CMCDEV-0001)
  8706. * @by : 박정은
  8707. * @---------------------------------------------------
  8708. * @type : function
  8709. * @access : public
  8710. * @desc : 채혈화면 병리 바코드 출력(B472 )
  8711. * @param :
  8712. * @return :
  8713. */
  8714. function lf_LisPlgySpcBarcodePrint3(pLCount,sds_data_path) {
  8715. try{
  8716. var sSndMsg = "";
  8717. var sPrcpDD = "";
  8718. var sTemp = "";
  8719. var sTempStr = "";
  8720. var sTempStr2 = "";
  8721. var strNode = "/root/main/TestInfo/plgybarcdinfo";
  8722. var iLeft = objects[sds_data_path + "ds_data_blank"].getColumn(0,"left");
  8723. var iTop = objects[sds_data_path + "ds_data_blank"].getColumn(0,"top");
  8724. var iXPos = 0;
  8725. var iYPos = 0;
  8726. var iWidth = 0;
  8727. var sBarCdNoH = "";
  8728. var aFlag = new Array();
  8729. var aStr = "";
  8730. var LCount = 0;
  8731. var portOpenTF = "";
  8732. if(utlf_isNull(pLCount) || pLCount == 0){
  8733. LCount = 0;
  8734. }else if(pLCount > 0){
  8735. LCount = pLCount;
  8736. }
  8737. //-----------------------------------------
  8738. if (utlf_isNull(iLeft) || iLeft == "-") iLeft = 0;
  8739. if (utlf_isNull(iTop) || iTop == "-") iTop = 0;
  8740. //------------------------------
  8741. // 2008-10-12 : 병리과 여백 조정
  8742. iLeft = Number(iLeft) ;
  8743. iTop = Number(iTop) ;
  8744. //----------------
  8745. // Serial Port Open
  8746. //fExeCommPortOpen();
  8747. //var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  8748. var sPrntKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"prntkind");
  8749. var sB472sizegbn = objects[sds_data_path + "ds_data_blank"].getColumn(0,"b472size");
  8750. var sB472size = "";
  8751. if(sPrntKind != "0"){
  8752. var sCommKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"commkind");
  8753. if(sCommKind == "01") {
  8754. var sSetUpVal = objects[sds_data_path + "ds_data_comm01"].getColumn(0,"setupval");
  8755. } else if(sCommKind == "02") {
  8756. var sComm = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"comm");
  8757. var sDataBit = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"databit");
  8758. var sStopBit = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"stopbit");
  8759. var sBaudRate = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"baudrate");
  8760. var sParity = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"parity");;
  8761. CommAX.CommPort = sComm;
  8762. CommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  8763. //진검 바코드 출력 갯수가 존재하면 port 오픈 하지 않는다.
  8764. //진검 바코드 출력후 병리 바코드 갯수 체크하여 포트 클로즈 하지 않았기 때문에..
  8765. if(LCount > 0){
  8766. //이미 포트 오픈 되어 있으므로 "TRUE" 셋팅
  8767. portOpenTF = "TRUE";
  8768. }else if(LCount == 0){
  8769. //port open 반환값 -> String 문자 포트 오픈 성공이면 "TRUE" , 실패하면 "FALSE"
  8770. portOpenTF = CommAX.PortOpen("true");
  8771. }
  8772. } else if(sCommKind == "03") {
  8773. var sSetUpVal = objects[sds_data_path + "ds_data_comm03"].getColumn(0,"setupval");
  8774. }
  8775. if( (portOpenTF == "TRUE" && sCommKind == "02")
  8776. || (sCommKind == "01")
  8777. || (sCommKind == "03")){
  8778. //---------------
  8779. // 바코드내용 출력
  8780. for (var iRowNo=0; iRowNo < objects[sds_data_path + "ds_plgybarcdinfo"].rowcount; iRowNo++) {
  8781. sPrcpDD = String(objects[sds_data_path + "ds_plgybarcdinfo"].getColumn(iRowNo, "prcpdd"));
  8782. sPrcpDD = sPrcpDD.substr(0,4) + "-" + sPrcpDD.substr(4,2) + "-" + sPrcpDD.substr(6,2);
  8783. if(sPrntKind == "8") {
  8784. sSndMsg = "";
  8785. if(sB472sizegbn == "2"){ // 320 630
  8786. sB472size = "0340,0620,0340"; // 기존라벨
  8787. }else{
  8788. sB472size = "0350,0550,0330"; // nUsize
  8789. }
  8790. sSndMsg += "{D" + sB472size + "|}"; // 라벨사이즈
  8791. //sSndMsg += "{D0350,0550,0330|}"; // 라벨사이즈
  8792. sSndMsg += "{C|}"; // 버퍼클리어
  8793. sSndMsg += "{AX;-000,-000,+00|}"; // 피트량
  8794. sBarCdNoH = objects[sds_data_path + "ds_plgybarcdinfo"].getColumn(iRowNo, "spcbarcdno");
  8795. iXPos = Number(iLeft) + 20;
  8796. iYPos = Number(iTop) + 5;
  8797. // var newbcno = sBarCdNoH + (iRowNo).toString().getLeftPad(2, "0");
  8798. sSndMsg += lzzfBP_BarCode_Code39_B472(iXPos, iYPos, 5, 4, sBarCdNoH, 90); // 바코드
  8799. iXPos = Number(iLeft) + 140;
  8800. iYPos = Number(iTop) + 120;
  8801. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sBarCdNoH); //바코드번호
  8802. iXPos = Number(iLeft);
  8803. iYPos = Number(iTop) + 145;
  8804. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, "PATHOLOGY");
  8805. iXPos = Number(iLeft) + 200;
  8806. iYPos = Number(iTop) + 120;
  8807. sTempStr = bjects[sds_data_path + "ds_plgybarcdinfo"].getColumn(iRowNo, "wardroom");
  8808. //sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sTempStr);
  8809. sSndMsg += lzzfBP_HanDisp24(sTempStr, iXPos, iYPos);
  8810. iXPos = Number(iLeft) + 330;
  8811. iYPos = Number(iTop) + 145;
  8812. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sPrcpDD);
  8813. iXPos = Number(iLeft) + 300;
  8814. iYPos = Number(iTop) + 145;
  8815. sTempStr = bjects[sds_data_path + "ds_plgybarcdinfo"].getColumn(iRowNo, "isolabbrcd");
  8816. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sTempStr);
  8817. iXPos = Number(iLeft);
  8818. iYPos = Number(iTop) + 180;
  8819. sTempStr = bjects[sds_data_path + "ds_plgybarcdinfo"].getColumn(iRowNo, "pid");
  8820. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sTempStr);
  8821. iXPos = Number(iLeft) + 150;
  8822. iYPos = Number(iTop) + 155;
  8823. sTempStr = bjects[sds_data_path + "ds_plgybarcdinfo"].getColumn(iRowNo, "patnm");
  8824. sSndMsg += lzzfBP_HanDisp24(sTempStr, iXPos, iYPos);
  8825. iXPos = Number(iLeft) + 310;
  8826. iYPos = Number(iTop) + 180;
  8827. var sTempStr1 = bjects[sds_data_path + "ds_plgybarcdinfo"].getColumn(iRowNo, "sexage");
  8828. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sTempStr1);
  8829. //-------------------------
  8830. iXPos = Number(iLeft) + 410;
  8831. iYPos = Number(iTop) + 180;
  8832. //수술실이 있을 경우 진료과 옆에 수술방 이름을 표시하여 준다.
  8833. if(!utlf_isNull(objects[sds_data_path + "ds_plgybarcdinfo"].getColumn(iRowNo, "oproomnm"))) {
  8834. sTempStr = objects[sds_data_path + "ds_plgybarcdinfo"].getColumn(iRowNo, "orddeptnm") + "(" + objects[sds_data_path + "ds_plgybarcdinfo"].getColumn(iRowNo, "oproomnm") + ")";
  8835. } else {
  8836. sTempStr = objects[sds_data_path + "ds_plgybarcdinfo"].getColumn(iRowNo, "orddeptnm");
  8837. }
  8838. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, sTempStr);
  8839. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sTempStr);
  8840. iXPos = Number(iLeft);
  8841. iYPos = Number(iTop) + 190;
  8842. sTempStr = String(objects[sds_data_path + "ds_plgybarcdinfo"].getColumn(iRowNo, "spcdispnm"));
  8843. sTempStr = sTempStr.replace("▨", ",");
  8844. //20바이트가 넘을 경우 검사명을 짤라서 출력한다.
  8845. if(sTempStr.getByteLength() > 20) {
  8846. for(var iLeng = 1 ; iLeng <= sTempStr.length ; iLeng++) {
  8847. if(((sTempStr.substr(0, iLeng)).getByteLength()) > 20) {
  8848. sTempStr2 = sTempStr.substr(0, iLeng);
  8849. break;
  8850. }
  8851. }
  8852. sTempStr = sTempStr2;
  8853. }
  8854. sSndMsg += lzzfBP_HanDisp24(sTempStr, iXPos, iYPos);
  8855. iXPos = Number(iLeft);
  8856. iYPos = Number(iTop) + 220;
  8857. //---------------------------------------------------------
  8858. sTempStr = String(objects[sds_data_path + "ds_plgybarcdinfo"].getColumn(iRowNo, "prcpdispnm"));
  8859. sTempStr = sTempStr.replace("▨", ",");
  8860. //14바이트가 넘을 경우 검사명을 짤라서 출력한다.
  8861. if(sTempStr.getByteLength() > 14) {
  8862. for(var iLeng = 1 ; iLeng <= sTempStr.length ; iLeng++) {
  8863. if(((sTempStr.substr(0, iLeng)).getByteLength()) > 14) {
  8864. sTempStr2 = sTempStr.substr(0, iLeng);
  8865. break;
  8866. }
  8867. }
  8868. sTempStr = sTempStr2;
  8869. }
  8870. sSndMsg += lzzfBP_HanDisp24(sTempStr, iXPos, iYPos);
  8871. iXPos = Number(iLeft);
  8872. iYPos = Number(iTop) + 250;
  8873. sTempStr = String(objects[sds_data_path + "ds_plgybarcdinfo"].getColumn(iRowNo, "prcpdispnm2")); //검사명(추가처방)
  8874. sTempStr = sTempStr.replace("▨", ",");
  8875. //14바이트가 넘을 경우 검사명을 짤라서 출력한다.
  8876. if(sTempStr.getByteLength() > 14) {
  8877. for(var iLeng = 1 ; iLeng <= sTempStr.length ; iLeng++) {
  8878. if(((sTempStr.substr(0, iLeng)).getByteLength()) > 14) {
  8879. sTempStr2 = sTempStr.substr(0, iLeng);
  8880. break;
  8881. }
  8882. }
  8883. sTempStr = sTempStr2;
  8884. }
  8885. sSndMsg += lzzfBP_HanDisp24(sTempStr, iXPos, iYPos);
  8886. sSndMsg += "{XS;I,0001,0002C5101|}"; // end
  8887. if(sCommKind == "01") {
  8888. CommAX.SendMessageToLPT(sSndMsg);
  8889. } else if(sCommKind == "02") {
  8890. CommAX.SendMessage(sSndMsg);
  8891. }
  8892. } // 프린터종류
  8893. }// end for
  8894. //portopen이 true이고 통신유형이 com일때 port close
  8895. if( portOpenTF == "TRUE" && sCommKind == "02"){
  8896. CommAX.PortOpen("false");
  8897. }
  8898. }else if((portOpenTF = "FALSE" && sCommKind == "02")){
  8899. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  8900. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  8901. + " \n 2.케이블 확인"
  8902. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  8903. return;
  8904. }
  8905. }
  8906. } catch(ee) {
  8907. sysf_messageBox("병리바코드출력에", "E009");
  8908. return;
  8909. }
  8910. }
  8911. /**
  8912. * @group :
  8913. * @ver : 2009.04.07
  8914. * @by : 김성희
  8915. * @---------------------------------------------------
  8916. * @type : function
  8917. * @access : public
  8918. * @desc : 환자명바코드출력
  8919. * @param : ref - 환자명바코드출력정보 인스턴스
  8920. * @return :
  8921. * @---------------------------------------------------
  8922. */
  8923. function lf_PatNmBarCdLabelSaTo(refDs:Dataset,sds_data_path){
  8924. //var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  8925. //var sPrntKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"prntkind");
  8926. var sPrntKind = eval(sds_data_path + "ds_data_setupinfo").getColumn(0,"prntkind");
  8927. var portOpenCheck = "";
  8928. var iXPos = 0;
  8929. var iYPos = 0;
  8930. var sSndMsg = "";
  8931. if (sPrntKind == 0) return;
  8932. // var sCommKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"commkind");
  8933. // var sLeftBank = objects[sds_data_path + "ds_data_blank"].getColumn(0,"left");
  8934. // var sTopBank = objects[sds_data_path + "ds_data_blank"].getColumn(0,"top");
  8935. var sCommKind = eval(sds_data_path + "ds_data_setupinfo").getColumn(0,"commkind");
  8936. var sLeftBank = eval(sds_data_path + "ds_data_blank").getColumn(0,"left");
  8937. var sTopBank = eval(sds_data_path + "ds_data_blank").getColumn(0,"top");
  8938. trace('Sato '+sPrntKind+' / '+sCommKind+' / '+sLeftBank+' / '+sTopBank);
  8939. var sStr = "";
  8940. var sPid = refDs.getColumn(0,"pid");
  8941. var sPatnm = refDs.getColumn(0,"patnm");
  8942. var sPatsexage = refDs.getColumn(0,"patsexage");
  8943. var sDt = refDs.getColumn(0,"printdt");
  8944. trace('Sato2 '+sPid+' / '+sPatnm+' / '+sPatsexage+' / '+sDt);
  8945. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  8946. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  8947. sSndMsg = String.fromCharCode(27)+ "A" +String.fromCharCode(27)+ "A103500500"; // 시작위치 셋팅
  8948. //등록번호
  8949. iXPos = Number(sLeftBank)+130;
  8950. iYPos = Number(sTopBank)+10;
  8951. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+ "H" + iXPos + String.fromCharCode(27)+ "S" + sPid;
  8952. //바코드
  8953. iXPos = Number(sLeftBank) + 60;
  8954. iYPos = Number(sTopBank) + 30;
  8955. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"BG02100" + sPid; // 바코드
  8956. //환자명
  8957. iXPos = Number(sLeftBank) + 10;
  8958. iYPos = Number(sTopBank) + 155;
  8959. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sPatnm);
  8960. //등록번호
  8961. iXPos = Number(sLeftBank)+200;
  8962. iYPos = Number(sTopBank)+160;
  8963. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"S" + sPid;
  8964. //성별/나이
  8965. iXPos = Number(sLeftBank) + 330;
  8966. iYPos = Number(sTopBank) + 160;
  8967. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"S" + sPatsexage;
  8968. //출력일시
  8969. iXPos = Number(sLeftBank) + 10;
  8970. iYPos = Number(sTopBank) + 195;
  8971. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"S" + sDt;
  8972. sSndMsg += String.fromCharCode(27)+"Q" + "1" + String.fromCharCode(27)+"Z";
  8973. CommAX.SendMsg(sSndMsg);
  8974. }
  8975. /**
  8976. * @group :
  8977. * @ver : 2010.01.14
  8978. * @by : 박정은
  8979. * @---------------------------------------------------
  8980. * @type : function
  8981. * @access : public
  8982. * @desc : 환자명바코드출력
  8983. * @param : ref - 환자명바코드출력정보 인스턴스
  8984. * @return :
  8985. * @---------------------------------------------------
  8986. */
  8987. function lf_PatNmBarCdLabel_B472(refDs:Dataset,sds_data_path){
  8988. //var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  8989. var sPrntKind = eval(sds_data_path + "ds_data_setupinfo").getColumn(0,"prntkind");
  8990. var portOpenCheck = "";
  8991. var iXPos = 0;
  8992. var iYPos = 0;
  8993. var sSndMsg = "";
  8994. if (sPrntKind == 0) return;
  8995. var sCommKind =eval(sds_data_path + "ds_data_setupinfo").getColumn(0,"commkind");
  8996. var sLeftBank = eval(sds_data_path + "ds_data_blank").getColumn(0,"left");
  8997. var sTopBank = eval(sds_data_path + "ds_data_blank").getColumn(0,"top");
  8998. var sB472sizegbn = eval(sds_data_path + "ds_data_blank").getColumn(0,"b472size");
  8999. if(sCommKind == "01") {
  9000. var sSetUpVal = eval(sds_data_path + "ds_data_comm01").getColumn(0,"setupval");
  9001. } else if(sCommKind == "02") {
  9002. var sComm = eval(sds_data_path + "ds_data_comm02").getColumn(0,"comm");
  9003. var sDataBit = eval(sds_data_path + "ds_data_comm02").getColumn(0,"databit");
  9004. var sStopBit = eval(sds_data_path + "ds_data_comm02").getColumn(0,"stopbit");
  9005. var sBaudRate = eval(sds_data_path + "ds_data_comm02").getColumn(0,"baudrate");
  9006. var sParity = eval(sds_data_path + "ds_data_comm02").getColumn(0,"parity");;
  9007. CommAX.CommPort = sComm;
  9008. CommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  9009. portOpenCheck = CommAX.PortOpen("true");
  9010. } else if(sCommKind == "03") {
  9011. var sSetUpVal = eval(sds_data_path + "ds_data_comm03").getColumn(0,"setupval");
  9012. var sEqmtCD = eval(sds_data_path + "ds_data_comm03").getColumn(0,"eqmtcd");
  9013. }
  9014. if( (portOpenCheck == "TRUE" && sCommKind == "02")
  9015. || sCommKind == "01"
  9016. || sCommKind == "07"
  9017. || sCommKind == "03"){
  9018. var sStr = "";
  9019. var sPid = refDs.getColumn(0,"pid");
  9020. var sPatnm = refDs.getColumn(0,"patnm");
  9021. var sPatsexage = refDs.getColumn(0,"patsexage");
  9022. var sDt = refDs.getColumn(0,"printdt");
  9023. var sB472size = "";
  9024. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  9025. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  9026. //sSndMsg += "{D0350,0550,0330|}"; // 라벨사이즈
  9027. if(sB472sizegbn == "2"){ // 320 630
  9028. sB472size = "0340,0620,0340"; // 기존라벨
  9029. }else{
  9030. sB472size = "0350,0550,0330"; // nUsize
  9031. }
  9032. sSndMsg += "{D" + sB472size + "|}"; // 라벨사이즈
  9033. sSndMsg += "{C|}"; // 버퍼클리어
  9034. sSndMsg += "{AX;+000,+000,+00|}"; // 피트량
  9035. //등록번호
  9036. iXPos = Number(sLeftBank)+130;
  9037. iYPos = Number(sTopBank)+20;
  9038. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, "*"+sPid+"*");
  9039. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, "*"+sPid+"*");
  9040. //바코드
  9041. iXPos = Number(sLeftBank) + 50;
  9042. iYPos = Number(sTopBank) + 30;
  9043. sSndMsg += lzzfBP_BarCode_Code39_B472(iXPos, iYPos, 5, 4, "*" + sPid + "*", 120); // 바코드
  9044. sSndMsg += lzzfBP_FiendOrigin(iXPos, iYPos);//위치
  9045. //환자명
  9046. iXPos = Number(sLeftBank) + 10;
  9047. iYPos = Number(sTopBank) + 160;
  9048. sSndMsg += lzzfBP_HanDisp24(sPatnm, iXPos, iYPos); // 환자명 한글
  9049. //등록번호
  9050. iXPos = Number(sLeftBank)+180;
  9051. iYPos = Number(sTopBank)+180;
  9052. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, sPid);
  9053. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sPid);
  9054. //성별/나이
  9055. iXPos = Number(sLeftBank) + 340;
  9056. iYPos = Number(sTopBank) + 180;
  9057. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, sPatsexage);
  9058. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sPatsexage);
  9059. //출력일시
  9060. iXPos = Number(sLeftBank) + 10;
  9061. iYPos = Number(sTopBank) + 220;
  9062. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, sDt);
  9063. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sDt);
  9064. sSndMsg += "{XS;I,0001,0002C5101|}";
  9065. if(sCommKind == "01") {
  9066. CommAX.SendMessageToLPT(sSndMsg);
  9067. sSndMsg = "";
  9068. } else if(sCommKind == "02") {
  9069. CommAX.SendMessage(sSndMsg);
  9070. sSndMsg = "";
  9071. }
  9072. CommAX.PortOpen("false");
  9073. }else if(portOpenCheck == "TRUE" && sCommKind == "02"){
  9074. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  9075. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  9076. + " \n 2.케이블 확인"
  9077. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  9078. return;
  9079. }
  9080. }
  9081. /**
  9082. * @group :
  9083. * @ver : 2009.04.07
  9084. * @by : 김성희
  9085. * @---------------------------------------------------
  9086. * @type : function
  9087. * @access : public
  9088. * @desc : 환자명바코드출력
  9089. * @param : ref - 환자명바코드출력정보 인스턴스
  9090. * @return :
  9091. * @---------------------------------------------------
  9092. */
  9093. function lf_PatNmBarCdLabel(refDs,sds_data_path){
  9094. //var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  9095. //var sPrntKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"prntkind");
  9096. var sPrntKind = eval(sds_data_path + "ds_data_setupinfo").getColumn(0,"prntkind");
  9097. var portOpenCheck = "";
  9098. var iXPos = 0;
  9099. var iYPos = 0;
  9100. var sSndMsg = "";
  9101. if (sPrntKind == 0) return;
  9102. var sCommKind = eval(sds_data_path + "ds_data_setupinfo").getColumn(0,"commkind");
  9103. var sLeftBank = eval(sds_data_path + "ds_data_blank").getColumn(0,"left");
  9104. var sTopBank = eval(sds_data_path + "ds_data_blank").getColumn(0,"top");
  9105. // var sCommKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"commkind");
  9106. // var sLeftBank = objects[sds_data_path + "ds_data_blank"].getColumn(0,"left");
  9107. // var sTopBank = objects[sds_data_path + "ds_data_blank"].getColumn(0,"top");
  9108. if(sCommKind == "01") {
  9109. var sSetUpVal = eval(sds_data_path + "ds_data_comm01").getColumn(0,"setupval");
  9110. //var sSetUpVal = objects[sds_data_path + "ds_data_comm01"].getColumn(0,"setupval");
  9111. } else if(sCommKind == "02") {
  9112. var sComm = eval(sds_data_path + "ds_data_comm02").getColumn(0,"comm");
  9113. var sDataBit = eval(sds_data_path + "ds_data_comm02").getColumn(0,"databit");
  9114. var sStopBit =eval(sds_data_path + "ds_data_comm02").getColumn(0,"stopbit");
  9115. var sBaudRate = eval(sds_data_path + "ds_data_comm02").getColumn(0,"baudrate");
  9116. var sParity = eval(sds_data_path + "ds_data_comm02").getColumn(0,"parity");;
  9117. // var sComm = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"comm");
  9118. // var sDataBit = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"databit");
  9119. // var sStopBit = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"stopbit");
  9120. // var sBaudRate = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"baudrate");
  9121. // var sParity = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"parity");;
  9122. CommAX.CommPort = sComm;
  9123. CommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  9124. portOpenCheck = CommAX.PortOpen("true");
  9125. } else if(sCommKind == "03") {
  9126. var sSetUpVal = eval(sds_data_path + "ds_data_comm03").getColumn(0,"setupval");
  9127. var sEqmtCD = eval(sds_data_path + "ds_data_comm03").getColumn(0,"eqmtcd");
  9128. // var sSetUpVal = objects[sds_data_path + "ds_data_comm03"].getColumn(0,"setupval");
  9129. // var sEqmtCD = objects[sds_data_path + "ds_data_comm03"].getColumn(0,"eqmtcd");
  9130. }
  9131. if( (portOpenCheck == "TRUE" && sCommKind == "02")
  9132. || sCommKind == "01"
  9133. || sCommKind == "03"){
  9134. var sStr = "";
  9135. var sPid = refDs.getColumn(0,"pid");
  9136. var sPatnm = refDs.getColumn(0,"patnm");
  9137. var sPatsexage = refDs.getColumn(0,"patsexage");
  9138. var sDt = refDs.getColumn(0,"printdt");
  9139. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  9140. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  9141. if(sPrntKind == "1" || sPrntKind == "5") { //zebra
  9142. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  9143. //등록번호
  9144. iXPos = Number(sLeftBank)+200;
  9145. iYPos = Number(sTopBank)+10;
  9146. sSndMsg += lzzfBP_ChangeFont("C", 20, 20);
  9147. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*"+sPid+"*");
  9148. //바코드
  9149. iXPos = Number(sLeftBank) + 90;
  9150. iYPos = Number(sTopBank) + 60;
  9151. sSndMsg += lzzfBP_FiendOrigin(iXPos, iYPos);//위치
  9152. sSndMsg += lzzfBP_BarCode_Code39_300dpi(iXPos, iYPos, "N", 120, "*" + sPid + "*"); // 바코드
  9153. //sSndMsg += "^BY2,2.0"; //
  9154. //sSndMsg += "^B3" + "N" + ",N," + "100" + ",N,N^FD" + "*" + sPid + "*" + "^FS";//바코드 크기
  9155. //환자명
  9156. iXPos = Number(sLeftBank) + 10;
  9157. iYPos = Number(sTopBank) + 185;
  9158. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm, 2, 2);
  9159. sSndMsg += CommAX.HanImageData();
  9160. //등록번호
  9161. iXPos = Number(sLeftBank)+220;
  9162. iYPos = Number(sTopBank)+190;
  9163. sSndMsg += lzzfBP_ChangeFont("C", 20, 20);
  9164. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid);
  9165. if(sCommKind == "01") {
  9166. CommAX.SendMessageToLPT(sSndMsg);
  9167. sSndMsg = "";
  9168. } else if(sCommKind == "02") {
  9169. CommAX.SendMessage(sSndMsg);
  9170. sSndMsg = "";
  9171. }
  9172. //성별/나이
  9173. iXPos = Number(sLeftBank) + 420;
  9174. iYPos = Number(sTopBank) + 190;
  9175. //sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatsexage, 2, 2);
  9176. //sSndMsg += CommAX.HanImageData();
  9177. sSndMsg += lzzfBP_ChangeFont("C", 20, 20);
  9178. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPatsexage);
  9179. if(sCommKind == "01") {
  9180. CommAX.SendMessageToLPT(sSndMsg);
  9181. sSndMsg = "";
  9182. } else if(sCommKind == "02") {
  9183. CommAX.SendMessage(sSndMsg);
  9184. sSndMsg = "";
  9185. }
  9186. //출력일시
  9187. iXPos = Number(sLeftBank) + 10;
  9188. iYPos = Number(sTopBank) + 240;
  9189. sSndMsg += lzzfBP_ChangeFont("C", 20, 20);
  9190. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDt);
  9191. sSndMsg += lzzfBP_EndFormat();
  9192. if(sCommKind == "01") {
  9193. CommAX.SendMessageToLPT(sSndMsg);
  9194. sSndMsg = "";
  9195. } else if(sCommKind == "02") {
  9196. CommAX.SendMessage(sSndMsg);
  9197. sSndMsg = "";
  9198. }
  9199. CommAX.PortOpen("false");
  9200. }else if(sPrntKind == "9") { //zebra 300dpi
  9201. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  9202. //등록번호
  9203. iXPos = Number(sLeftBank)+140;
  9204. iYPos = Number(sTopBank)+10;
  9205. sSndMsg += lzzfBP_ChangeFont("C", 20, 20);
  9206. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*"+sPid+"*");
  9207. //바코드
  9208. iXPos = Number(sLeftBank) + 60;
  9209. iYPos = Number(sTopBank) + 30;
  9210. sSndMsg += lzzfBP_FiendOrigin(iXPos, iYPos);//위치
  9211. sSndMsg += "^BY3,2.4,130"; //
  9212. sSndMsg += "^B3" + "N" + ",N," + "150" + ",N,N^FD" + "*" + sPid + "*" + "^FS";//바코드 크기
  9213. iWidth = 0;
  9214. aStr = "";
  9215. aFlag = new Array();
  9216. iXPos = Number(sLeftBank) + 10;
  9217. //sPatnm = sPatnm.substr(0, 20)
  9218. aStr = lpzfGetHanGul(sPatnm, aFlag);
  9219. if(!utlf_isNull(aStr))
  9220. {
  9221. for (var iNo=0; iNo < aStr.length; iNo++) {
  9222. //----------------------
  9223. if (aFlag[iNo] == "E") {
  9224. iYPos = Number(sTopBank) + 190;
  9225. //iXPos = Number(iXPos) + Number(iWidth);
  9226. sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  9227. iWidth = iWidth + (Number(aStr[iNo].length) * 12);
  9228. } else {
  9229. iYPos = Number(sTopBank) + 190;
  9230. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,30,30^FH^FD" + aStr[iNo] + "^FS^CI1"; // 검체표시명(한글)
  9231. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  9232. }
  9233. }
  9234. }
  9235. //----110531 환자명 영문출력 수정 이재오
  9236. //등록번호
  9237. iXPos = Number(sLeftBank)+200;
  9238. iYPos = Number(sTopBank)+190;
  9239. sSndMsg += lzzfBP_ChangeFont("C", 20, 20);
  9240. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid);
  9241. // if(sCommKind == "01") {
  9242. // CommAX.SendMessageToLPT(sSndMsg);
  9243. // sSndMsg = "";
  9244. // } else if(sCommKind == "02") {
  9245. // CommAX.SendMessage(sSndMsg);
  9246. // sSndMsg = "";
  9247. // }
  9248. //성별/나이
  9249. iXPos = Number(sLeftBank) + 430;
  9250. iYPos = Number(sTopBank) + 190;
  9251. //sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatsexage, 2, 2);
  9252. //sSndMsg += CommAX.HanImageData();
  9253. sSndMsg += lzzfBP_ChangeFont("C", 20, 20);
  9254. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPatsexage);
  9255. // if(sCommKind == "01") {
  9256. // CommAX.SendMessageToLPT(sSndMsg);
  9257. // sSndMsg = "";
  9258. // } else if(sCommKind == "02") {
  9259. // CommAX.SendMessage(sSndMsg);
  9260. // sSndMsg = "";
  9261. // }
  9262. //출력일시
  9263. iXPos = Number(sLeftBank) + 10;
  9264. iYPos = Number(sTopBank) + 220;
  9265. sSndMsg += lzzfBP_ChangeFont("C", 10, 10);
  9266. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDt);
  9267. sSndMsg += lzzfBP_EndFormat();
  9268. if(sCommKind == "01") {
  9269. CommAX.SendMessageToLPT(sSndMsg);
  9270. sSndMsg = "";
  9271. } else if(sCommKind == "02") {
  9272. CommAX.SendMessage(sSndMsg);
  9273. sSndMsg = "";
  9274. }
  9275. CommAX.PortOpen("false");
  9276. }else if(sPrntKind == "10"){ //zebra ELP 20120306
  9277. sSndMsg += "N" + "\n";
  9278. sSndMsg += "JF" + "\n";
  9279. sSndMsg += "D9" + "\n";
  9280. sSndMsg += "S2" + "\n";
  9281. sSndMsg += "Q223,27" + "\n";
  9282. sSndMsg += "q456" + "\n";
  9283. //등록번호
  9284. iXPos = Number(sLeftBank)+140;
  9285. iYPos = Number(sTopBank) + 10;
  9286. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + "*"+sPid+"*" + "\""+ "\n";
  9287. //바코드
  9288. iXPos = Number(sLeftBank) + 90;
  9289. iYPos = Number(sTopBank) + 30;
  9290. sSndMsg += "B" + iXPos + "," + iYPos + ",0,3,2,5,93,N," + "\"" + sPid + "\""+ "\n";
  9291. //환자명
  9292. iXPos = Number(sLeftBank) + 10;
  9293. iYPos = Number(sTopBank) + 145;
  9294. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,1,1,N," + "\"" + sPatnm + "\""+ "\n";
  9295. //등록번호
  9296. iXPos = Number(sLeftBank)+ 140;
  9297. iYPos = Number(sTopBank) + 130;
  9298. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,2,2,N," + "\"" + sPid + "\""+ "\n";
  9299. //성별/나이
  9300. //등록번호
  9301. iXPos = Number(sLeftBank)+ 340;
  9302. iYPos = Number(sTopBank) + 145;
  9303. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + sPatsexage + "\""+ "\n";
  9304. //출력일시
  9305. iXPos = Number(sLeftBank)+ 10;
  9306. iYPos = Number(sTopBank) + 180;
  9307. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + sDt + "\""+ "\n";
  9308. sSndMsg += ""+ "\n";
  9309. sSndMsg += "P1"+ "\n";
  9310. //CommAX.PortOpen("false");
  9311. CommAX.SendMsg(sSndMsg);
  9312. }else if(sPrntKind == "11"){ //GX420 20120229
  9313. sSndMsg += "^XA^SEE:UHANGUL.DAT^FS^CWQ,E:kfont3.FNT^FS";
  9314. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  9315. //등록번호
  9316. iXPos = Number(sLeftBank)+140;
  9317. iYPos = Number(sTopBank)+10;
  9318. sSndMsg += lzzfBP_ChangeFont("C", 10, 10);
  9319. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*"+sPid+"*");
  9320. //바코드
  9321. iXPos = Number(sLeftBank) + 100;
  9322. iYPos = Number(sTopBank) + 30;
  9323. sSndMsg += lzzfBP_FiendOrigin(iXPos, iYPos);//위치
  9324. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  9325. sSndMsg += lzzfBP_BarCode_Code39(iXPos, iYPos, "N", 100, "*" + sPid + "*"); // 바코드
  9326. iWidth = 0;
  9327. aStr = "";
  9328. aFlag = new Array();
  9329. iXPos = Number(sLeftBank) + 10;
  9330. aStr = lpzfGetHanGul(sPatnm, aFlag);
  9331. if(!utlf_isNull(aStr))
  9332. {
  9333. for (var iNo=0; iNo < aStr.length; iNo++) {
  9334. //----------------------
  9335. if (aFlag[iNo] == "E") {
  9336. iYPos = Number(sTopBank) + 145;
  9337. sSndMsg += "^CFF20,20^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // 검체표시명(영문)
  9338. iWidth = iWidth + (Number(aStr[iNo].length) * 28);
  9339. } else {
  9340. iYPos = Number(sTopBank) + 145;
  9341. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,25,20^FH^FD" + aStr[iNo] + "^FS^CI1"; // 검체표시명(한글)
  9342. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  9343. }
  9344. }
  9345. }
  9346. //등록번호
  9347. iXPos = Number(sLeftBank)+140;
  9348. iYPos = Number(sTopBank)+145;
  9349. sSndMsg += lzzfBP_ChangeFont("C", 15, 15);
  9350. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid);
  9351. //성별 나이
  9352. iXPos = Number(sLeftBank) + 340;
  9353. iYPos = Number(sTopBank) + 145;
  9354. //sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatsexage, 2, 2);
  9355. //sSndMsg += CommAX.HanImageData();
  9356. sSndMsg += lzzfBP_ChangeFont("C", 15, 15);
  9357. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPatsexage);
  9358. //출력일시
  9359. iXPos = Number(sLeftBank) + 10;
  9360. iYPos = Number(sTopBank) + 180;
  9361. sSndMsg += lzzfBP_ChangeFont("C", 10, 10);
  9362. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDt);
  9363. sSndMsg += lzzfBP_EndFormat();
  9364. CommAX.SendMsg(sSndMsg);
  9365. }
  9366. }else if(portOpenCheck == "TRUE" && sCommKind == "02"){
  9367. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  9368. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  9369. + " \n 2.케이블 확인"
  9370. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  9371. return;
  9372. }
  9373. }
  9374. /**
  9375. * 미생물 작업번호라벨 출력 - 박정은
  9376. * pBCount - 분주 또는 진검바코드 출력여부
  9377. */
  9378. function fLisMicroWorknoSpcBarcodePrint(refDs:Dataset,sds_data_path, pBCount){
  9379. try{
  9380. var cntHR = refDs.rowcount;
  9381. //var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  9382. var sPrntKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"prntkind");
  9383. var portOpenTF = "";
  9384. var BCount = 0;
  9385. var iXPos = 0;
  9386. var iYPos = 0;
  9387. if(utlf_isNull(pBCount)){
  9388. BCount = 0;
  9389. }else{
  9390. BCount = pBCount;
  9391. }
  9392. if(cntHR > 0 && sPrntKind != "0"){
  9393. var sCommKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"commkind");
  9394. var sLeftBank = objects[sds_data_path + "ds_data_blank"].getColumn(0,"left");
  9395. var sTopBank = objects[sds_data_path + "ds_data_blank"].getColumn(0,"top");
  9396. if(sCommKind == "01") {
  9397. var sSetUpVal = objects[sds_data_path + "ds_data_comm01"].getColumn(0,"setupval");
  9398. } else if(sCommKind == "02") {
  9399. var sComm = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"comm");
  9400. var sDataBit = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"databit");
  9401. var sStopBit = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"stopbit");
  9402. var sBaudRate = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"baudrate");
  9403. var sParity = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"parity");
  9404. var sSetUpVal = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"setupval");
  9405. CommAX.CommPort = sComm;
  9406. CommAX.Settings = sBaudRate+","+ sParity+","+sDataBit+","+ sStopBit;
  9407. if(BCount > 0){
  9408. portOpenTF = "TRUE";
  9409. }else if(BCount == 0){
  9410. portOpenTF = CommAX.PortOpen("true");
  9411. }
  9412. //CommAX.PortOpen();
  9413. } else if(sCommKind == "03") {
  9414. var sSetUpVal = objects[sds_data_path + "ds_data_comm03"].getColumn(0,"setupval");
  9415. }
  9416. if( (portOpenTF == "TRUE" && sCommKind == "02")
  9417. || (sCommKind == "01")
  9418. || (sCommKind == "03")){
  9419. for(i=0 ; i< cntHR;i++){
  9420. var sSndMsg = "";
  9421. var sTsectlblnm = utlf_transNullToEmpty(refDs.getColumn(i,"tsectlblnm"));
  9422. var sBcno = refDs.getColumn(i,"bcno");
  9423. var sBarcdprntdt = refDs.getColumn(i,"barcdprntdt");
  9424. var sPatnm = refDs.getColumn(i,"patnm");
  9425. var sPid = refDs.getColumn(i,"pid");
  9426. var sSexage = refDs.getColumn(i,"sexage");
  9427. var sSpclblnm = refDs.getColumn(i,"spclblnm");
  9428. var sTubelblnm = refDs.getColumn(i,"tubelblnm");
  9429. var sSecttsect = refDs.getColumn(i,"secttsect");
  9430. var sTclslblnmlist = refDs.getColumn(i,"tclslblnmlist");
  9431. var sInfcinfolist = refDs.getColumn(i,"infcinfolist");
  9432. var sErprcpflag = refDs.getColumn(i,"erprcpflag");
  9433. var barcdcntflag = refDs.getColumn(i,"cntflag");
  9434. var workno = refDs.getColumn(i,"workno");
  9435. var spcacptdd = refDs.getColumn(i,"spcacptdd");
  9436. var orddrnm = refDs.getColumn(i,"orddrnm");
  9437. var bcollbarcdprntcnt = refDs.getColumn(i,"bcollbarcdprntcnt");
  9438. var spcacptbarcdprntcnt = refDs.getColumn(i,"spcacptbarcdprntcnt");
  9439. var microbarcdprntcnt = refDs.getColumn(i,"microbarcdprntcnt");
  9440. var mdiabarcdprntcnt = refDs.getColumn(i,"mdiabarcdprntcnt");
  9441. var sRoomcd = refDs.getColumn(i,"roomcd");
  9442. var sDept = refDs.getColumn(i,"dept");
  9443. var workno2 = "";
  9444. var sPrntcnt = refDs.getColumn(i,"prntcnt");
  9445. var flag = refDs.getColumn(i,"flag");
  9446. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  9447. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  9448. if(sPrntKind == "1") {
  9449. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  9450. iXPos = Number(sLeftBank) + 20;
  9451. iYPos = Number(sTopBank) + 20;
  9452. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  9453. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  9454. iXPos = Number(sLeftBank) + 130;
  9455. iYPos = Number(sTopBank) + 18;
  9456. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm.substr(0, 20), 1, 1);
  9457. sSndMsg += CommAX.HanImageData();
  9458. iXPos = Number(sLeftBank) + 300;
  9459. iYPos = Number(sTopBank) + 20;
  9460. sSndMsg += lzzfBP_ChangeFont("C", 12, 12); // 폰트 설정
  9461. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //환자등록번호
  9462. iXPos = Number(sLeftBank) + 20;
  9463. iYPos = Number(sTopBank) + 60;
  9464. sSndMsg += lzzfBP_ChangeFont("C", 12, 12); // 폰트 설정
  9465. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sRoomcd); //병실코드
  9466. iXPos = Number(sLeftBank) + 100;
  9467. iYPos = Number(sTopBank) + 55;
  9468. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sDept.substr(0, 20), 1, 1);
  9469. sSndMsg += CommAX.HanImageData();
  9470. iXPos = Number(sLeftBank) + 220;
  9471. iYPos = Number(sTopBank) + 60;
  9472. sSndMsg += lzzfBP_ChangeFont("C", 12, 12); // 폰트 설정
  9473. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSexage); // 성별나이
  9474. iXPos = Number(sLeftBank) + 300;
  9475. iYPos = Number(sTopBank) + 55;
  9476. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, orddrnm.substr(0, 20), 1, 1);
  9477. sSndMsg += CommAX.HanImageData();
  9478. iXPos = Number(sLeftBank) + 20;
  9479. iYPos = Number(sTopBank) + 95;
  9480. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  9481. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sTclslblnmlist); //검사항목라벨명
  9482. if(!utlf_isNull(workno)){
  9483. workno2 = workno.substr(12,3);
  9484. workno = workno.substr(0,8) + "-" + workno.substr(8,2) + "-" +
  9485. workno.substr(10,2) + "-";
  9486. }
  9487. iXPos = Number(sLeftBank) + 120;
  9488. iYPos = Number(sTopBank) + 95;
  9489. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  9490. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, workno); //작업번호
  9491. iXPos = Number(sLeftBank) + 300;
  9492. iYPos = Number(sTopBank) + 88;
  9493. sSndMsg += lzzfBP_ChangeFont("C", 28, 16); // 폰트 설정
  9494. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, workno2); //작업번호
  9495. iXPos = Number(sLeftBank) + 380;
  9496. iYPos = Number(sTopBank) + 95;
  9497. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  9498. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, spcacptdd); //접수일자
  9499. iXPos = Number(sLeftBank) + 60;
  9500. iYPos = Number(sTopBank) + 120;
  9501. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  9502. sSndMsg += lzzfBP_BarCode_Code39(iXPos, iYPos, "N", 100, "*" + sBcno + "*"); // 바코드번호
  9503. iXPos = Number(sLeftBank) + 140;
  9504. iYPos = Number(sTopBank) + 230;
  9505. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  9506. sSndMsg += lzzfBP_FieldDataA(iXPos , iYPos, "*" + sBcno + "*"); //바코드번호
  9507. if(flag == "reprnt"){ // 재출력화면일때
  9508. if(sPrntcnt > 0){
  9509. sSndMsg += lzzfBP_EndFormat(sPrntcnt); // 접수바코드출력수
  9510. if(sCommKind == "01") {
  9511. CommAX.SendMessageToLPT(sSndMsg);
  9512. } else if(sCommKind == "02") {
  9513. CommAX.SendMessage(sSndMsg);
  9514. }
  9515. }
  9516. }else{
  9517. if(microbarcdprntcnt > 0){
  9518. sSndMsg += lzzfBP_EndFormat(microbarcdprntcnt); // 접수바코드출력수
  9519. if(sCommKind == "01") {
  9520. CommAX.SendMessageToLPT(sSndMsg);
  9521. } else if(sCommKind == "02") {
  9522. CommAX.SendMessage(sSndMsg);
  9523. }
  9524. }
  9525. }
  9526. }
  9527. }//end for
  9528. //portopen이 true이고 통신유형이 com일때 port close
  9529. if( portOpenTF == "TRUE" && sCommKind == "02"){
  9530. CommAX.PortOpen("false");
  9531. }
  9532. }else if((portOpenTF = "FALSE" && sCommKind == "02")){
  9533. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  9534. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  9535. + " \n 2.케이블 확인"
  9536. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  9537. return;
  9538. }
  9539. }
  9540. }catch(ee) {//이후 2008-07-07 바코드 포트 오류 막기위해
  9541. sysf_messageBox("바코드출력에", "E009");
  9542. return;
  9543. }
  9544. }
  9545. function fLisMicroWorknoSpcBarcodePrint011(pRef, pBCount)
  9546. {
  9547. try{
  9548. var cntHR = pRef.rowcount;
  9549. var sPrntKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"prntkind");
  9550. var portOpenTF = "";
  9551. var BCount = 0;
  9552. var iXPos = 0;
  9553. var iYPos = 0;
  9554. //if(pBCount == null || pBCount == ""){
  9555. if(utlf_isNull(pBCount)){
  9556. BCount = 0;
  9557. }else{
  9558. BCount = pBCount;
  9559. }
  9560. if(cntHR > 0 && sPrntKind != "0"){
  9561. var sCommKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"commkind");
  9562. var sLeftBank = objects[sds_data_path + "ds_data_blank"].getColumn(0,"left");
  9563. var sTopBank = objects[sds_data_path + "ds_data_blank"].getColumn(0,"top");
  9564. if(sCommKind == "01") {
  9565. var sSetUpVal = objects[sds_data_path + "ds_data_comm01"].getColumn(0,"setupval");
  9566. } else if(sCommKind == "02") {
  9567. var sComm = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"comm");
  9568. var sDataBit = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"databit");
  9569. var sStopBit = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"stopbit");
  9570. var sBaudRate = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"baudrate");
  9571. var sParity = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"parity");
  9572. var sSetUpVal = objects[sds_data_path + "ds_data_comm02"].getColumn(0,"setupval");
  9573. CommAX.CommPort = sComm;
  9574. CommAX.Settings = sBaudRate+","+ sParity+","+sDataBit+","+ sStopBit;
  9575. if(BCount > 0){
  9576. portOpenTF = "TRUE";
  9577. }else if(BCount == 0){
  9578. portOpenTF = CommAX.PortOpen("true");
  9579. }
  9580. //CommAX.PortOpen();
  9581. } else if(sCommKind == "03") {
  9582. var sSetUpVal = objects[sds_data_path + "ds_data_comm01"].getColumn(0,"setupval");
  9583. }
  9584. if( (portOpenTF == "TRUE" && sCommKind == "02")
  9585. || (sCommKind == "01")
  9586. || (sCommKind == "03")){
  9587. for(i = 0; i < cntHR; i++){
  9588. var sSndMsg = "";
  9589. var sTsectlblnm = pRef.getColumn(i, "tsectlblnm");
  9590. var sBcno = pRef.getColumn(i, "bcno");
  9591. var sBarcdprntdt = pRef.getColumn(i, "barcdprntdt");
  9592. var sPatnm = pRef.getColumn(i, "patnm");
  9593. var sPid = pRef.getColumn(i, "pid");
  9594. var sSexage = pRef.getColumn(i, "sexage");
  9595. var sSpclblnm = pRef.getColumn(i, "spclblnm");
  9596. var sTubelblnm = pRef.getColumn(i, "tubelblnm");
  9597. var sSecttsect = pRef.getColumn(i, "secttsect");
  9598. var sTclslblnmlist = pRef.getColumn(i, "tclslblnmlist");
  9599. var sInfcinfolist = pRef.getColumn(i, "infcinfolist");
  9600. var sErprcpflag = pRef.getColumn(i, "erprcpflag");
  9601. var barcdcntflag = pRef.getColumn(i, "cntflag");
  9602. var workno = pRef.getColumn(i, "workno");
  9603. var spcacptdd = pRef.getColumn(i, "spcacptdd");
  9604. var orddrnm = pRef.getColumn(i, "orddrnm");
  9605. var bcollbarcdprntcnt = pRef.getColumn(i, "bcollbarcdprntcnt");
  9606. var spcacptbarcdprntcnt = pRef.getColumn(i, "spcacptbarcdprntcnt");
  9607. var microbarcdprntcnt = pRef.getColumn(i, "microbarcdprntcnt");
  9608. var mdiabarcdprntcnt = pRef.getColumn(i, "mdiabarcdprntcnt");
  9609. var sRoomcd = pRef.getColumn(i, "roomcd");
  9610. var sDept = pRef.getColumn(i, "dept");
  9611. var workno2 = "";
  9612. var sPrntcnt = pRef.getColumn(i, "prntcnt");
  9613. var flag = pRef.getColumn(i, "flag");
  9614. if( utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  9615. if( utlf_isNull(sTopBank) || sLeftBank == "-") sTopBank = 0;
  9616. if(sPrntKind == "1") {
  9617. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  9618. iXPos = Number(sLeftBank) + 10;
  9619. iYPos = Number(sTopBank) + 20;
  9620. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  9621. sSndMsg += lzzfBP_BarCode_Code39(iXPos, iYPos, "N", 70, "*" + sBcno + "*"); // 바코드번호 짝데기
  9622. iXPos = Number(sLeftBank) + 40;
  9623. iYPos = Number(sTopBank) + 95;
  9624. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  9625. sSndMsg += lzzfBP_FieldDataA(iXPos , iYPos, sBcno); //바코드번호 텍스트
  9626. iXPos = Number(sLeftBank) + 20;
  9627. iYPos = Number(sTopBank) + 130;
  9628. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  9629. sSndMsg += lzzfBP_FieldDataA(iXPos , iYPos, workno.substr(0,8)); // 작업번호 앞자리
  9630. iXPos = Number(sLeftBank) + 120;
  9631. iYPos = Number(sTopBank) + 130;
  9632. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  9633. sSndMsg += lzzfBP_FieldDataA(iXPos , iYPos, workno.substr(8,16)); //작업번호 뒷자리
  9634. if(flag == "reprnt"){ // 재출력화면일때
  9635. //if(microbarcdprntcnt > 0){
  9636. if(sCommKind == "01") {
  9637. CommAX.SendMessageToLPT(sSndMsg);
  9638. sSndMsg = "";
  9639. } else if(sCommKind == "02") {
  9640. CommAX.SendMessage(sSndMsg);
  9641. sSndMsg = "";
  9642. }
  9643. //}
  9644. }else{
  9645. if(microbarcdprntcnt > 0){
  9646. if(sCommKind == "01") {
  9647. CommAX.SendMessageToLPT(sSndMsg);
  9648. sSndMsg = "";
  9649. } else if(sCommKind == "02") {
  9650. CommAX.SendMessage(sSndMsg);
  9651. sSndMsg = "";
  9652. }
  9653. }
  9654. }
  9655. iXPos = Number(sLeftBank) + 305;
  9656. iYPos = Number(sTopBank) + 20;
  9657. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  9658. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //환자등록번호
  9659. iXPos = Number(sLeftBank) + 515;
  9660. iYPos = Number(sTopBank) + 20;
  9661. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  9662. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, spcacptdd); //접수일자
  9663. iXPos = Number(sLeftBank) + 305;
  9664. iYPos = Number(sTopBank) + 60;
  9665. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  9666. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sTclslblnmlist); //검사항목라벨명
  9667. if(flag == "reprnt"){ // 재출력화면일때
  9668. //if(microbarcdprntcnt > 0){
  9669. if(sCommKind == "01") {
  9670. CommAX.SendMessageToLPT(sSndMsg);
  9671. sSndMsg = "";
  9672. } else if(sCommKind == "02") {
  9673. CommAX.SendMessage(sSndMsg);
  9674. sSndMsg = "";
  9675. }
  9676. //}
  9677. }else{
  9678. if(microbarcdprntcnt > 0){
  9679. if(sCommKind == "01") {
  9680. CommAX.SendMessageToLPT(sSndMsg);
  9681. sSndMsg = "";
  9682. } else if(sCommKind == "02") {
  9683. CommAX.SendMessage(sSndMsg);
  9684. sSndMsg = "";
  9685. }
  9686. }
  9687. }
  9688. iXPos = Number(sLeftBank) + 305;
  9689. iYPos = Number(sTopBank) + 80;
  9690. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sDept.substr(0, 20), 1, 1);
  9691. sSndMsg += CommAX.HanImageData();
  9692. if(sRoomcd != ""){ // 병실있을때만
  9693. iXPos = Number(sLeftBank) + 360;
  9694. iYPos = Number(sTopBank) + 85;
  9695. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  9696. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, " (" + sRoomcd + ")"); //병실코드
  9697. }
  9698. iXPos = Number(sLeftBank) + 500;
  9699. iYPos = Number(sTopBank) + 85;
  9700. sSndMsg += lzzfBP_ChangeFont("C", 12, 12); // 폰트 설정
  9701. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSexage); // 성별나이
  9702. iXPos = Number(sLeftBank) + 305;
  9703. iYPos = Number(sTopBank) + 110;
  9704. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm.substr(0, 20), 1, 1); // 환자명
  9705. sSndMsg += CommAX.HanImageData();
  9706. iXPos = Number(sLeftBank) + 460;
  9707. iYPos = Number(sTopBank) + 115;
  9708. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  9709. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  9710. if(flag == "reprnt"){ // 재출력화면일때
  9711. //if(microbarcdprntcnt > 0){
  9712. if(sCommKind == "01") {
  9713. CommAX.SendMessageToLPT(sSndMsg);
  9714. sSndMsg = "";
  9715. } else if(sCommKind == "02") {
  9716. CommAX.SendMessage(sSndMsg);
  9717. sSndMsg = "";
  9718. }
  9719. //}
  9720. }else{
  9721. if(microbarcdprntcnt > 0){
  9722. if(sCommKind == "01") {
  9723. CommAX.SendMessageToLPT(sSndMsg);
  9724. sSndMsg = "";
  9725. } else if(sCommKind == "02") {
  9726. CommAX.SendMessage(sSndMsg);
  9727. sSndMsg = "";
  9728. }
  9729. }
  9730. }
  9731. // 배지 1
  9732. iXPos = Number(sLeftBank) +10 ;
  9733. iYPos = Number(sTopBank) + 180;
  9734. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  9735. sSndMsg += lzzfBP_BarCode_Code39(iXPos, iYPos, "N", 40, "*" + sBcno + "*"); // 바코드번호 짝데기
  9736. iXPos = Number(sLeftBank) + 40;
  9737. iYPos = Number(sTopBank) + 225;
  9738. sSndMsg += lzzfBP_ChangeFont("C", 20, 16); // 폰트 설정
  9739. sSndMsg += lzzfBP_FieldDataA(iXPos , iYPos, sBcno); //바코드번호 텍스트
  9740. iXPos = Number(sLeftBank) + 20;
  9741. iYPos = Number(sTopBank) + 250;
  9742. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  9743. sSndMsg += lzzfBP_FieldDataA(iXPos , iYPos, workno.substr(0,8)); //작업번호
  9744. iXPos = Number(sLeftBank) + 120;
  9745. iYPos = Number(sTopBank) + 250;
  9746. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  9747. sSndMsg += lzzfBP_FieldDataA(iXPos , iYPos, workno.substr(8,16)); //작업번호
  9748. iXPos = Number(sLeftBank) + 20;
  9749. iYPos = Number(sTopBank) + 275;
  9750. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm.substr(0, 20), 1, 1); // 환자명
  9751. sSndMsg += CommAX.HanImageData();
  9752. iXPos = Number(sLeftBank) + 180;
  9753. iYPos = Number(sTopBank) + 280;
  9754. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  9755. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  9756. if(flag == "reprnt"){ // 재출력화면일때
  9757. //if(microbarcdprntcnt > 0){
  9758. if(sCommKind == "01") {
  9759. CommAX.SendMessageToLPT(sSndMsg);
  9760. sSndMsg = "";
  9761. } else if(sCommKind == "02") {
  9762. CommAX.SendMessage(sSndMsg);
  9763. sSndMsg = "";
  9764. }
  9765. //}
  9766. }else{
  9767. if(microbarcdprntcnt > 0){
  9768. if(sCommKind == "01") {
  9769. CommAX.SendMessageToLPT(sSndMsg);
  9770. sSndMsg = "";
  9771. } else if(sCommKind == "02") {
  9772. CommAX.SendMessage(sSndMsg);
  9773. sSndMsg = "";
  9774. }
  9775. }
  9776. }
  9777. // 배지 2
  9778. iXPos = Number(sLeftBank) + 330 ;
  9779. iYPos = Number(sTopBank) + 180;
  9780. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  9781. sSndMsg += lzzfBP_BarCode_Code39(iXPos, iYPos, "N", 40, "*" + sBcno + "*"); // 바코드번호 짝데기
  9782. iXPos = Number(sLeftBank) + 370;
  9783. iYPos = Number(sTopBank) + 225;
  9784. sSndMsg += lzzfBP_ChangeFont("C", 16, 16); // 폰트 설정
  9785. sSndMsg += lzzfBP_FieldDataA(iXPos , iYPos, sBcno); //바코드번호 텍스트
  9786. iXPos = Number(sLeftBank) + 340;
  9787. iYPos = Number(sTopBank) + 250;
  9788. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  9789. sSndMsg += lzzfBP_FieldDataA(iXPos , iYPos, workno.substr(0,8)); //작업번호
  9790. iXPos = Number(sLeftBank) + 440;
  9791. iYPos = Number(sTopBank) + 250;
  9792. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  9793. sSndMsg += lzzfBP_FieldDataA(iXPos , iYPos, workno.substr(8,16)); //작업번호
  9794. iXPos = Number(sLeftBank) + 350;
  9795. iYPos = Number(sTopBank) + 275;
  9796. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm.substr(0, 20), 1, 1); // 환자명
  9797. sSndMsg += CommAX.HanImageData();
  9798. iXPos = Number(sLeftBank) + 530;
  9799. iYPos = Number(sTopBank) + 280;
  9800. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  9801. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  9802. if(flag == "reprnt"){ // 재출력화면일때
  9803. //if(microbarcdprntcnt > 0){
  9804. if(sCommKind == "01") {
  9805. CommAX.SendMessageToLPT(sSndMsg);
  9806. sSndMsg = "";
  9807. } else if(sCommKind == "02") {
  9808. CommAX.SendMessage(sSndMsg);
  9809. sSndMsg = "";
  9810. }
  9811. //}
  9812. }else{
  9813. if(microbarcdprntcnt > 0){
  9814. if(sCommKind == "01") {
  9815. CommAX.SendMessageToLPT(sSndMsg);
  9816. sSndMsg = "";
  9817. } else if(sCommKind == "02") {
  9818. CommAX.SendMessage(sSndMsg);
  9819. sSndMsg = "";
  9820. }
  9821. }
  9822. }
  9823. // 배지 3
  9824. iXPos = Number(sLeftBank) + 10;
  9825. iYPos = Number(sTopBank) + 340;
  9826. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  9827. sSndMsg += lzzfBP_BarCode_Code39(iXPos, iYPos, "N", 40, "*" + sBcno + "*"); // 바코드번호 짝데기
  9828. iXPos = Number(sLeftBank) + 40;
  9829. iYPos = Number(sTopBank) + 385;
  9830. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  9831. sSndMsg += lzzfBP_FieldDataA(iXPos , iYPos, sBcno); //바코드번호 텍스트
  9832. iXPos = Number(sLeftBank) + 20;
  9833. iYPos = Number(sTopBank) + 410;
  9834. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  9835. sSndMsg += lzzfBP_FieldDataA(iXPos , iYPos, workno.substr(0,8)); //작업번호
  9836. iXPos = Number(sLeftBank) + 120;
  9837. iYPos = Number(sTopBank) + 410;
  9838. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  9839. sSndMsg += lzzfBP_FieldDataA(iXPos , iYPos, workno.substr(8,16)); //작업번호
  9840. iXPos = Number(sLeftBank) + 20;
  9841. iYPos = Number(sTopBank) + 435;
  9842. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm.substr(0, 20), 1, 1); // 환자명
  9843. sSndMsg += CommAX.HanImageData();
  9844. iXPos = Number(sLeftBank) + 180;
  9845. iYPos = Number(sTopBank) + 440;
  9846. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  9847. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  9848. if(flag == "reprnt"){ // 재출력화면일때
  9849. //if(microbarcdprntcnt > 0){
  9850. if(sCommKind == "01") {
  9851. CommAX.SendMessageToLPT(sSndMsg);
  9852. sSndMsg = "";
  9853. } else if(sCommKind == "02") {
  9854. CommAX.SendMessage(sSndMsg);
  9855. sSndMsg = "";
  9856. }
  9857. // }
  9858. }else{
  9859. if(microbarcdprntcnt > 0){
  9860. if(sCommKind == "01") {
  9861. CommAX.SendMessageToLPT(sSndMsg);
  9862. sSndMsg = "";
  9863. } else if(sCommKind == "02") {
  9864. CommAX.SendMessage(sSndMsg);
  9865. sSndMsg = "";
  9866. }
  9867. }
  9868. }
  9869. // 배지 4
  9870. iXPos = Number(sLeftBank) + 330 ;
  9871. iYPos = Number(sTopBank) + 340;
  9872. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  9873. sSndMsg += lzzfBP_BarCode_Code39(iXPos, iYPos, "N", 40, "*" + sBcno + "*"); // 바코드번호 짝데기
  9874. iXPos = Number(sLeftBank) + 370;
  9875. iYPos = Number(sTopBank) + 385;
  9876. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  9877. sSndMsg += lzzfBP_FieldDataA(iXPos , iYPos, sBcno); //바코드번호 텍스트
  9878. iXPos = Number(sLeftBank) + 340;
  9879. iYPos = Number(sTopBank) + 410;
  9880. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  9881. sSndMsg += lzzfBP_FieldDataA(iXPos , iYPos, workno.substr(0,8)); //작업번호
  9882. iXPos = Number(sLeftBank) + 440;
  9883. iYPos = Number(sTopBank) + 410;
  9884. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  9885. sSndMsg += lzzfBP_FieldDataA(iXPos , iYPos, workno.substr(8,16)); //작업번호
  9886. iXPos = Number(sLeftBank) + 350;
  9887. iYPos = Number(sTopBank) + 435;
  9888. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm.substr(0, 20), 1, 1); // 환자명
  9889. sSndMsg += CommAX.HanImageData();
  9890. iXPos = Number(sLeftBank) + 530;
  9891. iYPos = Number(sTopBank) + 440;
  9892. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  9893. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  9894. if(flag == "reprnt"){ // 재출력화면일때
  9895. if(sPrntcnt > 0){
  9896. sSndMsg += lzzfBP_EndFormat(sPrntcnt); // 접수바코드출력수
  9897. if(sCommKind == "01") {
  9898. CommAX.SendMessageToLPT(sSndMsg);
  9899. } else if(sCommKind == "02") {
  9900. CommAX.SendMessage(sSndMsg);
  9901. }
  9902. }
  9903. }else{
  9904. if(microbarcdprntcnt > 0){
  9905. sSndMsg += lzzfBP_EndFormat(microbarcdprntcnt); // 접수바코드출력수
  9906. if(sCommKind == "01") {
  9907. CommAX.SendMessageToLPT(sSndMsg);
  9908. } else if(sCommKind == "02") {
  9909. CommAX.SendMessage(sSndMsg);
  9910. }
  9911. }
  9912. }
  9913. }// if(sPrntKind == "1")
  9914. }//end for
  9915. //portopen이 true이고 통신유형이 com일때 port close
  9916. if( portOpenTF == "TRUE" && sCommKind == "02"){
  9917. CommAX.PortOpen("false");
  9918. }
  9919. }else if((portOpenTF = "FALSE" && sCommKind == "02")){
  9920. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  9921. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  9922. + " \n 2.케이블 확인"
  9923. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  9924. return;
  9925. }
  9926. }
  9927. }catch(ee) {//이후 2008-07-07 바코드 포트 오류 막기위해
  9928. sysf_messageBox("바코드출력에", "E009");
  9929. return;
  9930. }
  9931. }
  9932. /**
  9933. * 미생물 작업번호라벨 출력 - 박정은
  9934. * pBCount - 분주 또는 진검바코드 출력여부
  9935. */
  9936. function lf_LisMicroWorknoSpcBarcodePrint2(refDs:Dataset,sds_data_path, pBCount){
  9937. try{
  9938. var cntHR = refDs.rowcount;
  9939. //var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  9940. var sPrntKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"prntkind");
  9941. var portOpenTF = "";
  9942. var BCount = 0;
  9943. var iXPos = 0;
  9944. var iYPos = 0;
  9945. if(utlf_isNull(pBCount)){
  9946. BCount = 0;
  9947. }else{
  9948. BCount = pBCount;
  9949. }
  9950. if(cntHR > 0 && sPrntKind != "0"){
  9951. var sCommKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"commkind");
  9952. var sLeftBank = objects[sds_data_path + "ds_data_blank"].getColumn(0,"left");
  9953. var sTopBank = objects[sds_data_path + "ds_data_blank"].getColumn(0,"top");
  9954. //EPL
  9955. if(sPrntKind == "10"){
  9956. for(i=0 ; i< cntHR;i++){
  9957. var sSndMsg = "";
  9958. var sTsectlblnm = utlf_transNullToEmpty(refDs.getColumn(i,"tsectlblnm"));
  9959. var sBcno = refDs.getColumn(i,"bcno");
  9960. var sBarcdprntdt = refDs.getColumn(i,"barcdprntdt");
  9961. var sPatnm = refDs.getColumn(i,"patnm");
  9962. var sPid = refDs.getColumn(i,"pid");
  9963. var sSexage = refDs.getColumn(i,"sexage");
  9964. var sSpclblnm = refDs.getColumn(i,"spclblnm");
  9965. var sTubelblnm = refDs.getColumn(i,"tubelblnm");
  9966. var sSecttsect = refDs.getColumn(i,"secttsect");
  9967. var sTclslblnmlist = refDs.getColumn(i,"tclslblnmlist");
  9968. var sInfcinfolist = refDs.getColumn(i,"infcinfolist");
  9969. var sErprcpflag = refDs.getColumn(i,"erprcpflag");
  9970. var barcdcntflag = refDs.getColumn(i,"cntflag");
  9971. var workno = refDs.getColumn(i,"workno");
  9972. var spcacptdd = refDs.getColumn(i,"spcacptdd");
  9973. var orddrnm = refDs.getColumn(i,"orddrnm");
  9974. var bcollbarcdprntcnt = refDs.getColumn(i,"bcollbarcdprntcnt");
  9975. var spcacptbarcdprntcnt = refDs.getColumn(i,"spcacptbarcdprntcnt");
  9976. var microbarcdprntcnt = refDs.getColumn(i,"microbarcdprntcnt");
  9977. var mdiabarcdprntcnt = refDs.getColumn(i,"mdiabarcdprntcnt");
  9978. var sRoomcd = refDs.getColumn(i,"roomcd");
  9979. var sDept = refDs.getColumn(i,"dept");
  9980. var workno2 = "";
  9981. var sPrntcnt = refDs.getColumn(i,"prntcnt");
  9982. var flag = refDs.getColumn(i,"flag");
  9983. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  9984. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  9985. sSndMsg += "N" + "\n";
  9986. sSndMsg += "JF" + "\n";
  9987. sSndMsg += "D9" + "\n";
  9988. sSndMsg += "S2" + "\n";
  9989. sSndMsg += "Q223,27" + "\n";
  9990. sSndMsg += "q456" + "\n";
  9991. iXPos = Number(sLeftBank);
  9992. iYPos = Number(sTopBank);
  9993. sSndMsg += "A" + iXPos + "," + iYPos + ",0,2,1,1,N," + "\"" + sSpclblnm + "\""+ "\n";
  9994. iXPos = Number(sLeftBank) + 170;
  9995. iYPos = Number(sTopBank);
  9996. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,1,1,N," + "\"" + sPatnm + "\""+ "\n";
  9997. iXPos = Number(sLeftBank) + 330;
  9998. iYPos = Number(sTopBank);
  9999. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + sPid + "\""+ "\n";
  10000. iXPos = Number(sLeftBank) + 20;
  10001. iYPos = Number(sTopBank) + 30;
  10002. sSndMsg += "B" + iXPos + "," + iYPos + ",0,3,2,5,93,N," + "\"" + sBcno + "\""+ "\n";
  10003. sSndMsg += "P1"+ "\n";
  10004. CommAX.SendMsg(sSndMsg);
  10005. }//for(i=1 ; i<= cntHR;i++)
  10006. }else{
  10007. for(i=0 ; i< cntHR;i++){
  10008. var sSndMsg = "";
  10009. var sTsectlblnm = utlf_transNullToEmpty(refDs.getColumn(i,"tsectlblnm"));
  10010. var sBcno = refDs.getColumn(i,"bcno");
  10011. var sBarcdprntdt = refDs.getColumn(i,"barcdprntdt");
  10012. var sPatnm = refDs.getColumn(i,"patnm");
  10013. var sPid = refDs.getColumn(i,"pid");
  10014. var sSexage = refDs.getColumn(i,"sexage");
  10015. var sSpclblnm = refDs.getColumn(i,"spclblnm");
  10016. var sTubelblnm = refDs.getColumn(i,"tubelblnm");
  10017. var sSecttsect = refDs.getColumn(i,"secttsect");
  10018. var sTclslblnmlist = refDs.getColumn(i,"tclslblnmlist");
  10019. var sInfcinfolist = refDs.getColumn(i,"infcinfolist");
  10020. var sErprcpflag = refDs.getColumn(i,"erprcpflag");
  10021. var barcdcntflag = refDs.getColumn(i,"cntflag");
  10022. var workno = refDs.getColumn(i,"workno");
  10023. var spcacptdd = refDs.getColumn(i,"spcacptdd");
  10024. var orddrnm = refDs.getColumn(i,"orddrnm");
  10025. var bcollbarcdprntcnt = refDs.getColumn(i,"bcollbarcdprntcnt");
  10026. var spcacptbarcdprntcnt = refDs.getColumn(i,"spcacptbarcdprntcnt");
  10027. var microbarcdprntcnt = refDs.getColumn(i,"microbarcdprntcnt");
  10028. var mdiabarcdprntcnt = refDs.getColumn(i,"mdiabarcdprntcnt");
  10029. var sRoomcd = refDs.getColumn(i,"roomcd");
  10030. var sDept = refDs.getColumn(i,"dept");
  10031. var workno2 = "";
  10032. var sPrntcnt = refDs.getColumn(i,"prntcnt");
  10033. var flag = refDs.getColumn(i,"flag");
  10034. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  10035. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  10036. sSndMsg = String.fromCharCode(27)+"A" + String.fromCharCode(27)+ "A103500500"; // 시작위치 셋팅
  10037. iXPos = Number(sLeftBank) + 20;
  10038. iYPos = Number(sTopBank) + 10;
  10039. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"S" + sSpclblnm; //검체명
  10040. iXPos = Number(sLeftBank) + 130;
  10041. iYPos = Number(sTopBank) + 2;
  10042. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sPatnm.substr(0, 20)); // 환자명
  10043. iXPos = Number(sLeftBank) + 300;
  10044. iYPos = Number(sTopBank) + 10;
  10045. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"S" + sPid;//환자등록번호
  10046. iXPos = Number(sLeftBank) + 20;
  10047. iYPos = Number(sTopBank) + 35;
  10048. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"S" + sRoomcd; //병실코드
  10049. iXPos = Number(sLeftBank) + 100;
  10050. iYPos = Number(sTopBank) + 30;
  10051. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sDept.substr(0, 20));
  10052. iXPos = Number(sLeftBank) + 220;
  10053. iYPos = Number(sTopBank) + 35;
  10054. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"S" + sSexage; // 성별나이
  10055. iXPos = Number(sLeftBank) + 300;
  10056. iYPos = Number(sTopBank) + 30;
  10057. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, orddrnm.substr(0, 20));
  10058. iXPos = Number(sLeftBank) + 20;
  10059. iYPos = Number(sTopBank) + 60;
  10060. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"S" + sTclslblnmlist; //검사항목라벨명
  10061. if(workno != ""){
  10062. workno2 = workno.substr(12,3);
  10063. workno = workno.substr(0,8) + "-" + workno.substr(8,2) + "-" +
  10064. workno.substr(10,2) + "-";
  10065. }
  10066. iXPos = Number(sLeftBank) + 120;
  10067. iYPos = Number(sTopBank) + 60;
  10068. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"S" + workno; //작업번호
  10069. iXPos = Number(sLeftBank) + 290;
  10070. iYPos = Number(sTopBank) + 60;
  10071. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"M" + workno2;
  10072. iXPos = Number(sLeftBank) + 380;
  10073. iYPos = Number(sTopBank) + 60;
  10074. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"S" + spcacptdd; //접수일자
  10075. iXPos = Number(sLeftBank) + 150;
  10076. iYPos = Number(sTopBank) + 85;
  10077. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"S" + "*" + sBcno + "*"; // 바코드번호
  10078. iXPos = Number(sLeftBank) + 70;
  10079. iYPos = Number(sTopBank) + 100;
  10080. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"BG02100" + sBcno; // 바코드
  10081. sSndMsg += String.fromCharCode(27)+"Q" + microbarcdprntcnt + String.fromCharCode(27)+"Z";
  10082. CommAX.SendMsg(sSndMsg);
  10083. }//for(i=1 ; i<= cntHR;i++)
  10084. }
  10085. }
  10086. }catch(e) {//이후 2008-07-07 바코드 포트 오류 막기위해
  10087. sysf_messageBox("바코드출력에", "E009");
  10088. return;
  10089. }
  10090. }
  10091. //일반검사 분주라벨
  10092. //lcount, mcount (접수바코드출력수, 미생물바코드 출력수)
  10093. function lf_LisSpcBarcodePrintB(refDs:Dataset,sds_data_path, pLCount, pMCount){
  10094. try {
  10095. if( utlf_isNull(sds_data_path) ) sds_data_path = "";
  10096. //var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  10097. var cntHR = refDs.rowcount;
  10098. var sPrntKind = eval(sds_data_path + "ds_data_setupinfo").getColumn(0,"prntkind");
  10099. var portOpenTF = "";
  10100. var LCount = 0;
  10101. var MCount = 0;
  10102. var aFlag = new Array(); //한글 영문 구분
  10103. var aStr = "";
  10104. var iWidth = 0;
  10105. var iXPos = 0;
  10106. var iYPos = 0;
  10107. if(utlf_isNull(pLCount)){
  10108. LCount = 0;
  10109. }else{
  10110. LCount = pLCount;
  10111. }
  10112. if(utlf_isNull(pMCount)){
  10113. MCount = 0;
  10114. }else{
  10115. MCount = pMCount;
  10116. }
  10117. if(cntHR > 0 && sPrntKind != 0){
  10118. var sCommKind = eval(sds_data_path + "ds_data_setupinfo").getColumn(0,"commkind");
  10119. var sLeftBank = eval(sds_data_path + "ds_data_blank").getColumn(0,"left");
  10120. var sTopBank = eval(sds_data_path + "ds_data_blank").getColumn(0,"top");
  10121. if(sCommKind == "01") {
  10122. var sSetUpVal = eval(sds_data_path + "ds_data_comm01").getColumn(0,"setupval");
  10123. } else if(sCommKind == "02") {
  10124. var sComm = eval(sds_data_path + "ds_data_comm02").getColumn(0,"comm");
  10125. var sDataBit = eval(sds_data_path + "ds_data_comm02").getColumn(0,"databit");
  10126. var sStopBit = eval(sds_data_path + "ds_data_comm02").getColumn(0,"stopbit");
  10127. var sBaudRate = eval(sds_data_path + "ds_data_comm02").getColumn(0,"baudrate");
  10128. var sParity = eval(sds_data_path + "ds_data_comm02").getColumn(0,"parity");;
  10129. CommAX.CommPort = sComm;
  10130. CommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  10131. if(LCount > 0){
  10132. portOpenTF = "TRUE";
  10133. }else if (LCount == 0){
  10134. portOpenTF = CommAX.PortOpen("true");
  10135. }
  10136. portOpenTF = "TRUE";
  10137. } else if(sCommKind == "03") {
  10138. var sSetUpVal = eval(sds_data_path + "ds_data_comm03").getColumn(0,"setupval");
  10139. }
  10140. //trace('19 portOpenTF: '+portOpenTF+' / '+sCommKind);
  10141. if( (portOpenTF == "TRUE" && sCommKind == "02")
  10142. || (sCommKind == "01")
  10143. || (sCommKind == "03")){
  10144. //trace('20 cntHR : '+cntHR);
  10145. for(i=0 ; i< cntHR;i++){
  10146. var sSndMsg = "";
  10147. var sTsectlblnm = utlf_transNullToEmpty(refDs.getColumn(i,"tsectlblnm"));
  10148. var sBcno = refDs.getColumn(i,"bcno");
  10149. var sBarcdprntdt = refDs.getColumn(i,"barcdprntdt");
  10150. var sPatnm = refDs.getColumn(i,"patnm");
  10151. var sPid = refDs.getColumn(i,"pid");
  10152. var sSexage = refDs.getColumn(i,"sexage");
  10153. var sDeptroom = refDs.getColumn(i,"deptroom");
  10154. var sSpclblnm = refDs.getColumn(i,"spclblnm");
  10155. var sTubelblnm = refDs.getColumn(i,"tubelblnm");
  10156. var sSecttsect = refDs.getColumn(i,"secttsect");
  10157. var sTclslblnmlist = refDs.getColumn(i,"tclslblnmlist");
  10158. var sInfcinfolist = utlf_transNullToEmpty(refDs.getColumn(i,"infcinfolist"));
  10159. var sErprcpflag = refDs.getColumn(i,"erprcpflag");
  10160. var barcdcntflag = utlf_transNullToEmpty(refDs.getColumn(i,"cntflag"));
  10161. var bcollbarcdprntcnt = refDs.getColumn(i,"bcollbarcdprntcnt");
  10162. var spcacptbarcdprntcnt = refDs.getColumn(i,"spcacptbarcdprntcnt");
  10163. var microbarcdprntcnt = refDs.getColumn(i,"microbarcdprntcnt");
  10164. var divgrupcd = refDs.getColumn(i,"divgrupcd");
  10165. var divgrupnm = refDs.getColumn(i,"divgrupnm");
  10166. var sbcoll = "채혈자";
  10167. var iWidth = 0;
  10168. var aStr = "";
  10169. var test_rtn = "";
  10170. var test_he = "";
  10171. sPid = sPid;
  10172. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  10173. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  10174. if(sPrntKind == "1" || sPrntKind == "9") {
  10175. var sSndMsg = "^XA^SEE:UHANGUL.DAT^FS^CWQ,E:kfont3.FNT^FS";
  10176. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  10177. if(sErprcpflag == "1" || sErprcpflag == "2" || sErprcpflag == "Y"){
  10178. iXPos = Number(sLeftBank) + 600;
  10179. iYPos = Number(sTopBank) + 1;
  10180. sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 15, 240, 10);
  10181. iXPos = Number(sLeftBank) + 10;
  10182. iYPos = Number(sTopBank) + 2;
  10183. // sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sTsectlblnm.substr(0, 20), 2, 1);
  10184. // sSndMsg += CommAX.HanImageData();
  10185. sSndMsg += "^CI14^FO" + iXPos + ","+ iYPos + "^AQN,30,30^FH^FD"+ sTsectlblnm +"^FS^CI1";
  10186. }
  10187. else{
  10188. iXPos = Number(sLeftBank) + 10;
  10189. iYPos = Number(sTopBank) + 2;
  10190. // sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sTsectlblnm.substr(0, 20), 2, 1);
  10191. // sSndMsg += CommAX.HanImageData();
  10192. sSndMsg += "^CI14^FO" + iXPos + ","+ iYPos + "^AQN,30,30^FH^FD"+ sTsectlblnm +"^FS^CI1";
  10193. }
  10194. if(barcdcntflag == "acpt" ){
  10195. if(spcacptbarcdprntcnt > 0){
  10196. if(sCommKind == "01") {
  10197. CommAX.SendMessageToLPT(sSndMsg);
  10198. sSndMsg = "";
  10199. } else if(sCommKind == "02") {
  10200. CommAX.SendMessage(sSndMsg);
  10201. sSndMsg = "";
  10202. }
  10203. }
  10204. }else{
  10205. if(sCommKind == "01") {
  10206. CommAX.SendMessageToLPT(sSndMsg);
  10207. sSndMsg = "";
  10208. } else if(sCommKind == "02") {
  10209. CommAX.SendMessage(sSndMsg);
  10210. sSndMsg = "";
  10211. }
  10212. }
  10213. iXPos = Number(sLeftBank) + 220;
  10214. iYPos = Number(sTopBank) + 5;
  10215. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  10216. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBcno + "*"); //바코드번호
  10217. iXPos = Number(sLeftBank) + 500;
  10218. iYPos = Number(sTopBank) + 5;
  10219. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  10220. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  10221. // trace("sSpclblnm :"+sSpclblnm);
  10222. // sSndMsg += "^CI14^FO" + iXPos + ","+ iYPos + "^AQN,30,30^FH^FD"+ sSpclblnm +"^FS^CI1";
  10223. if(barcdcntflag == "acpt" ){
  10224. if(spcacptbarcdprntcnt > 0){
  10225. if(sCommKind == "01") {
  10226. CommAX.SendMessageToLPT(sSndMsg);
  10227. sSndMsg = "";
  10228. } else if(sCommKind == "02") {
  10229. CommAX.SendMessage(sSndMsg);
  10230. sSndMsg = "";
  10231. }
  10232. }
  10233. }else{
  10234. if(sCommKind == "01") {
  10235. CommAX.SendMessageToLPT(sSndMsg);
  10236. sSndMsg = "";
  10237. } else if(sCommKind == "02") {
  10238. CommAX.SendMessage(sSndMsg);
  10239. sSndMsg = "";
  10240. }
  10241. }
  10242. iXPos = Number(sLeftBank) + 90;
  10243. iYPos = Number(sTopBank) + 30;
  10244. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  10245. sSndMsg += lzzfBP_BarCode_Code39_300dpi(iXPos, iYPos, "N", 120, "*" + sBcno + "*"); // 바코드
  10246. if(barcdcntflag == "acpt" ){
  10247. if(spcacptbarcdprntcnt > 0){
  10248. if(sCommKind == "01") {
  10249. CommAX.SendMessageToLPT(sSndMsg);
  10250. sSndMsg = "";
  10251. } else if(sCommKind == "02") {
  10252. CommAX.SendMessage(sSndMsg);
  10253. sSndMsg = "";
  10254. }
  10255. }
  10256. }else{
  10257. if(sCommKind == "01") {
  10258. CommAX.SendMessageToLPT(sSndMsg);
  10259. sSndMsg = "";
  10260. } else if(sCommKind == "02") {
  10261. CommAX.SendMessage(sSndMsg);
  10262. sSndMsg = "";
  10263. }
  10264. }
  10265. iXPos = Number(sLeftBank) + 20;
  10266. iYPos = Number(sTopBank) + 160;
  10267. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  10268. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //환자등록번호
  10269. // iXPos = Number(sLeftBank) + 250;
  10270. // iYPos = Number(sTopBank) + 157;
  10271. // sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm.substr(0, 20), 2, 1);
  10272. // sSndMsg += CommAX.HanImageData();
  10273. iXPos = Number(sLeftBank) + 250;
  10274. iYPos = Number(sTopBank) + 157;
  10275. aStr = "";
  10276. aFlag = new Array();
  10277. // if(!utlf_isNull(sPatnm)) {
  10278. // for (var j = 0; j < sPatnm.length; j++) {
  10279. // oneChar = sPatnm.charAt(j);
  10280. //
  10281. // test_rtn = "";
  10282. // test_he = "";
  10283. //
  10284. // test_rtn = lpzfGetHanGul3(oneChar);
  10285. // test_he = test_rtn.substring(0,1);
  10286. // trace('a '+j+' / '+oneChar+' / '+test_rtn+' / '+test_he)
  10287. // if(!utlf_isNull(test_he))
  10288. // {
  10289. // //----------------------
  10290. // if (test_he == "E") {
  10291. // sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS";
  10292. // iWidth = iWidth + (Number(oneChar.length) * 15);
  10293. // } else {
  10294. // sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, oneChar, 1, 1);
  10295. // sSndMsg += CommAX.HanImageData();
  10296. // iWidth = iWidth + (Number(oneChar.length) * 24);
  10297. // }
  10298. // }
  10299. // }
  10300. // }
  10301. iWidth = 0;
  10302. aStr = "";
  10303. aFlag = new Array();
  10304. //sPatnm += 'A';
  10305. if(!utlf_isNull(sPatnm)) {
  10306. for (var j = 0; j < sPatnm.length; j++) {
  10307. oneChar = sPatnm.charAt(j);
  10308. test_rtn = "";
  10309. test_he = "";
  10310. test_rtn = lpzfGetHanGul3(oneChar);
  10311. test_he = test_rtn.substring(0,1);
  10312. if(!utlf_isNull(test_he))
  10313. {
  10314. //----------------------
  10315. if (test_he == "E") {
  10316. iYPos = Number(sTopBank) + 157;
  10317. sSndMsg += "^CFC30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS"; // 검사코드리스트명(영문)
  10318. iWidth = iWidth + (Number(oneChar.length) * 12);
  10319. } else {
  10320. iYPos = Number(sTopBank) + 157;
  10321. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,30,30^FH^FD" + oneChar + "^FS^CI1"; // 검사코드리스트(한글)
  10322. iWidth = iWidth + (Number(oneChar.length) * 30);
  10323. }
  10324. }
  10325. }
  10326. }
  10327. trace('sSndMsg :'+iYPos+' / '+iXPos+' / '+sSndMsg);
  10328. if(barcdcntflag == "acpt" ){
  10329. if(spcacptbarcdprntcnt > 0){
  10330. if(sCommKind == "01") {
  10331. CommAX.SendMessageToLPT(sSndMsg);
  10332. sSndMsg = "";
  10333. } else if(sCommKind == "02") {
  10334. CommAX.SendMessage(sSndMsg);
  10335. sSndMsg = "";
  10336. }
  10337. }
  10338. }else{
  10339. if(sCommKind == "01") {
  10340. CommAX.SendMessageToLPT(sSndMsg);
  10341. sSndMsg = "";
  10342. } else if(sCommKind == "02") {
  10343. CommAX.SendMessage(sSndMsg);
  10344. sSndMsg = "";
  10345. }
  10346. }
  10347. iXPos = Number(sLeftBank) + 450;
  10348. iYPos = Number(sTopBank) + 160;
  10349. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  10350. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSexage);
  10351. iXPos = Number(sLeftBank) + 20;
  10352. iYPos = Number(sTopBank) + 185;
  10353. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  10354. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDeptroom); //진료과병실
  10355. if(barcdcntflag == "acpt" ){
  10356. if(spcacptbarcdprntcnt > 0){
  10357. if(sCommKind == "01") {
  10358. CommAX.SendMessageToLPT(sSndMsg);
  10359. sSndMsg = "";
  10360. } else if(sCommKind == "02") {
  10361. CommAX.SendMessage(sSndMsg);
  10362. sSndMsg = "";
  10363. }
  10364. }
  10365. }else{
  10366. if(sCommKind == "01") {
  10367. CommAX.SendMessageToLPT(sSndMsg);
  10368. sSndMsg = "";
  10369. } else if(sCommKind == "02") {
  10370. CommAX.SendMessage(sSndMsg);
  10371. sSndMsg = "";
  10372. }
  10373. }
  10374. sTclslblnmlist = sTclslblnmlist.replace("▨", ",");
  10375. trace("sTclslblnmlist :"+sTclslblnmlist);
  10376. //---------
  10377. // iWidth = 0;
  10378. // aStr = lpzfGetHanGul(sTclslblnmlist, aFlag);
  10379. //
  10380. // iXPos = Number(sLeftBank) + 90;
  10381. // if(!utlf_isNull(aStr))
  10382. // {
  10383. // for (var iNo=0; iNo < aStr.length; iNo++) {
  10384. //
  10385. // //----------------------
  10386. // if (aFlag[iNo] == "E") {
  10387. // iYPos = Number(sTopBank) + 213;
  10388. // sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // 검체표시명(영문)
  10389. // iWidth = iWidth + (Number(aStr[iNo].length) * 15);
  10390. // } else {
  10391. // iYPos = Number(sTopBank) + 215;
  10392. // sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  10393. // sSndMsg += CommAX.HanImageData();
  10394. // iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  10395. // }
  10396. // }
  10397. // }
  10398. iWidth = 0;
  10399. iXPos = Number(sLeftBank) + 90;
  10400. if(!utlf_isNull(sTclslblnmlist)) {
  10401. for (var j = 0; j < sTclslblnmlist.length; j++) {
  10402. oneChar = sTclslblnmlist.charAt(j);
  10403. test_rtn = "";
  10404. test_he = "";
  10405. test_rtn = lpzfGetHanGul3(oneChar);
  10406. test_he = test_rtn.substring(0,1);
  10407. if(!utlf_isNull(test_he))
  10408. {
  10409. //----------------------
  10410. if (test_he == "E") {
  10411. iYPos = Number(sTopBank) + 213;
  10412. sSndMsg += "^CFA30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS"; // 검사코드리스트명(영문)
  10413. //sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS"; // 검사코드리스트명(영문)
  10414. //sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  10415. //sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, oneChar); //환자등록번호
  10416. iWidth = iWidth + (Number(oneChar.length) * 24);
  10417. } else {
  10418. iYPos = Number(sTopBank) + 215;
  10419. sSndMsg += "^CI14^FO" +(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,30,30^FH^FD" + oneChar + "^FS^CI1"; // 검사코드리스트(한글)
  10420. iWidth = iWidth + (Number(oneChar.length) * 28);
  10421. }
  10422. }
  10423. }
  10424. }
  10425. //sSndMsg += CommAX.PrtImgOut(90, 200, sTclslblnmlist.substr(0, 20), 1, 1);
  10426. //sSndMsg += CommAX.HanImageData();
  10427. if(barcdcntflag == "acpt" ){
  10428. if(spcacptbarcdprntcnt > 0){
  10429. if(sCommKind == "01") {
  10430. CommAX.SendMessageToLPT(sSndMsg);
  10431. sSndMsg = "";
  10432. } else if(sCommKind == "02") {
  10433. CommAX.SendMessage(sSndMsg);
  10434. sSndMsg = "";
  10435. }
  10436. }
  10437. }else{
  10438. if(sCommKind == "01") {
  10439. CommAX.SendMessageToLPT(sSndMsg);
  10440. sSndMsg = "";
  10441. } else if(sCommKind == "02") {
  10442. CommAX.SendMessage(sSndMsg);
  10443. sSndMsg = "";
  10444. }
  10445. }
  10446. if(sTclslblnmlist.substr(0, 3) == "ABO") {
  10447. iXPos = Number(sLeftBank) + 100;
  10448. iYPos = Number(sTopBank) + 235;
  10449. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, "채혈자 : ", 1, 1);
  10450. sSndMsg += CommAX.HanImageData();
  10451. }
  10452. if(barcdcntflag == "acpt" ){
  10453. if(spcacptbarcdprntcnt > 0){
  10454. if(sCommKind == "01") {
  10455. CommAX.SendMessageToLPT(sSndMsg);
  10456. sSndMsg = "";
  10457. } else if(sCommKind == "02") {
  10458. CommAX.SendMessage(sSndMsg);
  10459. sSndMsg = "";
  10460. }
  10461. }
  10462. }else{
  10463. if(sCommKind == "01") {
  10464. CommAX.SendMessageToLPT(sSndMsg);
  10465. sSndMsg = "";
  10466. } else if(sCommKind == "02") {
  10467. CommAX.SendMessage(sSndMsg);
  10468. sSndMsg = "";
  10469. }
  10470. }
  10471. iXPos = Number(sLeftBank) + 10;
  10472. iYPos = Number(sTopBank) + 230;
  10473. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  10474. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sInfcinfolist); //감염정보
  10475. iXPos = Number(sLeftBank) + 10;
  10476. iYPos = Number(sTopBank) + 245;
  10477. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  10478. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "bunju"); //분주구분
  10479. if(barcdcntflag == "acpt" ){
  10480. if(spcacptbarcdprntcnt > 0){
  10481. sSndMsg += lzzfBP_EndFormat(spcacptbarcdprntcnt); // 접수바코드출력수
  10482. if(sCommKind == "01") {
  10483. CommAX.SendMessageToLPT(sSndMsg);
  10484. } else if(sCommKind == "02") {
  10485. CommAX.SendMessage(sSndMsg);
  10486. }
  10487. }
  10488. }else{
  10489. sSndMsg += lzzfBP_EndFormat(bcollbarcdprntcnt);
  10490. if(sCommKind == "01") {
  10491. CommAX.SendMessageToLPT(sSndMsg);
  10492. } else if(sCommKind == "02") {
  10493. CommAX.SendMessage(sSndMsg);
  10494. }
  10495. }
  10496. }//end if(sPrntKind == "1")
  10497. }//end for
  10498. //portopen이 true이고 통신유형이 com일때 port close
  10499. if( portOpenTF == "TRUE" && sCommKind == "02" && MCount == 0){
  10500. CommAX.PortOpen("false");
  10501. }
  10502. }else if(portOpenTF == "FALSE" && sCommKind == "02"){
  10503. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  10504. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  10505. + " \n 2.케이블 확인"
  10506. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  10507. return;
  10508. }
  10509. }
  10510. } //이후 2008-07-07 바코드 포트 오류 막기위해
  10511. catch(e) {
  10512. sysf_messageBox("바코드출력에", "E009");
  10513. return;
  10514. }
  10515. }
  10516. //일반검사 분주라벨
  10517. //lcount, mcount (접수바코드출력수, 미생물바코드 출력수)
  10518. function lf_LisSpcBarcodePrintB_test(refDs:Dataset,sds_data_path, pLCount, pMCount){
  10519. try {
  10520. if( utlf_isNull(sds_data_path) ) sds_data_path = "";
  10521. //var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  10522. var cntHR = refDs.rowcount;
  10523. var sPrntKind = eval(sds_data_path + "ds_data_setupinfo").getColumn(0,"prntkind");
  10524. var portOpenTF = "";
  10525. var LCount = 0;
  10526. var MCount = 0;
  10527. var aFlag = new Array(); //한글 영문 구분
  10528. var aStr = "";
  10529. var iWidth = 0;
  10530. var iXPos = 0;
  10531. var iYPos = 0;
  10532. if(utlf_isNull(pLCount)){
  10533. LCount = 0;
  10534. }else{
  10535. LCount = pLCount;
  10536. }
  10537. if(utlf_isNull(pMCount)){
  10538. MCount = 0;
  10539. }else{
  10540. MCount = pMCount;
  10541. }
  10542. if(cntHR > 0 && sPrntKind != 0){
  10543. var sCommKind = eval(sds_data_path + "ds_data_setupinfo").getColumn(0,"commkind");
  10544. var sLeftBank = eval(sds_data_path + "ds_data_blank").getColumn(0,"left");
  10545. var sTopBank = eval(sds_data_path + "ds_data_blank").getColumn(0,"top");
  10546. if(sCommKind == "01") {
  10547. var sSetUpVal = eval(sds_data_path + "ds_data_comm01").getColumn(0,"setupval");
  10548. } else if(sCommKind == "02") {
  10549. var sComm = eval(sds_data_path + "ds_data_comm02").getColumn(0,"comm");
  10550. var sDataBit = eval(sds_data_path + "ds_data_comm02").getColumn(0,"databit");
  10551. var sStopBit = eval(sds_data_path + "ds_data_comm02").getColumn(0,"stopbit");
  10552. var sBaudRate = eval(sds_data_path + "ds_data_comm02").getColumn(0,"baudrate");
  10553. var sParity = eval(sds_data_path + "ds_data_comm02").getColumn(0,"parity");;
  10554. CommAX.CommPort = sComm;
  10555. CommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  10556. if(LCount > 0){
  10557. portOpenTF = "TRUE";
  10558. }else if (LCount == 0){
  10559. portOpenTF = CommAX.PortOpen("true");
  10560. }
  10561. portOpenTF = "TRUE";
  10562. } else if(sCommKind == "03") {
  10563. var sSetUpVal = eval(sds_data_path + "ds_data_comm03").getColumn(0,"setupval");
  10564. }
  10565. //trace('19 portOpenTF: '+portOpenTF+' / '+sCommKind);
  10566. if( (portOpenTF == "TRUE" && sCommKind == "02")
  10567. || (sCommKind == "01")
  10568. || (sCommKind == "03")){
  10569. //trace('20 cntHR : '+cntHR);
  10570. for(i=0 ; i< cntHR;i++){
  10571. var sSndMsg = "";
  10572. var sTsectlblnm = utlf_transNullToEmpty(refDs.getColumn(i,"tsectlblnm"));
  10573. var sBcno = refDs.getColumn(i,"bcno");
  10574. var sBarcdprntdt = refDs.getColumn(i,"barcdprntdt");
  10575. var sPatnm = refDs.getColumn(i,"patnm");
  10576. var sPid = refDs.getColumn(i,"pid");
  10577. var sSexage = refDs.getColumn(i,"sexage");
  10578. var sDeptroom = refDs.getColumn(i,"deptroom");
  10579. var sSpclblnm = refDs.getColumn(i,"spclblnm");
  10580. var sTubelblnm = refDs.getColumn(i,"tubelblnm");
  10581. var sSecttsect = refDs.getColumn(i,"secttsect");
  10582. var sTclslblnmlist = refDs.getColumn(i,"tclslblnmlist");
  10583. var sInfcinfolist = utlf_transNullToEmpty(refDs.getColumn(i,"infcinfolist"));
  10584. var sErprcpflag = refDs.getColumn(i,"erprcpflag");
  10585. var barcdcntflag = utlf_transNullToEmpty(refDs.getColumn(i,"cntflag"));
  10586. var bcollbarcdprntcnt = refDs.getColumn(i,"bcollbarcdprntcnt");
  10587. var spcacptbarcdprntcnt = refDs.getColumn(i,"spcacptbarcdprntcnt");
  10588. var microbarcdprntcnt = refDs.getColumn(i,"microbarcdprntcnt");
  10589. var divgrupcd = refDs.getColumn(i,"divgrupcd");
  10590. var divgrupnm = refDs.getColumn(i,"divgrupnm");
  10591. var sbcoll = "채혈자";
  10592. var iWidth = 0;
  10593. var aStr = "";
  10594. var test_rtn = "";
  10595. var test_he = "";
  10596. sPid = sPid;
  10597. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  10598. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  10599. if(sPrntKind == "1" || sPrntKind == "9") {
  10600. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  10601. if(sErprcpflag == "1" || sErprcpflag == "2" || sErprcpflag == "Y"){
  10602. iXPos = Number(sLeftBank) + 600;
  10603. iYPos = Number(sTopBank) + 1;
  10604. sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 15, 240, 10);
  10605. iXPos = Number(sLeftBank) + 10;
  10606. iYPos = Number(sTopBank) + 2;
  10607. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sTsectlblnm.substr(0, 20), 2, 1);
  10608. sSndMsg += CommAX.HanImageData();
  10609. }
  10610. else{
  10611. iXPos = Number(sLeftBank) + 10;
  10612. iYPos = Number(sTopBank) + 2;
  10613. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sTsectlblnm.substr(0, 20), 2, 1);
  10614. sSndMsg += CommAX.HanImageData();
  10615. }
  10616. if(barcdcntflag == "acpt" ){
  10617. if(spcacptbarcdprntcnt > 0){
  10618. if(sCommKind == "01") {
  10619. CommAX.SendMessageToLPT(sSndMsg);
  10620. sSndMsg = "";
  10621. } else if(sCommKind == "02") {
  10622. CommAX.SendMessage(sSndMsg);
  10623. sSndMsg = "";
  10624. }
  10625. }
  10626. }else{
  10627. if(sCommKind == "01") {
  10628. CommAX.SendMessageToLPT(sSndMsg);
  10629. sSndMsg = "";
  10630. } else if(sCommKind == "02") {
  10631. CommAX.SendMessage(sSndMsg);
  10632. sSndMsg = "";
  10633. }
  10634. }
  10635. iXPos = Number(sLeftBank) + 220;
  10636. iYPos = Number(sTopBank) + 5;
  10637. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  10638. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBcno + "*"); //바코드번호
  10639. iXPos = Number(sLeftBank) + 500;
  10640. iYPos = Number(sTopBank) + 5;
  10641. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  10642. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  10643. if(barcdcntflag == "acpt" ){
  10644. if(spcacptbarcdprntcnt > 0){
  10645. if(sCommKind == "01") {
  10646. CommAX.SendMessageToLPT(sSndMsg);
  10647. sSndMsg = "";
  10648. } else if(sCommKind == "02") {
  10649. CommAX.SendMessage(sSndMsg);
  10650. sSndMsg = "";
  10651. }
  10652. }
  10653. }else{
  10654. if(sCommKind == "01") {
  10655. CommAX.SendMessageToLPT(sSndMsg);
  10656. sSndMsg = "";
  10657. } else if(sCommKind == "02") {
  10658. CommAX.SendMessage(sSndMsg);
  10659. sSndMsg = "";
  10660. }
  10661. }
  10662. iXPos = Number(sLeftBank) + 90;
  10663. iYPos = Number(sTopBank) + 30;
  10664. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  10665. sSndMsg += lzzfBP_BarCode_Code39_300dpi(iXPos, iYPos, "N", 120, "*" + sBcno + "*"); // 바코드
  10666. if(barcdcntflag == "acpt" ){
  10667. if(spcacptbarcdprntcnt > 0){
  10668. if(sCommKind == "01") {
  10669. CommAX.SendMessageToLPT(sSndMsg);
  10670. sSndMsg = "";
  10671. } else if(sCommKind == "02") {
  10672. CommAX.SendMessage(sSndMsg);
  10673. sSndMsg = "";
  10674. }
  10675. }
  10676. }else{
  10677. if(sCommKind == "01") {
  10678. CommAX.SendMessageToLPT(sSndMsg);
  10679. sSndMsg = "";
  10680. } else if(sCommKind == "02") {
  10681. CommAX.SendMessage(sSndMsg);
  10682. sSndMsg = "";
  10683. }
  10684. }
  10685. iXPos = Number(sLeftBank) + 20;
  10686. iYPos = Number(sTopBank) + 160;
  10687. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  10688. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //환자등록번호
  10689. // iXPos = Number(sLeftBank) + 250;
  10690. // iYPos = Number(sTopBank) + 157;
  10691. // sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm.substr(0, 20), 2, 1);
  10692. // sSndMsg += CommAX.HanImageData();
  10693. iXPos = Number(sLeftBank) + 250;
  10694. iYPos = Number(sTopBank) + 157;
  10695. aStr = "";
  10696. aFlag = new Array();
  10697. if(!utlf_isNull(sPatnm)) {
  10698. for (var j = 0; j < sPatnm.length; j++) {
  10699. oneChar = sPatnm.charAt(j);
  10700. test_rtn = "";
  10701. test_he = "";
  10702. test_rtn = lpzfGetHanGul3(oneChar);
  10703. test_he = test_rtn.substring(0,1);
  10704. trace('a '+j+' / '+oneChar+' / '+test_rtn+' / '+test_he)
  10705. if(!utlf_isNull(test_he))
  10706. {
  10707. //----------------------
  10708. if (test_he == "E") {
  10709. sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS";
  10710. iWidth = iWidth + (Number(oneChar.length) * 15);
  10711. } else {
  10712. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, oneChar, 1, 1);
  10713. sSndMsg += CommAX.HanImageData();
  10714. iWidth = iWidth + (Number(oneChar.length) * 24);
  10715. }
  10716. }
  10717. }
  10718. }
  10719. trace('sSndMsg :'+iYPos+' / '+iXPos+' / '+sSndMsg);
  10720. if(barcdcntflag == "acpt" ){
  10721. if(spcacptbarcdprntcnt > 0){
  10722. if(sCommKind == "01") {
  10723. CommAX.SendMessageToLPT(sSndMsg);
  10724. sSndMsg = "";
  10725. } else if(sCommKind == "02") {
  10726. CommAX.SendMessage(sSndMsg);
  10727. sSndMsg = "";
  10728. }
  10729. }
  10730. }else{
  10731. if(sCommKind == "01") {
  10732. CommAX.SendMessageToLPT(sSndMsg);
  10733. sSndMsg = "";
  10734. } else if(sCommKind == "02") {
  10735. CommAX.SendMessage(sSndMsg);
  10736. sSndMsg = "";
  10737. }
  10738. }
  10739. iXPos = Number(sLeftBank) + 450;
  10740. iYPos = Number(sTopBank) + 160;
  10741. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  10742. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSexage);
  10743. iXPos = Number(sLeftBank) + 20;
  10744. iYPos = Number(sTopBank) + 185;
  10745. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  10746. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDeptroom); //진료과병실
  10747. if(barcdcntflag == "acpt" ){
  10748. if(spcacptbarcdprntcnt > 0){
  10749. if(sCommKind == "01") {
  10750. CommAX.SendMessageToLPT(sSndMsg);
  10751. sSndMsg = "";
  10752. } else if(sCommKind == "02") {
  10753. CommAX.SendMessage(sSndMsg);
  10754. sSndMsg = "";
  10755. }
  10756. }
  10757. }else{
  10758. if(sCommKind == "01") {
  10759. CommAX.SendMessageToLPT(sSndMsg);
  10760. sSndMsg = "";
  10761. } else if(sCommKind == "02") {
  10762. CommAX.SendMessage(sSndMsg);
  10763. sSndMsg = "";
  10764. }
  10765. }
  10766. sTclslblnmlist = sTclslblnmlist.replace("▨", ",");
  10767. //---------
  10768. iWidth = 0;
  10769. aStr = lpzfGetHanGul(sTclslblnmlist, aFlag);
  10770. iXPos = Number(sLeftBank) + 90;
  10771. if(!utlf_isNull(aStr))
  10772. {
  10773. for (var iNo=0; iNo < aStr.length; iNo++) {
  10774. //----------------------
  10775. if (aFlag[iNo] == "E") {
  10776. iYPos = Number(sTopBank) + 213;
  10777. sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // 검체표시명(영문)
  10778. iWidth = iWidth + (Number(aStr[iNo].length) * 15);
  10779. } else {
  10780. iYPos = Number(sTopBank) + 215;
  10781. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  10782. sSndMsg += CommAX.HanImageData();
  10783. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  10784. }
  10785. }
  10786. }
  10787. //sSndMsg += CommAX.PrtImgOut(90, 200, sTclslblnmlist.substr(0, 20), 1, 1);
  10788. //sSndMsg += CommAX.HanImageData();
  10789. if(barcdcntflag == "acpt" ){
  10790. if(spcacptbarcdprntcnt > 0){
  10791. if(sCommKind == "01") {
  10792. CommAX.SendMessageToLPT(sSndMsg);
  10793. sSndMsg = "";
  10794. } else if(sCommKind == "02") {
  10795. CommAX.SendMessage(sSndMsg);
  10796. sSndMsg = "";
  10797. }
  10798. }
  10799. }else{
  10800. if(sCommKind == "01") {
  10801. CommAX.SendMessageToLPT(sSndMsg);
  10802. sSndMsg = "";
  10803. } else if(sCommKind == "02") {
  10804. CommAX.SendMessage(sSndMsg);
  10805. sSndMsg = "";
  10806. }
  10807. }
  10808. if(sTclslblnmlist.substr(0, 3) == "ABO") {
  10809. iXPos = Number(sLeftBank) + 100;
  10810. iYPos = Number(sTopBank) + 235;
  10811. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, "채혈자 : ", 1, 1);
  10812. sSndMsg += CommAX.HanImageData();
  10813. }
  10814. if(barcdcntflag == "acpt" ){
  10815. if(spcacptbarcdprntcnt > 0){
  10816. if(sCommKind == "01") {
  10817. CommAX.SendMessageToLPT(sSndMsg);
  10818. sSndMsg = "";
  10819. } else if(sCommKind == "02") {
  10820. CommAX.SendMessage(sSndMsg);
  10821. sSndMsg = "";
  10822. }
  10823. }
  10824. }else{
  10825. if(sCommKind == "01") {
  10826. CommAX.SendMessageToLPT(sSndMsg);
  10827. sSndMsg = "";
  10828. } else if(sCommKind == "02") {
  10829. CommAX.SendMessage(sSndMsg);
  10830. sSndMsg = "";
  10831. }
  10832. }
  10833. iXPos = Number(sLeftBank) + 10;
  10834. iYPos = Number(sTopBank) + 230;
  10835. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  10836. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sInfcinfolist); //감염정보
  10837. iXPos = Number(sLeftBank) + 10;
  10838. iYPos = Number(sTopBank) + 245;
  10839. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  10840. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "bunju"); //분주구분
  10841. if(barcdcntflag == "acpt" ){
  10842. if(spcacptbarcdprntcnt > 0){
  10843. sSndMsg += lzzfBP_EndFormat(spcacptbarcdprntcnt); // 접수바코드출력수
  10844. if(sCommKind == "01") {
  10845. CommAX.SendMessageToLPT(sSndMsg);
  10846. } else if(sCommKind == "02") {
  10847. CommAX.SendMessage(sSndMsg);
  10848. }
  10849. }
  10850. }else{
  10851. sSndMsg += lzzfBP_EndFormat(bcollbarcdprntcnt);
  10852. if(sCommKind == "01") {
  10853. CommAX.SendMessageToLPT(sSndMsg);
  10854. } else if(sCommKind == "02") {
  10855. CommAX.SendMessage(sSndMsg);
  10856. }
  10857. }
  10858. }//end if(sPrntKind == "1")
  10859. }//end for
  10860. //portopen이 true이고 통신유형이 com일때 port close
  10861. if( portOpenTF == "TRUE" && sCommKind == "02" && MCount == 0){
  10862. CommAX.PortOpen("false");
  10863. }
  10864. }else if(portOpenTF == "FALSE" && sCommKind == "02"){
  10865. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  10866. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  10867. + " \n 2.케이블 확인"
  10868. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  10869. return;
  10870. }
  10871. }
  10872. } //이후 2008-07-07 바코드 포트 오류 막기위해
  10873. catch(e) {
  10874. sysf_messageBox("바코드출력에", "E009");
  10875. return;
  10876. }
  10877. }
  10878. //일반검사 분주라벨사토
  10879. //lcount, mcount (접수바코드출력수, 미생물바코드 출력수)
  10880. function lf_LisSpcBarcodePrintB2(refDs:Dataset,sds_data_path, pLCount, pMCount){
  10881. try {
  10882. var cntHR = refDs.rowcount;
  10883. //var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  10884. //var sPrntKind = objects[sds_data_path + "ds_data_setupinfo"].getColumn(0,"cprntkind");
  10885. var sPrntKind = eval(sds_data_path + "ds_data_setupinfo").getColumn(0,"prntkind");
  10886. var portOpenTF = "";
  10887. var LCount = 0;
  10888. var MCount = 0;
  10889. var aFlag = new Array(); //한글 영문 구분
  10890. var aStr = "";
  10891. var iWidth = 0;
  10892. var iXPos = 0;
  10893. var iYPos = 0;
  10894. if(utlf_isNull(pLCount)){
  10895. LCount = 0;
  10896. }else{
  10897. LCount = pLCount;
  10898. }
  10899. if(utlf_isNull(pMCount)){
  10900. MCount = 0;
  10901. }else{
  10902. MCount = pMCount;
  10903. }
  10904. var sLeftBank = eval(sds_data_path + "ds_data_blank").getColumn(0,"left");
  10905. var sTopBank = eval(sds_data_path + "ds_data_blank").getColumn(0,"top");
  10906. for(i=0 ; i< cntHR;i++){
  10907. var sSndMsg = "";
  10908. var sTsectlblnm = utlf_transNullToEmpty(refDs.getColumn(i,"tsectlblnm"));
  10909. var sBcno = refDs.getColumn(i,"bcno");
  10910. var sBarcdprntdt = refDs.getColumn(i,"barcdprntdt");
  10911. var sPatnm = refDs.getColumn(i,"patnm");
  10912. var sPid = refDs.getColumn(i,"pid");
  10913. var sSexage = refDs.getColumn(i,"sexage");
  10914. var sDeptroom = refDs.getColumn(i,"deptroom");
  10915. var sSpclblnm = refDs.getColumn(i,"spclblnm");
  10916. var sTubelblnm = refDs.getColumn(i,"tubelblnm");
  10917. var sSecttsect = refDs.getColumn(i,"secttsect");
  10918. var sTclslblnmlist = refDs.getColumn(i,"tclslblnmlist");
  10919. var sInfcinfolist = refDs.getColumn(i,"infcinfolist");
  10920. var sErprcpflag = refDs.getColumn(i,"erprcpflag");
  10921. var bcollbarcdprntcnt = refDs.getColumn(i,"bcollbarcdprntcnt");
  10922. var spcacptbarcdprntcnt = refDs.getColumn(i,"spcacptbarcdprntcnt");
  10923. var microbarcdprntcnt = refDs.getColumn(i,"microbarcdprntcnt");
  10924. var sbcoll = "채혈자";
  10925. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  10926. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  10927. if(!utlf_isNull(sBcno)){
  10928. sSndMsg = String.fromCharCode(27)+"A" + String.fromCharCode(27)+"A103500500"; // 시작위치 셋팅
  10929. if(sErprcpflag == "1" || sErprcpflag == "2" || sErprcpflag == "Y"){
  10930. iXPos = Number(sLeftBank);
  10931. iYPos = Number(sTopBank) + 1;
  10932. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"FW10V0220";
  10933. }
  10934. iXPos = Number(sLeftBank) + 15;
  10935. iYPos = Number(sTopBank) + 5;
  10936. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sTsectlblnm);
  10937. iXPos = Number(sLeftBank) + 140;
  10938. iYPos = Number(sTopBank) + 5;
  10939. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"S*" + sBcno + "*"; //바코드번호
  10940. iXPos = Number(sLeftBank) + 275;
  10941. iYPos = Number(sTopBank) + 5;
  10942. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"S" + sBarcdprntdt; //라벨발행일시
  10943. iXPos = Number(sLeftBank) + 60;
  10944. iYPos = Number(sTopBank) + 30;
  10945. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"BG02100" + sBcno; // 바코드
  10946. iXPos = Number(sLeftBank) + 20;
  10947. iYPos = Number(sTopBank) + 130;
  10948. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sPatnm.substr(0, 20));
  10949. iXPos = Number(sLeftBank) + 160;
  10950. iYPos = Number(sTopBank) + 135;
  10951. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"S" + sPid;//환자등록번호
  10952. iXPos = Number(sLeftBank) + 300;
  10953. iYPos = Number(sTopBank) + 135;
  10954. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"S" + sSexage;
  10955. iXPos = Number(sLeftBank) + 20;
  10956. iYPos = Number(sTopBank) + 160;
  10957. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"S" + sDeptroom; //진료과병실
  10958. iXPos = Number(sLeftBank) + 160;
  10959. iYPos = Number(sTopBank) + 160;
  10960. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"S" + sSpclblnm; //검체명
  10961. iXPos = Number(sLeftBank) + 260;
  10962. iYPos = Number(sTopBank) + 160;
  10963. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"S" + sTubelblnm; //용기명
  10964. iXPos = Number(sLeftBank) + 20;
  10965. iYPos = Number(sTopBank) + 180;
  10966. sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"S" + sSecttsect; //계검사계
  10967. sTclslblnmlist = sTclslblnmlist.replace("▨", ",");
  10968. iXPos = Number(sLeftBank) + 90;
  10969. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sTclslblnmlist);
  10970. if(sTclslblnmlist.substr(0, 3) == "ABO") {
  10971. iXPos = Number(sLeftBank) + 110;
  10972. iYPos = Number(sTopBank) + 202;
  10973. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, "채혈자 : ");
  10974. }
  10975. iXPos = Number(sLeftBank) + 20;
  10976. iYPos = Number(sTopBank) + 202;
  10977. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sInfcinfolist); //감염정보
  10978. iXPos = Number(sLeftBank) + 290;
  10979. iYPos = Number(sTopBank) + 202;
  10980. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, "bunju"); //분주구분
  10981. //if(barcdcntflag == "acpt" ){
  10982. sSndMsg += String.fromCharCode(27)+"Q" + spcacptbarcdprntcnt + String.fromCharCode(27)+"Z";
  10983. CommAX.SendMsg(sSndMsg);
  10984. //}else{
  10985. // sSndMsg += String.fromCharCode(27)+"Q" + bcollbarcdprntcnt + String.fromCharCode(27)+"Z";
  10986. // CommAX.SendMsg(sSndMsg);
  10987. //}
  10988. }//if(sBcno != ""){
  10989. }//end for
  10990. } //이후 2008-07-07 바코드 포트 오류 막기위해
  10991. catch(e) {
  10992. sysf_messageBox("바코드출력에", "E009");
  10993. return;
  10994. }
  10995. }
  10996. //분자생물 배지 분주라벨
  10997. //lcount, mcount (접수바코드출력수, 미생물바코드 출력수)
  10998. function lf_LisSpcBarcodePrintD(pRef, pKCount, pPCount, scrflag){
  10999. //model.setValue("/root/hidden/test/startdt", getCurrentTime());
  11000. var vInstance = document.models(0).instances(0);
  11001. var cntHR = vInstance.selectNodes(pRef).length;
  11002. var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  11003. var sPrntKind = model.getValue(barcdRef + "[1]/prntkind");
  11004. var aFlag = new Array(); //한글 영문 구분
  11005. var aStr = "";
  11006. var iWidth = 0;
  11007. var iXPos = 0;
  11008. var iYPos = 0;
  11009. var portOpenTF = "";
  11010. var KCount = 0;
  11011. var PCount = 0;
  11012. if(pKCount == null || pKCount == ""){
  11013. KCount = 0;
  11014. }else{
  11015. KCount = pKCount;
  11016. }
  11017. if(pPCount == null || pPCount == ""){
  11018. PCount = 0;
  11019. }else{
  11020. PCount = pPCount;
  11021. }
  11022. //alert(KCount);
  11023. var scridPrint = getScreenID();
  11024. if(cntHR > 0 && sPrntKind != 0){
  11025. var sCommKind = model.getValue(barcdRef + "[1]/commkind");
  11026. var sLeftBank = model.getValue(barcdRef + "[1]/blank/left");
  11027. var sTopBank = model.getValue(barcdRef + "[1]/blank/top");
  11028. if(sCommKind == "01") {
  11029. var sSetUpVal = model.getValue(barcdRef + "[1]/comm01/setupval");
  11030. } else if(sCommKind == "02") {
  11031. var sComm = model.getValue(barcdRef + "[1]/comm02/comm");
  11032. var sDataBit = model.getValue(barcdRef + "[1]/comm02/databit");
  11033. var sStopBit = model.getValue(barcdRef + "[1]/comm02/stopbit");
  11034. var sBaudRate = model.getValue(barcdRef + "[1]/comm02/baudrate");
  11035. var sParity = model.getValue(barcdRef + "[1]/comm02/parity");
  11036. CommAX.CommPort = sComm;
  11037. CommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  11038. //보관검체 출력 갯수가 존재하면 port 오픈 하지 않는다.
  11039. //이미 오픈 되어 있음. 보관검체 출력후 진검 바코드 갯수 체크하여 포트 클로즈 하지 않는다.
  11040. if(KCount > 0){
  11041. //이미 포트 오픈 되어 있으므로 "TRUE" 셋팅
  11042. portOpenTF = "TRUE";
  11043. }else if(KCount == 0){
  11044. //port open 반환값 -> String 문자 포트 오픈 성공이면 "TRUE" , 실패하면 "FALSE"
  11045. portOpenTF = CommAX.PortOpen("true");
  11046. }
  11047. } else if(sCommKind == "03") {
  11048. var sSetUpVal = model.getValue(barcdRef + "[1]/comm03/setupval");
  11049. }
  11050. //alert(portOpenTF);
  11051. if( (portOpenTF == "TRUE" && sCommKind == "02")
  11052. || (sCommKind == "01")
  11053. || (sCommKind == "03")){
  11054. for(i=1 ; i<= cntHR;i++){
  11055. var sSndMsg = "";
  11056. var sTsectlblnm = pRef.getColumn(i, "tsectlblnm");
  11057. var sBcno = pRef.getColumn(i, "bcno");
  11058. var sBarcdprntdt = pRef.getColumn(i, "barcdprntdt");
  11059. var sPatnm = pRef.getColumn(i, "patnm");
  11060. var sPid = pRef.getColumn(i, "pid");
  11061. var sSexage = pRef.getColumn(i, "sexage");
  11062. var sDeptroom = pRef.getColumn(i, "deptroom");
  11063. var sSpclblnm = pRef.getColumn(i, "spclblnm");
  11064. var sTubelblnm = pRef.getColumn(i, "tubelblnm");
  11065. var sSecttsect = pRef.getColumn(i, "secttsect");
  11066. var sTclslblnmlist = pRef.getColumn(i, "tclslblnmlist");
  11067. var sInfcinfolist = pRef.getColumn(i, "infcinfolist");
  11068. var sErprcpflag = pRef.getColumn(i, "erprcpflag");
  11069. var barcdcntflag = pRef.getColumn(i, "cntflag");
  11070. var bcollbarcdprntcnt = pRef.getColumn(i, "bcollbarcdprntcnt");
  11071. var spcacptbarcdprntcnt = pRef.getColumn(i, "spcacptbarcdprntcnt");
  11072. var microbarcdprntcnt = pRef.getColumn(i, "microbarcdprntcnt");
  11073. var sbcoll = "채혈자";
  11074. var keepspc = false;
  11075. var checkABO = isSearchString(sTclslblnmlist.toUpperCase(), "ABO");
  11076. var checkAST = isSearchString(sTclslblnmlist.toUpperCase(), "AST");
  11077. if (sLeftBank == "" || sLeftBank == "-") sLeftBank = 0;
  11078. if (sTopBank == "" || sTopBank == "-") sTopBank = 0;
  11079. if (model.getValue(pRef + "["+i+"]/dnornm") ==""){
  11080. var dnorNm = "";
  11081. var dSexage = "";
  11082. }else{
  11083. var dnorNm = model.getValue(pRef + "["+i+"]/dnornm");
  11084. var dSexage = model.getValue(pRef + "["+i+"]/dnorsexage");
  11085. }
  11086. if(sPrntKind == "1") {
  11087. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  11088. iXPos = Number(sLeftBank) + 10;
  11089. iYPos = Number(sTopBank) + 10;
  11090. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm.substr(0, 20), 1, 1);
  11091. sSndMsg += CommAX.HanImageData();
  11092. if(barcdcntflag == "acpt" ){
  11093. if(spcacptbarcdprntcnt > 0){
  11094. if(sCommKind == "01") {
  11095. CommAX.SendMessageToLPT(sSndMsg);
  11096. sSndMsg = "";
  11097. } else if(sCommKind == "02") {
  11098. CommAX.SendMessage(sSndMsg);
  11099. sSndMsg = "";
  11100. }
  11101. }
  11102. }else{
  11103. if(sCommKind == "01") {
  11104. CommAX.SendMessageToLPT(sSndMsg);
  11105. sSndMsg = "";
  11106. } else if(sCommKind == "02") {
  11107. CommAX.SendMessage(sSndMsg);
  11108. sSndMsg = "";
  11109. }
  11110. }
  11111. iXPos = Number(sLeftBank) + 140;
  11112. iYPos = Number(sTopBank) + 10;
  11113. sSndMsg += lzzfBP_ChangeFont("C", 14, 14); // 폰트 설정
  11114. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //환자등록번호
  11115. iXPos = Number(sLeftBank) + 10;
  11116. iYPos = Number(sTopBank) + 40;
  11117. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  11118. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSexage);
  11119. iXPos = Number(sLeftBank) + 140;
  11120. iYPos = Number(sTopBank) + 40;
  11121. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  11122. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  11123. var dd = getCurrentDate();
  11124. var realdd = dd.substring(4,6) + "/" + dd.substring(6,8);
  11125. var tm = getCurrentTime();
  11126. var realtm = tm.substring(0,2) + ":" + tm.substring(2,4) + ":" + tm.substring(4,6);
  11127. realdd = realdd + " " + realtm;
  11128. iXPos = Number(sLeftBank) + 10;
  11129. iYPos = Number(sTopBank) + 70;
  11130. sSndMsg += lzzfBP_ChangeFont("C", 5, 5); // 폰트 설정
  11131. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, realdd); //라벨발행일시
  11132. if(barcdcntflag == "acpt" ){
  11133. if(spcacptbarcdprntcnt > 0){
  11134. if(sCommKind == "01") {
  11135. CommAX.SendMessageToLPT(sSndMsg);
  11136. sSndMsg = "";
  11137. } else if(sCommKind == "02") {
  11138. CommAX.SendMessage(sSndMsg);
  11139. sSndMsg = "";
  11140. }
  11141. }
  11142. }else{
  11143. if(sCommKind == "01") {
  11144. CommAX.SendMessageToLPT(sSndMsg);
  11145. sSndMsg = "";
  11146. } else if(sCommKind == "02") {
  11147. CommAX.SendMessage(sSndMsg);
  11148. sSndMsg = "";
  11149. }
  11150. }
  11151. sTclslblnmlist = sTclslblnmlist.replace("▨", ",");
  11152. //---------
  11153. iWidth = 0;
  11154. aStr = "";
  11155. aFlag = new Array();
  11156. iXPos = Number(sLeftBank) + 10;
  11157. aStr = lpzfGetHanGul(sTclslblnmlist, aFlag);
  11158. for (var iNo=0; iNo < aStr.length; iNo++) {
  11159. //----------------------
  11160. if (aFlag[iNo] == "E") {
  11161. iYPos = Number(sTopBank) + 98;
  11162. sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // 검체표시명(영문)
  11163. iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  11164. } else {
  11165. iYPos = Number(sTopBank) + 95;
  11166. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  11167. sSndMsg += CommAX.HanImageData();
  11168. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  11169. }
  11170. }
  11171. //sSndMsg += CommAX.PrtImgOut(90, 175, sTclslblnmlist.substr(0, 20), 1, 1); //검사항목라벨명
  11172. //sSndMsg += CommAX.HanImageData();
  11173. if(barcdcntflag == "acpt" ){
  11174. if(spcacptbarcdprntcnt > 0){
  11175. if(sCommKind == "01") {
  11176. CommAX.SendMessageToLPT(sSndMsg);
  11177. sSndMsg = "";
  11178. } else if(sCommKind == "02") {
  11179. CommAX.SendMessage(sSndMsg);
  11180. sSndMsg = "";
  11181. }
  11182. }
  11183. }else{
  11184. if(sCommKind == "01") {
  11185. CommAX.SendMessageToLPT(sSndMsg);
  11186. sSndMsg = "";
  11187. } else if(sCommKind == "02") {
  11188. CommAX.SendMessage(sSndMsg);
  11189. sSndMsg = "";
  11190. }
  11191. }
  11192. //if(sTclslblnmlist.substr(0, 3) == "ABO") {
  11193. if(checkABO) {
  11194. //외래채혈일때
  11195. if(scridPrint=="SMLLC00100" && scrflag){
  11196. keepspc = true;
  11197. }
  11198. //병동,환자별일때
  11199. else if((scridPrint=="SMLLC00200" || scridPrint=="SMLLC00300") && scrflag && checkAST){
  11200. keepspc = true;
  11201. }
  11202. iXPos = Number(sLeftBank) + 100;
  11203. iYPos = Number(sTopBank) + 202;
  11204. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, "채혈자 : ", 1, 1);
  11205. sSndMsg += CommAX.HanImageData();
  11206. }
  11207. iXPos = Number(sLeftBank) + 10;
  11208. iYPos = Number(sTopBank) + 205;
  11209. //sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sInfcinfolist, 1, 1); //감염정보
  11210. //sSndMsg += CommAX.HanImageData();
  11211. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  11212. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sInfcinfolist); //계검사계
  11213. if(barcdcntflag == "acpt" ){
  11214. if(spcacptbarcdprntcnt > 0){
  11215. sSndMsg += lzzfBP_EndFormat(spcacptbarcdprntcnt); // 접수바코드출력수
  11216. if(sCommKind == "01") {
  11217. CommAX.SendMessageToLPT(sSndMsg);
  11218. } else if(sCommKind == "02") {
  11219. CommAX.SendMessage(sSndMsg);
  11220. }
  11221. }
  11222. }else{
  11223. sSndMsg += lzzfBP_EndFormat(bcollbarcdprntcnt);
  11224. if(sCommKind == "01") {
  11225. CommAX.SendMessageToLPT(sSndMsg);
  11226. } else if(sCommKind == "02") {
  11227. CommAX.SendMessage(sSndMsg);
  11228. }
  11229. }
  11230. if(keepspc) {
  11231. fKeepBcnoPrint("B");
  11232. }
  11233. }//end if(sPrntKind == "1")
  11234. }//end for
  11235. //portopen이 true이고 통신유형이 com이고 출력할 병리 바코드가 없을때 port close
  11236. if( portOpenTF == "TRUE" && sCommKind == "02" && PCount == 0){
  11237. CommAX.PortOpen("false");
  11238. }
  11239. }else if((portOpenTF = "FALSE" && sCommKind == "02")){
  11240. messageBox("아래 사항을 확인후 재출력해주십시오."
  11241. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  11242. + " \n 2.케이블 확인"
  11243. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  11244. return;
  11245. }
  11246. }
  11247. //model.setValue("/root/hidden/test/enddt", getCurrentTime());
  11248. }
  11249. function lf_getClobPasing()
  11250. {
  11251. if(utlf_isNull(p_sSetupInfo)){
  11252. lf_setInitDataset(ds_Data_setupinfo, true);
  11253. return;
  11254. }
  11255. // Parsing
  11256. var sColID;
  11257. var domDoc, domElement1, domElement2;
  11258. var domPar = new DomParser;
  11259. domDoc = domPar.parseFromString(p_sSetupInfo);
  11260. // 최상위 노드
  11261. for(var i=0; i<domDoc.childNodes.length; i++){
  11262. domElement1 = domDoc.childNodes[i];
  11263. // 상위 노드
  11264. for(var j=0; j<domElement1.childNodes.length; j++){
  11265. domElement2 = domElement1.childNodes[j];
  11266. if(domElement2.childNodes.length>1||domElement2.nodeName=="pcl"){
  11267. lf_getFindElement(domElement2);
  11268. }else{
  11269. sColID = domElement2.nodeName;
  11270. if(sColID=="comm01"){
  11271. sColID="setupval";
  11272. }else if(sColID=="comm03"){
  11273. sColID="setupval03";
  11274. }
  11275. lf_setDatasetMapping(sColID, domElement2.textContent);
  11276. }
  11277. }
  11278. }
  11279. }
  11280. /**
  11281. * @group :
  11282. * @ver : 2008.07.03
  11283. * @by : 윤재한
  11284. * @---------------------------------------------------
  11285. * @type : function
  11286. * @access : public
  11287. * @desc : 보관검체 출력
  11288. * @param : ref - 보관검체 인스턴스
  11289. * count - 진검바코드 갯수
  11290. * @return :
  11291. * @---------------------------------------------------
  11292. * 채혈화면에서 보관검체출력시 TRLLC80101
  11293. * 혈액은행 보관검체 등록시 TXLBT10902
  11294. */
  11295. function lf_KeLabel(ds_pRef:Dataset,ds_prntinfo:Dataset, count){
  11296. //var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  11297. //var sPrntKind = model.getValue(barcdRef + "[1]/prntkind");
  11298. var portOpenCheck = "";
  11299. var sPrntKind = ds_prntinfo.getColCount(0, "prntkind");
  11300. var LCount = 0;
  11301. var iXPos = 0;
  11302. var iYPos = 0;
  11303. if(count == null || count == ""){
  11304. LCount = 0;
  11305. }else{
  11306. LCount = count;
  11307. }
  11308. var sSndMsg = "";
  11309. if (sPrntKind == 0) return;
  11310. var sCommKind = ds_prntinfo.getColumn(0, "commkind");
  11311. var sLeftBank = ds_data_blank.getColumn(0, "left");
  11312. var sTopBank = ds_data_blank.getColumn(0, "top");
  11313. if(sCommKind == "01") {
  11314. var sSetUpVal = ds_data_comm01.getColumn(0, "setupval");
  11315. } else if(sCommKind == "02") {
  11316. var sComm = ds_data_comm02.getColumn(0, "comm");
  11317. var sDataBit = ds_data_comm02.getColumn(0, "databit");
  11318. var sStopBit = ds_data_comm02.getColumn(0, "stopbit");
  11319. var sBaudRate = ds_data_comm02.getColumn(0, "baudrate");
  11320. var sParity = ds_data_comm02.getColumn(0, "parity");
  11321. CommAX.CommPort = sComm;
  11322. CommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  11323. portOpenCheck = CommAX.PortOpen("true");
  11324. } else if(sCommKind == "03") {
  11325. var sSetUpVal = ds_data_comm03.getColumn(0, "setupval");
  11326. var sEqmtCD = ds_data_comm03.getColumn(0, "eqmtcd");
  11327. }
  11328. if( (portOpenCheck == "TRUE" && sCommKind == "02")
  11329. || sCommKind == "01"
  11330. || sCommKind == "03"){
  11331. var sStr = "보관검체";
  11332. var sRoomcd = ds_pRef.getColumn(0, "roomcd");
  11333. var sPid = ds_pRef.getColumn(0, "pid");
  11334. var sPatnm = ds_pRef.getColumn(0, "patnm");
  11335. var sPatsex = ds_pRef.getColumn(0, "patsex");
  11336. var sPatage = ds_pRef.getColumn(0, "patage");
  11337. var sPatsexage = sPatsex + "/" + sPatage;
  11338. var sOrddeptNm = ds_pRef.getColumn(0, "orddeptnm").substr(0, 2);
  11339. var sBtype = ds_pRef.getColumn(0, "btype");
  11340. var sInfcinfolist = ds_pRef.getColumn(0, "infcinfolist");//감염정보 추가 20120503
  11341. var sBcollNm = "채혈자:" ;
  11342. var sDt = ds_pRef.getColumn(0, "dt");
  11343. var sPidW = 85;
  11344. var sBarcodeW = 120; // 110였음
  11345. var sBtypeW = 10;
  11346. var sBGGCno = ds_pRef.getColumn(0, "bggc");
  11347. if(!utlf_isNull(sInfcinfolist))
  11348. {
  11349. sInfcinfolist = "*"+ sInfcinfolist +"*";
  11350. }
  11351. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  11352. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  11353. if(sPid.length == 10)
  11354. {
  11355. sBarcodeW = 90;// 90이었음
  11356. sBtypeW = 10;
  11357. }
  11358. if(sPrntKind == "1") { //zebra
  11359. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  11360. iXPos = Number(sLeftBank);
  11361. iYPos = Number(sTopBank);
  11362. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sStr, 1, 1);
  11363. sSndMsg += CommAX.HanImageData();
  11364. iXPos = Number(sLeftBank) + 180;
  11365. iYPos = Number(sTopBank) + 8;
  11366. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  11367. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sRoomcd);
  11368. iXPos = Number(sLeftBank) + 260;
  11369. iYPos = Number(sTopBank) + 8;
  11370. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  11371. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPatsexage);
  11372. if(sCommKind == "01") {
  11373. CommAX.SendMessageToLPT(sSndMsg);
  11374. sSndMsg = "";
  11375. } else if(sCommKind == "02") {
  11376. CommAX.SendMessage(sSndMsg);
  11377. sSndMsg = "";
  11378. }
  11379. iXPos = Number(sLeftBank) + 10;
  11380. iYPos = Number(sTopBank) + 25;
  11381. //sSndMsg += lzzfBP_ChangeFont("C", 10, 14); // 폰트 설정
  11382. //sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid);
  11383. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm, 1.6, 1.6);
  11384. sSndMsg += CommAX.HanImageData();
  11385. if(sCommKind == "01") {
  11386. CommAX.SendMessageToLPT(sSndMsg);
  11387. sSndMsg = "";
  11388. } else if(sCommKind == "02") {
  11389. CommAX.SendMessage(sSndMsg);
  11390. sSndMsg = "";
  11391. }
  11392. iXPos = Number(sLeftBank) + 190;
  11393. iYPos = Number(sTopBank) + 30;
  11394. //sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm, 1, 1);
  11395. //sSndMsg += CommAX.HanImageData();
  11396. //sSndMsg += lzzfBP_ChangeFont("C", 10, 14); // 폰트 설정
  11397. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  11398. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid);
  11399. if(sCommKind == "01") {
  11400. CommAX.SendMessageToLPT(sSndMsg);
  11401. sSndMsg = "";
  11402. } else if(sCommKind == "02") {
  11403. CommAX.SendMessage(sSndMsg);
  11404. sSndMsg = "";
  11405. }
  11406. iXPos = Number(sLeftBank) + sBtypeW;
  11407. iYPos = Number(sTopBank) + 110; // 75 였음
  11408. sSndMsg += lzzfBP_ChangeFont("C", 85, 20); // 폰트 설정
  11409. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBtype); // 혈액형
  11410. iXPos = Number(sLeftBank);
  11411. iYPos = Number(sTopBank) + 75; // 160 였음
  11412. if(sBGGCno != ""){ // 2009-03-07 정은 수정
  11413. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  11414. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBGGCno); // 보관검체
  11415. }
  11416. if(sCommKind == "01") {
  11417. CommAX.SendMessageToLPT(sSndMsg);
  11418. sSndMsg = "";
  11419. } else if(sCommKind == "02") {
  11420. CommAX.SendMessage(sSndMsg);
  11421. sSndMsg = "";
  11422. }
  11423. iXPos = Number(sLeftBank) + sBarcodeW;
  11424. iYPos = Number(sTopBank) + 75;
  11425. sSndMsg += lzzfBP_FiendOrigin(iXPos, iYPos);//위치
  11426. sSndMsg += "^BY2,2.0"; //
  11427. sSndMsg += "^B3" + "N" + ",N," + "85" + ",N,N^FD" + "*" + sPid + "*" + "^FS";//바코드 크기
  11428. if(sCommKind == "01") {
  11429. CommAX.SendMessageToLPT(sSndMsg);
  11430. sSndMsg = "";
  11431. } else if(sCommKind == "02") {
  11432. CommAX.SendMessage(sSndMsg);
  11433. sSndMsg = "";
  11434. }
  11435. iXPos = Number(sLeftBank) + 180;
  11436. iYPos = Number(sTopBank) + 170;
  11437. sSndMsg += lzzfBP_ChangeFont("C", 5, 5); // 폰트 설정
  11438. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*"+sPid+"*");
  11439. if(sCommKind == "01") {
  11440. CommAX.SendMessageToLPT(sSndMsg);
  11441. sSndMsg = "";
  11442. } else if(sCommKind == "02") {
  11443. CommAX.SendMessage(sSndMsg);
  11444. sSndMsg = "";
  11445. }
  11446. iXPos = Number(sLeftBank) + 10;
  11447. iYPos = Number(sTopBank) + 200;
  11448. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  11449. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDt);
  11450. if(sCommKind == "01") {
  11451. CommAX.SendMessageToLPT(sSndMsg);
  11452. sSndMsg = "";
  11453. } else if(sCommKind == "02") {
  11454. CommAX.SendMessage(sSndMsg);
  11455. sSndMsg = "";
  11456. }
  11457. iXPos = Number(sLeftBank) + 220;
  11458. iYPos = Number(sTopBank) + 190;
  11459. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sBcollNm, 1, 1);
  11460. sSndMsg += CommAX.HanImageData();
  11461. sSndMsg += lzzfBP_EndFormat();
  11462. if(sCommKind == "01") {
  11463. CommAX.SendMessageToLPT(sSndMsg);
  11464. } else if(sCommKind == "02") {
  11465. CommAX.SendMessage(sSndMsg);
  11466. }
  11467. //출력할 진검 바코드가 없을시에만 port close
  11468. if(portOpenCheck == "TRUE" && sCommKind == "02" && LCount == 0){
  11469. CommAX.PortOpen("false");
  11470. }
  11471. } else if(sPrntKind == "3") { //Auto Label(Ginus)
  11472. if(LCount == 0) {//출력할 진검 바코드가 없을시에만 환자정보
  11473. sSndMsg += "^^^P"; //환자정보 시작
  11474. //환자번호, 환자이름, 성별, 나이
  11475. sSndMsg += "^PI" + sPid + "^PN" + sPatnm + "^PS" + sPatsex + "^PA" + sPatage;
  11476. //장비번호 선택
  11477. sSndMsg += "^PB" + sEqmtCD;
  11478. sSndMsg += "^^^P"; //환자정보 종료
  11479. sSndMsg += "^^^S"; //채혈정보 시작
  11480. }
  11481. sSndMsg += "^SS"; //data 시작
  11482. //바코드번호(등록번호), S:보관검체, 진료과, 병실
  11483. sSndMsg += "^SA" + sPid + "^SBS" + "^SC" + sOrddeptNm + "^SD" + sRoomcd;
  11484. //용기코드(보관검체용으로 고정), 바코드출력일시, 혈액형
  11485. sSndMsg += "^SEAB" + "^SI" + sDt + "^S1" + sBtype;
  11486. sSndMsg += "^SS"; //data 종료
  11487. if(LCount != 0) { //진검바코드가 있을경우 진검바코드내용 + 보관검체내용
  11488. ds_hidden.setColumn(0, "sendmessage", ds_hidden.getColumn(0, "sendmessage") + sSndMsg);
  11489. }
  11490. if(LCount == 0) {//출력할 진검 바코드가 없을시에만 전송
  11491. sSndMsg += "^^^S"; //채혈정보 종료
  11492. var sReturnValue = AutoLabel.TRANSDATA(0, sSetUpVal, sSndMsg); //전송
  11493. }
  11494. } //end else if(sPrntKind == "3")
  11495. else if(sPrntKind == "4") { //Auto Label(Robo)
  11496. }
  11497. else if(sPrntKind == "9") { //Zebra 300dpi
  11498. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  11499. iXPos = Number(sLeftBank);
  11500. iYPos = Number(sTopBank);
  11501. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sStr, 1, 1);
  11502. sSndMsg += CommAX.HanImageData();
  11503. iXPos = Number(sLeftBank) + 180;
  11504. iYPos = Number(sTopBank) + 8;
  11505. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  11506. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sRoomcd);
  11507. iXPos = Number(sLeftBank) + 360;
  11508. iYPos = Number(sTopBank) + 8;
  11509. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  11510. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPatsexage);
  11511. if(sCommKind == "01") {
  11512. CommAX.SendMessageToLPT(sSndMsg);
  11513. sSndMsg = "";
  11514. } else if(sCommKind == "02") {
  11515. CommAX.SendMessage(sSndMsg);
  11516. sSndMsg = "";
  11517. }
  11518. iXPos = Number(sLeftBank) + 10;
  11519. iYPos = Number(sTopBank) + 25;
  11520. //sSndMsg += lzzfBP_ChangeFont("C", 10, 14); // 폰트 설정
  11521. //sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid);
  11522. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm, 1.6, 1.6);
  11523. sSndMsg += CommAX.HanImageData();
  11524. if(sCommKind == "01") {
  11525. CommAX.SendMessageToLPT(sSndMsg);
  11526. sSndMsg = "";
  11527. } else if(sCommKind == "02") {
  11528. CommAX.SendMessage(sSndMsg);
  11529. sSndMsg = "";
  11530. }
  11531. iXPos = Number(sLeftBank) + 190;
  11532. iYPos = Number(sTopBank) + 30;
  11533. //sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm, 1, 1);
  11534. //sSndMsg += CommAX.HanImageData();
  11535. //sSndMsg += lzzfBP_ChangeFont("C", 10, 14); // 폰트 설정
  11536. sSndMsg += lzzfBP_ChangeFont("C", 40, 30); // 폰트 설정
  11537. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid);
  11538. if(sCommKind == "01") {
  11539. CommAX.SendMessageToLPT(sSndMsg);
  11540. sSndMsg = "";
  11541. } else if(sCommKind == "02") {
  11542. CommAX.SendMessage(sSndMsg);
  11543. sSndMsg = "";
  11544. }
  11545. iXPos = Number(sLeftBank) + sBtypeW;
  11546. iYPos = Number(sTopBank) + 120; // 75 였음
  11547. sSndMsg += lzzfBP_ChangeFont("C", 95, 40); // 폰트 설정
  11548. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBtype); // 혈액형
  11549. iXPos = Number(sLeftBank);
  11550. iYPos = Number(sTopBank) + 75; // 160 였음
  11551. if(sBGGCno != ""){ // 2009-03-07 정은 수정
  11552. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  11553. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBGGCno); // 보관검체
  11554. }
  11555. if(sCommKind == "01") {
  11556. CommAX.SendMessageToLPT(sSndMsg);
  11557. sSndMsg = "";
  11558. } else if(sCommKind == "02") {
  11559. CommAX.SendMessage(sSndMsg);
  11560. sSndMsg = "";
  11561. }
  11562. iXPos = Number(sLeftBank) + sBarcodeW;
  11563. iYPos = Number(sTopBank) + 75;
  11564. sSndMsg += lzzfBP_FiendOrigin(iXPos, iYPos);//위치
  11565. sSndMsg += "^BY3,2.4,130"; //
  11566. sSndMsg += "^B3" + "N" + ",N," + "125" + ",N,N^FD" + "*" + sPid + "*" + "^FS";//바코드 크기
  11567. if(sCommKind == "01") {
  11568. CommAX.SendMessageToLPT(sSndMsg);
  11569. sSndMsg = "";
  11570. } else if(sCommKind == "02") {
  11571. CommAX.SendMessage(sSndMsg);
  11572. sSndMsg = "";
  11573. }
  11574. iXPos = Number(sLeftBank) + 200;
  11575. iYPos = Number(sTopBank) + 215;
  11576. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  11577. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*"+sPid+"*");
  11578. if(sCommKind == "01") {
  11579. CommAX.SendMessageToLPT(sSndMsg);
  11580. sSndMsg = "";
  11581. } else if(sCommKind == "02") {
  11582. CommAX.SendMessage(sSndMsg);
  11583. sSndMsg = "";
  11584. }
  11585. iXPos = Number(sLeftBank) + 10;
  11586. iYPos = Number(sTopBank) + 240;
  11587. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  11588. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDt);
  11589. if(sCommKind == "01") {
  11590. CommAX.SendMessageToLPT(sSndMsg);
  11591. sSndMsg = "";
  11592. } else if(sCommKind == "02") {
  11593. CommAX.SendMessage(sSndMsg);
  11594. sSndMsg = "";
  11595. }
  11596. iXPos = Number(sLeftBank) + 20;
  11597. iYPos = Number(sTopBank) + 260;
  11598. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sBcollNm, 1, 1);
  11599. sSndMsg += CommAX.HanImageData();
  11600. iXPos = Number(sLeftBank) + 250;
  11601. iYPos = Number(sTopBank) + 260;
  11602. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, "채혈일자 : ", 1, 1);
  11603. sSndMsg += CommAX.HanImageData();
  11604. sSndMsg += lzzfBP_EndFormat();
  11605. if(sCommKind == "01") {
  11606. CommAX.SendMessageToLPT(sSndMsg);
  11607. } else if(sCommKind == "02") {
  11608. CommAX.SendMessage(sSndMsg);
  11609. }
  11610. //출력할 진검 바코드가 없을시에만 port close
  11611. if(portOpenCheck == "TRUE" && sCommKind == "02" && LCount == 0){
  11612. CommAX.PortOpen("false");
  11613. }
  11614. }
  11615. }else if(portOpenCheck == "TRUE" && sCommKind == "02"){
  11616. messageBox("아래 사항을 확인후 재출력해주십시오."
  11617. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  11618. + " \n 2.케이블 확인"
  11619. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  11620. return;
  11621. }
  11622. }
  11623. /**
  11624. * @group :
  11625. * @ver : 2008.07.03
  11626. * @by : 윤재한
  11627. * @---------------------------------------------------
  11628. * @type : function
  11629. * @access : public
  11630. * @desc : 보관검체 출력
  11631. * @param : ref - 보관검체 인스턴스
  11632. * count - 진검바코드 갯수
  11633. * @return :
  11634. * @---------------------------------------------------
  11635. * 채혈화면에서 보관검체출력시 TRLLC80101
  11636. * 혈액은행 보관검체 등록시 TXLBT10902
  11637. */
  11638. function lf_KeLabelHB2(ds_pRef:Dataset,ds_prntinfo:Dataset, count){
  11639. //var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  11640. var sPrntKind = ds_prntinfo.getColumn(0,"prntkind");
  11641. var portOpenCheck = "";
  11642. var LCount = 0;
  11643. var iXPos = 0;
  11644. var iYPos = 0;
  11645. if(count == null || count == ""){
  11646. LCount = 0;
  11647. }else{
  11648. LCount = count;
  11649. }
  11650. var sSndMsg = "";
  11651. if (sPrntKind == 0) return;
  11652. var sCommKind = utlf_transNullToEmpty(ds_prntinfo.getColumn(0,"commkind"));
  11653. var sLeftBank = utlf_transNullToEmpty(ds_prntinfo.getColumn(0,"left")); //왼쪽여백
  11654. var sTopBank = utlf_transNullToEmpty(ds_prntinfo.getColumn(0,"top")); //위쪽여백
  11655. if(sPrntKind == "10"){
  11656. var sStr = "보관검체";
  11657. var sRoomcd = ds_pRef.getColumn(0,"roomcd");
  11658. var sPid = ds_pRef.getColumn(0,"pid");
  11659. var sPatnm = ds_pRef.getColumn(0,"patnm");
  11660. var sPatsex = ds_pRef.getColumn(0,"patsex");
  11661. var sPatage = ds_pRef.getColumn(0,"patage");
  11662. var sPatsexage = sPatsex + "/" + sPatage;
  11663. var sOrddeptNm= ds_pRef.getColumn(0,"orddeptnm").substring(0,2);
  11664. var sBtype = ds_pRef.getColumn(0,"btype");
  11665. var sBcollNm = "채혈자:" ;//+ ds_pRef.getColumn(i,"bcollnm");
  11666. var sDt = ds_pRef.getColumn(0,"dt");
  11667. var sPidW = 85;
  11668. var sBarcodeW = 120; // 110였음
  11669. var sBtypeW = 10;
  11670. var sBGGCno = ds_pRef.getColumn(0,"bggc");
  11671. //sSndMsg = "^@" + "\n";
  11672. //sSndMsg = "^default" + "\n";
  11673. sSndMsg += "N" + "\n";
  11674. sSndMsg += "JF" + "\n";
  11675. sSndMsg += "D9" + "\n";
  11676. sSndMsg += "S2" + "\n";
  11677. sSndMsg += "Q223,27" + "\n";
  11678. sSndMsg += "q456" + "\n";
  11679. iXPos = Number(sLeftBank);
  11680. iYPos = Number(sTopBank);
  11681. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,1,1,N," + "\"" + sStr + "\""+ "\n";
  11682. //iXPos = Number(sLeftBank) + 140;
  11683. //iYPos = Number(sTopBank) + 5;
  11684. //sSndMsg += "A" + iXPos + "," + iYPos + ",0,2,1,1,N," + "\"" + "*" + sBcno + "*" + "\""+ "\n";
  11685. iXPos = Number(sLeftBank) + 300;
  11686. iYPos = Number(sTopBank);
  11687. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + "Serum" + "\""+ "\n";
  11688. iXPos = Number(sLeftBank) + 25;
  11689. iYPos = Number(sTopBank) + 28;
  11690. sSndMsg += "B" + iXPos + "," + iYPos + ",0,3,2,5,93,N," + "\"" + sPid + "\""+ "\n";
  11691. iXPos = Number(sLeftBank) + 260;
  11692. iYPos = Number(sTopBank) + 35;
  11693. sSndMsg += "A" + iXPos + "," + iYPos + ",0,5,1,1,N," + "\"" + sBtype + "\""+ "\n";
  11694. iXPos = Number(sLeftBank);
  11695. iYPos = Number(sTopBank) + 124;
  11696. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + sPid + "\""+ "\n";
  11697. iXPos = Number(sLeftBank) + 120;
  11698. iYPos = Number(sTopBank) + 120;
  11699. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,1,1,N," + "\"" + sPatnm + "\""+ "\n";
  11700. iXPos = Number(sLeftBank) + 220;
  11701. iYPos = Number(sTopBank) + 120;
  11702. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,1,1,N," + "\"" + "채혈일시:" + "\""+ "\n";
  11703. iXPos = Number(sLeftBank) + 330;
  11704. iYPos = Number(sTopBank) + 125;
  11705. sSndMsg += "A" + iXPos + "," + iYPos + ",0,1,1,1,N," + "\"" + sDt.substr(5) + "\""+ "\n";
  11706. iXPos = Number(sLeftBank);
  11707. iYPos = Number(sTopBank) + 145;
  11708. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + "Plain 6ml" + "\""+ "\n";
  11709. iXPos = Number(sLeftBank);
  11710. iYPos = Number(sTopBank) + 165;
  11711. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,1,1,N," + "\"" + "검체채취일시:" + "\""+ "\n";
  11712. iXPos = Number(sLeftBank);
  11713. iYPos = Number(sTopBank) + 190;
  11714. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,1,1,N," + "\"" + "채혈자:" + "\""+ "\n";
  11715. iXPos = Number(sLeftBank) + 200;
  11716. iYPos = Number(sTopBank) + 190;
  11717. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,1,1,N," + "\"" + "확인자:" + "\""+ "\n";
  11718. sSndMsg += "P1"+ "\n";
  11719. //alert(sSndMsg);
  11720. CommAX.SendMsg(sSndMsg);
  11721. }else if(sPrntKind == "11"){
  11722. sSndMsg = "^XA^SEE:UHANGUL.DAT^FS^CWQ,E:kfont3.FNT^FS";
  11723. var sStr = "보관지정";
  11724. var sRoomcd = ds_pRef.getColumn(0,"roomcd");
  11725. var sPid = ds_pRef.getColumn(0,"pid");
  11726. var sPatnm = ds_pRef.getColumn(0,"patnm");
  11727. var sPatsex = ds_pRef.getColumn(0,"patsex");
  11728. var sPatage = ds_pRef.getColumn(0,"patage");
  11729. var sPatsexage = sPatsex + "/" + sPatage;
  11730. var sOrddeptNm= ds_pRef.getColumn(0,"orddeptnm").substring(0,2);
  11731. var sBtype = ds_pRef.getColumn(0,"btype");
  11732. var sBcollNm = "채혈자:" ;//+ ds_pRef.getColumn(i,"bcollnm");
  11733. var sDt = ds_pRef.getColumn(0,"dt");
  11734. var sPidW = 85;
  11735. var sBarcodeW = 120; // 110였음
  11736. var sBtypeW = 10;
  11737. var sBGGCno = ds_pRef.getColumn(0,"bggc");
  11738. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  11739. iXPos = Number(sLeftBank) + 155;
  11740. iYPos = Number(sTopBank) + 22;
  11741. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  11742. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBGGCno.substring(0, 9));
  11743. iXPos = Number(sLeftBank) + 265;
  11744. iYPos = Number(sTopBank) + 22;
  11745. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  11746. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBGGCno.substr(9));
  11747. iXPos = Number(sLeftBank);
  11748. iYPos = Number(sTopBank);
  11749. sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,25,25^FH^FD" + sStr + "^FS^CI1";
  11750. //iXPos = Number(sLeftBank) + 10;
  11751. //iYPos = Number(sTopBank) + 25;
  11752. //sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  11753. //sSndMsg += lzzfBP_BarCode_Code39(iXPos, iYPos, "N", 70, "*" + sPid + "*"); // 바코드
  11754. iXPos = Number(sLeftBank) + 10;
  11755. iYPos = Number(sTopBank) + 25;
  11756. sSndMsg += lzzfBP_FiendOrigin(iXPos, iYPos);//위치
  11757. sSndMsg += "^BY1,2.0";//
  11758. sSndMsg += "^B3" + "N" + ",N," + "70" + ",N,N^FD" + "*" + sPid + "*" + "^FS";//바코드 크기
  11759. iXPos = Number(sLeftBank);
  11760. iYPos = Number(sTopBank) + 100;
  11761. //sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  11762. //sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid);
  11763. sSndMsg += "^CFA30,30^FO"+iXPos+","+iYPos+"^FD" + sPid + "^FS";
  11764. iXPos = Number(sLeftBank) + 150;
  11765. iYPos = Number(sTopBank) + 100;
  11766. sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,25,25^FH^FD" + sPatnm + "^FS^CI1";
  11767. iXPos = Number(sLeftBank) + 155;
  11768. iYPos = Number(sTopBank) + 45; // 75 였음
  11769. sSndMsg += lzzfBP_ChangeFont("C", 50, 30); // 폰트 설정
  11770. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBtype); // 혈액형
  11771. sSndMsg += "^XZ"
  11772. CommAX.SendMsg(sSndMsg);
  11773. }else if(sPrntKind == "9"){
  11774. trace('222 :'+' / '+ds_pRef.getColumn(0,"dt"));
  11775. sSndMsg = "^XA^SEE:UHANGUL.DAT^FS^CWQ,E:kfont3.FNT^FS";
  11776. var sStr = "보관검체";
  11777. var sRoomcd = ds_pRef.getColumn(0,"roomcd");
  11778. var sPid = ds_pRef.getColumn(0,"pid");
  11779. var sPatnm = ds_pRef.getColumn(0,"patnm");
  11780. var sPatsex = ds_pRef.getColumn(0,"patsex");
  11781. var sPatage = ds_pRef.getColumn(0,"patage");
  11782. var sPatsexage = sPatsex + "/" + sPatage;
  11783. var sOrddeptNm= ""
  11784. var sBtype = ds_pRef.getColumn(0,"btype");
  11785. var sBcollNm = "채혈자:" ;//+ ds_pRef.getColumn(i,"bcollnm");
  11786. var sDt = ds_pRef.getColumn(0,"dt");
  11787. var sPidW = 85;
  11788. var sBarcodeW = 120; // 110였음
  11789. var sBtypeW = 10;
  11790. var sBGGCno = ds_pRef.getColumn(0,"bggc");
  11791. if (!utlf_isNull(ds_pRef.getColumn(0,"orddeptnm"))){
  11792. sOrddeptNm= ds_pRef.getColumn(0,"orddeptnm").substring(0,2);
  11793. }else{
  11794. sOrddeptNm= "";
  11795. }
  11796. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  11797. iXPos = Number(sLeftBank) + 400;
  11798. iYPos = Number(sTopBank) + 5;
  11799. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  11800. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "Serum");
  11801. iXPos = Number(sLeftBank);
  11802. iYPos = Number(sTopBank);
  11803. sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,40,40^FH^FD" + sStr + "^FS^CI1";
  11804. iXPos = Number(sLeftBank) + 20;
  11805. iYPos = Number(sTopBank) + 40;
  11806. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  11807. sSndMsg += lzzfBP_BarCode_Code39_300dpi(iXPos, iYPos, "N", 120, "*" + sPid + "*"); // 바코드
  11808. iXPos = Number(sLeftBank) + 5;
  11809. iYPos = Number(sTopBank) + 165;
  11810. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  11811. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid);
  11812. iXPos = Number(sLeftBank) + 190;
  11813. iYPos = Number(sTopBank) + 165;
  11814. sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,35,35^FH^FD" + sPatnm + "^FS^CI1";
  11815. iXPos = Number(sLeftBank) + 320;
  11816. iYPos = Number(sTopBank) + 165;
  11817. sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,20,20^FH^FD" + "채혈일시:" + "^FS^CI1";
  11818. iXPos = Number(sLeftBank) + 430;
  11819. iYPos = Number(sTopBank) + 50; // 75 였음
  11820. sSndMsg += lzzfBP_ChangeFont("C", 100, 40); // 폰트 설정
  11821. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBtype); // 혈액형
  11822. trace("sDt :" +sDt);
  11823. iXPos = Number(sLeftBank) + 440;
  11824. iYPos = Number(sTopBank) + 165;
  11825. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  11826. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDt);
  11827. iXPos = Number(sLeftBank) + 5;
  11828. iYPos = Number(sTopBank) + 195;
  11829. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  11830. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "Plain 6ml");
  11831. //iXPos = Number(sLeftBank) + 190;
  11832. //iYPos = Number(sTopBank) + 190;
  11833. //sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sBcollNm, 1, 1);
  11834. //sSndMsg += CommAX.HanImageData();
  11835. iXPos = Number(sLeftBank) + 320;
  11836. iYPos = Number(sTopBank) + 195;
  11837. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  11838. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sRoomcd);
  11839. iXPos = Number(sLeftBank) + 2;
  11840. iYPos = Number(sTopBank) + 230;
  11841. sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,30,30^FH^FD" + "검체채취일시:" + "^FS^CI1";
  11842. iXPos = Number(sLeftBank) + 2;
  11843. iYPos = Number(sTopBank) + 260;
  11844. sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,30,30^FH^FD" + "채혈자:" + "^FS^CI1";
  11845. iXPos = Number(sLeftBank) + 320;
  11846. iYPos = Number(sTopBank) + 260;
  11847. sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,30,30^FH^FD" + "확인자:" + "^FS^CI1";
  11848. sSndMsg += "^XZ"
  11849. CommAX.SendMsg(sSndMsg);
  11850. }else{
  11851. var sStr = "보관검체";
  11852. var sRoomcd = ds_pRef.getColumn(0,"roomcd");
  11853. var sPid = ds_pRef.getColumn(0,"pid");
  11854. var sPatnm = ds_pRef.getColumn(0,"patnm");
  11855. var sPatsex = ds_pRef.getColumn(0,"patsex");
  11856. var sPatage = ds_pRef.getColumn(0,"patage");
  11857. var sPatsexage = sPatsex + "/" + sPatage;
  11858. var sOrddeptNm= ds_pRef.getColumn(0,"orddeptnm").substring(0,2);
  11859. var sBtype = ds_pRef.getColumn(0,"btype");
  11860. var sBcollNm = "채혈자:" ;//+ ds_pRef.getColumn(i,"bcollnm");
  11861. var sDt = ds_pRef.getColumn(0,"dt");
  11862. var sPidW = 85;
  11863. var sBarcodeW = 120; // 110였음
  11864. var sBtypeW = 10;
  11865. var sBGGCno = ds_pRef.getColumn(0,"bggc");
  11866. if (sLeftBank == "" || sLeftBank == "-") sLeftBank = 0;
  11867. if (sTopBank == "" || sTopBank == "-") sTopBank = 0;
  11868. if(sPid.length == 10){
  11869. sBarcodeW = 90;// 90이었음
  11870. sBtypeW = 10;
  11871. }
  11872. sSndMsg = "AA103500500"; // 시작위치 셋팅
  11873. iXPos = Number(sLeftBank);
  11874. iYPos = Number(sTopBank);
  11875. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sStr);
  11876. iXPos = Number(sLeftBank) + 160;
  11877. iYPos = Number(sTopBank) + 8;
  11878. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sRoomcd;
  11879. iXPos = Number(sLeftBank) + 260;
  11880. iYPos = Number(sTopBank) + 8;
  11881. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sPatsexage;
  11882. iXPos = Number(sLeftBank) + 10;
  11883. iYPos = Number(sTopBank) + 35;
  11884. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sPatnm, 2, 2);
  11885. iXPos = Number(sLeftBank) + 200;
  11886. iYPos = Number(sTopBank) + 35;
  11887. sSndMsg += "V" + iYPos + "H" + iXPos + "L0203S" + sPid + "L0101";;
  11888. iXPos = Number(sLeftBank) + sBtypeW;
  11889. iYPos = Number(sTopBank) + 110; // 75 였음
  11890. sSndMsg += "V" + iYPos + "H" + iXPos + "L0303M" + sBtype + "L0101";
  11891. iXPos = Number(sLeftBank) + 10;
  11892. iYPos = Number(sTopBank) + 90; // 160 였음
  11893. if(sBGGCno != ""){ // 2009-03-07 정은 수정
  11894. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sBGGCno;
  11895. }
  11896. iXPos = Number(sLeftBank) + sBarcodeW + 20;
  11897. iYPos = Number(sTopBank) + 80;
  11898. sSndMsg += "V" + iYPos + "H" + iXPos + "BG02070" + sPid; // 바코드
  11899. iXPos = Number(sLeftBank) + 170;
  11900. iYPos = Number(sTopBank) + 170;
  11901. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + "*"+sPid+"*";
  11902. iXPos = Number(sLeftBank) + 10;
  11903. iYPos = Number(sTopBank) + 200;
  11904. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sDt;
  11905. iXPos = Number(sLeftBank) + 220;
  11906. iYPos = Number(sTopBank) + 190;
  11907. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sBcollNm);
  11908. sSndMsg += "Q" + "1" + "Z";
  11909. CommAX.SendMsg(sSndMsg);
  11910. }
  11911. }
  11912. /**
  11913. * @group :
  11914. * @ver : 2010.01.14
  11915. * @by : 박정은
  11916. * @---------------------------------------------------
  11917. * @type : function
  11918. * @access : public
  11919. * @desc : 보관검체 출력
  11920. * @param : ref - 보관검체 인스턴스
  11921. * count - 진검바코드 갯수
  11922. * @return :
  11923. * @---------------------------------------------------
  11924. * 채혈화면에서 보관검체출력시 TRLLC80101
  11925. * 혈액은행 보관검체 등록시 TXLBT10902
  11926. */
  11927. function lf_KeLabel_B472(ref, count){
  11928. //var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  11929. //var sPrntKind = model.getValue(barcdRef + "[1]/prntkind");
  11930. var sPrntKind = ds_prntinfo.getColumn(0, "prntkind");
  11931. var portOpenCheck = "";
  11932. var LCount = 0;
  11933. var iXPos = 0;
  11934. var iYPos = 0;
  11935. if(count == null || count == ""){
  11936. LCount = 0;
  11937. }else{
  11938. LCount = count;
  11939. }
  11940. var sSndMsg = "";
  11941. if (sPrntKind == 0) return;
  11942. var sCommKind = ds_prntinfo.getColumn(0, "commkind");
  11943. var sLeftBank = ds_data_blank.getColumn(0, "left");
  11944. var sTopBank = ds_data_blank.getColumn(0, "top");
  11945. var sB472sizegbn = ds_data_blank.getColumn(0, "b472size");
  11946. if(sCommKind == "01") {
  11947. var sSetUpVal = ds_data_comm01.getColumn(0, "setupval");
  11948. } else if(sCommKind == "02") {
  11949. var sComm = ds_data_comm02.getColumn(0, "comm");
  11950. var sDataBit = ds_data_comm02.getColumn(0, "databit");
  11951. var sStopBit = ds_data_comm02.getColumn(0, "stopbit");
  11952. var sBaudRate = ds_data_comm02.getColumn(0, "baudrate");
  11953. var sParity = ds_data_comm02.getColumn(0, "parity");
  11954. CommAX.CommPort = sComm;
  11955. CommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  11956. portOpenCheck = CommAX.PortOpen("true");
  11957. } else if(sCommKind == "03") {
  11958. var sSetUpVal = ds_data_comm03.getColumn(0, "setupval");
  11959. var sEqmtCD = ds_data_comm03.getColumn(0, "eqmtcd");
  11960. }
  11961. if( (portOpenCheck == "TRUE" && sCommKind == "02")
  11962. || sCommKind == "01" || sCommKind == "07"
  11963. || sCommKind == "03"){
  11964. //var sStr = "보관검체";
  11965. var sRoomcd = ref.getColumn(0, "roomcd");
  11966. var sPid = ref.getColumn(0, "pid");
  11967. var sPatnm = ref.getColumn(0, "patnm");
  11968. var sPatsex = ref.getColumn(0, "patsex");
  11969. var sPatage = ref.getColumn(0, "patage");
  11970. var sPatsexage = sPatsex + "/" + sPatage;
  11971. var sOrddeptNm = ref.getColumn(0, "orddeptnm").substr(0, 2);
  11972. var sBtype = ref.getColumn(0, "btype");
  11973. var sBcollNm = "채혈자:" ;
  11974. //var sDt = model.getvalue(ref +"/dt");
  11975. var sDt = ref.getColumn(0, "dt");
  11976. var sPidW = 85;
  11977. var sBarcodeW = 120; // 110였음
  11978. var sBtypeW = 10;
  11979. //var sBGGCno = model.getvalue(ref +"/bggc");
  11980. var sBGGCno = ref.getColumn(0, "bggc");
  11981. var sB472size = "";
  11982. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  11983. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  11984. if(sPid.length == 10){
  11985. sBarcodeW = 90;// 90이었음
  11986. sBtypeW = 10;
  11987. }
  11988. if(sB472sizegbn == "2"){ // 320 630
  11989. sB472size = "0340,0620,0340"; // 기존라벨
  11990. }else{
  11991. sB472size = "0350,0550,0330"; // nUsize
  11992. }
  11993. sSndMsg += "{D" + sB472size + "|}"; // 라벨사이즈
  11994. sSndMsg += "{C|}"; // 버퍼클리어
  11995. sSndMsg += "{AX;-000,-000,+00|}"; // 피트량
  11996. iXPos = Number(sLeftBank);
  11997. iYPos = Number(sTopBank);
  11998. sSndMsg += lzzfBP_HanDisp24("보관검체", iXPos, iYPos);
  11999. iXPos = Number(sLeftBank) + 220;
  12000. iYPos = Number(sTopBank) +20;
  12001. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, sRoomcd);
  12002. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sRoomcd);
  12003. iXPos = Number(sLeftBank) + 370;
  12004. iYPos = Number(sTopBank) + 20;
  12005. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, sPatsexage);
  12006. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sPatsexage);
  12007. iXPos = Number(sLeftBank) ;
  12008. iYPos = Number(sTopBank) + 35;
  12009. //sSndMsg += lzzfBP_HanDisp24(sPatnm, iXPos, iYPos); // 환자명 한글 24사이즈 기본
  12010. sSndMsg += lzzfBP_HanDisp48(sPatnm.substr(0,4), iXPos, iYPos); // 환자명 한글 48사이즈
  12011. iXPos = Number(sLeftBank) + 230;
  12012. iYPos = Number(sTopBank) + 75;
  12013. sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 40, 40, sPid); // 환자번호 크게
  12014. //sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sPid);
  12015. iXPos = Number(sLeftBank)+5;
  12016. iYPos = Number(sTopBank) + 135; // 160 였음
  12017. if(sBGGCno != ""){ // 2009-03-07 정은 수정
  12018. sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 40, 40, sBGGCno);
  12019. //sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sBGGCno);
  12020. }
  12021. iXPos = Number(sLeftBank) + sBtypeW;
  12022. iYPos = Number(sTopBank) + 200; // 75 였음
  12023. sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 60, 60, sBtype);
  12024. //sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sBtype);
  12025. iXPos = Number(sLeftBank)+150;
  12026. iYPos = Number(sTopBank)+90;
  12027. sSndMsg += lzzfBP_BarCode_Code39_B472(iXPos, iYPos, 5, 4, "*" + sPid + "*", 120); // 바코드
  12028. iXPos = Number(sLeftBank) + 240;
  12029. iYPos = Number(sTopBank) + 240;
  12030. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, "*"+sPid+"*");
  12031. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, "*"+sPid+"*");
  12032. iXPos = Number(sLeftBank) + 5;
  12033. iYPos = Number(sTopBank) + 275;
  12034. //sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 20, 20, sDt);
  12035. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sDt);
  12036. iXPos = Number(sLeftBank) + 250;
  12037. iYPos = Number(sTopBank) + 250;
  12038. sSndMsg += lzzfBP_HanDisp24(sBcollNm, iXPos, iYPos); // 채혈자
  12039. sSndMsg += "{XS;I,0001,0002C5101|}"; // end
  12040. if(sCommKind == "01") {
  12041. CommAX.SendMessageToLPT(sSndMsg);
  12042. } else if(sCommKind == "02") {
  12043. CommAX.SendMessage(sSndMsg);
  12044. }
  12045. //출력할 진검 바코드가 없을시에만 port close
  12046. if(portOpenCheck == "TRUE" && sCommKind == "02" && LCount == 0){
  12047. CommAX.PortOpen("false");
  12048. }
  12049. }else if(portOpenCheck == "TRUE" && sCommKind == "02"){
  12050. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  12051. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  12052. + " \n 2.케이블 확인"
  12053. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  12054. return;
  12055. }
  12056. }
  12057. /**********************************************************************************
  12058. * 함수명 : fLisSpcBarcodePrintB
  12059. * 설명 : 핵의학체외
  12060. * argument : ref - 출력할 바코드정보 Dataset
  12061. **********************************************************************************/
  12062. function fLisSpcBarcodePrintB(pRef, pLCount, pMCount)
  12063. {
  12064. var cntHR = pRef.rowcount;
  12065. var sPrntKind = ds_data_setupinfo.getColumn(0, "prntkind");
  12066. var portOpenCheck = "";
  12067. var iXPos = 0;
  12068. var iYPos = 0;
  12069. var LCount = 0;
  12070. var MCount = 0;
  12071. var sSndMsg = "";
  12072. var sCommKind = ds_data_setupinfo.getColumn(0, "commkind");
  12073. var sLeftBank = ds_data_blank.getColumn(0, "left");
  12074. var sTopBank = ds_data_blank.getColumn(0, "top");
  12075. if(sCommKind == "01")
  12076. {
  12077. var sSetUpVal = ds_data_comm01.getColumn(0, "setupval");
  12078. }
  12079. else if(sCommKind == "02")
  12080. {
  12081. var sComm = ds_data_comm02.getColumn(0, "comm");
  12082. var sDataBit = ds_data_comm02.getColumn(0, "databit");
  12083. var sStopBit = ds_data_comm02.getColumn(0, "stopbit");
  12084. var sBaudRate = ds_data_comm02.getColumn(0, "baudrate");
  12085. var sParity = ds_data_comm02.getColumn(0, "parity");
  12086. CommAX.CommPort = sComm;
  12087. CommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  12088. if(LCount > 0)
  12089. {
  12090. portOpenCheck = "TRUE";
  12091. }
  12092. else if (LCount == 0)
  12093. {
  12094. portOpenCheck = CommAX.PortOpen("true");
  12095. }
  12096. }
  12097. else if(sCommKind == "03")
  12098. {
  12099. var sSetUpVal = ds_data_comm03.getColumn(0, "setupval");
  12100. }
  12101. if( (portOpenCheck == "TRUE" && sCommKind == "02") || (sCommKind == "01") || (sCommKind == "03"))
  12102. {
  12103. for(var i = 0; i < cntHR; i++)
  12104. {
  12105. var tsectlblnm = utlf_transNullToEmpty(pRef.getColumn(i,"tsectlblnm"));
  12106. var sBcno = utlf_transNullToEmpty(pRef.getColumn(i,"bcno"));
  12107. var sBarcdprntdt = utlf_transNullToEmpty(pRef.getColumn(i,"barcdprntdt"));
  12108. var patnm = utlf_transNullToEmpty(pRef.getColumn(i,"patnm"));
  12109. var sPid = utlf_transNullToEmpty(pRef.getColumn(i,"pid"));
  12110. var sSexage = utlf_transNullToEmpty(pRef.getColumn(i,"sexage"));
  12111. var sDeptroom = utlf_transNullToEmpty(pRef.getColumn(i,"deptroom"));
  12112. var sSpclblnm = utlf_transNullToEmpty(pRef.getColumn(i,"spclblnm"));
  12113. var sTubelblnm = utlf_transNullToEmpty(pRef.getColumn(i,"tubelblnm"));
  12114. var sSecttsect = utlf_transNullToEmpty(pRef.getColumn(i,"secttsect"));
  12115. var sTclslblnmlist = utlf_transNullToEmpty(pRef.getColumn(i,"tclslblnmlist"));
  12116. var sInfcinfolist = utlf_transNullToEmpty(pRef.getColumn(i,"infcinfolist"));
  12117. var sErprcpflag = utlf_transNullToEmpty(pRef.getColumn(i,"erprcpflag"));
  12118. var barcdcntflag = utlf_transNullToEmpty(pRef.getColumn(i,"cntflag"));
  12119. var bcollbarcdprntcnt = utlf_transNullToEmpty(pRef.getColumn(i,"bcollbarcdprntcnt"));
  12120. var spcacptbarcdprntcnt = utlf_transNullToEmpty(pRef.getColumn(i,"spcacptbarcdprntcnt"));
  12121. var microbarcdprntcnt = utlf_transNullToEmpty(pRef.getColumn(i,"microbarcdprntcnt"));
  12122. var divgrupcd = utlf_transNullToEmpty(pRef.getColumn(i,"divgrupcd"));
  12123. var divgrupnm = utlf_transNullToEmpty(pRef.getColumn(i,"divgrupnm"));
  12124. var sbcoll = "채혈자";
  12125. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  12126. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  12127. if(sPrntKind == "1" || sPrntKind == "9")
  12128. {
  12129. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  12130. if(sErprcpflag == "1" || sErprcpflag == "2" || sErprcpflag == "Y")
  12131. {
  12132. iXPos = Number(sLeftBank) + 600;
  12133. iYPos = Number(sTopBank) + 1;
  12134. sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 15, 240, 10);
  12135. iXPos = Number(sLeftBank) + 10;
  12136. iYPos = Number(sTopBank) + 2;
  12137. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sTsectlblnm.substr(0, 20), 2, 1);
  12138. sSndMsg += CommAX.HanImageData();
  12139. }
  12140. else
  12141. {
  12142. iXPos = Number(sLeftBank) + 10;
  12143. iYPos = Number(sTopBank) + 2;
  12144. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sTsectlblnm.substr(0, 20), 2, 1);
  12145. sSndMsg += CommAX.HanImageData();
  12146. }
  12147. if(barcdcntflag == "acpt" )
  12148. {
  12149. if(spcacptbarcdprntcnt > 0)
  12150. {
  12151. if(sCommKind == "01")
  12152. {
  12153. CommAX.SendMessageToLPT(sSndMsg);
  12154. sSndMsg = "";
  12155. }
  12156. else if(sCommKind == "02")
  12157. {
  12158. CommAX.SendMessage(sSndMsg);
  12159. sSndMsg = "";
  12160. }
  12161. }
  12162. }
  12163. else
  12164. {
  12165. if(sCommKind == "01")
  12166. {
  12167. CommAX.SendMessageToLPT(sSndMsg);
  12168. sSndMsg = "";
  12169. }
  12170. else if(sCommKind == "02")
  12171. {
  12172. CommAX.SendMessage(sSndMsg);
  12173. sSndMsg = "";
  12174. }
  12175. }
  12176. iXPos = Number(sLeftBank) + 220;
  12177. iYPos = Number(sTopBank) + 5;
  12178. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  12179. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBcno + "*"); //바코드번호
  12180. iXPos = Number(sLeftBank) + 500;
  12181. iYPos = Number(sTopBank) + 5;
  12182. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  12183. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  12184. if(barcdcntflag == "acpt" )
  12185. {
  12186. if(spcacptbarcdprntcnt > 0)
  12187. {
  12188. if(sCommKind == "01")
  12189. {
  12190. CommAX.SendMessageToLPT(sSndMsg);
  12191. sSndMsg = "";
  12192. }
  12193. else if(sCommKind == "02")
  12194. {
  12195. CommAX.SendMessage(sSndMsg);
  12196. sSndMsg = "";
  12197. }
  12198. }
  12199. }
  12200. else
  12201. {
  12202. if(sCommKind == "01")
  12203. {
  12204. CommAX.SendMessageToLPT(sSndMsg);
  12205. sSndMsg = "";
  12206. }
  12207. else if(sCommKind == "02")
  12208. {
  12209. CommAX.SendMessage(sSndMsg);
  12210. sSndMsg = "";
  12211. }
  12212. }
  12213. iXPos = Number(sLeftBank) + 90;
  12214. iYPos = Number(sTopBank) + 30;
  12215. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  12216. sSndMsg += lzzfBP_BarCode_Code39_300dpi(iXPos, iYPos, "N", 120, "*" + sBcno + "*"); // 바코드
  12217. if(barcdcntflag == "acpt" )
  12218. {
  12219. if(spcacptbarcdprntcnt > 0)
  12220. {
  12221. if(sCommKind == "01")
  12222. {
  12223. CommAX.SendMessageToLPT(sSndMsg);
  12224. sSndMsg = "";
  12225. }
  12226. else if(sCommKind == "02")
  12227. {
  12228. CommAX.SendMessage(sSndMsg);
  12229. sSndMsg = "";
  12230. }
  12231. }
  12232. }
  12233. else
  12234. {
  12235. if(sCommKind == "01")
  12236. {
  12237. CommAX.SendMessageToLPT(sSndMsg);
  12238. sSndMsg = "";
  12239. }
  12240. else if(sCommKind == "02")
  12241. {
  12242. CommAX.SendMessage(sSndMsg);
  12243. sSndMsg = "";
  12244. }
  12245. }
  12246. iXPos = Number(sLeftBank) + 20;
  12247. iYPos = Number(sTopBank) + 160;
  12248. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  12249. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //환자등록번호
  12250. iXPos = Number(sLeftBank) + 250;
  12251. iYPos = Number(sTopBank) + 157;
  12252. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm.substr(0, 20), 2, 1);
  12253. sSndMsg += CommAX.HanImageData();
  12254. if(barcdcntflag == "acpt" )
  12255. {
  12256. if(spcacptbarcdprntcnt > 0)
  12257. {
  12258. if(sCommKind == "01")
  12259. {
  12260. CommAX.SendMessageToLPT(sSndMsg);
  12261. sSndMsg = "";
  12262. }
  12263. else if(sCommKind == "02")
  12264. {
  12265. CommAX.SendMessage(sSndMsg);
  12266. sSndMsg = "";
  12267. }
  12268. }
  12269. }
  12270. else
  12271. {
  12272. if(sCommKind == "01")
  12273. {
  12274. CommAX.SendMessageToLPT(sSndMsg);
  12275. sSndMsg = "";
  12276. }
  12277. else if(sCommKind == "02")
  12278. {
  12279. CommAX.SendMessage(sSndMsg);
  12280. sSndMsg = "";
  12281. }
  12282. }
  12283. iXPos = Number(sLeftBank) + 450;
  12284. iYPos = Number(sTopBank) + 160;
  12285. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  12286. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSexage);
  12287. iXPos = Number(sLeftBank) + 20;
  12288. iYPos = Number(sTopBank) + 185;
  12289. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  12290. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDeptroom); //진료과병실
  12291. if(barcdcntflag == "acpt" )
  12292. {
  12293. if(spcacptbarcdprntcnt > 0)
  12294. {
  12295. if(sCommKind == "01")
  12296. {
  12297. CommAX.SendMessageToLPT(sSndMsg);
  12298. sSndMsg = "";
  12299. }
  12300. else if(sCommKind == "02")
  12301. {
  12302. CommAX.SendMessage(sSndMsg);
  12303. sSndMsg = "";
  12304. }
  12305. }
  12306. }
  12307. else
  12308. {
  12309. if(sCommKind == "01")
  12310. {
  12311. CommAX.SendMessageToLPT(sSndMsg);
  12312. sSndMsg = "";
  12313. }
  12314. else if(sCommKind == "02")
  12315. {
  12316. CommAX.SendMessage(sSndMsg);
  12317. sSndMsg = "";
  12318. }
  12319. }
  12320. iWidth = 0;
  12321. aStr = lpzfGetHanGul(sTclslblnmlist, aFlag);
  12322. iXPos = Number(sLeftBank) + 90;
  12323. for (var iNo=0; iNo < aStr.length; iNo++)
  12324. {
  12325. if (aFlag[iNo] == "E")
  12326. {
  12327. iYPos = Number(sTopBank) + 213;
  12328. sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // 검체표시명(영문)
  12329. iWidth = iWidth + (Number(aStr[iNo].length) * 15);
  12330. }
  12331. else
  12332. {
  12333. iYPos = Number(sTopBank) + 215;
  12334. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  12335. sSndMsg += CommAX.HanImageData();
  12336. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  12337. }
  12338. }
  12339. if(barcdcntflag == "acpt" )
  12340. {
  12341. if(spcacptbarcdprntcnt > 0)
  12342. {
  12343. if(sCommKind == "01")
  12344. {
  12345. CommAX.SendMessageToLPT(sSndMsg);
  12346. sSndMsg = "";
  12347. }
  12348. else if(sCommKind == "02")
  12349. {
  12350. CommAX.SendMessage(sSndMsg);
  12351. sSndMsg = "";
  12352. }
  12353. }
  12354. }
  12355. else
  12356. {
  12357. if(sCommKind == "01")
  12358. {
  12359. CommAX.SendMessageToLPT(sSndMsg);
  12360. sSndMsg = "";
  12361. }
  12362. else if(sCommKind == "02")
  12363. {
  12364. CommAX.SendMessage(sSndMsg);
  12365. sSndMsg = "";
  12366. }
  12367. }
  12368. if(sTclslblnmlist.substr(0, 3) == "ABO")
  12369. {
  12370. iXPos = Number(sLeftBank) + 100;
  12371. iYPos = Number(sTopBank) + 235;
  12372. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, "채혈자 : ", 1, 1);
  12373. sSndMsg += CommAX.HanImageData();
  12374. }
  12375. if(barcdcntflag == "acpt" )
  12376. {
  12377. if(spcacptbarcdprntcnt > 0)
  12378. {
  12379. if(sCommKind == "01")
  12380. {
  12381. CommAX.SendMessageToLPT(sSndMsg);
  12382. sSndMsg = "";
  12383. }
  12384. else if(sCommKind == "02")
  12385. {
  12386. CommAX.SendMessage(sSndMsg);
  12387. sSndMsg = "";
  12388. }
  12389. }
  12390. }
  12391. else
  12392. {
  12393. if(sCommKind == "01")
  12394. {
  12395. CommAX.SendMessageToLPT(sSndMsg);
  12396. sSndMsg = "";
  12397. }
  12398. else if(sCommKind == "02")
  12399. {
  12400. CommAX.SendMessage(sSndMsg);
  12401. sSndMsg = "";
  12402. }
  12403. }
  12404. iXPos = Number(sLeftBank) + 10;
  12405. iYPos = Number(sTopBank) + 230;
  12406. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  12407. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sInfcinfolist); //감염정보
  12408. iXPos = Number(sLeftBank) + 10;
  12409. iYPos = Number(sTopBank) + 245;
  12410. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  12411. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "bunju"); //분주구분
  12412. if(barcdcntflag == "acpt" )
  12413. {
  12414. if(spcacptbarcdprntcnt > 0)
  12415. {
  12416. sSndMsg += lzzfBP_EndFormat(spcacptbarcdprntcnt); // 접수바코드출력수
  12417. if(sCommKind == "01")
  12418. {
  12419. CommAX.SendMessageToLPT(sSndMsg);
  12420. }
  12421. else if(sCommKind == "02")
  12422. {
  12423. CommAX.SendMessage(sSndMsg);
  12424. }
  12425. }
  12426. }
  12427. else
  12428. {
  12429. sSndMsg += lzzfBP_EndFormat(bcollbarcdprntcnt);
  12430. if(sCommKind == "01")
  12431. {
  12432. CommAX.SendMessageToLPT(sSndMsg);
  12433. }
  12434. else if(sCommKind == "02")
  12435. {
  12436. CommAX.SendMessage(sSndMsg);
  12437. }
  12438. }
  12439. }
  12440. if( portOpenCheck == "TRUE" && sCommKind == "02" && MCount == 0)
  12441. {
  12442. CommAX.PortOpen("false");
  12443. }
  12444. }
  12445. }
  12446. else if(portOpenCheck == "FALSE" && sCommKind == "02")
  12447. {
  12448. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  12449. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  12450. + " \n 2.케이블 확인"
  12451. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  12452. return;
  12453. }
  12454. }
  12455. /**********************************************************************************
  12456. * 함수명 : fLisNSpcBarcodePrint2
  12457. * 설명 : 핵의학체외
  12458. * argument : ref - 출력할 바코드정보 Dataset
  12459. **********************************************************************************/
  12460. function fLisNSpcBarcodePrint2(pRef)
  12461. {
  12462. var cntHR = pRef.rowcount;
  12463. var sPrntKind = ds_data_setupinfo.getColumn(0, "prntkind");
  12464. var portOpenCheck = "";
  12465. var iXPos = 0;
  12466. var iYPos = 0;
  12467. if(cntHR > 0 && sPrntKind != "0")
  12468. {
  12469. var sCommKind = ds_data_setupinfo.getColumn(0, "commkind");
  12470. var sLeftBank = ds_data_blank.getColumn(0, "left");
  12471. var sTopBank = ds_data_blank.getColumn(0, "top");
  12472. for(var i = 0 ; i < cntHR;i++)
  12473. {
  12474. var sSndMsg = "";
  12475. var sBcno = pRef.getColumn(i, "bcno");
  12476. var sBarcdprntdt = pRef.getColumn(i, "barcdprntdt");
  12477. var sspctdt = pRef.getColumn(i, "spcacptdt");
  12478. var sPatnm = pRef.getColumn(i, "patnm");
  12479. var sPid = pRef.getColumn(i, "pid");
  12480. var sSexage = pRef.getColumn(i, "sexage");
  12481. var sDeptroom = pRef.getColumn(i, "deptroom");
  12482. var sSpclblnm = pRef.getColumn(i, "spclblnm");
  12483. var sTclslblnmlist = pRef.getColumn(i, "tclslblnmlist");
  12484. var sInfcinfolist = pRef.getColumn(i, "infcinfolist");
  12485. //var sDivgrupnm = pRef.getColumn(i, "divgruplblnm");
  12486. var sDivgrupnm = pRef.getColumn(i, "divgrupnm");
  12487. //var sDivgrupcd = pRef.getColumn(i, "divgrupcd");
  12488. var sDivgrupcd = pRef.getColumn(i, "divgruplblnm"); //2.0 전환하면서 divgrupcd->divgruplblnm
  12489. var sExtrtestinstnm = pRef.getColumn(i, "extrtestinstnm");
  12490. var sBcolldt = pRef.getColumn(i, "bcolldt");
  12491. //2.0추가 remark 출력 추가
  12492. var prcpdelivefact = pRef.getColumn(i,"prcpdelivefact");
  12493. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  12494. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  12495. //trace("111111" + sDivgrupcd );
  12496. /*
  12497. if( i == 0){
  12498. sDivgrupcd = ":C-PEP 0 회 ";
  12499. }
  12500. else if ( i == 1){
  12501. sDivgrupcd = ":INSULIN 0 회";
  12502. }
  12503. */
  12504. if(sPrntKind == "9" )
  12505. {
  12506. sSndMsg = "^XA^SEE:UHANGUL.DAT^FS^CWQ,E:kfont3.FNT^FS";
  12507. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  12508. // if(!utlf_isNull(sInfcinfolist))
  12509. // {
  12510. // iXPos = Number(sLeftBank) + 2;
  12511. // iYPos = Number(sTopBank) + 310;
  12512. // sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 500, 10, 10);
  12513. // }
  12514. iXPos = Number(sLeftBank) + 2;
  12515. iYPos = Number(sTopBank) + 35;
  12516. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  12517. sSndMsg += lzzfBP_BarCode_Code39_300dpi(iXPos, iYPos, "N", 80, "*" + sBcno + "*"); // 바코드
  12518. iXPos = Number(sLeftBank) + 100;
  12519. iYPos = Number(sTopBank) + 125;
  12520. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBcno + "*"); //바코드번호
  12521. iXPos = Number(sLeftBank) + 2;
  12522. iYPos = Number(sTopBank);
  12523. sSndMsg += lzzfBP_ChangeFont("F", 30, 30);
  12524. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //환자등록번호
  12525. iXPos = Number(sLeftBank) + 360;
  12526. //이재오 막다 2018.09 13
  12527. //iYPos = Number(sTopBank);
  12528. //sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,40,40^FH^FD" + sPatnm.substr(0, 20) + "^FS^CI1";
  12529. var iWidth = 0;
  12530. var aStr = "";
  12531. // 이재오 수정 보완
  12532. for (var j = 0; j < sPatnm.length; j++) {
  12533. oneChar = sPatnm.charAt(j);
  12534. test_rtn = "";
  12535. test_he = "";
  12536. test_rtn = lpzfGetHanGul3(oneChar);
  12537. test_he = test_rtn.substring(0,1);
  12538. if(!utlf_isNull(test_he))
  12539. {
  12540. //----------------------
  12541. if (test_he == "H") {
  12542. iYPos = Number(sTopBank) + 2;
  12543. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,40,40^FH^FD" + oneChar + "^FS^CI1"; // 검사코드리스트(한글)
  12544. iWidth = iWidth + (Number(oneChar.length) * 32);
  12545. } else {
  12546. iYPos = Number(sTopBank) + 2;
  12547. sSndMsg += "^CFC30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS"; // 검사코드리스트명(영문)
  12548. iWidth = iWidth + (Number(oneChar.length) * 24);
  12549. }
  12550. }
  12551. }
  12552. // 이재오 수정 보완
  12553. sDivgrupcd = sDivgrupcd.substr(0, sDivgrupcd.length);
  12554. var Sindex = sDivgrupcd.indexOf(":");
  12555. sDivgrupcd = sDivgrupcd.substr(Sindex + 1);
  12556. trace("test 한글 " + i + sDivgrupcd);
  12557. var iWidth = 0;
  12558. var aStr = "";
  12559. //var aFlag = new Array();
  12560. iXPos = Number(sLeftBank) + 2;
  12561. for (var j = 0; j < sDivgrupcd.length; j++) {
  12562. oneChar = sDivgrupcd.charAt(j);
  12563. test_rtn = "";
  12564. test_he = "";
  12565. test_rtn = lpzfGetHanGul3(oneChar);
  12566. test_he = test_rtn.substring(0,1);
  12567. if(!utlf_isNull(test_he))
  12568. {
  12569. //----------------------
  12570. if (test_he == "H") {
  12571. iYPos = Number(sTopBank) + 153;
  12572. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,30,30^FH^FD" + oneChar + "^FS^CI1";
  12573. // 검사코드리스트(한글)
  12574. iWidth = iWidth + (Number(oneChar.length) * 32);
  12575. } else {
  12576. iYPos = Number(sTopBank) + 150;
  12577. sSndMsg += "^CFC30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS";
  12578. // 검사코드리스트명(영문)
  12579. iWidth = iWidth + (Number(oneChar.length) * 22);
  12580. }
  12581. }
  12582. }
  12583. iXPos = Number(sLeftBank) + 200;
  12584. iYPos = Number(sTopBank) + 190;
  12585. sSndMsg += "^CFC30,30^FO"+iXPos+","+ iYPos +"^FD" + sSpclblnm + "^FS";
  12586. iXPos = Number(sLeftBank) + 2;
  12587. iYPos = Number(sTopBank) + 190;
  12588. sSndMsg += "^CFC30,30^FO"+iXPos+","+ iYPos +"^FD" + sDeptroom + "^FS";
  12589. //감염정보 특수문자 추가 20120402
  12590. if(!utlf_isNull(sInfcinfolist)){
  12591. sInfcinfolist = "*"+ sInfcinfolist +"*";
  12592. } else {
  12593. sInfcinfolist = "";
  12594. }
  12595. iXPos = Number(sLeftBank) + 2;
  12596. iYPos = Number(sTopBank) + 230;
  12597. sSndMsg += "^CFC30,30^FO"+iXPos+","+ iYPos +"^FD" + sInfcinfolist + "^FS"; // 감염정보
  12598. iXPos = Number(sLeftBank) + 90;
  12599. iYPos = Number(sTopBank) + 230;
  12600. sSndMsg += "^CFC30,30^FO"+iXPos+","+ iYPos +"^FD" + sspctdt + "^FS";
  12601. if ((!utlf_isNull(prcpdelivefact)) && ((prcpdelivefact.length) == 1)){
  12602. prcpdelivefact = prcpdelivefact.replace("-", ""); //Remark
  12603. }
  12604. if(utlf_isNull(prcpdelivefact)){
  12605. prcpdelivefact = "";
  12606. }
  12607. iXPos = Number(sLeftBank) + 130;
  12608. if(!utlf_isNull(prcpdelivefact)) {
  12609. for (var j = 0; j < prcpdelivefact.length; j++) {
  12610. oneChar = prcpdelivefact.charAt(j);
  12611. test_rtn = "";
  12612. test_he = "";
  12613. test_rtn = lpzfGetHanGul3(oneChar);
  12614. test_he = test_rtn.substring(0,1);
  12615. if(!utlf_isNull(test_he))
  12616. {
  12617. //----------------------
  12618. if (test_he == "E") {
  12619. iYPos = Number(sTopBank) + 120;
  12620. sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS"; //
  12621. iWidth = iWidth + (Number(oneChar.length) * 14);
  12622. } else {
  12623. iYPos = Number(sTopBank) + 120;
  12624. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,15,15^FH^FD" + oneChar + "^FS^CI1"; //
  12625. iWidth = iWidth + (Number(oneChar.length) * 24);
  12626. }
  12627. }
  12628. }
  12629. }
  12630. sSndMsg += "^XZ"
  12631. CommAX.SendMsg(sSndMsg);
  12632. }
  12633. else if (sPrntKind == "11")
  12634. {
  12635. trace("ttttttttttttttttttttttttttt");
  12636. sSndMsg = "^XA^SEE:UHANGUL.DAT^FS^CWQ,E:kfont3.FNT^FS";
  12637. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  12638. iXPos = Number(sLeftBank) + 2;
  12639. iYPos = Number(sTopBank) + 35;
  12640. sSndMsg += lzzfBP_ChangeFont("F", 5, 5);
  12641. //sSndMsg += lzzfBP_BarCode_Code39_300dpi(iXPos, iYPos, "N", 80, "*" + sBcno + "*"); // 바코드
  12642. sSndMsg += lzzfBP_BarCode_Code39(iXPos, iYPos, "N", 80, "*" + sBcno + "*"); // 바코드
  12643. iXPos = Number(sLeftBank) + 50;
  12644. iYPos = Number(sTopBank) + 125;
  12645. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  12646. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBcno + "*"); //바코드번호
  12647. iXPos = Number(sLeftBank) + 2;
  12648. iYPos = Number(sTopBank) + 10;
  12649. sSndMsg += lzzfBP_ChangeFont("C", 14, 14);
  12650. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //환자등록번호
  12651. /* 이재오막고 재설종
  12652. iXPos = Number(sLeftBank) + 200;
  12653. iYPos = Number(sTopBank) + 10;
  12654. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  12655. sSndMsg += "^CI14^FO"+iXPos+","+ iYPos +"^AQN,20,20^FH^FD" + sPatnm.substr(0, 20) + "^FS^CI1";
  12656. */
  12657. var iWidth = 0;
  12658. var aStr = "";
  12659. iXPos = Number(sLeftBank) + 200;
  12660. for (var j = 0; j < sPatnm.length; j++) {
  12661. oneChar = sPatnm.charAt(j);
  12662. test_rtn = "";
  12663. test_he = "";
  12664. test_rtn = lpzfGetHanGul3(oneChar);
  12665. test_he = test_rtn.substring(0,1);
  12666. if(!utlf_isNull(test_he))
  12667. {
  12668. //----------------------
  12669. if (test_he == "H") {
  12670. iYPos = Number(sTopBank) + 8;
  12671. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,30,30^FH^FD" + oneChar + "^FS^CI1"; // 검사코드리스트(한글)
  12672. iWidth = iWidth + (Number(oneChar.length) * 30);
  12673. } else {
  12674. iYPos = Number(sTopBank) + 8;
  12675. sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS"; // 검사코드리스트명(영문)
  12676. iWidth = iWidth + (Number(oneChar.length) * 14);
  12677. }
  12678. }
  12679. }
  12680. // 이재오 수정 보완
  12681. sDivgrupcd = sDivgrupcd.substr(0, sDivgrupcd.length);
  12682. var Sindex = sDivgrupcd.indexOf(":");
  12683. sDivgrupcd = sDivgrupcd.substr(Sindex + 1);
  12684. trace("test 한글2 " + i + sDivgrupcd);
  12685. var iWidth = 0;
  12686. var aStr = "";
  12687. //var aFlag = new Array();
  12688. iXPos = Number(sLeftBank) + 2;
  12689. for (var j = 0; j < sDivgrupcd.length; j++) {
  12690. oneChar = sDivgrupcd.charAt(j);
  12691. test_rtn = "";
  12692. test_he = "";
  12693. test_rtn = lpzfGetHanGul3(oneChar);
  12694. test_he = test_rtn.substring(0,1);
  12695. if(!utlf_isNull(test_he))
  12696. {
  12697. //----------------------
  12698. if (test_he == "H") {
  12699. iYPos = Number(sTopBank) + 145;
  12700. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,30,30^FH^FD" + oneChar + "^FS^CI1"; // 검사코드리스트(한글)
  12701. iWidth = iWidth + (Number(oneChar.length) * 30);
  12702. } else {
  12703. iYPos = Number(sTopBank) + 145;
  12704. sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS"; // 검사코드리스트명(영문)
  12705. iWidth = iWidth + (Number(oneChar.length) * 14);
  12706. }
  12707. }
  12708. }
  12709. iXPos = Number(sLeftBank) + 200;
  12710. iYPos = Number(sTopBank) + 175;
  12711. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  12712. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  12713. //sSndMsg += "^CFC20,30^FO"+iXPos+","+ iYPos +"^FD" + sSpclblnm + "^FS";
  12714. iXPos = Number(sLeftBank) + 2;
  12715. iYPos = Number(sTopBank) + 175;
  12716. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  12717. //sSndMsg += "^CFC20,30^FO"+iXPos+","+ iYPos +"^FD" + sDeptroom + "^FS";
  12718. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDeptroom); //진료과
  12719. //감염정보 특수문자 추가 20120402
  12720. if(!utlf_isNull(sInfcinfolist)){
  12721. sInfcinfolist = "*"+ sInfcinfolist +"*";
  12722. } else {
  12723. sInfcinfolist = "";
  12724. }
  12725. trace("print start5" + sInfcinfolist);
  12726. iXPos = Number(sLeftBank) + 2;
  12727. iYPos = Number(sTopBank) + 195;
  12728. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정 20120328
  12729. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sInfcinfolist); // 감염정보
  12730. iXPos = Number(sLeftBank) + 90;
  12731. iYPos = Number(sTopBank) + 195;
  12732. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  12733. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sspctdt); //출력일
  12734. trace('bbbb '+prcpdelivefact);
  12735. if ((!utlf_isNull(prcpdelivefact)) && ((prcpdelivefact.length) == 1)){
  12736. prcpdelivefact = prcpdelivefact.replace("-", ""); //Remark
  12737. }
  12738. if(utlf_isNull(prcpdelivefact)){
  12739. prcpdelivefact = "";
  12740. }
  12741. iXPos = Number(sLeftBank) + 130;
  12742. if(!utlf_isNull(prcpdelivefact)) {
  12743. for (var j = 0; j < prcpdelivefact.length; j++) {
  12744. oneChar = prcpdelivefact.charAt(j);
  12745. test_rtn = "";
  12746. test_he = "";
  12747. test_rtn = lpzfGetHanGul3(oneChar);
  12748. test_he = test_rtn.substring(0,1);
  12749. if(!utlf_isNull(test_he))
  12750. {
  12751. //----------------------
  12752. if (test_he == "E") {
  12753. iYPos = Number(sTopBank) + 120;
  12754. sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + oneChar + "^FS"; //
  12755. iWidth = iWidth + (Number(oneChar.length) * 14);
  12756. } else {
  12757. iYPos = Number(sTopBank) + 120;
  12758. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,15,15^FH^FD" + oneChar + "^FS^CI1"; //
  12759. iWidth = iWidth + (Number(oneChar.length) * 24);
  12760. }
  12761. }
  12762. }
  12763. }
  12764. sSndMsg += "^XZ"
  12765. CommAX.SendMsg(sSndMsg);
  12766. }
  12767. else{
  12768. sSndMsg = ""+String.fromCharCode(27)+"A"+String.fromCharCode(27)+"A103500500";
  12769. if(!utlf_isNull(sInfcinfolist))
  12770. {
  12771. iXPos = Number(sLeftBank);
  12772. iYPos = Number(sTopBank) + 240;
  12773. sSndMsg += ""+String.fromCharCode(27)+"V"+"220"+String.fromCharCode(27)+"H"+"0"+String.fromCharCode(27)+"FW10H0350";
  12774. }
  12775. iXPos = Number(sLeftBank) + 2;
  12776. iYPos = Number(sTopBank) + 5;
  12777. sSndMsg += ""+String.fromCharCode(27)+"V"+iYPos+String.fromCharCode(27)+"H"+iXPos+String.fromCharCode(27)+"M"+sBcno;
  12778. iXPos = Number(sLeftBank) + 2;
  12779. iYPos = Number(sTopBank) + 35;
  12780. sSndMsg += ""+String.fromCharCode(27)+"V"+iYPos+String.fromCharCode(27)+"H"+iXPos+String.fromCharCode(27)+"M"+sPid;
  12781. iXPos = Number(sLeftBank) + 140;
  12782. iYPos = Number(sTopBank) + 35;
  12783. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sPatnm.substr(0, 20));
  12784. sDivgrupcd = sDivgrupcd.substr(0, sDivgrupcd.length)
  12785. iXPos = Number(sLeftBank) + 2;
  12786. iYPos = Number(sTopBank) + 70;
  12787. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sDivgrupcd.substr(0, 20));
  12788. iXPos = Number(sLeftBank) + 2;
  12789. iYPos = Number(sTopBank) + 110;
  12790. sSndMsg += ""+String.fromCharCode(27)+"V"+iYPos+String.fromCharCode(27)+"H"+iXPos+String.fromCharCode(27)+"M"+sSpclblnm;
  12791. iXPos = Number(sLeftBank) + 2;
  12792. iYPos = Number(sTopBank) + 140;
  12793. sSndMsg += ""+String.fromCharCode(27)+"V"+iYPos+String.fromCharCode(27)+"H"+iXPos+String.fromCharCode(27)+"M"+sDeptroom;
  12794. iXPos = Number(sLeftBank) + 2;
  12795. iYPos = Number(sTopBank) + 170;
  12796. sSndMsg += ""+String.fromCharCode(27)+"V"+iYPos+String.fromCharCode(27)+"H"+iXPos+String.fromCharCode(27)+"M"+sBcolldt;
  12797. iXPos = Number(sLeftBank) + 2;
  12798. iYPos = Number(sTopBank) + 200;
  12799. if(!utlf_isNull(sDivgrupnm))
  12800. {
  12801. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sDivgrupnm.substr(0, 20));
  12802. }
  12803. sSndMsg += ""+String.fromCharCode(27)+"Q"+"1"+String.fromCharCode(27)+"Z";
  12804. CommAX.SendMsg(sSndMsg);
  12805. }
  12806. }
  12807. }
  12808. }
  12809. /**********************************************************************************
  12810. * 함수명 : fLisNSpcBarcodePrint
  12811. * 설명 : 핵의학체외
  12812. * argument : ref - 출력할 바코드정보 Dataset
  12813. **********************************************************************************/
  12814. function fLisNSpcBarcodePrint(pRef)
  12815. {
  12816. var cntHR = pRef.rowcount;
  12817. var sPrntKind = ds_data_setupinfo.getColumn(0, "prntkind");
  12818. var portOpenCheck = "";
  12819. var iXPos = 0;
  12820. var iYPos = 0;
  12821. if(cntHR > 0 && sPrntKind != "0")
  12822. {
  12823. var sCommKind = utlf_transNullToEmpty(ds_data_setupinfo.getColumn(0, "commkind"));
  12824. var sLeftBank = utlf_transNullToEmpty(ds_data_blank.getColumn(0, "left"));
  12825. var sTopBank = utlf_transNullToEmpty(ds_data_blank.getColumn(0, "top"));
  12826. if(sCommKind == "01")
  12827. {
  12828. var sSetUpVal = ds_data_comm01.getColumn(0, "setupval");
  12829. }
  12830. else if(sCommKind == "02")
  12831. {
  12832. var sComm = ds_data_comm02.getColumn(0, "comm");
  12833. var sDataBit = ds_data_comm02.getColumn(0, "databit");
  12834. var sStopBit = ds_data_comm02.getColumn(0, "stopbit");
  12835. var sBaudRate = ds_data_comm02.getColumn(0, "baudrate");
  12836. var sParity = ds_data_comm02.getColumn(0, "parity");
  12837. var sSetUpVal = ds_data_comm02.getColumn(0, "setupval");
  12838. CommAX.CommPort = sComm;
  12839. CommAX.Settings = sBaudRate+","+ sParity+","+sDataBit+","+ sStopBit;
  12840. portOpenCheck = CommAX.PortOpen(true);
  12841. portOpenCheck = "TRUE";
  12842. }
  12843. else if(sCommKind == "03")
  12844. {
  12845. var sSetUpVal = ds_data_comm03.getColumn(0, "setupval");
  12846. var sEqmtCD = ds_data_comm03.getColumn(0,"eqmtcd");
  12847. }
  12848. trace('lis 핵의학 체외 sSetUpVal = '+sPrntKind+' / '+sCommKind+' / '+portOpenCheck);
  12849. if( (portOpenCheck == "TRUE" && sCommKind == "02") || (sCommKind == "01") || (sCommKind == "03"))
  12850. {
  12851. for(var i = 0 ; i < cntHR; i++)
  12852. {
  12853. var sSndMsg = "";
  12854. var sBcno = utlf_transNullToEmpty(pRef.getColumn(i, "bcno"));
  12855. var sBarcdprntdt = utlf_transNullToEmpty(pRef.getColumn(i, "barcdprntdt")); //사용하지않음
  12856. var sspctdt = utlf_transNullToEmpty(pRef.getColumn(i, "spcacptdt"));
  12857. var sPatnm = utlf_transNullToEmpty(pRef.getColumn(i, "patnm"));
  12858. var sPid = utlf_transNullToEmpty(pRef.getColumn(i, "pid"));
  12859. var sSexage = utlf_transNullToEmpty(pRef.getColumn(i, "sexage")); //사용하지않음
  12860. var sDeptroom = utlf_transNullToEmpty(pRef.getColumn(i, "deptroom"));
  12861. var sSpclblnm = utlf_transNullToEmpty(pRef.getColumn(i, "spclblnm"));
  12862. var sTclslblnmlist = utlf_transNullToEmpty(pRef.getColumn(i, "tclslblnmlist"));
  12863. var sInfcinfolist = utlf_transNullToEmpty(pRef.getColumn(i, "infcinfolist")); //감염정보
  12864. var sDivgrupnm = utlf_transNullToEmpty(pRef.getColumn(i, "divgrupnm"));
  12865. //var sDivgrupcd = utlf_transNullToEmpty(pRef.getColumn(i, "divgrupcd"));
  12866. var sDivgrupcd = utlf_transNullToEmpty(pRef.getColumn(i, "divgruplblnm")); //2.0에서 divgrupcd->divgruplblnm 변경
  12867. var sExtrtestinstnm = utlf_transNullToEmpty(pRef.getColumn(i, "extrtestinstnm")); //사용하지않음
  12868. var sBcolldt = utlf_transNullToEmpty(pRef.getColumn(i, "bcolldt")); //사용하지않음
  12869. trace("핵의학 sInfcinfolist :"+sInfcinfolist);
  12870. if (utlf_isNull(sLeftBank) || sLeftBank == "-")
  12871. {
  12872. sLeftBank = 0;
  12873. }
  12874. if (utlf_isNull(sTopBank) || sTopBank == "-")
  12875. {
  12876. sTopBank = 0;
  12877. }
  12878. if(sPrntKind == "1")
  12879. {
  12880. sSndMsg += lzzfBP_StartFormat(0, 0); // LZZ001.xjs
  12881. if(!utlf_isNull(sInfcinfolist))
  12882. {
  12883. iXPos = Number(sLeftBank) + 2;
  12884. iYPos = Number(sTopBank) + 200;
  12885. sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 350, 10, 10); // LZZ001.xjs
  12886. }
  12887. if(sCommKind == "01")
  12888. {
  12889. CommAX.SendMessageToLPT(sSndMsg);
  12890. sSndMsg = "";
  12891. }
  12892. else if(sCommKind == "02")
  12893. {
  12894. CommAX.SendMessage(sSndMsg);
  12895. sSndMsg = "";
  12896. }
  12897. iXPos = Number(sLeftBank) + 2;
  12898. iYPos = Number(sTopBank);
  12899. sSndMsg += "^CFF30,30^FO"+iXPos+","+ iYPos +"^FD" + sPid + "^FS";
  12900. iXPos = Number(sLeftBank) + 220;
  12901. iYPos = Number(sTopBank);
  12902. // sSndMsg += llz_objCommAX.PrtImgOut(iXPos, iYPos, sPatnm.substr(0, 20), 1, 1);
  12903. // sSndMsg += llz_objCommAX.HanImageData();
  12904. //
  12905. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm.substr(0, 20), 1, 1);
  12906. sSndMsg += CommAX.HanImageData();
  12907. iXPos = Number(sLeftBank) + 2;
  12908. iYPos = Number(sTopBank) + 25;
  12909. sSndMsg += lzzfBP_ChangeFont("F", 10, 10); // LZZ001.xjs
  12910. sSndMsg += lzzfBP_BarCode_Code39(iXPos, iYPos, "N", 40, "*" + sBcno + "*"); // LZZ001.xjs
  12911. if(sCommKind == "01")
  12912. {
  12913. CommAX.SendMessageToLPT(sSndMsg);
  12914. sSndMsg = "";
  12915. }
  12916. else if(sCommKind == "02")
  12917. {
  12918. CommAX.SendMessage(sSndMsg);
  12919. sSndMsg = "";
  12920. }
  12921. iXPos = Number(sLeftBank) + 20;
  12922. iYPos = Number(sTopBank) + 67;
  12923. sSndMsg += lzzfBP_ChangeFont("C", 10, 10);
  12924. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBcno + "*");
  12925. if(sCommKind == "01")
  12926. {
  12927. CommAX.SendMessageToLPT(sSndMsg);
  12928. sSndMsg = "";
  12929. }
  12930. else if(sCommKind == "02")
  12931. {
  12932. CommAX.SendMessage(sSndMsg);
  12933. sSndMsg = "";
  12934. }
  12935. iXPos = Number(sLeftBank) + 180;
  12936. iYPos = Number(sTopBank) + 125;
  12937. sSndMsg += lzzfBP_ChangeFont("C", 10, 10);
  12938. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  12939. iXPos = Number(sLeftBank) + 2;
  12940. iYPos = Number(sTopBank) + 125;
  12941. sSndMsg += lzzfBP_ChangeFont("C", 10, 10);
  12942. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDeptroom);
  12943. iXPos = Number(sLeftBank) + 2;
  12944. iYPos = Number(sTopBank) + 155;
  12945. sSndMsg += lzzfBP_ChangeFont("C", 10, 10);
  12946. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sspctdt); //검체명
  12947. if(sCommKind == "01")
  12948. {
  12949. CommAX.SendMessageToLPT(sSndMsg);
  12950. sSndMsg = "";
  12951. }
  12952. else if(sCommKind == "02")
  12953. {
  12954. CommAX.SendMessage(sSndMsg);
  12955. sSndMsg = "";
  12956. }
  12957. if(utlf_isNull(sInfcinfolist)) {
  12958. sInfcinfolist = "";
  12959. }
  12960. sSndMsg = "";
  12961. //감염정보 2.0 추가
  12962. if(!utlf_isNull(sInfcinfolist)) {
  12963. iXPos = Number(sLeftBank) + 2;
  12964. iYPos = Number(sTopBank) + 170;
  12965. sSndMsg += lzzfBP_ChangeFont("C", 10, 10);
  12966. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*"+sInfcinfolist+"*");
  12967. trace("감염 sSndMsg ="+sSndMsg);
  12968. if(sCommKind == "01")
  12969. {
  12970. CommAX.SendMessageToLPT(sSndMsg);
  12971. sSndMsg = "";
  12972. }
  12973. else if(sCommKind == "02")
  12974. {
  12975. CommAX.SendMessage(sSndMsg);
  12976. sSndMsg = "";
  12977. }
  12978. }
  12979. //trace("aStr1 ="+sDivgrupcd);
  12980. sDivgrupcd = sDivgrupcd.substr(0, sDivgrupcd.length);
  12981. var Sindex = sDivgrupcd.indexOf(":");
  12982. sDivgrupcd = sDivgrupcd.substr(Sindex + 1);
  12983. var iWidth = 0;
  12984. var aStr = "";
  12985. var aFlag = new Array();
  12986. iXPos = Number(sLeftBank) + 2;
  12987. aStr = lpzfGetHanGul(sDivgrupcd, aFlag);
  12988. trace("aStr ="+aStr+'/'+sDivgrupcd);
  12989. for (var iNo=0; iNo < aStr.length; iNo++)
  12990. {
  12991. if (aFlag[iNo] == "E")
  12992. {
  12993. iYPos = Number(sTopBank) + 95;
  12994. sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  12995. iWidth = iWidth + (Number(aStr[iNo].length) * 18);
  12996. }
  12997. else
  12998. {
  12999. iYPos = Number(sTopBank) + 92;
  13000. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  13001. sSndMsg += CommAX.HanImageData();
  13002. iWidth = iWidth + (Number(aStr[iNo].length) * 25);
  13003. }
  13004. }
  13005. sSndMsg += lzzfBP_EndFormat(); // 출력수
  13006. }
  13007. if(sCommKind == "01")
  13008. {
  13009. CommAX.SendMessageToLPT(sSndMsg);
  13010. }
  13011. else if(sCommKind == "02")
  13012. {
  13013. CommAX.SendMessage(sSndMsg);
  13014. }
  13015. }
  13016. if( portOpenCheck == "TRUE" && sCommKind == "02")
  13017. {
  13018. CommAX.PortOpen("false");
  13019. }
  13020. }
  13021. else if((portOpenCheck = "FALSE" && sCommKind == "02"))
  13022. {
  13023. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  13024. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  13025. + " \n 2.케이블 확인"
  13026. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  13027. return;
  13028. }
  13029. }
  13030. }
  13031. /**********************************************************************************
  13032. * 함수명 : fLisSpcBarcodePrint3
  13033. * 설명 : 핵의학체외
  13034. * argument : ref - 출력할 바코드정보 Dataset
  13035. **********************************************************************************/
  13036. function fLisSpcBarcodePrint3(pRef, pKCount, pPCount, scrflag)
  13037. {
  13038. dsf_makeValue(ds_hidden, "sendmessage", "string", "", 0);
  13039. var cntHR = pRef.rowcount;
  13040. var sPrntKind = ds_data_setupinfo.getColumn(0, "prntkind");
  13041. var aFlag = new Array(); //한글 영문 구분
  13042. var aStr = "";
  13043. var iWidth = 0;
  13044. var iXPos = 0;
  13045. var iYPos = 0;
  13046. var portOpenTF = "";
  13047. var KCount = 0;
  13048. var PCount = 0;
  13049. if(utlf_isNull(pKCount))
  13050. {
  13051. KCount = 0;
  13052. }
  13053. else
  13054. {
  13055. KCount = pKCount;
  13056. }
  13057. if(utlf_isNull(pPCount))
  13058. {
  13059. PCount = 0;
  13060. }
  13061. else
  13062. {
  13063. PCount = pPCount;
  13064. }
  13065. var scridPrint = frmf_getScreenID();
  13066. if(cntHR > 0 && sPrntKind != 0)
  13067. {
  13068. var sCommKind = ds_data_setupinfo.getColumn(0, "commkind");
  13069. var sLeftBank = ds_data_blank.getColumn(0, "left");
  13070. var sTopBank = ds_data_blank.getColumn(0, "top");
  13071. var sB472sizegbn = ds_data_blank.getColumn(0, "b472size");
  13072. if(sCommKind == "01")
  13073. {
  13074. var sSetUpVal = ds_data_comm01.getColumn(0, "setupval");
  13075. }
  13076. else if(sCommKind == "02")
  13077. {
  13078. var sComm = ds_data_comm02.getColumn(0, "comm");
  13079. var sDataBit = ds_data_comm02.getColumn(0, "databit");
  13080. var sStopBit = ds_data_comm02.getColumn(0, "stopbit");
  13081. var sBaudRate = ds_data_comm02.getColumn(0, "baudrate");
  13082. var sParity = ds_data_comm02.getColumn(0, "parity");
  13083. CommAX.CommPort = sComm;
  13084. CommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  13085. if(KCount > 0)
  13086. {
  13087. portOpenTF = "TRUE";
  13088. }
  13089. else if(KCount == 0)
  13090. {
  13091. portOpenTF = CommAX.PortOpen("true");
  13092. }
  13093. }
  13094. else if(sCommKind == "03")
  13095. {
  13096. var sSetUpVal = ds_data_comm03.getColumn(0, "setupval");
  13097. var sEqmtCd = ds_data_comm03.getColumn(0, "eqmtcd");
  13098. }
  13099. if((portOpenTF == "TRUE" && sCommKind == "02")|| (sCommKind == "01")|| (sCommKind == "03"))
  13100. {
  13101. for(var i = 0 ; i < cntHR;i++)
  13102. {
  13103. var sSndMsg = "";
  13104. var sTsectlblnm = pRef.getColumn(i, "tsectlblnm");
  13105. var sBcno = pRef.getColumn(i, "bcno");
  13106. var sBarcdprntdt = pRef.getColumn(i, "barcdprntdt");
  13107. var sPatnm = pRef.getColumn(i, "patnm");
  13108. var sPid = pRef.getColumn(i, "pid");
  13109. var sSexage = pRef.getColumn(i, "sexage");
  13110. var sDeptroom = pRef.getColumn(i, "deptroom");
  13111. var sSpclblnm = pRef.getColumn(i, "spclblnm");
  13112. var sTubelblnm = pRef.getColumn(i, "tubelblnm");
  13113. var sSecttsect = pRef.getColumn(i, "secttsect");
  13114. var sTclslblnmlist = pRef.getColumn(i, "tclslblnmlist");
  13115. var sInfcinfolist = pRef.getColumn(i, "infcinfolist");
  13116. var sErprcpflag = pRef.getColumn(i, "erprcpflag");
  13117. var barcdcntflag = pRef.getColumn(i, "cntflag");
  13118. var bcollbarcdprntcnt = pRef.getColumn(i, "bcollbarcdprntcnt");
  13119. var spcacptbarcdprntcnt = pRef.getColumn(i, "spcacptbarcdprntcnt");
  13120. var microbarcdprntcnt = pRef.getColumn(i, "microbarcdprntcnt");
  13121. var sbcoll = "채혈자";
  13122. var keepspc = false;
  13123. var sB472size = "";
  13124. var checkABO = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "ABO");
  13125. var checkAST = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "AST");
  13126. var sTclslblnmlist2 = "";
  13127. if (utlf_isNull(sLeftBank) || sLeftBank == "-")
  13128. {
  13129. sLeftBank = 0;
  13130. }
  13131. if (utlf_isNull(sTopBank) || sTopBank == "-")
  13132. {
  13133. sTopBank = 0;
  13134. }
  13135. if (utlf_isNull(pRef.getColumn(i, "dnornm")))
  13136. {
  13137. var dnorNm = "";
  13138. var dSexage = "";
  13139. }
  13140. else
  13141. {
  13142. var dnorNm = pRef.getColumn(i, "dnornm")
  13143. var dSexage = pRef.getColumn(i, "dnorsexage")
  13144. }
  13145. if(sB472sizegbn == "2")
  13146. {
  13147. sB472size = "0340,0620,0340";
  13148. }
  13149. else
  13150. {
  13151. sB472size = "0350,0550,0330";
  13152. }
  13153. sSndMsg += "{D" + sB472size + "|}";
  13154. sSndMsg += "{C|}";
  13155. sSndMsg += "{AX;-000,-000,+00|}";
  13156. iXPos = Number(sLeftBank)+10;
  13157. iYPos = Number(sTopBank);
  13158. sSndMsg += lzzfBP_HanDisp24(sTsectlblnm, iXPos, iYPos);
  13159. if(sErprcpflag == "1" || sErprcpflag == "2" || sErprcpflag == "Y")
  13160. {
  13161. //응급표시
  13162. iXPos1 = Number(sLeftBank);
  13163. iXPos2 = Number(sLeftBank);
  13164. iYPos1 = Number(sTopBank) ;
  13165. iYPos2 = Number(sTopBank) + 280;
  13166. var ppX1 = iXPos1.toString().getLeftPad(4, "0");
  13167. var ppX2 = iXPos1.toString().getLeftPad(4, "0");
  13168. var ppY1 = iYPos1.toString().getLeftPad(4, "0");
  13169. var ppY2 = iYPos2.toString().getLeftPad(4, "0");
  13170. sSndMsg += "{LC;"+ppX1+","+ppY1+","+ppX2+","+ppY2+",1,8|}";
  13171. }
  13172. iXPos = Number(sLeftBank)+140;
  13173. iYPos = Number(sTopBank)+20;
  13174. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, "*" + sBcno + "*"); //바코드번호
  13175. iXPos = Number(sLeftBank)+60;
  13176. iYPos = Number(sTopBank)+30;
  13177. sSndMsg += lzzfBP_BarCode_Code39_B472(iXPos, iYPos, 5, 4, "*" + sBcno + "*",110); // 바코드
  13178. if(barcdcntflag == "acpt" )
  13179. {
  13180. if(spcacptbarcdprntcnt > 0)
  13181. {
  13182. CommAX.SendMessage(sSndMsg);
  13183. }
  13184. }
  13185. else
  13186. {
  13187. if(bcollbarcdprntcnt > 0)
  13188. {
  13189. CommAX.SendMessage(sSndMsg);
  13190. }
  13191. }
  13192. iXPos = Number(sLeftBank)+350;
  13193. iYPos = Number(sTopBank)+20;
  13194. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sBarcdprntdt); //라벨발행일시
  13195. iXPos = Number(sLeftBank)+10;
  13196. iYPos = Number(sTopBank)+155;
  13197. sSndMsg += lzzfBP_HanDisp24(sPatnm.substr(0, 7), iXPos, iYPos); // 환자명 한글
  13198. iXPos = Number(sLeftBank)+225;
  13199. iYPos = Number(sTopBank)+175;
  13200. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sPid); //환자등록번호
  13201. iXPos = Number(sLeftBank)+400;
  13202. iYPos = Number(sTopBank)+175;
  13203. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sSexage); //성병나이
  13204. iXPos = Number(sLeftBank)+10;
  13205. iYPos = Number(sTopBank)+210;
  13206. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sDeptroom); //진료과병실
  13207. iXPos = Number(sLeftBank)+210;
  13208. iYPos = Number(sTopBank)+210;
  13209. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sSpclblnm); //검체명
  13210. iXPos = Number(sLeftBank)+380;
  13211. iYPos = Number(sTopBank)+210;
  13212. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sTubelblnm); //용기명
  13213. iXPos = Number(sLeftBank)+10;
  13214. iYPos = Number(sTopBank)+245;
  13215. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sSecttsect); //계검사계
  13216. iXPos = Number(sLeftBank)+70;
  13217. iYPos = Number(sTopBank)+220;
  13218. sSndMsg += lzzfBP_HanDisp24(sTclslblnmlist, iXPos, iYPos); // 검사명 한글
  13219. if (!utlf_isNull(pRef.getColumn(i, "dnornm")))
  13220. {
  13221. iXPos = Number(sLeftBank)+10;
  13222. iYPos = Number(sTopBank)+255;
  13223. sSndMsg += lzzfBP_HanDisp24(dnorNm.substr(0, 12), iXPos, iYPos); // 공여자명 한글
  13224. iXPos = Number(sLeftBank)+110;
  13225. iYPos = Number(sTopBank)+260;
  13226. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, dSexage); //공여자성별나이 헌혈화면만 보냄
  13227. }
  13228. if(checkABO)
  13229. {
  13230. if(scridPrint=="SMLLC00100" && scrflag)
  13231. {
  13232. keepspc = true;
  13233. }
  13234. else if((scridPrint=="SMLLC00200" || scridPrint=="SMLLC00300") && scrflag && checkAST)
  13235. {
  13236. keepspc = true;
  13237. }
  13238. iXPos = Number(sLeftBank)+10 ;
  13239. iYPos = Number(sTopBank)+250;
  13240. sSndMsg += lzzfBP_HanDisp24("채혈자 : ", iXPos, iYPos);
  13241. }
  13242. if(!utlf_isNull(sInfcinfolist))
  13243. {
  13244. iXPos = Number(sLeftBank)+10;
  13245. iYPos = Number(sTopBank)+250;
  13246. sSndMsg += lzzfBP_HanDisp24(sInfcinfolist, iXPos, iYPos);
  13247. }
  13248. if(sSecttsect.substr(0, 1) == "A")
  13249. {
  13250. iXPos = Number(sLeftBank) + 435;
  13251. iYPos1 = Number(sTopBank) + 299;
  13252. iYPos2 = Number(sTopBank) + 300;
  13253. var ppX = iXPos.toString().getLeftPad(4, "0");
  13254. var ppY1 = iYPos1.toString().getLeftPad(4, "0");
  13255. var ppY2 = iYPos2.toString().getLeftPad(4, "0");
  13256. sSndMsg += "{LC;0000,"+ppY1+","+ppX+","+ppY2+",1,8|}";
  13257. }
  13258. if(barcdcntflag == "acpt" )
  13259. {
  13260. if(spcacptbarcdprntcnt > 0)
  13261. {
  13262. sSndMsg += lzzfBP_EndFormat_B472(spcacptbarcdprntcnt);
  13263. CommAX.SendMessage(sSndMsg);
  13264. }
  13265. }
  13266. else
  13267. {
  13268. if(bcollbarcdprntcnt > 0)
  13269. {
  13270. sSndMsg += lzzfBP_EndFormat_B472(bcollbarcdprntcnt);
  13271. CommAX.SendMessage(sSndMsg);
  13272. }
  13273. }
  13274. if(keepspc)
  13275. {
  13276. fKeepBcnoPrint("B");
  13277. }
  13278. }
  13279. if( portOpenTF == "TRUE" && sCommKind == "02" && PCount == 0)
  13280. {
  13281. CommAX.PortOpen("false");
  13282. }
  13283. }
  13284. }
  13285. else if(portOpenTF = "FALSE" && sCommKind == "02")
  13286. {
  13287. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  13288. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  13289. + " \n 2.케이블 확인"
  13290. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  13291. return;
  13292. }
  13293. }
  13294. /**********************************************************************************
  13295. * 함수명 : fLisSpcBarcodePrint
  13296. * 설명 : 핵의학체외
  13297. * argument : ref - 출력할 바코드정보 Dataset
  13298. **********************************************************************************/
  13299. function fLisSpcBarcodePrint(pRef, pKCount, pPCount, scrflag)
  13300. {
  13301. dsf_makeValue(ds_hidden, "sendmessage", "string", "", 0);
  13302. var cntHR = pRef.rowcount;
  13303. var sPrntKind = ds_data_setupinfo.getColumn(0, "prntkind");
  13304. var aFlag = new Array(); //한글 영문 구분
  13305. var aStr = "";
  13306. var iWidth = 0;
  13307. var iXPos = 0;
  13308. var iYPos = 0;
  13309. var portOpenTF = "";
  13310. var KCount = 0;
  13311. var PCount = 0;
  13312. if(utlf_isNull(pKCount))
  13313. {
  13314. KCount = 0;
  13315. }
  13316. else
  13317. {
  13318. KCount = pKCount;
  13319. }
  13320. if(utlf_isNull(pPCount))
  13321. {
  13322. PCount = 0;
  13323. }
  13324. else
  13325. {
  13326. PCount = pPCount;
  13327. }
  13328. var scridPrint = frmf_getScreenID();
  13329. if(cntHR > 0 && sPrntKind != 0)
  13330. {
  13331. var sCommKind = ds_data_setupinfo.getColumn(0, "commkind");
  13332. var sLeftBank = ds_data_blank.getColumn(0, "left");
  13333. var sTopBank = ds_data_blank.getColumn(0, "top");
  13334. if(sCommKind == "01")
  13335. {
  13336. var sSetUpVal = ds_data_comm01.getColumn(0, "setupval");
  13337. }
  13338. else if(sCommKind == "02")
  13339. {
  13340. var sComm = ds_data_comm02.getColumn(0, "comm");
  13341. var sDataBit = ds_data_comm02.getColumn(0, "databit");
  13342. var sStopBit = ds_data_comm02.getColumn(0, "stopbit");
  13343. var sBaudRate = ds_data_comm02.getColumn(0, "baudrate");
  13344. var sParity = ds_data_comm02.getColumn(0, "parity");
  13345. CommAX.CommPort = sComm;
  13346. CommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  13347. if(KCount > 0)
  13348. {
  13349. portOpenTF = "TRUE";
  13350. }
  13351. else if(KCount == 0)
  13352. {
  13353. portOpenTF = CommAX.PortOpen("true");
  13354. }
  13355. }
  13356. else if(sCommKind == "03")
  13357. {
  13358. var sSetUpVal = ds_data_comm03.getColumn(0, "setupval");
  13359. var sEqmtCd = ds_data_comm03.getColumn(0, "eqmtcd");
  13360. }
  13361. if((portOpenTF == "TRUE" && sCommKind == "02")|| (sCommKind == "01")|| (sCommKind == "03"))
  13362. {
  13363. if(sPrntKind == "1")
  13364. {
  13365. for(var i = 0; i < cntHR;i++)
  13366. {
  13367. var sSndMsg = "";
  13368. var sTsectlblnm = pRef.getColumn(i, "tsectlblnm");
  13369. var sBcno = pRef.getColumn(i, "bcno");
  13370. var sBarcdprntdt = pRef.getColumn(i, "barcdprntdt");
  13371. var sPatnm = pRef.getColumn(i, "patnm");
  13372. var sPid = pRef.getColumn(i, "pid");
  13373. var sSexage = pRef.getColumn(i, "sexage");
  13374. var sDeptroom = pRef.getColumn(i, "deptroom");
  13375. var sSpclblnm = pRef.getColumn(i, "spclblnm");
  13376. var sTubelblnm = pRef.getColumn(i, "tubelblnm");
  13377. var sSecttsect = pRef.getColumn(i, "secttsect");
  13378. var sTclslblnmlist = pRef.getColumn(i, "tclslblnmlist");
  13379. var sInfcinfolist = pRef.getColumn(i, "infcinfolist");
  13380. var sErprcpflag = pRef.getColumn(i, "erprcpflag");
  13381. var barcdcntflag = pRef.getColumn(i, "cntflag");
  13382. var bcollbarcdprntcnt = pRef.getColumn(i, "bcollbarcdprntcnt");
  13383. var spcacptbarcdprntcnt = pRef.getColumn(i, "spcacptbarcdprntcnt");
  13384. var microbarcdprntcnt = pRef.getColumn(i, "microbarcdprntcnt");
  13385. var sbcoll = "채혈자";
  13386. var keepspc = false;
  13387. var checkABO = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "ABO");
  13388. var checkAST = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "AST");
  13389. if (utlf_isNull(sLeftBank)|| sLeftBank == "-")
  13390. {
  13391. sLeftBank = 0;
  13392. }
  13393. if (utlf_isNull(sTopBank)|| sTopBank == "-")
  13394. {
  13395. sTopBank = 0;
  13396. }
  13397. if (pRef.getColumn(i, "dnornm"))
  13398. {
  13399. var dnorNm = "";
  13400. var dSexage = "";
  13401. }
  13402. else
  13403. {
  13404. var dnorNm = pRef.getColumn(i, "dnornm");
  13405. var dSexage = pRef.getColumn(i, "dnorsexage");
  13406. }
  13407. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  13408. if(sErprcpflag == "1" || sErprcpflag == "2" || sErprcpflag == "Y")
  13409. {
  13410. iXPos = Number(sLeftBank);
  13411. iYPos = Number(sTopBank) + 1;
  13412. sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 15, 240, 10);
  13413. }
  13414. else
  13415. {
  13416. }
  13417. //sTsectlblnm = sTsectlblnm.replace("▨", ",");
  13418. iWidth = 0;
  13419. aStr = "";
  13420. aFlag = new Array();
  13421. iXPos = Number(sLeftBank) + 15;
  13422. aStr = lpzfGetHanGul(sTsectlblnm, aFlag);
  13423. for (var iNo = 0; iNo < aStr.length; iNo++)
  13424. {
  13425. if (aFlag[iNo] == "E")
  13426. {
  13427. iYPos = Number(sTopBank) + 2;
  13428. sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  13429. iWidth = iWidth + (Number(aStr[iNo].length) * 12);
  13430. }
  13431. else
  13432. {
  13433. iYPos = Number(sTopBank) + 2;
  13434. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  13435. sSndMsg += CommAX.HanImageData();
  13436. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  13437. }
  13438. }
  13439. iXPos = Number(sLeftBank) + 130;
  13440. iYPos = Number(sTopBank) + 5;
  13441. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  13442. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBcno + "*"); //바코드번호
  13443. iXPos = Number(sLeftBank) + 275;
  13444. iYPos = Number(sTopBank) + 5;
  13445. sSndMsg += lzzfBP_ChangeFont("C", 5, 5); // 폰트 설정
  13446. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBarcdprntdt); //라벨발행일시
  13447. iXPos = Number(sLeftBank) + 60;
  13448. iYPos = Number(sTopBank) + 30;
  13449. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  13450. sSndMsg += lzzfBP_BarCode_Code39(iXPos, iYPos, "N", 100, "*" + sBcno + "*"); // 바코드
  13451. iWidth = 0;
  13452. aStr = "";
  13453. aFlag = new Array();
  13454. iXPos = Number(sLeftBank) + 20;
  13455. sPatnm = sPatnm.substr(0, 20)
  13456. aStr = lpzfGetHanGul(sPatnm, aFlag);
  13457. for (var iNo=0; iNo < aStr.length; iNo++)
  13458. {
  13459. if (aFlag[iNo] == "E")
  13460. {
  13461. iYPos = Number(sTopBank) + 133;
  13462. sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  13463. iWidth = iWidth + (Number(aStr[iNo].length) * 12);
  13464. }
  13465. else
  13466. {
  13467. iYPos = Number(sTopBank) + 130;
  13468. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  13469. sSndMsg += CommAX.HanImageData();
  13470. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  13471. }
  13472. }
  13473. if(barcdcntflag == "acpt" )
  13474. {
  13475. if(spcacptbarcdprntcnt > 0)
  13476. {
  13477. if(sCommKind == "01")
  13478. {
  13479. CommAX.SendMessageToLPT(sSndMsg);
  13480. sSndMsg = "";
  13481. }
  13482. else if(sCommKind == "02")
  13483. {
  13484. CommAX.SendMessage(sSndMsg);
  13485. sSndMsg = "";
  13486. }
  13487. }
  13488. }
  13489. else
  13490. {
  13491. if(sCommKind == "01")
  13492. {
  13493. CommAX.SendMessageToLPT(sSndMsg);
  13494. sSndMsg = "";
  13495. }
  13496. else if(sCommKind == "02")
  13497. {
  13498. CommAX.SendMessage(sSndMsg);
  13499. sSndMsg = "";
  13500. }
  13501. }
  13502. iXPos = Number(sLeftBank) + 190;
  13503. iYPos = Number(sTopBank) + 135;
  13504. sSndMsg += lzzfBP_ChangeFont("C", 14, 14); // 폰트 설정
  13505. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //환자등록번호
  13506. iXPos = Number(sLeftBank) + 300;
  13507. iYPos = Number(sTopBank) + 135;
  13508. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  13509. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSexage);
  13510. iXPos = Number(sLeftBank) + 20;
  13511. iYPos = Number(sTopBank) + 160;
  13512. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  13513. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDeptroom); //진료과병실
  13514. iXPos = Number(sLeftBank) + 160;
  13515. iYPos = Number(sTopBank) + 160;
  13516. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  13517. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  13518. iXPos = Number(sLeftBank) + 280;
  13519. iYPos = Number(sTopBank) + 160;
  13520. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  13521. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sTubelblnm); //용기명
  13522. iXPos = Number(sLeftBank) + 20;
  13523. iYPos = Number(sTopBank) + 180;
  13524. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  13525. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSecttsect); //계검사계
  13526. if(barcdcntflag == "acpt" )
  13527. {
  13528. if(spcacptbarcdprntcnt > 0)
  13529. {
  13530. if(sCommKind == "01")
  13531. {
  13532. CommAX.SendMessageToLPT(sSndMsg);
  13533. sSndMsg = "";
  13534. }
  13535. else if(sCommKind == "02")
  13536. {
  13537. CommAX.SendMessage(sSndMsg);
  13538. sSndMsg = "";
  13539. }
  13540. }
  13541. }
  13542. else
  13543. {
  13544. if(sCommKind == "01")
  13545. {
  13546. CommAX.SendMessageToLPT(sSndMsg);
  13547. sSndMsg = "";
  13548. }
  13549. else if(sCommKind == "02")
  13550. {
  13551. CommAX.SendMessage(sSndMsg);
  13552. sSndMsg = "";
  13553. }
  13554. }
  13555. sTclslblnmlist = sTclslblnmlist.replace("▨", ",");
  13556. iWidth = 0;
  13557. aStr = "";
  13558. aFlag = new Array();
  13559. iXPos = Number(sLeftBank) + 90;
  13560. aStr = lpzfGetHanGul(sTclslblnmlist, aFlag);
  13561. for (var iNo = 0; iNo < aStr.length; iNo++)
  13562. {
  13563. if (aFlag[iNo] == "E")
  13564. {
  13565. iYPos = Number(sTopBank) + 178;
  13566. sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // 검체표시명(영문)
  13567. iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  13568. }
  13569. else
  13570. {
  13571. iYPos = Number(sTopBank) + 175;
  13572. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  13573. sSndMsg += CommAX.HanImageData();
  13574. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  13575. }
  13576. }
  13577. if(barcdcntflag == "acpt" )
  13578. {
  13579. if(spcacptbarcdprntcnt > 0)
  13580. {
  13581. if(sCommKind == "01")
  13582. {
  13583. CommAX.SendMessageToLPT(sSndMsg);
  13584. sSndMsg = "";
  13585. }
  13586. else if(sCommKind == "02")
  13587. {
  13588. CommAX.SendMessage(sSndMsg);
  13589. sSndMsg = "";
  13590. }
  13591. }
  13592. }
  13593. else
  13594. {
  13595. if(sCommKind == "01")
  13596. {
  13597. CommAX.SendMessageToLPT(sSndMsg);
  13598. sSndMsg = "";
  13599. }
  13600. else if(sCommKind == "02")
  13601. {
  13602. CommAX.SendMessage(sSndMsg);
  13603. sSndMsg = "";
  13604. }
  13605. }
  13606. dnorNm = dnorNm + dSexage;
  13607. iWidth = 0;
  13608. aStr = "";
  13609. aFlag = new Array();
  13610. iXPos = Number(sLeftBank) + 20;
  13611. aStr = lpzfGetHanGul(dnorNm, aFlag); //공여자명은 한글, 리마크는 영문
  13612. for (var iNo=0; iNo < aStr.length; iNo++)
  13613. {
  13614. if (aFlag[iNo] == "E")
  13615. {
  13616. iYPos = Number(sTopBank) + 232;
  13617. sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // 검체표시명(영문)
  13618. iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  13619. }
  13620. else
  13621. {
  13622. iYPos = Number(sTopBank) + 232;
  13623. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  13624. sSndMsg += CommAX.HanImageData();
  13625. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  13626. }
  13627. }
  13628. if(checkABO)
  13629. {
  13630. if(scridPrint=="SMLLC00100" && scrflag)
  13631. {
  13632. keepspc = true;
  13633. }
  13634. else if((scridPrint=="SMLLC00200" || scridPrint=="SMLLC00300") && scrflag && checkAST)
  13635. {
  13636. keepspc = true;
  13637. }
  13638. iXPos = Number(sLeftBank) + 110;
  13639. iYPos = Number(sTopBank) + 202;
  13640. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, "채혈자 : ", 1, 1);
  13641. sSndMsg += CommAX.HanImageData();
  13642. }
  13643. iXPos = Number(sLeftBank) + 20;
  13644. iYPos = Number(sTopBank) + 202;
  13645. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  13646. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sInfcinfolist); //계검사계
  13647. if(sSecttsect.substr(0, 1) == "A")
  13648. {
  13649. iXPos = Number(sLeftBank);
  13650. iYPos = Number(sTopBank) + 260;
  13651. sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 400, 10, 5);
  13652. }
  13653. else
  13654. {
  13655. }
  13656. if(barcdcntflag == "acpt" )
  13657. {
  13658. if(spcacptbarcdprntcnt > 0)
  13659. {
  13660. sSndMsg += lzzfBP_EndFormat(spcacptbarcdprntcnt); // 접수바코드출력수
  13661. if(sCommKind == "01")
  13662. {
  13663. CommAX.SendMessageToLPT(sSndMsg);
  13664. }
  13665. else if(sCommKind == "02")
  13666. {
  13667. CommAX.SendMessage(sSndMsg);
  13668. }
  13669. }
  13670. }
  13671. else
  13672. {
  13673. sSndMsg += lzzfBP_EndFormat(bcollbarcdprntcnt);
  13674. if(sCommKind == "01")
  13675. {
  13676. CommAX.SendMessageToLPT(sSndMsg);
  13677. }
  13678. else if(sCommKind == "02")
  13679. {
  13680. CommAX.SendMessage(sSndMsg);
  13681. }
  13682. }
  13683. if(keepspc)
  13684. {
  13685. fKeepBcnoPrint("B");
  13686. }
  13687. }
  13688. }
  13689. else if(sPrntKind == "9" || sPrntKind == "5")
  13690. {
  13691. for(var i = 0 ; i < cntHR; i++)
  13692. {
  13693. var sSndMsg = "";
  13694. var sTsectlblnm = eval(pRef).getColumn(i, "tsectlblnm");
  13695. var sBcno = eval(pRef).getColumn(i, "bcno");
  13696. var sBarcdprntdt = eval(pRef).getColumn(i, "barcdprntdt");
  13697. var sPatnm = eval(pRef).getColumn(i, "patnm");
  13698. var sPid = eval(pRef).getColumn(i, "pid");
  13699. var sSexage = eval(pRef).getColumn(i, "sexage");
  13700. var sDeptroom = eval(pRef).getColumn(i, "deptroom");
  13701. var sSpclblnm = eval(pRef).getColumn(i, "spclblnm");
  13702. var sTubelblnm = eval(pRef).getColumn(i, "tubelblnm");
  13703. var sSecttsect = eval(pRef).getColumn(i, "secttsect");
  13704. var sTclslblnmlist = eval(pRef).getColumn(i, "tclslblnmlist");
  13705. var sInfcinfolist = eval(pRef).getColumn(i, "infcinfolist");
  13706. var sErprcpflag = eval(pRef).getColumn(i, "erprcpflag");
  13707. var barcdcntflag = eval(pRef).getColumn(i, "cntflag");
  13708. var bcollbarcdprntcnt = eval(pRef).getColumn(i, "bcollbarcdprntcnt");
  13709. var spcacptbarcdprntcnt = eval(pRef).getColumn(i, "spcacptbarcdprntcnt");
  13710. var microbarcdprntcnt = eval(pRef).getColumn(i, "microbarcdprntcnt");
  13711. var prcphopedd = eval(pRef).getColumn(i, "prcphopedd");
  13712. var bedposcnts = eval(pRef).getColumn(i, "bedposcnts");
  13713. var sbcoll = "채혈자";
  13714. var keepspc = false;
  13715. var checkABO = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "ABO");
  13716. var checkAST = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "AST");
  13717. if (utlf_isNull(sLeftBank) || sLeftBank == "-")
  13718. {
  13719. sLeftBank = 0;
  13720. }
  13721. if (utlf_isNull(sTopBank) || sTopBank == "-")
  13722. {
  13723. sTopBank = 0;
  13724. }
  13725. if (utlf_isNull(eval(pRef).getColumn(i, "dnornm")))
  13726. {
  13727. var dnorNm = "";
  13728. var dSexage = "";
  13729. }
  13730. else
  13731. {
  13732. var dnorNm = eval(pRef).getColumn(i, "dnornm")
  13733. var dSexage = eval(pRef).getColumn(i, "dnorsexage")
  13734. }
  13735. sSndMsg += lzzfBP_StartFormat(0, 0);
  13736. if(sErprcpflag == "1" || sErprcpflag == "2" || sErprcpflag == "Y")
  13737. {
  13738. iXPos = Number(sLeftBank);
  13739. iYPos = Number(sTopBank) + 1;
  13740. sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 15, 240, 10);
  13741. }
  13742. else
  13743. {
  13744. }
  13745. sTsectlblnm = sTsectlblnm.replace("▨", ",");
  13746. iWidth = 0;
  13747. aStr = "";
  13748. aFlag = new Array();
  13749. iXPos = Number(sLeftBank) + 15;
  13750. aStr = lpzfGetHanGul(sTsectlblnm, aFlag);
  13751. for (var iNo=0; iNo < aStr.length; iNo++)
  13752. {
  13753. if (aFlag[iNo] == "E")
  13754. {
  13755. iYPos = Number(sTopBank) + 2;
  13756. sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  13757. iWidth = iWidth + (Number(aStr[iNo].length) * 12);
  13758. }
  13759. else
  13760. {
  13761. iYPos = Number(sTopBank) + 2;
  13762. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 2, 1);
  13763. sSndMsg += CommAX.HanImageData();
  13764. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  13765. }
  13766. }
  13767. iXPos = Number(sLeftBank) + 220;
  13768. iYPos = Number(sTopBank) + 5;
  13769. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  13770. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBcno + "*"); //바코드번호
  13771. iXPos = Number(sLeftBank) + 500;
  13772. iYPos = Number(sTopBank) + 5;
  13773. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  13774. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  13775. iXPos = Number(sLeftBank) + 90;
  13776. iYPos = Number(sTopBank) + 30;
  13777. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  13778. sSndMsg += lzzfBP_BarCode_Code39_300dpi(iXPos, iYPos, "N", 120, "*" + sBcno + "*"); // 바코드
  13779. iXPos = Number(sLeftBank) + 20;
  13780. iYPos = Number(sTopBank) + 160;
  13781. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  13782. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //환자등록번호
  13783. if(barcdcntflag == "acpt" )
  13784. {
  13785. if(spcacptbarcdprntcnt > 0)
  13786. {
  13787. if(sCommKind == "01")
  13788. {
  13789. CommAX.SendMessageToLPT(sSndMsg);
  13790. sSndMsg = "";
  13791. }
  13792. else if(sCommKind == "02")
  13793. {
  13794. CommAX.SendMessage(sSndMsg);
  13795. sSndMsg = "";
  13796. }
  13797. }
  13798. }
  13799. else
  13800. {
  13801. if(sCommKind == "01")
  13802. {
  13803. CommAX.SendMessageToLPT(sSndMsg);
  13804. sSndMsg = "";
  13805. }
  13806. else if(sCommKind == "02")
  13807. {
  13808. CommAX.SendMessage(sSndMsg);
  13809. sSndMsg = "";
  13810. }
  13811. }
  13812. iWidth = 0;
  13813. aStr = "";
  13814. aFlag = new Array();
  13815. iXPos = Number(sLeftBank) + 250;
  13816. sPatnm = sPatnm.substr(0, 20)
  13817. aStr = lpzfGetHanGul(sPatnm, aFlag);
  13818. for (var iNo=0; iNo < aStr.length; iNo++)
  13819. {
  13820. if (aFlag[iNo] == "E")
  13821. {
  13822. iYPos = Number(sTopBank) + 160;
  13823. sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  13824. iWidth = iWidth + (Number(aStr[iNo].length) * 12);
  13825. }
  13826. else
  13827. {
  13828. iYPos = Number(sTopBank) + 157;
  13829. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 2, 1); //20120504 환자명 수정
  13830. sSndMsg += CommAX.HanImageData();
  13831. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  13832. }
  13833. }
  13834. iXPos = Number(sLeftBank) + 20;
  13835. iYPos = Number(sTopBank) + 185;
  13836. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  13837. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sTubelblnm); //용기명
  13838. if(sBcno.substr(0, 1) == "E" && !utlf_isNull(bedposcnts))
  13839. {
  13840. iXPos = Number(sLeftBank) + 450;
  13841. iYPos = Number(sTopBank) + 160;
  13842. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, bedposcnts, 1, 1); //구역베드
  13843. sSndMsg += CommAX.HanImageData();
  13844. }
  13845. else
  13846. {
  13847. iXPos = Number(sLeftBank) + 450;
  13848. iYPos = Number(sTopBank) + 160;
  13849. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  13850. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDeptroom); //진료과병실
  13851. }
  13852. iXPos = Number(sLeftBank) + 480;
  13853. iYPos = Number(sTopBank) + 185;
  13854. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  13855. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, prcphopedd); //처방희망일시
  13856. if(barcdcntflag == "acpt" )
  13857. {
  13858. if(spcacptbarcdprntcnt > 0)
  13859. {
  13860. if(sCommKind == "01")
  13861. {
  13862. CommAX.SendMessageToLPT(sSndMsg);
  13863. sSndMsg = "";
  13864. }
  13865. else if(sCommKind == "02")
  13866. {
  13867. CommAX.SendMessage(sSndMsg);
  13868. sSndMsg = "";
  13869. }
  13870. }
  13871. }
  13872. else
  13873. {
  13874. if(sCommKind == "01")
  13875. {
  13876. CommAX.SendMessageToLPT(sSndMsg);
  13877. sSndMsg = "";
  13878. }
  13879. else if(sCommKind == "02")
  13880. {
  13881. CommAX.SendMessage(sSndMsg);
  13882. sSndMsg = "";
  13883. }
  13884. }
  13885. sTclslblnmlist = sTclslblnmlist.replace("▨", ",");
  13886. iWidth = 0;
  13887. aStr = "";
  13888. aFlag = new Array();
  13889. iXPos = Number(sLeftBank);
  13890. iYPos = Number(sTopBank) + 212;
  13891. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sTclslblnmlist.substr(0, 20), 1, 1); //검사항목라벨명
  13892. sSndMsg += CommAX.HanImageData();
  13893. if(barcdcntflag == "acpt" )
  13894. {
  13895. if(spcacptbarcdprntcnt > 0)
  13896. {
  13897. if(sCommKind == "01")
  13898. {
  13899. CommAX.SendMessageToLPT(sSndMsg);
  13900. sSndMsg = "";
  13901. }
  13902. else if(sCommKind == "02")
  13903. {
  13904. CommAX.SendMessage(sSndMsg);
  13905. sSndMsg = "";
  13906. }
  13907. }
  13908. }
  13909. else
  13910. {
  13911. if(sCommKind == "01")
  13912. {
  13913. CommAX.SendMessageToLPT(sSndMsg);
  13914. sSndMsg = "";
  13915. }
  13916. else if(sCommKind == "02")
  13917. {
  13918. CommAX.SendMessage(sSndMsg);
  13919. sSndMsg = "";
  13920. }
  13921. }
  13922. dnorNm = dnorNm + dSexage;
  13923. iWidth = 0;
  13924. aStr = "";
  13925. aFlag = new Array();
  13926. iXPos = Number(sLeftBank) + 20;
  13927. aStr = lpzfGetHanGul(dnorNm, aFlag); //공여자명은 한글, 리마크는 영문
  13928. for (var iNo=0; iNo < aStr.length; iNo++)
  13929. {
  13930. if (aFlag[iNo] == "E")
  13931. {
  13932. iYPos = Number(sTopBank) + 272;
  13933. sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // 검체표시명(영문)
  13934. iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  13935. }
  13936. else
  13937. {
  13938. iYPos = Number(sTopBank) + 272;
  13939. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  13940. sSndMsg += CommAX.HanImageData();
  13941. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  13942. }
  13943. }
  13944. if(checkABO)
  13945. {
  13946. if(scridPrint=="SMLLC00100" && scrflag)
  13947. {
  13948. keepspc = true;
  13949. }
  13950. else if((scridPrint=="SMLLC00200" || scridPrint=="SMLLC00300") && scrflag && checkAST)
  13951. {
  13952. keepspc = true;
  13953. }
  13954. }
  13955. iXPos = Number(sLeftBank) + 20;
  13956. iYPos = Number(sTopBank) + 240;
  13957. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  13958. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sInfcinfolist);
  13959. if(sSecttsect.substr(0, 1) == "A")
  13960. {
  13961. iXPos = Number(sLeftBank);
  13962. iYPos = Number(sTopBank) + 290;
  13963. sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 400, 10, 5);
  13964. }
  13965. else
  13966. {
  13967. }
  13968. if(barcdcntflag == "acpt" )
  13969. {
  13970. if(spcacptbarcdprntcnt > 0)
  13971. {
  13972. sSndMsg += lzzfBP_EndFormat(spcacptbarcdprntcnt); // 접수바코드출력수
  13973. if(sCommKind == "01")
  13974. {
  13975. CommAX.SendMessageToLPT(sSndMsg);
  13976. }
  13977. else if(sCommKind == "02")
  13978. {
  13979. CommAX.SendMessage(sSndMsg);
  13980. }
  13981. }
  13982. }
  13983. else
  13984. {
  13985. sSndMsg += lzzfBP_EndFormat(bcollbarcdprntcnt);
  13986. if(sCommKind == "01")
  13987. {
  13988. CommAX.SendMessageToLPT(sSndMsg);
  13989. }
  13990. else if(sCommKind == "02")
  13991. {
  13992. CommAX.SendMessage(sSndMsg);
  13993. }
  13994. }
  13995. if(keepspc)
  13996. {
  13997. fKeepBcnoPrint("B");
  13998. }
  13999. }
  14000. }
  14001. else if(sPrntKind == "3" && sCommKind == "03")
  14002. {
  14003. for(var i = 0 ; i < cntHR;i++)
  14004. {
  14005. var sPid = pRef.getColumn(i, "pid");
  14006. var sPatnm = pRef.getColumn(i, "patnm");
  14007. var sSex = pRef.getColumn(i, "sex");
  14008. var sAge = pRef.getColumn(i, "age");
  14009. var sInfcinfolist = pRef.getColumn(i, "infcinfolist");
  14010. var sSpcfcntslist = pRef.getColumn(i, "spcfcntslist");
  14011. var sBcno = pRef.getColumn(i, "bcno");
  14012. var sLpflag = pRef.getColumn(i, "lpflag");
  14013. var sDeptnm = pRef.getColumn(i, "deptnm");
  14014. var sWardroom = pRef.getColumn(i, "wardroom");
  14015. var sTubecd = pRef.getColumn(i, "tubecd");
  14016. var sTubelblnm = pRef.getColumn(i, "tubelblnm");
  14017. var sSecttsect = pRef.getColumn(i, "secttsect");
  14018. var sTsectlblnm = pRef.getColumn(i, "tsectlblnm");
  14019. var sBarcdprntdt = pRef.getColumn(i, "barcdprntdt");
  14020. var sTclscdlist = pRef.getColumn(i, "tclscdlist");
  14021. var sTclslblnmlist = pRef.getColumn(i, "tclslblnmlist");
  14022. var sSpclblnm = pRef.getColumn(i, "spclblnm");
  14023. var sErprcpflag = pRef.getColumn(i, "erprcpflag");
  14024. var barcdcntflag = pRef.getColumn(i, "cntflag");
  14025. var bcollbarcdprntcnt = pRef.getColumn(i, "bcollbarcdprntcnt");
  14026. var spcacptbarcdprntcnt = pRef.getColumn(i, "spcacptbarcdprntcnt");
  14027. var microbarcdprntcnt = pRef.getColumn(i, "microbarcdprntcnt");
  14028. //병리 인스턴스
  14029. var sSpctranseqno = pRef.getColumn(i, "spctranseqno");
  14030. var sSpctotalcnt = pRef.getColumn(i, "spctotalcnt");
  14031. var sOrgprcpnm = pRef.getColumn(i, "orgprcpnm");
  14032. var sAddprcpnm = pRef.getColumn(i, "addprcpnm");
  14033. var sOrddrnm = pRef.getColumn(i, "orddrnm");
  14034. var sBcollcau = pRef.getColumn(i, "bcollcau");
  14035. var sPrcpdd = pRef.getColumn(i, "prcpdd");
  14036. var keepspc = false;
  14037. var checkABO = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "ABO");
  14038. var checkAST = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "AST");
  14039. if (utlf_isNull(pRef.getColumn(i, "dnornm")))
  14040. {
  14041. var dnorNm = "";
  14042. }
  14043. else
  14044. {
  14045. var dnorNm = pRef.getColumn(i, "dnornm") + pRef.getColumn(i, "dnorsexage");
  14046. }
  14047. if((i == 1) || (pRef.getColumn(i-1, "pid")!= pRef.getColumn(i, "pid")))
  14048. {
  14049. sSndMsg = "^^^P";
  14050. sSndMsg += "^PI" + sPid + "^PN" + sPatnm + "^PS" + sSex + "^PA" + sAge;
  14051. sSndMsg += "^PB" + sEqmtCd;
  14052. if(!utlf_isNull(sInfcinfolist))
  14053. {
  14054. sSndMsg += "^P3" + sInfcinfolist;
  14055. }
  14056. if(!utlf_isNull(sSpcfcntslist))
  14057. {
  14058. sSndMsg += "^P4" + sSpcfcntslist;
  14059. }
  14060. if(!utlf_isNull(sBcollcau))
  14061. {
  14062. sSndMsg += "^P5" + sBcollcau;
  14063. }
  14064. sSndMsg += "^^^_P";
  14065. sSndMsg += "^^^S";
  14066. }
  14067. sSndMsg += "^SS";
  14068. sSndMsg += "^SA" + sBcno + "^SB" + sLpflag; //검체번호, 진검병리구분
  14069. //진료과, 병동/병실, 용기코드
  14070. sSndMsg += "^SC" + sDeptnm + "^SD" + sWardroom + "^SE" + sTubecd;
  14071. //용기명
  14072. if(!utlf_isNull(sTubelblnm))
  14073. {
  14074. sSndMsg += "^SF" + sTubelblnm;
  14075. }
  14076. //시행부서코드, 시행부서명칭, 바코드출력일시, 검사항목코드리스트
  14077. sSndMsg += "^SG" + sSecttsect + "^SH" + sTsectlblnm + "^SI" + sBarcdprntdt + "^SJ" + sTclscdlist;
  14078. sSndMsg += "^SK" + sTclslblnmlist + "^SL" + sSpclblnm;
  14079. //응급여부
  14080. if(sErprcpflag == "1" || sErprcpflag == "2" || sErprcpflag == "Y")
  14081. {
  14082. sSndMsg += "^SMY";
  14083. }
  14084. else
  14085. {
  14086. sSndMsg += "^SMN";
  14087. }
  14088. ////공여자(리마크)
  14089. if(!utlf_isNull(dnorNm))
  14090. {
  14091. sSndMsg += "^SN" + dnorNm;
  14092. }
  14093. //병리인 경우
  14094. if(sLpflag == "P")
  14095. {
  14096. sSndMsg += "^SO" + sSpctranseqno + "^SP" + sSpctotalcnt + "^SQ" + sOrgprcpnm + "^SR" + sAddprcpnm + "^ST" + sOrddrnm + "^S2" + sPrcpdd;
  14097. }
  14098. sSndMsg += "^SU" + bcollbarcdprntcnt; //바코드갯수
  14099. sSndMsg += "^_SS"; //채혈정보 DATA 종료
  14100. }
  14101. if(checkABO)
  14102. {
  14103. if(scridPrint=="SMLLC00100" && scrflag)
  14104. {
  14105. keepspc = true;
  14106. }
  14107. else if((scridPrint=="SMLLC00200" || scridPrint=="SMLLC00300") && scrflag && checkAST)
  14108. {
  14109. keepspc = true;
  14110. }
  14111. }
  14112. if(keepspc)
  14113. {
  14114. dsf_makeValue(ds_hidden, "sendmessage", "string", ds_hidden.getColumn(0, "sendmessage")+ sSndMsg, 0);
  14115. trace('보관검체');
  14116. fKeepBcnoPrint("B");
  14117. sSndMsg = ds_hidden.getColumn(0, "sendmessage");
  14118. }
  14119. if((i == cntHR) || (pRef.getColumn(i+1, "pid") != pRef.getColumn(i, "pid")))
  14120. {
  14121. sSndMsg += "^^^_S"; //채혈정보 종료
  14122. }
  14123. }
  14124. var sReturnValue = AutoLabel.TRANSDATA(0, sSetUpVal, sSndMsg); //전송
  14125. }
  14126. else if(sPrntKind == "4" && sCommKind == "03")
  14127. {
  14128. }
  14129. if( portOpenTF == "TRUE" && sCommKind == "02" && PCount == 0)
  14130. {
  14131. CommAX.PortOpen("false");
  14132. }
  14133. }
  14134. else if(portOpenTF = "FALSE" && sCommKind == "02")
  14135. {
  14136. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  14137. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  14138. + " \n 2.케이블 확인"
  14139. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  14140. return;
  14141. }
  14142. }
  14143. function fLisSpcBarcodePrint2(pRef, pKCount, pPCount, scrflag)
  14144. {
  14145. ds_hidden.setColumn(0, "sendmessage", "");
  14146. var cntHR = pRef.rowcouunt;
  14147. var sPrntKind = ds_data_setupinfo.getColumn(0, "prntkind");
  14148. var aFlag = new Array(); //한글 영문 구분
  14149. var aStr = "";
  14150. var iXPos = 0;
  14151. var iYPos = 0;
  14152. var KCount = 0;
  14153. var PCount = 0;
  14154. if(utlf_isNull(pKCount))
  14155. {
  14156. KCount = 0;
  14157. }
  14158. else
  14159. {
  14160. KCount = pKCount;
  14161. }
  14162. if(utlf_isNull(pPCount))
  14163. {
  14164. PCount = 0;
  14165. }
  14166. else
  14167. {
  14168. PCount = pPCount;
  14169. }
  14170. var scridPrint = frmf_getScreenID();
  14171. if(cntHR > 0 && sPrntKind != 0)
  14172. {
  14173. var sLeftBank = ds_data_blank.getColumn(0, "left");
  14174. var sTopBank = ds_data_blank.getColumn(0, "top");
  14175. for(var i = 0 ; i < cntHR;i++)
  14176. {
  14177. if(sPrntKind == "10")
  14178. {
  14179. var sSndMsg = "";
  14180. var sTsectlblnm = pRef.getColumn(i, "tsectlblnm");
  14181. var sBcno = pRef.getColumn(i, "bcno");
  14182. var sBarcdprntdt = pRef.getColumn(i, "barcdprntdt");
  14183. var sPatnm = pRef.getColumn(i, "patnm");
  14184. var sPid = pRef.getColumn(i, "pid");
  14185. var sSexage = pRef.getColumn(i, "sexage");
  14186. var sDeptroom = pRef.getColumn(i, "deptroom");
  14187. var sSpclblnm = pRef.getColumn(i, "spclblnm");
  14188. var sTubelblnm = pRef.getColumn(i, "tubelblnm");
  14189. var sSecttsect = pRef.getColumn(i, "secttsect");
  14190. var sTclslblnmlist = pRef.getColumn(i, "tclslblnmlist");
  14191. var sInfcinfolist = pRef.getColumn(i, "infcinfolist");
  14192. var sErprcpflag = pRef.getColumn(i, "erprcpflag");
  14193. var barcdcntflag = pRef.getColumn(i, "cntflag");
  14194. var bcollbarcdprntcnt = pRef.getColumn(i, "bcollbarcdprntcnt");
  14195. var spcacptbarcdprntcnt = pRef.getColumn(i, "spcacptbarcdprntcnt");
  14196. var microbarcdprntcnt = pRef.getColumn(i, "microbarcdprntcnt");
  14197. var prcphopedd = pRef.getColumn(i, "prcphopedd");
  14198. var bedposcnts = pRef.getColumn(i, "bedposcnts");
  14199. var sbcoll = "채혈자";
  14200. var keepspc = false;
  14201. var checkABO = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "ABO");
  14202. var checkAST = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "AST");
  14203. if (utlf_isNull(sLeftBank) || sLeftBank == "-")
  14204. {
  14205. sLeftBank = 0;
  14206. }
  14207. if (utlf_isNull(sTopBank)|| sTopBank == "-")
  14208. {
  14209. sTopBank = 0;
  14210. }
  14211. if (utlf_isNull(pRef).getColumn(i, "dnornm"))
  14212. {
  14213. var dnorNm = "";
  14214. var dSexage = "";
  14215. }
  14216. else
  14217. {
  14218. var dnorNm = pRef.getColumn(i, "dnornm");
  14219. var dSexage = pRef.getColumn(i, "dnorsexage");
  14220. }
  14221. if(i == 1)
  14222. {
  14223. }
  14224. sSndMsg += "N" + "\n";
  14225. sSndMsg += "JF" + "\n";
  14226. sSndMsg += "D9" + "\n";
  14227. sSndMsg += "S2" + "\n";
  14228. sSndMsg += "Q223,27" + "\n";
  14229. sSndMsg += "q456" + "\n";
  14230. iXPos = Number(sLeftBank);
  14231. iYPos = Number(sTopBank);
  14232. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,1,1,N," + "\"" + sTsectlblnm + "\""+ "\n";
  14233. iXPos = Number(sLeftBank) + 140;
  14234. iYPos = Number(sTopBank) + 5;
  14235. sSndMsg += "A" + iXPos + "," + iYPos + ",0,2,1,1,N," + "\"" + "*" + sBcno + "*" + "\""+ "\n";
  14236. iXPos = Number(sLeftBank) + 300;
  14237. iYPos = Number(sTopBank) + 0;
  14238. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + sSpclblnm + "\""+ "\n";
  14239. iXPos = Number(sLeftBank) + 25;
  14240. iYPos = Number(sTopBank) + 28;
  14241. sSndMsg += "B" + iXPos + "," + iYPos + ",0,3,2,5,93,N," + "\"" + sBcno + "\""+ "\n";
  14242. iXPos = Number(sLeftBank);
  14243. iYPos = Number(sTopBank) + 124;
  14244. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + sPid + "\""+ "\n";
  14245. iXPos = Number(sLeftBank) + 120;
  14246. iYPos = Number(sTopBank) + 120;
  14247. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,2,1,N," + "\"" + sPatnm + "\""+ "\n"; // 글짜크기 변경 20120504
  14248. iXPos = Number(sLeftBank) + 330;
  14249. iYPos = Number(sTopBank) + 124;
  14250. sSndMsg += "A" + iXPos + "," + iYPos + ",0,1,1,1,N," + "\"" + prcphopedd + "\""+ "\n";
  14251. iXPos = Number(sLeftBank);
  14252. iYPos = Number(sTopBank) + 147;
  14253. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + sTubelblnm + "\""+ "\n";
  14254. iXPos = Number(sLeftBank) + 170;
  14255. iYPos = Number(sTopBank) + 147;
  14256. if(sBcno.substr(0, 1) == "E" && !utlf_isNull(bedposcnts))
  14257. {
  14258. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,1,1,N," + "\"" + bedposcnts + "\""+ "\n";
  14259. }
  14260. else
  14261. {
  14262. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + sDeptroom + "\""+ "\n";
  14263. }
  14264. iXPos = Number(sLeftBank);
  14265. iYPos = Number(sTopBank) + 167;
  14266. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,1,1,N," + "\"" + sTclslblnmlist + "\""+ "\n";
  14267. iXPos = Number(sLeftBank);
  14268. if(!utlf_isNull(Infcinfolist))
  14269. {
  14270. sInfcinfolist = "*"+ sInfcinfolist +"*";
  14271. }
  14272. iYPos = Number(sTopBank) + 190;
  14273. sSndMsg += "A" + iXPos + "," + iYPos + ",0,4,1,1,N," + "\"" + sInfcinfolist + "\""+ "\n"; //20120328
  14274. sSndMsg += ""+ "\n";
  14275. sSndMsg += "P"+ bcollbarcdprntcnt + "\n";
  14276. CommAX.SendMsg(sSndMsg);
  14277. }
  14278. else if(sPrntKind == "9")
  14279. {
  14280. var sSndMsg = "^XA^SEE:UHANGUL.DAT^FS^CWQ,E:kfont3.FNT^FS";
  14281. var sTsectlblnm = pRef.getColumn(i, "tsectlblnm");
  14282. var sTsectlblnm2 = pRef.getColumn(i, "tsectlblnm2");
  14283. var sBcno = pRef.getColumn(i, "bcno");
  14284. var sBarcdprntdt = pRef.getColumn(i, "barcdprntdt");
  14285. var sPatnm = pRef.getColumn(i, "patnm");
  14286. var sPatnm2 = pRef.getColumn(i, "patnm2");
  14287. var sPid = pRef.getColumn(i, "pid");
  14288. var sSexage = pRef.getColumn(i, "sexage");
  14289. var sDeptroom = pRef.getColumn(i, "deptroom");
  14290. var sSpclblnm = pRef.getColumn(i, "spclblnm");
  14291. var sTubelblnm = pRef.getColumn(i, "tubelblnm");
  14292. var sSecttsect = pRef.getColumn(i, "secttsect");
  14293. var sTclslblnmlist = pRef.getColumn(i, "tclslblnmlist");
  14294. var sTclslblnmlist2 = pRef.getColumn(i, "tclslblnmlist2");
  14295. var sInfcinfolist = pRef.getColumn(i, "infcinfolist");
  14296. var sErprcpflag = pRef.getColumn(i, "erprcpflag");
  14297. var barcdcntflag = pRef.getColumn(i, "cntflag");
  14298. var bcollbarcdprntcnt = pRef.getColumn(i, "bcollbarcdprntcnt");
  14299. var spcacptbarcdprntcnt = pRef.getColumn(i, "spcacptbarcdprntcnt");
  14300. var microbarcdprntcnt = pRef.getColumn(i, "microbarcdprntcnt");
  14301. var prcphopedd = pRef.getColumn(i, "prcphopedd");
  14302. var bedposcnts = pRef.getColumn(i, "bedposcnts");
  14303. var sbcoll = "채혈자";
  14304. var keepspc = false;
  14305. var checkABO = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "ABO");
  14306. var checkAST = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "AST");
  14307. if (utlf_isNull(sLeftBank)|| sLeftBank == "-") sLeftBank = 0;
  14308. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  14309. if(utlf_isNull(pRef.getColumn(0, "dnornm")))
  14310. {
  14311. var dnorNm = "";
  14312. var dSexage = "";
  14313. }
  14314. else
  14315. {
  14316. var dnorNm = pRef.getColumn(i, "dnornm");
  14317. var dSexage = pRef.getColumn(i, "dnorsexage");
  14318. }
  14319. sSndMsg += lzzfBP_StartFormat(0, 0);
  14320. if(sErprcpflag == "1" || sErprcpflag == "2" || sErprcpflag == "Y")
  14321. {
  14322. iXPos = Number(sLeftBank);
  14323. iYPos = Number(sTopBank) + 1;
  14324. sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 15, 240, 10);
  14325. }
  14326. iXPos = Number(sLeftBank) + 200;
  14327. iYPos = Number(sTopBank) + 5;
  14328. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  14329. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBcno + "*"); //바코드번호
  14330. iXPos = Number(sLeftBank)+ 1;
  14331. iYPos = Number(sTopBank) + 1;
  14332. sSndMsg += "^CI14^FO" + iXPos + ","+ iYPos + "^AQN,30,30^FH^FD"+ sTsectlblnm +"^FS^CI1";
  14333. iXPos = Number(sLeftBank) + 500;
  14334. iYPos = Number(sTopBank) + 5;
  14335. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  14336. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  14337. iXPos = Number(sLeftBank) + 70;
  14338. iYPos = Number(sTopBank) + 30;
  14339. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  14340. sSndMsg += lzzfBP_BarCode_Code39_300dpi(iXPos, iYPos, "N", 120, "*" + sBcno + "*"); // 바코드
  14341. iXPos = Number(sLeftBank) + 20;
  14342. iYPos = Number(sTopBank) + 160;
  14343. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  14344. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //환자등록번호
  14345. iWidth = 0;
  14346. aStr = "";
  14347. aFlag = new Array();
  14348. iXPos = Number(sLeftBank) + 250;
  14349. aStr = lpzfGetHanGul(sPatnm, aFlag);
  14350. for (var iNo = 0; iNo < aStr.length; iNo++)
  14351. {
  14352. if (aFlag[iNo] == "E")
  14353. {
  14354. iYPos = Number(sTopBank) + 160;
  14355. sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  14356. iWidth = iWidth + (Number(aStr[iNo].length) * 12);
  14357. }
  14358. else
  14359. {
  14360. iYPos = Number(sTopBank) + 160;
  14361. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,30,30^FH^FD" + aStr[iNo] + "^FS^CI1"; // 검체표시명(한글)
  14362. iWidth = iWidth + (Number(aStr[iNo].length) * 30);
  14363. }
  14364. }
  14365. sTclslblnmlist = sTclslblnmlist.replace("▨", ",");
  14366. iWidth = 0;
  14367. aStr = "";
  14368. aFlag = new Array();
  14369. iXPos = Number(sLeftBank) + 20;
  14370. aStr = lpzfGetHanGul(sTclslblnmlist, aFlag);
  14371. for (var iNo=0; iNo < aStr.length; iNo++)
  14372. {
  14373. if (aFlag[iNo] == "E")
  14374. {
  14375. iYPos = Number(sTopBank) + 215;
  14376. iXPos = Number(sLeftBank) + Number(iWidth);
  14377. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  14378. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, aStr[iNo]); //용기명
  14379. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  14380. }
  14381. else
  14382. {
  14383. iYPos = Number(sTopBank) + 215;
  14384. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,30,30^FH^FD" + aStr[iNo] + "^FS^CI1"; // 검체표시명(한글)
  14385. iWidth = iWidth + (Number(aStr[iNo].length) * 28);
  14386. }
  14387. }
  14388. iXPos = Number(sLeftBank) + 20;
  14389. iYPos = Number(sTopBank) + 185;
  14390. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  14391. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sTubelblnm); //용기명
  14392. if(sBcno.substr(0, 1) == "E" && !utlf_isNull(bedposcnts))
  14393. {
  14394. iWidth = 0;
  14395. aStr = "";
  14396. aFlag = new Array();
  14397. iXPos = Number(sLeftBank) + 450;
  14398. aStr = lpzfGetHanGul(bedposcnts, aFlag); //구역배드
  14399. for (var iNo=0; iNo < aStr.length; iNo++)
  14400. {
  14401. if (aFlag[iNo] == "E")
  14402. {
  14403. iYPos = Number(sTopBank) + 160;
  14404. sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  14405. iWidth = iWidth + (Number(aStr[iNo].length) * 18);
  14406. }
  14407. else
  14408. {
  14409. iYPos = Number(sTopBank) + 160;
  14410. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  14411. sSndMsg += CommAX.HanImageData();
  14412. iWidth = iWidth + (Number(aStr[iNo].length) * 20);
  14413. }
  14414. }
  14415. }
  14416. else
  14417. {
  14418. iXPos = Number(sLeftBank) + 450;
  14419. iYPos = Number(sTopBank) + 160;
  14420. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  14421. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDeptroom); //진료과병실
  14422. }
  14423. iXPos = Number(sLeftBank) + 480;
  14424. iYPos = Number(sTopBank) + 185;
  14425. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  14426. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, prcphopedd); //처방희망 일시
  14427. dnorNm = dnorNm + dSexage;
  14428. iWidth = 0;
  14429. aStr = "";
  14430. aFlag = new Array();
  14431. iXPos = Number(sLeftBank) + 20;
  14432. aStr = lpzfGetHanGul(dnorNm, aFlag); //공여자명은 한글, 리마크는 영문
  14433. for (var iNo = 0; iNo < aStr.length; iNo++)
  14434. {
  14435. if (aFlag[iNo] == "E")
  14436. {
  14437. iYPos = Number(sTopBank) + 272;
  14438. sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // 검체표시명(영문)
  14439. iWidth = iWidth + (Number(aStr[iNo].length) * 18);
  14440. }
  14441. else
  14442. {
  14443. iYPos = Number(sTopBank) + 272;
  14444. sSndMsg += CommAX.PrtImgOut((Number(iXPos)+Number(iWidth)), iYPos, aStr[iNo], 1, 1);
  14445. sSndMsg += CommAX.HanImageData();
  14446. iWidth = iWidth + (Number(aStr[iNo].length) * 20);
  14447. }
  14448. }
  14449. if(checkABO)
  14450. {
  14451. if(scridPrint=="SMLLC00100" && scrflag)
  14452. {
  14453. keepspc = true;
  14454. }
  14455. else if((scridPrint=="SMLLC00200" || scridPrint=="SMLLC00300") && scrflag && checkAST)
  14456. {
  14457. keepspc = true;
  14458. }
  14459. }
  14460. if(!utlf_isNull(sInfcinfolist))
  14461. {
  14462. sInfcinfolist = "*"+ sInfcinfolist +"*";
  14463. }
  14464. iXPos = Number(sLeftBank) + 20;
  14465. iYPos = Number(sTopBank) + 240;
  14466. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정 20120328
  14467. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sInfcinfolist);
  14468. if(sSecttsect.substr(0, 1) == "A")
  14469. {
  14470. iXPos = Number(sLeftBank);
  14471. iYPos = Number(sTopBank) + 290;
  14472. sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 400, 10, 5);
  14473. }
  14474. else
  14475. {
  14476. }
  14477. sSndMsg += lzzfBP_EndFormat(bcollbarcdprntcnt);
  14478. CommAX.SendMsg(sSndMsg);
  14479. }
  14480. else if(sPrntKind == "11")
  14481. {
  14482. for(var i = 0; i < cntHR; i++)
  14483. {
  14484. var sSndMsg = "^XA^SEE:UHANGUL.DAT^FS^CWQ,E:kfont3.FNT^FS";
  14485. var sTsectlblnm = pRef.getColumn(i, "tsectlblnm");
  14486. var sBcno = pRef.getColumn(i, "bcno");
  14487. var sBarcdprntdt = pRef.getColumn(i, "barcdprntdt");
  14488. var sPatnm = pRef.getColumn(i, "patnm");
  14489. var sPid = pRef.getColumn(i, "pid");
  14490. var sSexage = pRef.getColumn(i, "sexage");
  14491. var sDeptroom = pRef.getColumn(i, "deptroom");
  14492. var sSpclblnm = pRef.getColumn(i, "spclblnm");
  14493. var sTubelblnm = pRef.getColumn(i, "tubelblnm");
  14494. var sSecttsect = pRef.getColumn(i, "secttsect");
  14495. var sTclslblnmlist = pRef.getColumn(i, "tclslblnmlist");
  14496. var sInfcinfolist = pRef.getColumn(i, "infcinfolist");
  14497. var sErprcpflag = pRef.getColumn(i, "erprcpflag");
  14498. var barcdcntflag = pRef.getColumn(i, "cntflag");
  14499. var bcollbarcdprntcnt = pRef.getColumn(i, "bcollbarcdprntcnt");
  14500. var spcacptbarcdprntcnt = pRef.getColumn(i, "spcacptbarcdprntcnt");
  14501. var microbarcdprntcnt = pRef.getColumn(i, "microbarcdprntcnt");
  14502. var prcphopedd = pRef.getColumn(i, "prcphopedd");
  14503. var bedposcnts = pRef.getColumn(i, "bedposcnts");
  14504. var sbcoll = "채혈자";
  14505. var keepspc = false;
  14506. var checkABO = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "ABO");
  14507. var checkAST = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "AST");
  14508. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  14509. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  14510. if (utlf_isNull(pRef.getColumn(i, "dnornm")))
  14511. {
  14512. var dnorNm = "";
  14513. var dSexage = "";
  14514. }
  14515. else
  14516. {
  14517. var dnorNm = pRef.getColumn(i, "dnornm");
  14518. var dSexage = pRef.getColumn(i, "dnorsexage");
  14519. }
  14520. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  14521. if(sErprcpflag == "1" || sErprcpflag == "2" || sErprcpflag == "Y")
  14522. {
  14523. //검사계명
  14524. iXPos = Number(sLeftBank);
  14525. iYPos = Number(sTopBank) + 1;
  14526. sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 15, 240, 10);
  14527. }
  14528. else
  14529. {
  14530. }
  14531. sTsectlblnm = sTsectlblnm.replace("▨", ",");
  14532. iWidth = 0;
  14533. aStr = "";
  14534. aFlag = new Array();
  14535. iXPos = Number(sLeftBank) + 15;
  14536. aStr = lpzfGetHanGul(sTsectlblnm, aFlag);
  14537. for (var iNo = 0; iNo < aStr.length; iNo++)
  14538. {
  14539. if (aFlag[iNo] == "E")
  14540. {
  14541. iYPos = Number(sTopBank) + 2;
  14542. sSndMsg += "^CFF20,20^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  14543. iWidth = iWidth + (Number(aStr[iNo].length) * 12);
  14544. }
  14545. else
  14546. {
  14547. iYPos = Number(sTopBank) + 2;
  14548. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,20,20^FH^FD" + aStr[iNo] + "^FS^CI1"; // 검체표시명(한글)
  14549. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  14550. }
  14551. }
  14552. iXPos = Number(sLeftBank) + 130;
  14553. iYPos = Number(sTopBank) + 5;
  14554. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  14555. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBcno + "*"); //바코드번호
  14556. iXPos = Number(sLeftBank) + 275;
  14557. iYPos = Number(sTopBank) + 5;
  14558. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  14559. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  14560. iXPos = Number(sLeftBank) + 60;
  14561. iYPos = Number(sTopBank) + 30;
  14562. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  14563. sSndMsg += lzzfBP_BarCode_Code39(iXPos, iYPos, "N", 100, "*" + sBcno + "*"); // 바코드
  14564. iWidth = 0;
  14565. aStr = "";
  14566. aFlag = new Array();
  14567. iXPos = Number(sLeftBank) + 170;
  14568. sPatnm = sPatnm.substr(0, 20);
  14569. aStr = lpzfGetHanGul(sPatnm, aFlag);
  14570. for (var iNo=0; iNo < aStr.length; iNo++)
  14571. {
  14572. if (aFlag[iNo] == "E")
  14573. {
  14574. iYPos = Number(sTopBank) + 135;
  14575. sSndMsg += "^CFF30,30^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS";
  14576. iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  14577. }
  14578. else
  14579. {
  14580. iYPos = Number(sTopBank) + 135;
  14581. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,30,30^FH^FD" + aStr[iNo] + "^FS^CI1";
  14582. iWidth = iWidth + (Number(aStr[iNo].length) * 30);
  14583. }
  14584. }
  14585. iXPos = Number(sLeftBank) + 20;
  14586. iYPos = Number(sTopBank) + 135;
  14587. sSndMsg += lzzfBP_ChangeFont("C", 14, 14); // 폰트 설정
  14588. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //환자등록번호
  14589. if(sBcno.substr(0, 1) == "E" && !utlf_isNull(bedposcnts))
  14590. {
  14591. iWidth = 0;
  14592. aStr = "";
  14593. aFlag = new Array();
  14594. iXPos = Number(sLeftBank) + 300;
  14595. aStr = lpzfGetHanGul(bedposcnts, aFlag); //구역배드
  14596. for (var iNo=0; iNo < aStr.length; iNo++)
  14597. {
  14598. if (aFlag[iNo] == "E")
  14599. {
  14600. iYPos = Number(sTopBank) + 135;
  14601. sSndMsg += "^CFF20,20^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // 구역배드명(영문)
  14602. iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  14603. }
  14604. else
  14605. {
  14606. iYPos = Number(sTopBank) + 135;
  14607. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,20,20^FH^FD" + aStr[iNo] + "^FS^CI1"; // 구역배드명(한글)
  14608. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  14609. }
  14610. }
  14611. }
  14612. else
  14613. {
  14614. iXPos = Number(sLeftBank) + 300;
  14615. iYPos = Number(sTopBank) + 135;
  14616. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  14617. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sDeptroom); //진료과병실
  14618. }
  14619. iXPos = Number(sLeftBank) + 20;
  14620. iYPos = Number(sTopBank) + 160;
  14621. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  14622. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sTubelblnm); //용기명
  14623. iXPos = Number(sLeftBank) + 280;
  14624. iYPos = Number(sTopBank) + 160;
  14625. sSndMsg += lzzfBP_ChangeFont("C", 5, 5); // 폰트 설정
  14626. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, prcphopedd); //라벨발행일시
  14627. sTclslblnmlist = sTclslblnmlist.replace("▨", ","); //검사코드리스트
  14628. iWidth = 0;
  14629. aStr = "";
  14630. aFlag = new Array();
  14631. iXPos = Number(sLeftBank) + 20;
  14632. aStr = lpzfGetHanGul(sTclslblnmlist, aFlag);
  14633. for (var iNo=0; iNo < aStr.length; iNo++)
  14634. {
  14635. if (aFlag[iNo] == "E")
  14636. {
  14637. iYPos = Number(sTopBank) + 178;
  14638. sSndMsg += "^CFF20,20^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // 검사코드리스트명(영문)
  14639. iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  14640. }
  14641. else
  14642. {
  14643. iYPos = Number(sTopBank) + 175;
  14644. sSndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,20,20^FH^FD" + aStr[iNo] + "^FS^CI1"; // 검사코드리스트(한글)
  14645. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  14646. }
  14647. }
  14648. dnorNm = dnorNm + dSexage;
  14649. iWidth = 0;
  14650. aStr = "";
  14651. aFlag = new Array();
  14652. iXPos = Number(sLeftBank) + 20;
  14653. aStr = lpzfGetHanGul(dnorNm, aFlag);
  14654. for (var iNo=0; iNo < aStr.length; iNo++)
  14655. {
  14656. if (aFlag[iNo] == "E")
  14657. {
  14658. iYPos = Number(sTopBank) + 232;
  14659. sSndMsg += "^CFC10,10^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^FD" + aStr[iNo] + "^FS"; // 공여자명(영문)
  14660. iWidth = iWidth + (Number(aStr[iNo].length) * 14);
  14661. }
  14662. else
  14663. {
  14664. iYPos = Number(sTopBank) + 232;
  14665. SndMsg += "^CI14^FO"+(Number(iXPos)+Number(iWidth))+","+ iYPos +"^AQN,30,30^FH^FD" + aStr[iNo] + "^FS^CI1"; // 공여자명(한글)
  14666. iWidth = iWidth + (Number(aStr[iNo].length) * 24);
  14667. }
  14668. }
  14669. if(checkABO)
  14670. {
  14671. if(scridPrint=="SMLLC00100" && scrflag)
  14672. {
  14673. keepspc = true;
  14674. }
  14675. else if((scridPrint=="SMLLC00200" || scridPrint=="SMLLC00300") && scrflag && checkAST)
  14676. {
  14677. keepspc = true;
  14678. }
  14679. iXPos = Number(sLeftBank) + 110;
  14680. iYPos = Number(sTopBank) + 202;
  14681. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, "채혈자 : ", 1, 1);
  14682. sSndMsg += CommAX.HanImageData();
  14683. }
  14684. if(!utlf_isNull(sInfcinfolist))
  14685. {
  14686. sInfcinfolist = "*"+ sInfcinfolist +"*";
  14687. }
  14688. iXPos = Number(sLeftBank) + 20;
  14689. iYPos = Number(sTopBank) + 202;
  14690. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정 20120328
  14691. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sInfcinfolist); //계검사계
  14692. if(sSecttsect.substr(0, 1) == "A")
  14693. {
  14694. //검사계명
  14695. iXPos = Number(sLeftBank);
  14696. iYPos = Number(sTopBank) + 260;
  14697. sSndMsg += lzzfBP_GraphicBox(iXPos, iYPos, 400, 10, 5);
  14698. }
  14699. else
  14700. {
  14701. }
  14702. sSndMsg += lzzfBP_EndFormat(bcollbarcdprntcnt);
  14703. CommAX.SendMsg(sSndMsg);
  14704. if(keepspc)
  14705. {
  14706. fKeepBcnoPrint("B");
  14707. }
  14708. }
  14709. }
  14710. else
  14711. {
  14712. var sSndMsg = "";
  14713. var sTsectlblnm = pRef.getColumn(i, "tsectlblnm");
  14714. var sBcno = pRef.getColumn(i, "bcno");
  14715. var sBarcdprntdt = pRef.getColumn(i, "barcdprntdt");
  14716. var sPatnm = pRef.getColumn(i, "patnm");
  14717. var sPid = pRef.getColumn(i, "pid");
  14718. var sSexage = pRef.getColumn(i, "sexage");
  14719. var sDeptroom = pRef.getColumn(i, "deptroom");
  14720. var sSpclblnm = pRef.getColumn(i, "spclblnm");
  14721. var sTubelblnm = pRef.getColumn(i, "tubelblnm");
  14722. var sSecttsect = pRef.getColumn(i, "secttsect");
  14723. var sTclslblnmlist = pRef.getColumn(i, "tclslblnmlist");
  14724. var sInfcinfolist = pRef.getColumn(i, "infcinfolist");
  14725. var sErprcpflag = pRef.getColumn(i, "erprcpflag");
  14726. var barcdcntflag = pRef.getColumn(i, "cntflag");
  14727. var bcollbarcdprntcnt = pRef.getColumn(i, "bcollbarcdprntcnt");
  14728. var spcacptbarcdprntcnt = pRef.getColumn(i, "spcacptbarcdprntcnt");
  14729. var microbarcdprntcnt = pRef.getColumn(i, "microbarcdprntcnt");
  14730. var sbcoll = "채혈자";
  14731. var keepspc = false;
  14732. var checkABO = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "ABO");
  14733. var checkAST = utlf_isSearchString(sTclslblnmlist.toUpperCase(), "AST");
  14734. if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  14735. if (utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  14736. if(utlf_isNull(pRef.getColumn(i, "dnornm")))
  14737. {
  14738. var dnorNm = "";
  14739. var dSexage = "";
  14740. }
  14741. else
  14742. {
  14743. var dnorNm = pRef.getColumn(i, "dnornm");
  14744. var dSexage = pRef.getColumn(i, "dnorsexage");
  14745. }
  14746. sSndMsg =""+String.fromCharCode(27)+"A"+String.fromCharCode(27)+"A"+"103500500";
  14747. if(sErprcpflag == "1" || sErprcpflag == "2" || sErprcpflag == "Y")
  14748. {
  14749. iXPos = Number(sLeftBank);
  14750. iYPos = Number(sTopBank) + 1;
  14751. sSndMsg += ""+String.fromCharCode(27)+"V"+iYPos+String.fromCharCode(27)+"H"+iXPos+String.fromCharCode(27)+"FW10V0220";
  14752. }
  14753. iWidth = 0;
  14754. aStr = "";
  14755. aFlag = new Array();
  14756. iXPos = Number(sLeftBank) + 15;
  14757. iYPos = Number(sTopBank) + 5;
  14758. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sTsectlblnm);
  14759. iXPos = Number(sLeftBank) + 140;
  14760. iYPos = Number(sTopBank) + 5;
  14761. sSndMsg += ""+String.fromCharCode(27)+"V"+iYPos+String.fromCharCode(27)+"H"+iXPos+String.fromCharCode(27)+"S*"+sBcno+"*";
  14762. iXPos = Number(sLeftBank) + 275;
  14763. iYPos = Number(sTopBank) + 5;
  14764. sSndMsg += ""+String.fromCharCode(27)+"V"+iYPos+String.fromCharCode(27)+"H"+iXPos+String.fromCharCode(27)+"S"+sBarcdprntdt;
  14765. iXPos = Number(sLeftBank) + 60;
  14766. iYPos = Number(sTopBank) + 30;
  14767. sSndMsg += ""+String.fromCharCode(27)+"V"+iYPos+String.fromCharCode(27)+"H"+iXPos+String.fromCharCode(27)+"BG02100"+sBcno;
  14768. iXPos = Number(sLeftBank) + 20;
  14769. iYPos = Number(sTopBank) + 130;
  14770. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sPatnm.substr(0, 20));
  14771. iXPos = Number(sLeftBank) + 160;
  14772. iYPos = Number(sTopBank) + 135;
  14773. sSndMsg += ""+String.fromCharCode(27)+"V"+iYPos+String.fromCharCode(27)+"H"+iXPos+String.fromCharCode(27)+"S"+sPid;
  14774. iXPos = Number(sLeftBank) + 300;
  14775. iYPos = Number(sTopBank) + 135;
  14776. sSndMsg += ""+String.fromCharCode(27)+"V"+iYPos+String.fromCharCode(27)+"H"+iXPos+String.fromCharCode(27)+"S"+sSexage;
  14777. iXPos = Number(sLeftBank) + 20;
  14778. iYPos = Number(sTopBank) + 160;
  14779. sSndMsg += ""+String.fromCharCode(27)+"V"+iYPos+String.fromCharCode(27)+"H"+iXPos+String.fromCharCode(27)+"S"+sDeptroom;
  14780. iXPos = Number(sLeftBank) + 160;
  14781. iYPos = Number(sTopBank) + 160;
  14782. sSndMsg += ""+String.fromCharCode(27)+"V"+iYPos+String.fromCharCode(27)+"H"+iXPos+String.fromCharCode(27)+"S"+sSpclblnm;
  14783. iXPos = Number(sLeftBank) + 260;
  14784. iYPos = Number(sTopBank) + 160;
  14785. sSndMsg += ""+String.fromCharCode(27)+"V"+iYPos+String.fromCharCode(27)+"H"+iXPos+String.fromCharCode(27)+"S"+sTubelblnm;
  14786. iXPos = Number(sLeftBank) + 20;
  14787. iYPos = Number(sTopBank) + 180;
  14788. sSndMsg += ""+String.fromCharCode(27)+"V"+iYPos+String.fromCharCode(27)+"H"+iXPos+String.fromCharCode(27)+"S"+sSecttsect;
  14789. //sTclslblnmlist = sTclslblnmlist.replace("▨", ",");
  14790. iXPos = Number(sLeftBank) + 70;
  14791. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sTclslblnmlist)
  14792. dnorNm = dnorNm + dSexage;
  14793. CommAX.PrtImgOut(iXPos, iYPos, dnorNm);
  14794. if(checkABO)
  14795. {
  14796. if(scridPrint=="SMLLC00100" && scrflag)
  14797. {
  14798. keepspc = true;
  14799. }
  14800. else if((scridPrint=="SMLLC00200" || scridPrint=="SMLLC00300") && scrflag && checkAST)
  14801. {
  14802. keepspc = true;
  14803. }
  14804. iXPos = Number(sLeftBank) + 160;
  14805. iYPos = Number(sTopBank) + 180;
  14806. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, "채혈자:");
  14807. }
  14808. iXPos = Number(sLeftBank) + 20;
  14809. iYPos = Number(sTopBank) + 202;
  14810. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sInfcinfolist); //감염정보
  14811. if(sSecttsect.substr(0, 1) == "A")
  14812. {
  14813. iXPos = Number(sLeftBank);
  14814. iYPos = Number(sTopBank) + 260;
  14815. sSndMsg += ""+String.fromCharCode(27)+"V"+"220"+String.fromCharCode(27)+"H"+"0"+String.fromCharCode(27)+"FW10H0350";
  14816. }
  14817. if(barcdcntflag == "acpt" )
  14818. {
  14819. sSndMsg += ""+String.fromCharCode(27)+"Q"+spcacptbarcdprntcnt+String.fromCharCode(27)+"Z";
  14820. CommAX.SendMsg(sSndMsg);
  14821. }
  14822. else
  14823. {
  14824. sSndMsg += ""+String.fromCharCode(27)+"Q"+bcollbarcdprntcnt+String.fromCharCode(27)+"Z";
  14825. CommAX.SendMsg(sSndMsg);
  14826. }
  14827. if(keepspc)
  14828. {
  14829. fKeepBcnoPrint("B");
  14830. }
  14831. }
  14832. }
  14833. }
  14834. }
  14835. function fBaseInfoRef2(strGetCodeInfo)
  14836. {
  14837. if(utlf_isNull(strGetCodeInfo)|| strGetCodeInfo == "undefined")
  14838. {
  14839. return;
  14840. }
  14841. var strCodeArray = strGetCodeInfo.split("|");
  14842. var sOutds = "";
  14843. for(iRow = 0 ; iRow < strCodeArray.length-1; iRow++)
  14844. {
  14845. dsf_createDs("ds_init_lb" + strCodeArray[iRow]);
  14846. sOutds += "ds_init_lb" + strCodeArray[iRow] + "=" + strCodeArray[iRow] + " ";
  14847. }
  14848. dsf_makeValue(ds_send, "codeflag", "string", strGetCodeInfo, 0);
  14849. var oParam = {};
  14850. oParam.id = "TRLZZ00103";
  14851. oParam.service = "diagtestapplib.DiagTestBaseInfoMngt";
  14852. oParam.method = "reqGetInitCodeInfo";
  14853. oParam.inds = "cond=ds_send";
  14854. oParam.outds = sOutds;
  14855. oParam.async = false;
  14856. //oParam.callback = "cf_TRLZZ00103";
  14857. tranf_submit(oParam);
  14858. }
  14859. /**
  14860. * 혈액은행 바코드 출력 혈액준비, 혈액불출시
  14861. */
  14862. function fLisTnsrBarcodePrint(pRef,pPrntRef){
  14863. try{
  14864. //var vInstance = document.models(0).instances(0);
  14865. var cntHR = pRef.rowcount;
  14866. var sPrntKind = ds_data_setupinfo.getColumn(0, "prntkind");
  14867. var iXPos = 0;
  14868. var iYPos = 0;
  14869. var portOpenTF = "";
  14870. var aStr = "";
  14871. var iWidth = 0;
  14872. var aFlag = new Array(); //한글 영문 구분
  14873. //혈액불출 결과저장시에만 값이 존재.
  14874. //var sBarcdFlag = model.getValue(pRef + "[1]/flag");
  14875. trace('1 :'+cntHR+' / '+sPrntKind);
  14876. if(cntHR > 0 && sPrntKind != "0"){
  14877. var sCommKind = ds_data_setupinfo.getColumn(0, "commkind");
  14878. var sLeftBank = ds_data_blank.getColumn(0, "left");
  14879. var sTopBank = ds_data_blank.getColumn(0, "top");
  14880. trace('2');
  14881. if(sCommKind == "01") {
  14882. var sSetUpVal = ds_data_comm01.getColumn(0, "setupval");
  14883. } else if(sCommKind == "02") {
  14884. var sComm = ds_data_comm02.getColumn(0, "comm");
  14885. var sDataBit = ds_data_comm02.getColumn(0, "databit");
  14886. var sStopBit = ds_data_comm02.getColumn(0, "stopbit");
  14887. var sBaudRate = ds_data_comm02.getColumn(0, "baudrate");
  14888. var sParity = ds_data_comm02.getColumn(0, "parity");
  14889. var sSetUpVal = ds_data_comm02.getColumn(0, "setupval");
  14890. CommAX.CommPort = sComm;
  14891. CommAX.Settings = sBaudRate+","+ sParity+","+sDataBit+","+ sStopBit;
  14892. portOpenTF = CommAX.PortOpen("true");
  14893. portOpenTF = "TRUE";
  14894. } else if(sCommKind == "03") {
  14895. var sSetUpVal = ds_data_comm03.getColumn(0, "setupval");
  14896. }
  14897. trace('3');
  14898. if( (portOpenTF == "TRUE" && sCommKind == "02")
  14899. || (sCommKind == "01")
  14900. || (sCommKind == "03") ){
  14901. trace('4');
  14902. for(i=0 ; i< cntHR;i++){
  14903. var sSndMsg = "";
  14904. var sPrepBlodSeqNo = pRef.getColumn(i, "prepblodseqno");
  14905. var sBlodNo = pRef.getColumn(i, "blodno");
  14906. var sBlodNo2 = pRef.getColumn(i, "blodno2");
  14907. var sBlodNo3 = pRef.getColumn(i, "blodno3");
  14908. var sBlodNo4 = pRef.getColumn(i, "blodno4");
  14909. var sBlodNo5 = pRef.getColumn(i, "blodno5");
  14910. var sPid = pRef.getColumn(i, "pid");
  14911. var sPatNm = pRef.getColumn(i, "patnm");
  14912. var aSexAge = pRef.getColumn(i, "sexage");
  14913. var sRoomInfo = pRef.getColumn(i, "roominfo");
  14914. var sCMRslt = pRef.getColumn(i, "cmrslt");
  14915. var sBlodComNm = pRef.getColumn(i, "blodcomnm");
  14916. var sAboRh = pRef.getColumn(i, "aborh");
  14917. var sBtype = pRef.getColumn(i, "btype");
  14918. var sIRyn = pRef.getColumn(i, "iryn");
  14919. var sPrtDD = pRef.getColumn(i, "prtdd");
  14920. var sPrtTM = pRef.getColumn(i, "prttm");
  14921. var cmnm = pRef.getColumn(i, "cmnm"); //검사자
  14922. var filteryn = pRef.getColumn(i, "filteryn"); //검사자
  14923. if (sLeftBank == "" || sLeftBank == "-") sLeftBank = 0;
  14924. if (sTopBank == "" || sTopBank == "-") sTopBank = 0;
  14925. if(sPrntKind == "1") {
  14926. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  14927. iXPos = Number(sLeftBank) + 115;
  14928. iYPos = Number(sTopBank) + 155;
  14929. sSndMsg += lzzfBP_ChangeFont("C", 30, 10); // 폰트 설정
  14930. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBlodNo); //혈액번호
  14931. iXPos = Number(sLeftBank) + 300;
  14932. iYPos = Number(sTopBank) + 155;
  14933. sSndMsg += lzzfBP_ChangeFont("C", 30, 10); // 폰트 설정
  14934. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBlodNo2); //혈액번호
  14935. iXPos = Number(sLeftBank) + 115;
  14936. iYPos = Number(sTopBank) + 195;
  14937. sSndMsg += lzzfBP_ChangeFont("C", 30, 10); // 폰트 설정
  14938. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBlodNo3); //혈액번호
  14939. iXPos = Number(sLeftBank) + 300;
  14940. iYPos = Number(sTopBank) + 195;
  14941. sSndMsg += lzzfBP_ChangeFont("C", 30, 10); // 폰트 설정
  14942. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBlodNo4); //혈액번호
  14943. iXPos = Number(sLeftBank) + 475;
  14944. iYPos = Number(sTopBank) + 195;
  14945. sSndMsg += lzzfBP_ChangeFont("C", 30, 10); // 폰트 설정
  14946. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBlodNo5); //혈액번호
  14947. if(sCommKind == "01") {
  14948. CommAX.SendMessageToLPT(sSndMsg);
  14949. sSndMsg = "";
  14950. } else if(sCommKind == "02") {
  14951. CommAX.SendMessage(sSndMsg);
  14952. sSndMsg = "";
  14953. }
  14954. iXPos = Number(sLeftBank) + 560;
  14955. iYPos = Number(sTopBank) + 125;
  14956. sSndMsg += lzzfBP_ChangeFont("C", 80, 40); // 폰트 설정
  14957. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sAboRh); //공혈자혈액형
  14958. if(sCommKind == "01") {
  14959. CommAX.SendMessageToLPT(sSndMsg);
  14960. sSndMsg = "";
  14961. } else if(sCommKind == "02") {
  14962. CommAX.SendMessage(sSndMsg);
  14963. sSndMsg = "";
  14964. }
  14965. iXPos = Number(sLeftBank) + 20;
  14966. iYPos = Number(sTopBank) + 65;
  14967. sSndMsg += lzzfBP_ChangeFont("C", 30, 10); // 폰트 설정
  14968. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //등록번호
  14969. if(sCommKind == "01") {
  14970. CommAX.SendMessageToLPT(sSndMsg);
  14971. sSndMsg = "";
  14972. } else if(sCommKind == "02") {
  14973. CommAX.SendMessage(sSndMsg);
  14974. sSndMsg = "";
  14975. }
  14976. iXPos = Number(sLeftBank) + 170;
  14977. iYPos = Number(sTopBank) + 60;
  14978. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatNm, 2, 2);
  14979. sSndMsg += CommAX.HanImageData();
  14980. if(sCommKind == "01") {
  14981. CommAX.SendMessageToLPT(sSndMsg);
  14982. sSndMsg = "";
  14983. } else if(sCommKind == "02") {
  14984. CommAX.SendMessage(sSndMsg);
  14985. sSndMsg = "";
  14986. }
  14987. iXPos = Number(sLeftBank) + 375;
  14988. iYPos = Number(sTopBank) + 85;
  14989. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  14990. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, aSexAge); //성별나이
  14991. iXPos = Number(sLeftBank) + 375;
  14992. iYPos = Number(sTopBank) + 65;
  14993. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  14994. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sRoomInfo); ////진료과병실
  14995. if(sCommKind == "01") {
  14996. CommAX.SendMessageToLPT(sSndMsg);
  14997. sSndMsg = "";
  14998. } else if(sCommKind == "02") {
  14999. CommAX.SendMessage(sSndMsg);
  15000. sSndMsg = "";
  15001. }
  15002. //이재오 20150626수정
  15003. iXPos = Number(sLeftBank) + 470;
  15004. iYPos = Number(sTopBank) + 10;
  15005. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  15006. sSndMsg += lzzfBP_BarCode_Code39(iXPos, iYPos, "N", 60, "*" + sPid + "*"); // 바코드
  15007. if(sCommKind == "01") {
  15008. CommAX.SendMessageToLPT(sSndMsg);
  15009. sSndMsg = "";
  15010. } else if(sCommKind == "02") {
  15011. CommAX.SendMessage(sSndMsg);
  15012. sSndMsg = "";
  15013. }
  15014. //이재오 20150626수정 끝
  15015. iXPos = Number(sLeftBank) + 460;
  15016. iYPos = Number(sTopBank) + 85;
  15017. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, "교차시험 : " + sCMRslt.substr(0, 20), 1, 1);
  15018. sSndMsg += CommAX.HanImageData();
  15019. if(sCommKind == "01") {
  15020. CommAX.SendMessageToLPT(sSndMsg);
  15021. sSndMsg = "";
  15022. } else if(sCommKind == "02") {
  15023. CommAX.SendMessage(sSndMsg);
  15024. sSndMsg = "";
  15025. }
  15026. iXPos = Number(sLeftBank) + 130;
  15027. iYPos = Number(sTopBank) + 230;
  15028. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, cmnm, 1, 1); // 검사자
  15029. sSndMsg += CommAX.HanImageData();
  15030. /// iXPos = Number(sLeftBank) + 10;
  15031. /// iYPos = Number(sTopBank) + 105;
  15032. /// sSndMsg += lzzfBP_ChangeFont("C", 30, 10); // 폰트 설정
  15033. /// sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBlodComNm); //성분제제명
  15034. // }
  15035. iXPos = Number(sLeftBank) + 10;
  15036. iYPos = Number(sTopBank) + 110;
  15037. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sBlodComNm, 1, 1); //성분제제명
  15038. sSndMsg += CommAX.HanImageData();
  15039. iXPos = Number(sLeftBank) + 10;
  15040. iYPos = Number(sTopBank) + 200;
  15041. sSndMsg += lzzfBP_ChangeFont("C", 80, 40); // 폰트 설정
  15042. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sIRyn); //성분제제명
  15043. if(filteryn == "Y"){
  15044. iXPos = Number(sLeftBank) + 65;
  15045. iYPos = Number(sTopBank) + 200;
  15046. sSndMsg += lzzfBP_ChangeFont("C", 80, 40); // 폰트 설정
  15047. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "F"); //성분제제명
  15048. }
  15049. if(sCommKind == "01") {
  15050. CommAX.SendMessageToLPT(sSndMsg);
  15051. sSndMsg = "";
  15052. } else if(sCommKind == "02") {
  15053. CommAX.SendMessage(sSndMsg);
  15054. sSndMsg = "";
  15055. }
  15056. // iXPos = Number(sLeftBank) + 515;
  15057. iXPos = Number(sLeftBank) + 450;
  15058. iYPos = Number(sTopBank) + 225;
  15059. sSndMsg += lzzfBP_ChangeFont("C", 30, 10); // 폰트 설정
  15060. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPrtDD+ ' ' + sPrtTM.substring(0,5)); //출력일자
  15061. // iXPos = Number(sLeftBank) + 545;
  15062. // iYPos = Number(sTopBank) + 255;
  15063. // sSndMsg += lzzfBP_ChangeFont("C", 30, 10); // 폰트 설정
  15064. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPrtTM.substring(0,5)); //출력일시
  15065. if(sCommKind == "01") {
  15066. CommAX.SendMessageToLPT(sSndMsg);
  15067. sSndMsg = "";
  15068. } else if(sCommKind == "02") {
  15069. CommAX.SendMessage(sSndMsg);
  15070. sSndMsg = "";
  15071. }
  15072. iXPos = Number(sLeftBank) + 115;
  15073. iYPos = Number(sTopBank) + 415;
  15074. sSndMsg += lzzfBP_ChangeFont("C", 30, 10); // 폰트 설정
  15075. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBlodNo); //혈액번호
  15076. iXPos = Number(sLeftBank) + 300;
  15077. iYPos = Number(sTopBank) + 415;
  15078. sSndMsg += lzzfBP_ChangeFont("C", 30, 10); // 폰트 설정
  15079. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBlodNo2); //혈액번호
  15080. iXPos = Number(sLeftBank) + 115;
  15081. iYPos = Number(sTopBank) + 455;
  15082. sSndMsg += lzzfBP_ChangeFont("C", 30, 10); // 폰트 설정
  15083. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBlodNo3); //혈액번호
  15084. iXPos = Number(sLeftBank) + 300;
  15085. iYPos = Number(sTopBank) + 455;
  15086. sSndMsg += lzzfBP_ChangeFont("C", 30, 10); // 폰트 설정
  15087. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBlodNo4); //혈액번호
  15088. iXPos = Number(sLeftBank) + 475;
  15089. iYPos = Number(sTopBank) + 455;
  15090. sSndMsg += lzzfBP_ChangeFont("C", 30, 10); // 폰트 설정
  15091. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBlodNo5); //혈액번호
  15092. if(sCommKind == "01") {
  15093. CommAX.SendMessageToLPT(sSndMsg);
  15094. sSndMsg = "";
  15095. } else if(sCommKind == "02") {
  15096. CommAX.SendMessage(sSndMsg);
  15097. sSndMsg = "";
  15098. }
  15099. iXPos = Number(sLeftBank) + 560;
  15100. iYPos = Number(sTopBank) + 395;
  15101. sSndMsg += lzzfBP_ChangeFont("C", 80, 40); // 폰트 설정
  15102. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sAboRh); //공혈자혈액형
  15103. if(sCommKind == "01") {
  15104. CommAX.SendMessageToLPT(sSndMsg);
  15105. sSndMsg = "";
  15106. } else if(sCommKind == "02") {
  15107. CommAX.SendMessage(sSndMsg);
  15108. sSndMsg = "";
  15109. }
  15110. iXPos = Number(sLeftBank) + 20;
  15111. iYPos = Number(sTopBank) + 345;
  15112. sSndMsg += lzzfBP_ChangeFont("C", 30, 10); // 폰트 설정
  15113. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //등록번호
  15114. if(sCommKind == "01") {
  15115. CommAX.SendMessageToLPT(sSndMsg);
  15116. sSndMsg = "";
  15117. } else if(sCommKind == "02") {
  15118. CommAX.SendMessage(sSndMsg);
  15119. sSndMsg = "";
  15120. }
  15121. iXPos = Number(sLeftBank) + 170;
  15122. iYPos = Number(sTopBank) + 340;
  15123. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatNm, 2, 2);
  15124. sSndMsg += CommAX.HanImageData();
  15125. if(sCommKind == "01") {
  15126. CommAX.SendMessageToLPT(sSndMsg);
  15127. sSndMsg = "";
  15128. } else if(sCommKind == "02") {
  15129. CommAX.SendMessage(sSndMsg);
  15130. sSndMsg = "";
  15131. }
  15132. iXPos = Number(sLeftBank) + 375;
  15133. iYPos = Number(sTopBank) + 365;
  15134. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  15135. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, aSexAge); //성별나이
  15136. iXPos = Number(sLeftBank) + 375;
  15137. iYPos = Number(sTopBank) + 345;
  15138. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  15139. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sRoomInfo); ////진료과병실
  15140. if(sCommKind == "01") {
  15141. CommAX.SendMessageToLPT(sSndMsg);
  15142. sSndMsg = "";
  15143. } else if(sCommKind == "02") {
  15144. CommAX.SendMessage(sSndMsg);
  15145. sSndMsg = "";
  15146. }
  15147. iXPos = Number(sLeftBank) + 460;
  15148. iYPos = Number(sTopBank) + 365;
  15149. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, "교차시험 : " + sCMRslt.substr(0, 20), 1, 1);
  15150. sSndMsg += CommAX.HanImageData();
  15151. if(sCommKind == "01") {
  15152. CommAX.SendMessageToLPT(sSndMsg);
  15153. sSndMsg = "";
  15154. } else if(sCommKind == "02") {
  15155. CommAX.SendMessage(sSndMsg);
  15156. sSndMsg = "";
  15157. }
  15158. iXPos = Number(sLeftBank) + 130;
  15159. iYPos = Number(sTopBank) + 490;
  15160. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, cmnm, 1, 1);
  15161. sSndMsg += CommAX.HanImageData();
  15162. //iXPos = Number(sLeftBank) + 10;
  15163. //iYPos = Number(sTopBank) + 385;
  15164. //sSndMsg += lzzfBP_ChangeFont("C", 30, 10); // 폰트 설정
  15165. //sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBlodComNm); //성분제제명
  15166. iXPos = Number(sLeftBank) + 10;
  15167. iYPos = Number(sTopBank) + 390;
  15168. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sBlodComNm, 1, 1); //성분제제명
  15169. sSndMsg += CommAX.HanImageData();
  15170. iXPos = Number(sLeftBank) + 10;
  15171. iYPos = Number(sTopBank) + 460;
  15172. sSndMsg += lzzfBP_ChangeFont("C", 80, 40); // 폰트 설정
  15173. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sIRyn); //성분제제명
  15174. // }
  15175. if(filteryn == "Y"){
  15176. iXPos = Number(sLeftBank) + 65;
  15177. iYPos = Number(sTopBank) + 460;
  15178. sSndMsg += lzzfBP_ChangeFont("C", 80, 40); // 폰트 설정
  15179. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "F"); //성분제제명
  15180. }
  15181. // sSndMsg += lzzfBP_EndFormat();
  15182. if(sCommKind == "01") {
  15183. CommAX.SendMessageToLPT(sSndMsg);
  15184. sSndMsg = "";
  15185. } else if(sCommKind == "02") {
  15186. CommAX.SendMessage(sSndMsg);
  15187. sSndMsg = "";
  15188. }
  15189. // iXPos = Number(sLeftBank) + 515;
  15190. // iYPos = Number(sTopBank) + 485;
  15191. // sSndMsg += lzzfBP_ChangeFont("C", 30, 10); // 폰트 설정
  15192. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPrtDD); //출력일자
  15193. // iXPos = Number(sLeftBank) + 575;
  15194. // iYPos = Number(sTopBank) + 515;
  15195. // sSndMsg += lzzfBP_ChangeFont("C", 30, 10); // 폰트 설정
  15196. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPrtTM); //출력일시
  15197. sSndMsg += lzzfBP_EndFormat();
  15198. }
  15199. if(sCommKind == "01") {
  15200. CommAX.SendMessageToLPT(sSndMsg);
  15201. } else if(sCommKind == "02") {
  15202. CommAX.SendMessage(sSndMsg);
  15203. }
  15204. }//end for
  15205. //portopen이 true이고 통신유형이 com일때 port close
  15206. if( portOpenTF == "TRUE" && sCommKind == "02"){
  15207. CommAX.PortOpen("false");
  15208. }
  15209. }else if((portOpenTF = "FALSE" && sCommKind == "02")){
  15210. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  15211. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  15212. + " \n 2.케이블 확인"
  15213. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  15214. return;
  15215. }
  15216. }
  15217. } //이후 2008-07-07 바코드 포트 오류 막기위해
  15218. catch(ee) {
  15219. sysf_messageBox("바코드출력에", "E009");
  15220. return;
  15221. }
  15222. }
  15223. /**
  15224. * 혈액은행 바코드 출력 (헌혈 혈액백)
  15225. */
  15226. function fLisTnsrBarcodePrintG(pRef,pPrntRef){
  15227. try{
  15228. //var vInstance = document.models(0).instances(0);
  15229. var cntHR = pRef.rowcount;
  15230. var sPrntKind = ds_data_setupinfo.getColumn(0, "prntkind");
  15231. var iXPos = 0;
  15232. var iYPos = 0;
  15233. var portOpenTF = "";
  15234. var aStr = "";
  15235. var iWidth = 0;
  15236. var aFlag = new Array();
  15237. if(cntHR > 0 && sPrntKind != "0"){
  15238. var sCommKind = ds_data_setupinfo.getColumn(0, "commkind");
  15239. var sLeftBank = ds_data_blank.getColumn(0, "left");
  15240. var sTopBank = ds_data_blank.getColumn(0, "top");
  15241. trace("fLisTnsrBarcodePrintG sPrntKind/sCommKind:"+sPrntKind + "/"+sCommKind);
  15242. if(sCommKind == "01") {
  15243. var sSetUpVal = ds_data_comm01.getColumn(0, "setupval");
  15244. } else if(sCommKind == "02") {
  15245. var sComm = ds_data_comm02.getColumn(0, "comm");
  15246. var sDataBit = ds_data_comm02.getColumn(0, "databit");
  15247. var sStopBit = ds_data_comm02.getColumn(0, "stopbit");
  15248. var sBaudRate = ds_data_comm02.getColumn(0, "baudrate");
  15249. var sParity = ds_data_comm02.getColumn(0, "parity");
  15250. trace('111');
  15251. CommAX.CommPort = sComm;
  15252. CommAX.Settings = sBaudRate+","+ sParity+","+sDataBit+","+ sStopBit;
  15253. trace('222');
  15254. portOpenTF = CommAX.PortOpen("true");
  15255. portOpenTF = "TRUE";
  15256. trace('333');
  15257. } else if(sCommKind == "03") {
  15258. var sSetUpVal = ds_data_comm03.getColumn(0, "setupval");
  15259. }
  15260. trace("fLisTnsrBarcodePrintG portOpenTF :"+portOpenTF);
  15261. if( (portOpenTF == "TRUE" && sCommKind == "02")
  15262. || (sCommKind == "01")
  15263. || (sCommKind == "03") ){
  15264. for(i=0 ; i< cntHR;i++){
  15265. var sSndMsg = "";
  15266. //var sPrepBlodSeqNo = pRef.getColumn(i, "prepblodseqno");
  15267. var sBlodNo = pRef.getColumn(i, "blodno");
  15268. var sPid = pRef.getColumn(i, "tnsrpid");
  15269. var sPatNm = pRef.getColumn(i, "tnsrnm");
  15270. var aSexAge = pRef.getColumn(i, "tnssexage");
  15271. var sCMRslt = pRef.getColumn(i, "panjung");
  15272. var sAboRh = pRef.getColumn(i, "tnsrbtype");
  15273. var sBtype = pRef.getColumn(i, "dnbtype");
  15274. var sPrtDD = pRef.getColumn(i, "prtdd");
  15275. var sPrtTM = pRef.getColumn(i, "prttm");
  15276. var sDnorNm = pRef.getColumn(i, "dnornm");
  15277. var sDnsexage = pRef.getColumn(i, "dnsexage");
  15278. var sBcolldd = pRef.getColumn(i, "bcolldt");
  15279. var sValiDt = pRef.getColumn(i, "validt");
  15280. var sTitle = pRef.getColumn(i, "title");
  15281. var sAbocd = pRef.getColumn(i, "abocd");
  15282. var sBlodbarcd = pRef.getColumn(i, "blodbarcd");
  15283. var sBlodbarnm = pRef.getColumn(i, "blodbarnm");
  15284. var sBlodVol = pRef.getColumn(i, "blodvol");
  15285. var sWardRoom = pRef.getColumn(i, "wardroom");
  15286. var sBcollnm = pRef.getColumn(i, "bcollnm");
  15287. if (sLeftBank == "" || sLeftBank == "-"){
  15288. sLeftBank = 0;
  15289. }
  15290. if (sTopBank == "" || sTopBank == "-"){
  15291. sTopBank = 0;
  15292. }
  15293. if(sPrntKind == "1" || sPrntKind == "5") {
  15294. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅 ★ 중요함
  15295. iXPos = Number(sLeftBank) + 100;
  15296. iYPos = Number(sTopBank) + 50;
  15297. sSndMsg += fCarePrintOutH(iXPos, iYPos, 2, "N", sTitle, ""); // 타이틀----
  15298. iXPos = Number(sLeftBank) + 540;
  15299. iYPos = Number(sTopBank) + 85;
  15300. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  15301. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBlodVol + "ml"); //헌혈한 용량
  15302. iXPos = Number(sLeftBank) + 90;
  15303. iYPos = Number(sTopBank) + 150;
  15304. sSndMsg += lzzfBP_ChangeFont("C", 80, 30); // 폰트 설정 ----
  15305. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBtype); //공여자혈액형----
  15306. iXPos = Number(sLeftBank) + 175;
  15307. iYPos = Number(sTopBank) + 140;
  15308. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);//----
  15309. sSndMsg += lzzfBP_BarCode_Code39(iXPos, iYPos, "N", 80, "*" + sAbocd + "*"); // 바코드----
  15310. iXPos = Number(sLeftBank) + 220;
  15311. iYPos = Number(sTopBank) + 225;
  15312. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정----
  15313. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sAbocd + "*"); //공여자혈액형----
  15314. if(sBlodNo != ""){
  15315. iXPos = Number(sLeftBank) + 110;
  15316. iYPos = Number(sTopBank) + 295;
  15317. sSndMsg += "^FO"+iXPos+","+iYPos; // 80 가로, 275세로
  15318. sSndMsg += "^BY2,3.0"; // 크기 2 3= 3:1 배율
  15319. sSndMsg += "^B2N,80,N,N,N^FD" + "*" + sBlodNo + "*" + "^FS";
  15320. iXPos = Number(sLeftBank) + 125;
  15321. iYPos = Number(sTopBank) + 385;
  15322. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정----
  15323. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBlodNo + "*"); //혈액번호----
  15324. iXPos = Number(sLeftBank) + 30;
  15325. iYPos = Number(sTopBank) + 460;
  15326. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정----
  15327. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBlodbarnm); //성분제제명----
  15328. iXPos = Number(sLeftBank) + 90;
  15329. iYPos = Number(sTopBank) + 480;
  15330. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);//----
  15331. sSndMsg += lzzfBP_BarCode_Code39(iXPos, iYPos, "N", 80, "*" + sBlodbarcd + "*"); // 바코드----
  15332. iXPos = Number(sLeftBank) + 140;
  15333. iYPos = Number(sTopBank) + 565;
  15334. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  15335. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBlodbarcd + "*"); //성분제제코드----
  15336. }
  15337. if(sCommKind == "01") {
  15338. CommAX.SendMessageToLPT(sSndMsg);
  15339. } else if(sCommKind == "02") {
  15340. CommAX.SendMessage(sSndMsg);
  15341. }
  15342. sSndMsg = "";
  15343. iXPos = Number(sLeftBank) + 470;
  15344. iYPos = Number(sTopBank) + 300;
  15345. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정----
  15346. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBcolldd.substr(0, 4) + "-" + sBcolldd.substr(4, 2) + "-" + sBcolldd.substr(6, 2)); //채혈년월일 ----
  15347. iXPos = Number(sLeftBank) + 470;
  15348. iYPos = Number(sTopBank) + 330;
  15349. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBcolldd.substr(8, 2) + ":" + sBcolldd.substr(10, 2)); //채혈시간 ----
  15350. iXPos = Number(sLeftBank) + 470;
  15351. iYPos = Number(sTopBank) + 380;
  15352. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정----
  15353. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sValiDt.substr(0, 4) + "-" + sValiDt.substr(4, 2) + "-" + sValiDt.substr(6, 2)); //유효일자----
  15354. iXPos = Number(sLeftBank) + 470;
  15355. iYPos = Number(sTopBank) + 410;
  15356. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sValiDt.substr(8, 2) + ":" + sValiDt.substr(10, 2)); //유효시간----
  15357. iXPos = Number(sLeftBank) + 470;
  15358. iYPos = Number(sTopBank) + 465;
  15359. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정----
  15360. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //등록번호----
  15361. iXPos = Number(sLeftBank) + 470;
  15362. iYPos = Number(sTopBank) + 515;
  15363. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatNm.substr(0, 20), 1, 1);
  15364. sSndMsg += CommAX.HanImageData();
  15365. iXPos = Number(sLeftBank) + 560;
  15366. iYPos = Number(sTopBank) + 510;
  15367. sSndMsg += lzzfBP_ChangeFont("C", 40, 20); // 폰트 설정----
  15368. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sAboRh); //환자혈액형----
  15369. if(sBlodNo != ""){
  15370. iXPos = Number(sLeftBank) + 470;
  15371. iYPos = Number(sTopBank) + 580;
  15372. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sDnorNm.substr(0, 20), 1, 1);
  15373. sSndMsg += CommAX.HanImageData();
  15374. iXPos = Number(sLeftBank) + 560;
  15375. iYPos = Number(sTopBank) + 575;
  15376. sSndMsg += lzzfBP_ChangeFont("C", 40, 20); // 폰트 설정 ----
  15377. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBtype); //공여자혈액형----
  15378. }
  15379. if(sCommKind == "01") {
  15380. CommAX.SendMessageToLPT(sSndMsg);
  15381. } else if(sCommKind == "02") {
  15382. CommAX.SendMessage(sSndMsg);
  15383. sSndMsg = "";
  15384. }
  15385. //보관방법, 사용방법, 혈소판 or 백혈구 수
  15386. var sText11, sText12, sText13, sText14, sText15, sText21, sText22, sText23, sText24, sText25, sText31, sText32, sText33, sText34, sText35;
  15387. if(sBlodbarcd =="A0003"){ //HPC
  15388. //var sText1 = "* 보관 방법 : 약한 교반으로 20~24도 보관 " ;
  15389. //var sText2 = "* 사용 방법 : 제조후 120시간이내 혈소판 수혈세트 사용
  15390. // 정맥 수혈" ;
  15391. //var sText3 = "* 혈소판 수 : ( X 10 ) 용량 ( )ml" ;
  15392. //alert("sText1= " + sText1);
  15393. sText11 = "보관 방법";
  15394. sText12 = "약한 교반으로";
  15395. sText13 = "20-24";
  15396. sText14 = "도 보관";
  15397. sText15 = ":"
  15398. sText21 = "사용 방법";
  15399. sText25 = "제조후";
  15400. sText22 = "120";
  15401. sText23 = "시간이내 혈소판 수혈세트 사용";
  15402. sText24 = "정맥 수혈";
  15403. sText31 = "혈소판 수";
  15404. sText32 = "( X )";
  15405. sText33 = "용량";
  15406. sText34 = "( )ml";
  15407. sText35 = "11";
  15408. }else if(sBlodbarcd =="A0004"){ //DGI
  15409. //var sText1 = "* 보관 방법: 실온보관 " ;
  15410. //var sText2 = "* 사용 방법: 제조후 즉시, PRP세트 사용
  15411. // 정맥수혈" ;
  15412. //var sText3 = "* 백혈구수 ( X ) 용량 ( )ml ]" ;
  15413. sText11 = "보관 방법";
  15414. sText12 = "실온보관";
  15415. sText15 = ":"
  15416. sText21 = "사용 방법";
  15417. sText25 = "제조후 즉시,";
  15418. sText22 = "PRP";
  15419. sText23 = "세트 사용";
  15420. sText24 = "정맥 수혈";
  15421. sText31 = "백혈구 수";
  15422. sText32 = "( X )";
  15423. sText33 = "용량";
  15424. sText34 = "( )ml";
  15425. sText35 = "11";
  15426. }else if((sBlodbarcd =="A0001") || (sBlodbarcd =="A0002") || (sBlodbarcd =="04064")){ // 자가, 전혈
  15427. //var sText1 = "* 보관 방법 / 1 6도 보관 " ;
  15428. //var sText2 = "* 사용 방법 / 수혈세트 사용하여 정맥 수혈" ;
  15429. //var sText3 = "* 용 량 / 365 +- 32ml" ;
  15430. ///var sText1 = " 보관 방법 섭씨 1에서 6도 보관 ";
  15431. var sText41 = "보관 방법";
  15432. var sText42 = "1-6";
  15433. var sText43 = "도 보관";
  15434. //var sText2 = " 사용 방법 수혈세트 사용하여 정맥 수혈";
  15435. var sText51 = "사용 방법";
  15436. var sText52 = "수혈세트";
  15437. var sText53 = "사용하여";
  15438. var sText54 = "정맥 수혈";
  15439. //var sText3 = " 용 량 365 32ml";
  15440. var sText61 = "용 량"
  15441. var sText62 = "365 + 32ml";
  15442. //var sText63 = "+";
  15443. var sText64 = "_";
  15444. }
  15445. if((sBlodbarcd =="A0003") || (sBlodbarcd =="A0004")){ //HPC, DGI
  15446. //1째줄
  15447. iXPos = Number(sLeftBank) + 30;
  15448. iYPos = Number(sTopBank) + 695;
  15449. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText11, 1, 1); // 보관 방법
  15450. sSndMsg += CommAX.HanImageData();
  15451. iXPos = Number(sLeftBank) + 155;
  15452. iYPos = Number(sTopBank) + 700;
  15453. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); //:
  15454. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sText15);
  15455. iXPos = Number(sLeftBank) + 172;
  15456. iYPos = Number(sTopBank) + 695;
  15457. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText12, 1, 1); // 약한 교반으로 or 실온보관
  15458. sSndMsg += CommAX.HanImageData();
  15459. if(sBlodbarcd =="A0003"){
  15460. iXPos = Number(sLeftBank) + 350;
  15461. iYPos = Number(sTopBank) + 700;
  15462. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); //20-24 --혈소판
  15463. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sText13);
  15464. iXPos = Number(sLeftBank) + 420;
  15465. iYPos = Number(sTopBank) + 695;
  15466. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText14, 1, 1); // 도 보관 --혈소
  15467. sSndMsg += CommAX.HanImageData();
  15468. }
  15469. if(sCommKind == "01") {
  15470. CommAX.SendMessageToLPT(sSndMsg);
  15471. } else if(sCommKind == "02") {
  15472. CommAX.SendMessage(sSndMsg);
  15473. }
  15474. sSndMsg = "";
  15475. //2째줄
  15476. iXPos = Number(sLeftBank) + 30;
  15477. iYPos = Number(sTopBank) + 723;
  15478. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText21, 1, 1); // 사용 방법
  15479. sSndMsg += CommAX.HanImageData();
  15480. iXPos = Number(sLeftBank) + 155;
  15481. iYPos = Number(sTopBank) + 728;
  15482. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); //:
  15483. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sText15);
  15484. iXPos = Number(sLeftBank) + 172;
  15485. iYPos = Number(sTopBank) + 723;
  15486. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText25, 1, 1); // 제조후 or 제조후 즉시
  15487. sSndMsg += CommAX.HanImageData();
  15488. if(sBlodbarcd =="A0003"){ //HPC
  15489. iXPos = Number(sLeftBank) + 250;
  15490. iYPos = Number(sTopBank) + 728;
  15491. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 120
  15492. sSndMsg += lzzfBP_FieldDataA(iXPos , iYPos, sText22);
  15493. iXPos = Number(sLeftBank) + 290;
  15494. iYPos = Number(sTopBank) + 723;
  15495. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText23, 1, 1); // 시간이내 혈소판 수혈세트
  15496. sSndMsg += CommAX.HanImageData();
  15497. }else{ //DGI
  15498. iXPos = Number(sLeftBank) + 340;
  15499. iYPos = Number(sTopBank) + 728;
  15500. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // PRP
  15501. sSndMsg += lzzfBP_FieldDataA(iXPos , iYPos, sText22);
  15502. iXPos = Number(sLeftBank) + 380;
  15503. iYPos = Number(sTopBank) + 723;
  15504. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText23, 1, 1); // 세트사용
  15505. sSndMsg += CommAX.HanImageData();
  15506. }
  15507. //3째줄
  15508. iXPos = Number(sLeftBank) + 172;
  15509. iYPos = Number(sTopBank) + 751;
  15510. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText24, 1, 1); // 정맥 수혈
  15511. sSndMsg += CommAX.HanImageData();
  15512. if(sCommKind == "01") {
  15513. CommAX.SendMessageToLPT(sSndMsg);
  15514. } else if(sCommKind == "02") {
  15515. CommAX.SendMessage(sSndMsg);
  15516. }
  15517. sSndMsg = "";
  15518. //4째줄
  15519. iXPos = Number(sLeftBank) + 30;
  15520. iYPos = Number(sTopBank) + 775;
  15521. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText31, 1, 1); // 혈소판 수
  15522. sSndMsg += CommAX.HanImageData();
  15523. iXPos = Number(sLeftBank) + 155;
  15524. iYPos = Number(sTopBank) + 780;
  15525. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); //:
  15526. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sText15);
  15527. iXPos = Number(sLeftBank) + 170;
  15528. iYPos = Number(sTopBank) + 780;
  15529. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // ( X )
  15530. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sText32);
  15531. iXPos = Number(sLeftBank) + 300;
  15532. iYPos = Number(sTopBank) + 770;
  15533. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); //
  15534. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sText35); // 11
  15535. iXPos = Number(sLeftBank) + 250;
  15536. iYPos = Number(sTopBank) + 780;
  15537. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); //
  15538. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "10"); // 10
  15539. iXPos = Number(sLeftBank) + 360;
  15540. iYPos = Number(sTopBank) + 775;
  15541. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText33, 1, 1); // 용량
  15542. sSndMsg += CommAX.HanImageData();
  15543. iXPos = Number(sLeftBank) + 420;
  15544. iYPos = Number(sTopBank) + 780;
  15545. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // ( )ml
  15546. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sText34);
  15547. iXPos = Number(sLeftBank) + 450;
  15548. iYPos = Number(sTopBank) + 780;
  15549. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBlodVol);
  15550. if(sCommKind == "01") {
  15551. CommAX.SendMessageToLPT(sSndMsg);
  15552. } else if(sCommKind == "02") {
  15553. CommAX.SendMessage(sSndMsg);
  15554. }
  15555. sSndMsg = "";
  15556. }else if((sBlodbarcd =="A0001") || (sBlodbarcd =="A0002") || (sBlodbarcd =="04064")){
  15557. // 1째줄
  15558. iXPos = Number(sLeftBank) + 24;
  15559. iYPos = Number(sTopBank) + 705;
  15560. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText41, 1, 1); // 보관 방법
  15561. sSndMsg += CommAX.HanImageData();
  15562. iXPos = Number(sLeftBank) + 170;
  15563. iYPos = Number(sTopBank) + 710;
  15564. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); //1-6
  15565. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sText42);
  15566. iXPos = Number(sLeftBank) + 210;
  15567. iYPos = Number(sTopBank) + 705;
  15568. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText43, 1, 1); // 도 보관
  15569. sSndMsg += CommAX.HanImageData();
  15570. if(sCommKind == "01") {
  15571. CommAX.SendMessageToLPT(sSndMsg);
  15572. } else if(sCommKind == "02") {
  15573. CommAX.SendMessage(sSndMsg);
  15574. }
  15575. sSndMsg = "";
  15576. // 2째줄
  15577. iXPos = Number(sLeftBank) + 24;
  15578. iYPos = Number(sTopBank) + 740;
  15579. sSndMsg += CommAX.PrtImgOut(iXPos , iYPos, sText51, 1, 1); // 사용 방법
  15580. sSndMsg += CommAX.HanImageData();
  15581. iXPos = Number(sLeftBank) + 170;
  15582. iYPos = Number(sTopBank) + 740;
  15583. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText52, 1, 1); // 수혈세트
  15584. sSndMsg += CommAX.HanImageData();
  15585. iXPos = Number(sLeftBank) + 290;
  15586. iYPos = Number(sTopBank) + 740;
  15587. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText53, 1, 1); // 사용하여
  15588. sSndMsg += CommAX.HanImageData();
  15589. iXPos = Number(sLeftBank) + 410;
  15590. iYPos = Number(sTopBank) + 740;
  15591. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText54, 1, 1); // 정맥 수혈
  15592. sSndMsg += CommAX.HanImageData();
  15593. if(sCommKind == "01") {
  15594. CommAX.SendMessageToLPT(sSndMsg);
  15595. } else if(sCommKind == "02") {
  15596. CommAX.SendMessage(sSndMsg);
  15597. }
  15598. sSndMsg = "";
  15599. //3째줄
  15600. iXPos = Number(sLeftBank) + 24;
  15601. iYPos = Number(sTopBank) + 775;
  15602. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText61, 1, 1); // 용 량
  15603. sSndMsg += CommAX.HanImageData();
  15604. iXPos = Number(sLeftBank) + 170;
  15605. iYPos = Number(sTopBank) + 780;
  15606. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 365 + 32ml
  15607. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sText62);
  15608. iXPos = Number(sLeftBank) + 218;
  15609. iYPos = Number(sTopBank) + 780;
  15610. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // _
  15611. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sText64);
  15612. if(sCommKind == "01") {
  15613. CommAX.SendMessageToLPT(sSndMsg);
  15614. } else if(sCommKind == "02") {
  15615. CommAX.SendMessage(sSndMsg);
  15616. }
  15617. sSndMsg = "";
  15618. }
  15619. sSndMsg += lzzfBP_EndFormat();
  15620. if(sCommKind == "01") {
  15621. CommAX.SendMessageToLPT(sSndMsg);
  15622. } else if(sCommKind == "02") {
  15623. CommAX.SendMessage(sSndMsg);
  15624. }
  15625. }//======================================== S = A = T = O ====================================================================================
  15626. else if(sPrntKind == "2" || sPrntKind == "6" || sPrntKind == "7"){ //SATO
  15627. sSndMsg = "AA103500500"; // 시작위치 셋팅
  15628. iXPos = Number(sLeftBank) + 100;
  15629. iYPos = Number(sTopBank) + 50;
  15630. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sTitle; //타이틀
  15631. iXPos = Number(sLeftBank) + 540;
  15632. iYPos = Number(sTopBank) + 85;
  15633. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sBlodVol + "ml";//헌혈한 용량
  15634. iXPos = Number(sLeftBank) + 90;
  15635. iYPos = Number(sTopBank) + 150;
  15636. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sBtype;//공여자혈액형----
  15637. iXPos = Number(sLeftBank) + 175;
  15638. iYPos = Number(sTopBank) + 140;
  15639. sSndMsg += "V" + iYPos + "H" + iXPos + "BG02100" + sAbocd; // 바코드
  15640. iXPos = Number(sLeftBank) + 220;
  15641. iYPos = Number(sTopBank) + 225;
  15642. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정----
  15643. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + "*" + sAbocd + "*";//공여자혈액형----
  15644. if(sBlodNo != ""){
  15645. iXPos = Number(sLeftBank) + 110;
  15646. iYPos = Number(sTopBank) + 295;
  15647. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + "*" + sBlodNo + "*";
  15648. iXPos = Number(sLeftBank) + 125;
  15649. iYPos = Number(sTopBank) + 385;
  15650. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + "*" + sBlodNo + "*";//혈액번호----
  15651. iXPos = Number(sLeftBank) + 30;
  15652. iYPos = Number(sTopBank) + 460;
  15653. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sBlodbarnm;//성분제제명----
  15654. iXPos = Number(sLeftBank) + 90;
  15655. iYPos = Number(sTopBank) + 480;
  15656. sSndMsg += "V" + iYPos + "H" + iXPos + "BG02100" + sBlodbarcd; // 바코드
  15657. iXPos = Number(sLeftBank) + 140;
  15658. iYPos = Number(sTopBank) + 565;
  15659. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + "*" + sBlodbarcd + "*";
  15660. }
  15661. iXPos = Number(sLeftBank) + 470;
  15662. iYPos = Number(sTopBank) + 300;
  15663. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sBcolldd.substr(0, 4) + "-" + sBcolldd.substr(4, 2) + "-" + sBcolldd.substr(6, 2);//채혈년월일 ----
  15664. iXPos = Number(sLeftBank) + 470;
  15665. iYPos = Number(sTopBank) + 330;
  15666. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sBcolldd.substr(8, 2) + ":" + sBcolldd.substr(10, 2);//채혈시간 ----
  15667. iXPos = Number(sLeftBank) + 470;
  15668. iYPos = Number(sTopBank) + 380;
  15669. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sValiDt.substr(0, 4) + "-" + sValiDt.substr(4, 2) + "-" + sValiDt.substr(6, 2); //유효일자----
  15670. iXPos = Number(sLeftBank) + 470;
  15671. iYPos = Number(sTopBank) + 410;
  15672. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sValiDt.substr(8, 2) + ":" + sValiDt.substr(10, 2);//유효시간----
  15673. iXPos = Number(sLeftBank) + 470;
  15674. iYPos = Number(sTopBank) + 465;
  15675. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sPid; //등록번호----
  15676. iXPos = Number(sLeftBank) + 470;
  15677. iYPos = Number(sTopBank) + 515;
  15678. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatNm.substr(0, 20), 1, 1);
  15679. iXPos = Number(sLeftBank) + 560;
  15680. iYPos = Number(sTopBank) + 510;
  15681. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sAboRh; //환자혈액형----
  15682. if(sBlodNo != ""){
  15683. iXPos = Number(sLeftBank) + 470;
  15684. iYPos = Number(sTopBank) + 580;
  15685. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sDnorNm.substr(0, 20), 1, 1);
  15686. iXPos = Number(sLeftBank) + 560;
  15687. iYPos = Number(sTopBank) + 575;
  15688. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sBtype; //공여자혈액형----
  15689. }
  15690. //보관방법, 사용방법, 혈소판 or 백혈구 수
  15691. var sText11, sText12, sText13, sText14, sText15, sText21, sText22, sText23, sText24, sText25, sText31, sText32, sText33, sText34, sText35;
  15692. if(sBlodbarcd =="A0003"){ //HPC
  15693. //var sText1 = "* 보관 방법 : 약한 교반으로 20~24도 보관 " ;
  15694. //var sText2 = "* 사용 방법 : 제조후 120시간이내 혈소판 수혈세트 사용
  15695. // 정맥 수혈" ;
  15696. //var sText3 = "* 혈소판 수 : ( X 10 ) 용량 ( )ml" ;
  15697. //alert("sText1= " + sText1);
  15698. sText11 = "보관 방법";
  15699. sText12 = "약한 교반으로";
  15700. sText13 = "20-24";
  15701. sText14 = "도 보관";
  15702. sText15 = ":"
  15703. sText21 = "사용 방법";
  15704. sText25 = "제조후";
  15705. sText22 = "120";
  15706. sText23 = "시간이내 혈소판 수혈세트 사용";
  15707. sText24 = "정맥 수혈";
  15708. sText31 = "혈소판 수";
  15709. sText32 = "( X )";
  15710. sText33 = "용량";
  15711. sText34 = "( )ml";
  15712. sText35 = "11";
  15713. }else if(sBlodbarcd =="A0004"){ //DGI
  15714. //var sText1 = "* 보관 방법: 실온보관 " ;
  15715. //var sText2 = "* 사용 방법: 제조후 즉시, PRP세트 사용
  15716. // 정맥수혈" ;
  15717. //var sText3 = "* 백혈구수 ( X ) 용량 ( )ml ]" ;
  15718. sText11 = "보관 방법";
  15719. sText12 = "실온보관";
  15720. sText15 = ":"
  15721. sText21 = "사용 방법";
  15722. sText25 = "제조후 즉시,";
  15723. sText22 = "PRP";
  15724. sText23 = "세트 사용";
  15725. sText24 = "정맥 수혈";
  15726. sText31 = "백혈구 수";
  15727. sText32 = "( X )";
  15728. sText33 = "용량";
  15729. sText34 = "( )ml";
  15730. sText35 = "11";
  15731. }else if((sBlodbarcd =="A0001") || (sBlodbarcd =="A0002") || (sBlodbarcd =="04064")){ // 자가, 전혈
  15732. //var sText1 = "* 보관 방법 / 1 6도 보관 " ;
  15733. //var sText2 = "* 사용 방법 / 수혈세트 사용하여 정맥 수혈" ;
  15734. //var sText3 = "* 용 량 / 365 +- 32ml" ;
  15735. ///var sText1 = " 보관 방법 섭씨 1에서 6도 보관 ";
  15736. var sText41 = "보관 방법";
  15737. var sText42 = "1-6";
  15738. var sText43 = "도 보관";
  15739. //var sText2 = " 사용 방법 수혈세트 사용하여 정맥 수혈";
  15740. var sText51 = "사용 방법";
  15741. var sText52 = "수혈세트";
  15742. var sText53 = "사용하여";
  15743. var sText54 = "정맥 수혈";
  15744. //var sText3 = " 용 량 365 32ml";
  15745. var sText61 = "용 량"
  15746. var sText62 = "365 + 32ml";
  15747. //var sText63 = "+";
  15748. var sText64 = "_";
  15749. }
  15750. if((sBlodbarcd =="A0003") || (sBlodbarcd =="A0004")){ //HPC, DGI
  15751. //1째줄
  15752. iXPos = Number(sLeftBank) + 30;
  15753. iYPos = Number(sTopBank) + 695;
  15754. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText11, 1, 1); // 보관 방법
  15755. iXPos = Number(sLeftBank) + 155;
  15756. iYPos = Number(sTopBank) + 700;
  15757. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sText15;
  15758. iXPos = Number(sLeftBank) + 172;
  15759. iYPos = Number(sTopBank) + 695;
  15760. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText12, 1, 1); // 약한 교반으로 or 실온보관
  15761. if(sBlodbarcd =="A0003"){
  15762. iXPos = Number(sLeftBank) + 350;
  15763. iYPos = Number(sTopBank) + 700;
  15764. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sText13; //혈소판
  15765. iXPos = Number(sLeftBank) + 420;
  15766. iYPos = Number(sTopBank) + 695;
  15767. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText14, 1, 1); // 도 보관 --혈소
  15768. }
  15769. //2째줄
  15770. iXPos = Number(sLeftBank) + 30;
  15771. iYPos = Number(sTopBank) + 723;
  15772. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText21, 1, 1); // 사용 방법
  15773. iXPos = Number(sLeftBank) + 155;
  15774. iYPos = Number(sTopBank) + 728;
  15775. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sText15;
  15776. iXPos = Number(sLeftBank) + 172;
  15777. iYPos = Number(sTopBank) + 723;
  15778. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText25, 1, 1); // 제조후 or 제조후 즉시
  15779. if(sBlodbarcd =="A0003"){ //HPC
  15780. iXPos = Number(sLeftBank) + 250;
  15781. iYPos = Number(sTopBank) + 728;
  15782. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sText22;
  15783. iXPos = Number(sLeftBank) + 290;
  15784. iYPos = Number(sTopBank) + 723;
  15785. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText23, 1, 1); // 시간이내 혈소판 수혈세트
  15786. }else{ //DGI
  15787. iXPos = Number(sLeftBank) + 340;
  15788. iYPos = Number(sTopBank) + 728;
  15789. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sText22;// PRP
  15790. iXPos = Number(sLeftBank) + 380;
  15791. iYPos = Number(sTopBank) + 723;
  15792. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText23, 1, 1); // 세트사용
  15793. }
  15794. //3째줄
  15795. iXPos = Number(sLeftBank) + 172;
  15796. iYPos = Number(sTopBank) + 751;
  15797. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText24, 1, 1); // 정맥 수혈
  15798. //4째줄
  15799. iXPos = Number(sLeftBank) + 30;
  15800. iYPos = Number(sTopBank) + 775;
  15801. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText31, 1, 1); // 혈소판 수
  15802. iXPos = Number(sLeftBank) + 155;
  15803. iYPos = Number(sTopBank) + 780;
  15804. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sText15;//:
  15805. iXPos = Number(sLeftBank) + 170;
  15806. iYPos = Number(sTopBank) + 780;
  15807. sSndMsg += lzzfBP_ChangeFont("C", 10, 10);
  15808. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sText32; // ( X )
  15809. iXPos = Number(sLeftBank) + 300;
  15810. iYPos = Number(sTopBank) + 770;
  15811. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sText35; // 11
  15812. iXPos = Number(sLeftBank) + 250;
  15813. iYPos = Number(sTopBank) + 780;
  15814. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + "10"; // 10
  15815. iXPos = Number(sLeftBank) + 360;
  15816. iYPos = Number(sTopBank) + 775;
  15817. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText33, 1, 1); // 용량
  15818. iXPos = Number(sLeftBank) + 420;
  15819. iYPos = Number(sTopBank) + 780;
  15820. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sText34; // ( )ml
  15821. iXPos = Number(sLeftBank) + 450;
  15822. iYPos = Number(sTopBank) + 780;
  15823. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sBlodVol;
  15824. }else if((sBlodbarcd =="A0001") || (sBlodbarcd =="A0002") || (sBlodbarcd =="04064")){
  15825. // 1째줄
  15826. iXPos = Number(sLeftBank) + 24;
  15827. iYPos = Number(sTopBank) + 705;
  15828. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText41, 1, 1); // 보관 방법
  15829. iXPos = Number(sLeftBank) + 170;
  15830. iYPos = Number(sTopBank) + 710;
  15831. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sText42;//1-6
  15832. iXPos = Number(sLeftBank) + 210;
  15833. iYPos = Number(sTopBank) + 705;
  15834. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText43, 1, 1); // 도 보관
  15835. // 2째줄
  15836. iXPos = Number(sLeftBank) + 24;
  15837. iYPos = Number(sTopBank) + 740;
  15838. sSndMsg += CommAX.PrtImgOut(iXPos , iYPos, sText51, 1, 1); // 사용 방법
  15839. iXPos = Number(sLeftBank) + 170;
  15840. iYPos = Number(sTopBank) + 740;
  15841. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText52, 1, 1); // 수혈세트
  15842. iXPos = Number(sLeftBank) + 290;
  15843. iYPos = Number(sTopBank) + 740;
  15844. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText53, 1, 1); // 사용하여
  15845. iXPos = Number(sLeftBank) + 410;
  15846. iYPos = Number(sTopBank) + 740;
  15847. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText54, 1, 1); // 정맥 수혈
  15848. //3째줄
  15849. iXPos = Number(sLeftBank) + 24;
  15850. iYPos = Number(sTopBank) + 775;
  15851. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sText61, 1, 1); // 용 량
  15852. iXPos = Number(sLeftBank) + 170;
  15853. iYPos = Number(sTopBank) + 780;
  15854. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sText62;// 365 + 32ml
  15855. iXPos = Number(sLeftBank) + 218;
  15856. iYPos = Number(sTopBank) + 780;
  15857. sSndMsg += "V" + iYPos + "H" + iXPos + "S" + sText64; // _
  15858. }
  15859. sSndMsg += "Q" + "1" + "Z";
  15860. //alert(sSndMsg);
  15861. CommAX.SendMsg(sSndMsg);
  15862. }// end sato
  15863. //===============================================================================================================================
  15864. else if(sPrntKind == "8"){ // 헌혈 b472 여의도성모 바코드 ★★★
  15865. // alert("b472");
  15866. //var sB472size = "";
  15867. //var sB472sizegbn = model.getValue(barcdRef + "[1]/blank/b472size");
  15868. //if(sB472sizegbn == "2"){ // 320 630
  15869. // sB472size = "0340,0620,0340"; // 기존라벨
  15870. //}else{
  15871. // sB472size = "0350,0550,0330"; // nUsize
  15872. //}
  15873. //sSndMsg += "{D" + sB472size + "|}"; // 라벨사이즈
  15874. // sSndMsg += "{D0350,0800,0330|}"; // 라벨사이즈 -- 혈액은행사이즈
  15875. sSndMsg += "{C|}"; // 버퍼클리어
  15876. sSndMsg += "{D0950,0900,0900|}"; // 라벨사이즈
  15877. //sSndMsg += "{C|}"; // 버퍼클리어
  15878. sSndMsg += "{AX;-000,-000,+00|}"; // 피트량
  15879. iXPos = Number(sLeftBank) + 120;
  15880. iYPos = Number(sTopBank)+40;
  15881. sSndMsg += lzzfBP_HanDisp48(sTitle, iXPos, iYPos); // 타이틀----
  15882. // -- 환자 -- //
  15883. iXPos = Number(sLeftBank) + 270;
  15884. iYPos = Number(sTopBank) + 180;
  15885. //sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sPid); //등록번호
  15886. sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 40, 40, sPid); //등록번호
  15887. iXPos = Number(sLeftBank) + 270;
  15888. iYPos = Number(sTopBank)+210;
  15889. sSndMsg += lzzfBP_HanDisp32(sPatNm, iXPos, iYPos); // 환자명
  15890. iXPos = Number(sLeftBank) + 270;
  15891. iYPos = Number(sTopBank) + 310;
  15892. sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 40, 40, aSexAge); //환자 성별나이
  15893. if(sCommKind == "01") {
  15894. CommAX.SendMessageToLPT(sSndMsg);
  15895. } else if(sCommKind == "02") {
  15896. CommAX.SendMessage(sSndMsg);
  15897. sSndMsg= "";
  15898. }
  15899. if(sWardRoom!=""){
  15900. iXPos = Number(sLeftBank) + 270;
  15901. iYPos = Number(sTopBank)+335;
  15902. sSndMsg += lzzfBP_HanDisp32(sWardRoom, iXPos, iYPos); // 병동 병실
  15903. }
  15904. if(sAboRh!=""){
  15905. iXPos = Number(sLeftBank) + 640;
  15906. iYPos = Number(sTopBank) + 260;
  15907. sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 70, 70, sAboRh); //환자혈액형
  15908. }
  15909. if(sAbocd!=""){
  15910. iXPos = Number(sLeftBank)+ 620;
  15911. iYPos = Number(sTopBank)+ 270;
  15912. sSndMsg += lzzfBP_BarCode_Code39_B472(iXPos, iYPos, 4, 4, "*" + sAbocd + "*", 80); //혈액형 바코드
  15913. }
  15914. if(sCommKind == "01") {
  15915. CommAX.SendMessageToLPT(sSndMsg);
  15916. } else if(sCommKind == "02") {
  15917. CommAX.SendMessage(sSndMsg);
  15918. sSndMsg= "";
  15919. }
  15920. if(sAbocd!=""){
  15921. iXPos = Number(sLeftBank) + 650;
  15922. iYPos = Number(sTopBank) + 375;
  15923. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, "* " + sAbocd + " *"); //혈액형 바코드텍스트
  15924. }
  15925. // -- 공여자 -- //
  15926. if(sBtype!=""){
  15927. iXPos = Number(sLeftBank) + 640;
  15928. iYPos = Number(sTopBank) + 495;
  15929. sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 70, 70, sBtype); //공혈자혈액형
  15930. }
  15931. if(sDnorNm!=""){
  15932. iXPos = Number(sLeftBank) + 270;
  15933. iYPos = Number(sTopBank) + 400;
  15934. sSndMsg += lzzfBP_HanDisp32(sDnorNm, iXPos, iYPos); // 공여자명
  15935. }
  15936. if(sCommKind == "01") {
  15937. CommAX.SendMessageToLPT(sSndMsg);
  15938. } else if(sCommKind == "02") {
  15939. CommAX.SendMessage(sSndMsg);
  15940. sSndMsg= "";
  15941. }
  15942. if(sDnsexage!=""){
  15943. iXPos = Number(sLeftBank) + 270;
  15944. iYPos = Number(sTopBank) + 495;
  15945. sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 40, 40, sDnsexage); //환자 성별나이
  15946. }
  15947. if(sBcolldd!="sBcolldd"){
  15948. iXPos = Number(sLeftBank) + 270;
  15949. iYPos = Number(sTopBank) + 550;
  15950. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sBcolldd.substr(0, 4) + "-" + sBcolldd.substr(4, 2) + "-" + sBcolldd.substr(6, 2)); //채혈년월일
  15951. iXPos = Number(sLeftBank) + 430;
  15952. iYPos = Number(sTopBank) + 550;
  15953. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sBcolldd.substr(8, 2) + ":" + sBcolldd.substr(10, 2)); //채혈시간
  15954. }
  15955. if(sCommKind == "01") {
  15956. CommAX.SendMessageToLPT(sSndMsg);
  15957. } else if(sCommKind == "02") {
  15958. CommAX.SendMessage(sSndMsg);
  15959. sSndMsg= "";
  15960. }
  15961. if(sValiDt!=""){
  15962. iXPos = Number(sLeftBank) + 530;
  15963. iYPos = Number(sTopBank) + 555;
  15964. sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 30, 30, sValiDt.substr(0, 4) + "-" + sValiDt.substr(4, 2) + "-" + sValiDt.substr(6, 2)); //유효일자
  15965. iXPos = Number(sLeftBank) + 760;
  15966. iYPos = Number(sTopBank) + 555;
  15967. sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 30, 30, sValiDt.substr(8, 2) + ":" + sValiDt.substr(10, 2)); //유효시간
  15968. }
  15969. if(sBlodVol!=""){
  15970. iXPos = Number(sLeftBank) + 260;
  15971. iYPos = Number(sTopBank) + 620;
  15972. sSndMsg += lzzfBP_FieldDataA_B472(iXPos, iYPos, 40, 40, sBlodVol + " ml"); //헌혈한 용량
  15973. }
  15974. if(sCommKind == "01") {
  15975. CommAX.SendMessageToLPT(sSndMsg);
  15976. } else if(sCommKind == "02") {
  15977. CommAX.SendMessage(sSndMsg);
  15978. sSndMsg= "";
  15979. }
  15980. if(sBlodbarnm!=""){
  15981. iXPos = Number(sLeftBank) + 440;
  15982. iYPos = Number(sTopBank) + 615;
  15983. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, sBlodbarnm); //성분제제명
  15984. }
  15985. if(sBcollnm!=""){
  15986. iXPos = Number(sLeftBank) + 500;
  15987. iYPos = Number(sTopBank) + 650;
  15988. sSndMsg += lzzfBP_HanDisp32("채혈자:" + sBcollnm, iXPos, iYPos); // 공여자명
  15989. }
  15990. if(sCommKind == "01") {
  15991. CommAX.SendMessageToLPT(sSndMsg);
  15992. } else if(sCommKind == "02") {
  15993. CommAX.SendMessage(sSndMsg);
  15994. sSndMsg= "";
  15995. }
  15996. if(sBlodNo != ""){
  15997. iXPos = Number(sLeftBank)+ 40;
  15998. iYPos = Number(sTopBank)+ 770;
  15999. sSndMsg += lzzfBP_BarCode_Code39_B472(iXPos, iYPos, 4, 4, "*" + sBlodNo + "*",90); //혈액번호 바코드
  16000. // iXPos = Number(sLeftBank) + 110;
  16001. // iYPos = Number(sTopBank) + 295;
  16002. // sSndMsg += "^FO"+iXPos+","+iYPos; // 80 가로, 275세로
  16003. // sSndMsg += "^BY2,3.0"; // 크기 2 3= 3:1 배율
  16004. // sSndMsg += "^B2N,80,N,N,N^FD" + "*" + sBlodNo + "*" + "^FS";
  16005. iXPos = Number(sLeftBank) + 120;
  16006. iYPos = Number(sTopBank) + 885;
  16007. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, "* " + sBlodNo + " *"); //혈액번호 텍스트
  16008. if(sCommKind == "01") {
  16009. CommAX.SendMessageToLPT(sSndMsg);
  16010. } else if(sCommKind == "02") {
  16011. CommAX.SendMessage(sSndMsg);
  16012. sSndMsg= "";
  16013. }
  16014. iXPos = Number(sLeftBank)+ 520;
  16015. iYPos = Number(sTopBank)+ 770;
  16016. sSndMsg += lzzfBP_BarCode_Code39_B472(iXPos, iYPos, 4, 4, "*" + sBlodbarcd + "*", 90); //성분제제 바코드
  16017. iXPos = Number(sLeftBank) + 570;
  16018. iYPos = Number(sTopBank) + 885;
  16019. sSndMsg += lzzfBP_FieldDataG_B472(iXPos, iYPos, "*" + sBlodbarcd + "*"); //성분제제코드 텍스트
  16020. }
  16021. sSndMsg += lzzfBP_EndFormat_B472(1);
  16022. if(sCommKind == "01") {
  16023. CommAX.SendMessageToLPT(sSndMsg);
  16024. } else if(sCommKind == "02") {
  16025. // alert("10 " + sSndMsg);
  16026. CommAX.SendMessage(sSndMsg);
  16027. }
  16028. }// end B472
  16029. }//end for
  16030. //portopen이 true이고 통신유형이 com일때 port close
  16031. if( portOpenTF == "TRUE" && sCommKind == "02"){
  16032. CommAX.PortOpen("false");
  16033. }
  16034. }else if((portOpenTF = "FALSE" && sCommKind == "02")){
  16035. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  16036. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  16037. + " \n 2.케이블 확인"
  16038. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  16039. return;
  16040. }
  16041. }
  16042. } //이후 2008-07-07 바코드 포트 오류 막기위해
  16043. catch(ee) {
  16044. sysf_messageBox("바코드출력에", "E009");
  16045. return;
  16046. }
  16047. }
  16048. function fLisTnsrBarcodePrintG2(pRef){
  16049. trace('aaaa');
  16050. //SATO 프린터 Font Size 및 위치, 데이터 내용 확인 필요함.. 출력만 되게 해놓았지만 양식에 맞지 않을것임..
  16051. try{
  16052. trace('bbbb');
  16053. //var vInstance = document.models(0).instances(0);
  16054. var cntHR = pRef.rowcount;
  16055. //var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  16056. var sPrntKind = ds_data_setupinfo.getColumn(0, "prntkind");
  16057. var iXPos = 0;
  16058. var iYPos = 0;
  16059. var aFlag = new Array(); //한글 영문 구분
  16060. var aStr = "";
  16061. var iWidth = 0;
  16062. var test_he = "";
  16063. var test_rtn = "";
  16064. var portOpenTF = "";
  16065. trace('1111');
  16066. if(cntHR > 0 && sPrntKind != "0"){
  16067. trace('2222');
  16068. var sCommKind = ds_data_setupinfo.getColumn(0, "commkind");
  16069. var sLeftBank = ds_data_blank.getColumn(0, "left");
  16070. var sTopBank = ds_data_blank.getColumn(0, "top");
  16071. trace('3333');
  16072. if( (portOpenTF == "TRUE" && sCommKind == "02")
  16073. || (sCommKind == "01")
  16074. || (sCommKind == "03")){
  16075. trace('4444 sPrntKind :'+sPrntKind);
  16076. for(i=0 ; i< cntHR;i++){
  16077. trace('55555');
  16078. var sSndMsg = "^XA^SEE:UHANGUL.DAT^FS^CWQ,E:kfont3.FNT^FS";
  16079. var sBlodNo = pRef.getColumn(i, "blodno");
  16080. var sPid = pRef.getColumn(i, "tnsrpid");
  16081. var sPatNm = pRef.getColumn(i, "tnsrnm");
  16082. var aSexAge = pRef.getColumn(i, "tnssexage");
  16083. var sCMRslt = pRef.getColumn(i, "panjung");
  16084. var sAboRh = pRef.getColumn(i, "tnsrbtype");
  16085. var sBtype = pRef.getColumn(i, "dnbtype");
  16086. var sPrtDD = pRef.getColumn(i, "prtdd");
  16087. var sPrtTM = pRef.getColumn(i, "prttm");
  16088. var sDnorNm = pRef.getColumn(i, "dnornm");
  16089. var sDnsexage = pRef.getColumn(i, "dnsexage");
  16090. var sBcolldd = pRef.getColumn(i, "bcolldt");
  16091. var sValiDt = pRef.getColumn(i, "validt");
  16092. var sTitle = pRef.getColumn(i, "title");
  16093. var sAbocd = pRef.getColumn(i, "abocd");
  16094. var sBlodbarcd = pRef.getColumn(i, "blodbarcd");
  16095. var sBlodbarnm = pRef.getColumn(i, "blodbarnm");
  16096. var sBlodVol = pRef.getColumn(i, "blodvol");
  16097. var sWardRoom = pRef.getColumn(i, "wardroom");
  16098. var sBcollnm = pRef.getColumn(i, "bcollnm");
  16099. if (sLeftBank == "" || sLeftBank == "-"){
  16100. sLeftBank = 0;
  16101. }
  16102. if (sTopBank == "" || sTopBank == "-"){
  16103. sTopBank = 0;
  16104. }
  16105. trace('6666');
  16106. if(sPrntKind == "9"){
  16107. trace('7777');
  16108. iWidth = 0;
  16109. aStr = "";
  16110. aFlag = new Array();
  16111. //aStr = lpzfGetHanGul(sTitle, aFlag);
  16112. // for (var iNo=0; iNo < aStr.length; iNo++) {
  16113. // if (aFlag[iNo] == "E") {
  16114. // iYPos = Number(sTopBank) + 5;
  16115. // iXPos = Number(sLeftBank) + 300 + Number(iWidth);
  16116. // sSndMsg += lzzfBP_ChangeFont("C", 50, 50);
  16117. // sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, aStr[iNo]);
  16118. // iWidth = iWidth + (Number(aStr[iNo].length) * 50);
  16119. // } else {
  16120. // iYPos = Number(sTopBank) + 5;
  16121. // iXPos = Number(sLeftBank) + 300 + Number(iWidth);
  16122. // sSndMsg += "^CI14^FO"+ iXPos +","+ iYPos +"^AQN,50,50^FH^FD" + aStr[iNo] + "^FS^CI1";
  16123. // iWidth = iWidth + (Number(aStr[iNo].length) * 50);
  16124. // }
  16125. // }
  16126. for (var j = 0; j < sTitle.length; j++) {
  16127. oneChar = sTitle.charAt(j);
  16128. test_rtn = "";
  16129. test_he = "";
  16130. test_rtn = lpzfGetHanGul3(oneChar);
  16131. test_he = test_rtn.substring(0,1);
  16132. //trace("oneChar "+oneChar+" / "+test_he);
  16133. if(!utlf_isNull(test_he))
  16134. {
  16135. //----------------------
  16136. if (test_he == "E") {
  16137. iYPos = Number(sTopBank) + 5;
  16138. iXPos = Number(sLeftBank) + 300 + Number(iWidth);
  16139. sSndMsg += lzzfBP_ChangeFont("C", 50, 50);
  16140. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, oneChar);
  16141. iWidth = iWidth + (Number(oneChar.length) * 50);
  16142. } else {
  16143. iYPos = Number(sTopBank) + 5;
  16144. iXPos = Number(sLeftBank) + 300 + Number(iWidth);
  16145. sSndMsg += "^CI14^FO"+ iXPos +","+ iYPos +"^AQN,50,50^FH^FD" + oneChar + "^FS^CI1";
  16146. iWidth = iWidth + (Number(oneChar.length) * 50);
  16147. }
  16148. }
  16149. //trace("oneChar2 "+oneChar+" / "+test_he+" / "+sSndMsg);
  16150. }
  16151. iXPos = Number(sLeftBank) + 105;
  16152. iYPos = Number(sTopBank) + 90;
  16153. sSndMsg += lzzfBP_ChangeFont("C", 80, 40); // 폰트 설정
  16154. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sAboRh);
  16155. iXPos = Number(sLeftBank) + 320;
  16156. iYPos = Number(sTopBank) + 70;
  16157. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  16158. sSndMsg += lzzfBP_BarCode_Code39_300dpi(iXPos, iYPos, "N", 100, "*" + sAbocd + "*");
  16159. iXPos = Number(sLeftBank) + 380;
  16160. iYPos = Number(sTopBank) + 175;
  16161. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  16162. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sAbocd + "*");
  16163. iXPos = Number(sLeftBank) + 150;
  16164. iYPos = Number(sTopBank) + 240;
  16165. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  16166. sSndMsg += lzzfBP_BarCode_Code39_300dpi(iXPos, iYPos, "N", 100, "*" + sBlodNo + "*");
  16167. iXPos = Number(sLeftBank) + 250;
  16168. iYPos = Number(sTopBank) + 345;
  16169. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  16170. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBlodNo + "*");
  16171. iXPos = Number(sLeftBank) + 130;
  16172. iYPos = Number(sTopBank) + 390;
  16173. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  16174. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sBlodbarnm.substring(0, 20));
  16175. iXPos = Number(sLeftBank) + 220;
  16176. iYPos = Number(sTopBank) + 430;
  16177. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  16178. sSndMsg += lzzfBP_BarCode_Code39_300dpi(iXPos, iYPos, "N", 100, "*" + sBlodbarcd + "*");
  16179. iXPos = Number(sLeftBank) + 270;
  16180. iYPos = Number(sTopBank) + 535;
  16181. sSndMsg += lzzfBP_ChangeFont("C", 20, 20); // 폰트 설정
  16182. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, "*" + sBlodbarcd + "*");
  16183. iYPos = Number(sTopBank) + 240;
  16184. iXPos = Number(sLeftBank) + 830;
  16185. sSndMsg += lzzfBP_ChangeFont("C", 30, 20);
  16186. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid);
  16187. trace('88888');
  16188. iWidth = 0;
  16189. aStr = "";
  16190. aFlag = new Array();
  16191. aStr = lpzfGetHanGul(sPatNm, aFlag);
  16192. for (var iNo=0; iNo < aStr.length; iNo++) {
  16193. if (aFlag[iNo] == "E") {
  16194. iYPos = Number(sTopBank) + 310;
  16195. iXPos = Number(sLeftBank) + 840 + Number(iWidth);
  16196. sSndMsg += lzzfBP_ChangeFont("C", 40, 40);
  16197. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, aStr[iNo]);
  16198. iWidth = iWidth + (Number(aStr[iNo].length) * 40);
  16199. } else {
  16200. iYPos = Number(sTopBank) + 310;
  16201. iXPos = Number(sLeftBank) + 840 + Number(iWidth);
  16202. sSndMsg += "^CI14^FO"+ iXPos +","+ iYPos +"^AQN,40,40^FH^FD" + aStr[iNo] + "^FS^CI1";
  16203. iWidth = iWidth + (Number(aStr[iNo].length) * 40);
  16204. }
  16205. }
  16206. trace('9999');
  16207. iYPos = Number(sTopBank) + 380;
  16208. iXPos = Number(sLeftBank) + 800;
  16209. sSndMsg += lzzfBP_ChangeFont("C", 30, 20);
  16210. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPrtDD.substring(0, 4) + "-" + sPrtDD.substring(4, 6) + "-" + sPrtDD.substring(6, 8));
  16211. iYPos = Number(sTopBank) + 450;
  16212. iXPos = Number(sLeftBank) + 800;
  16213. sSndMsg += lzzfBP_ChangeFont("C", 30, 20);
  16214. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sValiDt.substring(0, 4) + "-" + sValiDt.substring(4, 6) + "-" + sValiDt.substring(6, 8));
  16215. trace('1010');
  16216. iWidth = 0;
  16217. aStr = "";
  16218. aFlag = new Array();
  16219. trace('10100000 sBcollnm :'+sBcollnm);
  16220. aStr = lpzfGetHanGul(sBcollnm, aFlag);
  16221. trace('1010111');
  16222. for (var iNo=0; iNo < aStr.length; iNo++) {
  16223. trace('1010222');
  16224. if (aFlag[iNo] == "E") {
  16225. trace('1010333');
  16226. iYPos = Number(sTopBank) + 520;
  16227. iXPos = Number(sLeftBank) + 840 + Number(iWidth);
  16228. sSndMsg += lzzfBP_ChangeFont("C", 40, 40);
  16229. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, aStr[iNo]);
  16230. iWidth = iWidth + (Number(aStr[iNo].length) * 40);
  16231. } else {
  16232. trace('1010444');
  16233. iYPos = Number(sTopBank) + 520;
  16234. iXPos = Number(sLeftBank) + 840 + Number(iWidth);
  16235. sSndMsg += "^CI14^FO"+ iXPos +","+ iYPos +"^AQN,40,40^FH^FD" + aStr[iNo] + "^FS^CI1";
  16236. iWidth = iWidth + (Number(aStr[iNo].length) * 40);
  16237. }
  16238. }
  16239. trace('1020');
  16240. sSndMsg += lzzfBP_EndFormat("1");
  16241. trace('1030');
  16242. CommAX.SendMsg(sSndMsg);
  16243. }
  16244. trace('1040');
  16245. }
  16246. }
  16247. }
  16248. }catch(ee) {
  16249. sysf_messageBox("바코드출력에", "E009");
  16250. return;
  16251. }
  16252. }
  16253. function fchildsearch(xrwid)
  16254. {
  16255. var child = frmf_findPopup(xrwid);
  16256. if(utlf_isNull(child))
  16257. {
  16258. return;
  16259. }
  16260. else
  16261. {
  16262. child.Onclick_btnRef("R");
  16263. return child;
  16264. }
  16265. }
  16266. function fCOMLIS_ResultValidation(pRef, pGridID, pRsltstat, pIsMsg)
  16267. {
  16268. var isRstErr = "false";
  16269. var isSelected = "false";
  16270. var nGridMaxRow = pRef.rowcount; //pGridID.rows - 1;
  16271. var isUpdate = "false";
  16272. var vMsg = ""
  16273. //trace("pRsltstat =>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> " + pRsltstat);
  16274. if (pIsMsg == "true")
  16275. {
  16276. if (pRsltstat == "1")
  16277. {
  16278. var vMsg = "결과저장"
  16279. }
  16280. else if (pRsltstat == "2")
  16281. {
  16282. var vMsg = "중간(예비)보고"
  16283. }
  16284. else if (pRsltstat == "4")
  16285. {
  16286. var vMsg = "최종보고"
  16287. }
  16288. else
  16289. {
  16290. var vMsg = "추가";
  16291. }
  16292. }
  16293. var vTestCDLIST = "";
  16294. var vTestCDRsltLIST = "";
  16295. for (var i = 0; i < nGridMaxRow; i++)
  16296. {
  16297. // 선택된 항목만 Validation 체크한다.
  16298. if(pRef.getColumn(i, "sel_value") == 1 || pRef.getColumn(i, "sel_value") == "true")
  16299. {
  16300. isSelected = "true";
  16301. var vTclsscrnm = pRef.getColumn(i, "tclsscrnm");
  16302. var vTclskind = pRef.getColumn(i, "tclskind");
  16303. var vParentrsltinptyn = pRef.getColumn(i, "parentrsltinptyn"); // 타이틀 구분
  16304. var vReptrslt = utlf_transNullToEmpty(pRef.getColumn(i, "reptrslt"));
  16305. // 결과 수정기능 체크
  16306. // 최종보고시 이상치 결과는 최종보고권한이 있는 유저만 가능함
  16307. // ※ 진단검사 초기 정보를 이용한 사용자 권한 가져오기( 화면오픈시 정보 조회해야함 )
  16308. if (pRsltstat == "4")
  16309. {
  16310. var vPanicMark = pRef.getColumn(i, "panicmark");
  16311. var vDeltaMark = pRef.getColumn(i, "deltamark");
  16312. var vCriticalMark = pRef.getColumn(i, "criticalmark");
  16313. var vAlertMark = pRef.getColumn(i, "alertmark");
  16314. var vRsltmark = pRef.getColumn(i, "rsltmark");
  16315. var updateTF = false;
  16316. if(pRef.getColumn(i, "rsltstat") == "4" || pRef.getColumn(i, "rsltstat") == "5")
  16317. {
  16318. updateTF = true;
  16319. }
  16320. }
  16321. // trace("-------------------------------------------------------------")
  16322. // trace("vTclskind =>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> " + vTclskind);
  16323. // trace("-------------------------------------------------------------")
  16324. // trace("updateTF =>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> " + updateTF);
  16325. // trace("-------------------------------------------------------------")
  16326. if (vTclskind == "2")
  16327. {
  16328. // Single항목 체크
  16329. if( pRsltstat != '10' && utlf_isNull(vReptrslt.getTrim()))
  16330. {
  16331. sysf_messageBox("[" + vTclsscrnm + "]항목은 공백인 결과는 입력할 수 없습니다." , "I","");
  16332. isRstErr = "true";
  16333. break;
  16334. }
  16335. pRef.setRowType(i, Dataset.ROWTYPE_UPDATE);
  16336. isUpdate = "true";
  16337. if(updateTF)
  16338. {
  16339. vTestCDLIST = vTestCDLIST + "'" + utlf_transNullToEmpty(pRef.getColumn(i, "testcd")) + "',";
  16340. vTestCDRsltLIST = vTestCDRsltLIST + utlf_transNullToEmpty(pRef.getColumn(i, "testcd")) + "▦" +
  16341. utlf_transNullToEmpty(pRef.getColumn(i, "reptrslt")) + "▩";
  16342. }
  16343. }
  16344. else if (vTclskind == "3")
  16345. {
  16346. // Parent항목은 조건에 따라 Child항목만 체크
  16347. // trace("-------------------------------------------------------------")
  16348. // trace("vParentrsltinptyn.getTrim() = " + vParentrsltinptyn.getTrim());
  16349. // trace("-------------------------------------------------------------")
  16350. if (vParentrsltinptyn.getTrim() != "N") //Parent인데 입력가능한 항목들
  16351. {
  16352. var vTestcd = pRef.getColumn(i, "testcd");
  16353. var vN_Inptrslt = pRef.getColumn(i, "inptrslt");
  16354. var vO_Inptrslt = ds_hidden_TestInfo_getTestInfoCnts.lookup("testcd", vTestcd, "bfinptrslt");
  16355. if(vN_Inptrslt == vO_Inptrslt)
  16356. {
  16357. if((vN_Inptrslt != "C" && utlf_isNull(vO_Inptrslt)) || (pRsltstat == pRef.getColumn(i, "rsltstat")) && ("Y" != pRef.getColumn(i, "retestyn")))
  16358. {
  16359. }
  16360. else
  16361. {
  16362. pRef.setRowType(i, Dataset.ROWTYPE_UPDATE);
  16363. isUpdate = "true";
  16364. if(updateTF)
  16365. {
  16366. vTestCDLIST = vTestCDLIST +"'"+utlf_transNullToEmpty(pRef.getColumn(i, "testcd")) +"',";
  16367. vTestCDRsltLIST = vTestCDRsltLIST + utlf_transNullToEmpty(pRef.getColumn(i, "testcd")) + "▦" +
  16368. utlf_transNullToEmpty(pRef.getColumn(i, "reptrslt")) + "▩";
  16369. }
  16370. }
  16371. }
  16372. else
  16373. {
  16374. pRef.setRowType(i, Dataset.ROWTYPE_UPDATE);
  16375. isUpdate = "true";
  16376. if(updateTF)
  16377. {
  16378. vTestCDLIST = vTestCDLIST +"'"+utlf_transNullToEmpty(pRef.getColumn(i, "testcd")) +"',";
  16379. vTestCDRsltLIST = vTestCDRsltLIST + utlf_transNullToEmpty(pRef.getColumn(i, "testcd")) + "▦" +
  16380. utlf_transNullToEmpty(pRef.getColumn(i, "reptrslt")) + "▩";
  16381. }
  16382. }
  16383. }
  16384. else //Parent인데 입력 불가능한 항목들
  16385. {
  16386. pRef.setRowType(i, Dataset.ROWTYPE_UPDATE); // Parent 항목제외
  16387. if(updateTF)
  16388. {
  16389. //vTestCDLIST = vTestCDLIST +"'"+ model.getvalue(pRef + "[" + i + "]/testcd")+"',";
  16390. vTestCDLIST = vTestCDLIST +"'"+utlf_transNullToEmpty(pRef.getColumn(i, "testcd")) + "',";
  16391. vTestCDRsltLIST = vTestCDRsltLIST + utlf_transNullToEmpty(pRef.getColumn(i, "testcd")) + "▦" +
  16392. utlf_transNullToEmpty(pRef.getColumn(i, "reptrslt")) + "▩";
  16393. //trace("vTestCDLIST04="+vTestCDLIST);
  16394. }
  16395. }
  16396. // trace("nGridMaxRow = " + nGridMaxRow);
  16397. // trace("-------------------------------------------------------------")
  16398. /* ↑↑↑↑↑↑↑↑↑ Parent항목 chile항목 ↓↓↓↓↓↓↓↓↓*/
  16399. // trace("i = " + i);
  16400. // trace("-------------------------------------------------------------")
  16401. for (var j = i+1; j < nGridMaxRow; j++)
  16402. {
  16403. // trace("j = " + j);
  16404. // trace("-------------------------------------------------------------")
  16405. var vTclsscrnm_SUB = pRef.getColumn(j, "tclsscrnm");
  16406. var vTclskind_SUB = pRef.getColumn(j, "tclskind");
  16407. var sChildessnrsltyn = pRef.getColumn(j, "childessnrsltyn");// Child항목 결과필수 입력[default:'' or '0']
  16408. // trace("vTclsscrnm_SUB = " + vTclsscrnm_SUB);
  16409. // trace("-------------------------------------------------------------")
  16410. // trace("vTclskind_SUB = " + vTclskind_SUB);
  16411. // trace("-------------------------------------------------------------")
  16412. if (vTclskind_SUB != "4" && vTclskind_SUB != "5" )
  16413. {
  16414. break;
  16415. }
  16416. // trace("sChildessnrsltyn.getTrim() = " + sChildessnrsltyn.getTrim());
  16417. // trace("-------------------------------------------------------------")
  16418. if (sChildessnrsltyn.getTrim() == "1")
  16419. {
  16420. // sub필수 항목은 공백입력 안됨...
  16421. //if(pRsltstat != '10' && vReptrslt.getTrim() == "" )
  16422. if(pRsltstat != '10' && utlf_isNull(vReptrslt.getTrim()))
  16423. {
  16424. sysf_messageBox("[" + vTclsscrnm_SUB + "]항목은 공백인 결과는 입력할 수 없습니다." , "I","");
  16425. isRstErr = "true";
  16426. break;
  16427. }
  16428. }
  16429. var vTestcd = pRef.getColumn(j, "testcd");
  16430. var vN_Inptrslt = pRef.getColumn(j, "inptrslt");
  16431. var vO_Inptrslt = ds_hidden_TestInfo_getTestInfoCnts.lookup("testcd", vTestcd, "inptrslt");
  16432. // trace("vN_Inptrslt = " + vN_Inptrslt);
  16433. // trace("-------------------------------------------------------------")
  16434. // trace("vO_Inptrslt = " + vO_Inptrslt);
  16435. // trace("-------------------------------------------------------------")
  16436. if(vN_Inptrslt == vO_Inptrslt)
  16437. {
  16438. if(((vTclskind_SUB != "4" && vTclskind_SUB != "5") && utlf_isNull(vN_Inptrslt)) || ((pRsltstat == pRef.getColumn(j, "rsltstat")) && ("Y" != pRef.getColumn(j, "retestyn"))))
  16439. {
  16440. // trace("ifffffffffffffffffffffffffffffffff");
  16441. }
  16442. else
  16443. {
  16444. pRef.setRowType(j, Dataset.ROWTYPE_UPDATE);
  16445. // trace("ellllllllllllllllllllllllllsssss");
  16446. isUpdate = "true";
  16447. if(updateTF)
  16448. {
  16449. vTestCDLIST = vTestCDLIST +"'" + utlf_transNullToEmpty(pRef.getColumn(j, "testcd")) + "',";
  16450. vTestCDRsltLIST = vTestCDRsltLIST + utlf_transNullToEmpty(pRef.getColumn(j, "testcd")) + "▦" +
  16451. utlf_transNullToEmpty(pRef.getColumn(j, "reptrslt")) + "▩";
  16452. // trace("-------------------------------------------------------------")
  16453. // trace("vTestCDLIST05="+vTestCDLIST);
  16454. // trace("-------------------------------------------------------------")
  16455. }
  16456. }
  16457. }
  16458. else
  16459. {
  16460. pRef.setRowType(j, Dataset.ROWTYPE_UPDATE);
  16461. isUpdate = "true";
  16462. if(updateTF)
  16463. {
  16464. vTestCDLIST = vTestCDLIST + "'" + utlf_transNullToEmpty(pRef.getColumn(j, "testcd")) + "',";
  16465. vTestCDRsltLIST = vTestCDRsltLIST + utlf_transNullToEmpty(pRef.getColumn(j, "testcd")) + "▦" +
  16466. utlf_transNullToEmpty(pRef.getColumn(j, "reptrlst"))+ "▩";
  16467. }
  16468. }
  16469. }
  16470. if (isRstErr == "true") break;
  16471. if(pRef.getColumn(j, "sel_value") == 1 || pRef.getColumn(i, "sel_value") == true)
  16472. {
  16473. if(pRef.getColumn(j, "tclskind") != "4" && pRef.getColumn(j, "tclskind") != "5")
  16474. {
  16475. i = --j;
  16476. continue;
  16477. }
  16478. else
  16479. {
  16480. i = j;
  16481. }
  16482. }
  16483. else
  16484. {
  16485. i = j;
  16486. continue;
  16487. }
  16488. }
  16489. else
  16490. {
  16491. //Single, Parent 항목 외.
  16492. var vTestcd = pRef.getColumn(i, "testcd");
  16493. var vN_Inptrslt = pRef.getColumn(i, "inptrslt");
  16494. var vO_Inptrslt = ds_hidden_TestInfo_getTestInfoCnts.lookup("testcd", vTestcd, "inptrslt");
  16495. if(vN_Inptrslt == vO_Inptrslt)
  16496. {
  16497. if(((vTclskind_SUB != "4" && vTclskind_SUB != "5") && utlf_isNull(vN_Inptrslt)) || ((pRsltstat == pRef.getColumn(j, "rsltstat")) && ("Y" != pRef.getColumn(j, "retestyn"))))
  16498. {
  16499. }
  16500. else
  16501. {
  16502. pRef.setRowType(i, Dataset.ROWTYPE_UPDATE);
  16503. isUpdate = "true";
  16504. if(updateTF)
  16505. {
  16506. vTestCDLIST = vTestCDLIST +"'"+utlf_transNullToEmpty(pRef.getColumn(j, "testcd")) +"',";
  16507. vTestCDRsltLIST = vTestCDRsltLIST + utlf_transNullToEmpty(pRef.getColumn(j, "testcd")) + "▦" +
  16508. utlf_transNullToEmpty(pRef.getColumn(j, "reptrlst"))+ "▩";
  16509. }
  16510. }
  16511. }
  16512. else
  16513. {
  16514. pRef.setRowType(i, Dataset.ROWTYPE_UPDATE);
  16515. isUpdate = "true";
  16516. if(updateTF)
  16517. {
  16518. vTestCDLIST = vTestCDLIST +"'"+utlf_transNullToEmpty(pRef.getColumn(j, "testcd")) +"',";
  16519. vTestCDRsltLIST = vTestCDRsltLIST + utlf_transNullToEmpty(pRef.getColumn(j, "testcd")) + "▦" +
  16520. utlf_transNullToEmpty(pRef.getColumn(j, "reptrlst"))+ "▩";
  16521. }
  16522. }
  16523. }
  16524. }
  16525. }
  16526. trace("isRstErr = " + isRstErr);
  16527. trace("isSelected = " + isSelected);
  16528. trace("pIsMsg = " + pIsMsg);
  16529. trace("isUpdate= " + isUpdate);
  16530. if (isRstErr == "true")
  16531. {
  16532. if (isSelected == "false")
  16533. {
  16534. if (pIsMsg == "true")
  16535. {
  16536. sysf_messageBox(vMsg + "할 항목을 선택해 주십시오." , "I","");
  16537. }
  16538. return "2"; // 선택한항목 없음
  16539. }
  16540. return "1"; // 입력결과 오류
  16541. }
  16542. else
  16543. {
  16544. if (isSelected == "false")
  16545. {
  16546. if (pIsMsg == "true")
  16547. {
  16548. sysf_messageBox(vMsg + "할 항목을 선택해 주십시오." , "I","");
  16549. }
  16550. return "2"; // 선택한항목 없음
  16551. }
  16552. if(isUpdate == "false")
  16553. {
  16554. sysf_messageBox("수정된 결과값이 없습니다." , "I","");
  16555. return "1"; // 입력결과 오류
  16556. }
  16557. trace("vTestCDLIST>>>>>>>>>>>> " + vTestCDLIST);
  16558. if(!utlf_isNull(vTestCDLIST))
  16559. {
  16560. ds_hidden_DJGGParrm.setColumn(0, "testcdlist", String(vTestCDLIST).substring(0, String(vTestCDLIST).length-1));
  16561. ds_hidden_DJGGParrm.setColumn(0, "uprsltYN", "Y");
  16562. ds_hidden_DJGGParrm.setColumn(0, "bufDJGG", vTestCDRsltLIST);
  16563. }
  16564. else
  16565. {
  16566. ds_hidden_DJGGParrm.setColumn(0, "uprsltYN", "N");
  16567. }
  16568. return "0"; // 정상
  16569. }
  16570. }
  16571. function fCOMLIS_MicroResultValidation(pRef, pGridID, pRsltstat, pIsMsg)
  16572. {
  16573. var isRstErr = "false";
  16574. var isSelected = "false";
  16575. var nGridMaxRow = ds_grd_CultrueTestInfo.rowcount;
  16576. var isUpdate = "false";
  16577. var vMsg = ""
  16578. if (pIsMsg == "true")
  16579. {
  16580. if (pRsltstat == "1")
  16581. {
  16582. var vMsg = "결과저장"
  16583. }
  16584. else if (pRsltstat == "2")
  16585. {
  16586. var vMsg = "중간(예비)보고"
  16587. }
  16588. else if (pRsltstat == "4")
  16589. {
  16590. var vMsg = "최종보고"
  16591. }
  16592. else
  16593. {
  16594. var vMsg = "추가"
  16595. }
  16596. }
  16597. var vBfTestCDLIST = utlf_transNullToEmpty(ds_hidden_DJGGParrm.getColumn(0, "testcdlist"));
  16598. if(vBfTestCDLIST.length > 1)
  16599. {
  16600. vBfTestCDLIST = vBfTestCDLIST +",";
  16601. }
  16602. var vTestCDLIST = vBfTestCDLIST;
  16603. trace("vTestCDLIST = " + vTestCDLIST);
  16604. var vTestCDRsltLIST = utlf_transNullToEmpty(ds_hidden_DJGGParrm.getColumn(0, "bufDJGG"));
  16605. for (var i = 0; i < ds_grd_CultrueTestInfo.rowcount; i++)
  16606. {
  16607. // 선택된 항목만 Validation 체크한다.
  16608. if(ds_grd_CultrueTestInfo.getColumn(i, "sel_value") == 1)
  16609. {
  16610. isSelected = "true";
  16611. var vTclsscrnm = ds_grd_CultrueTestInfo.getColumn(i, "tclsscrnm");
  16612. var vTclskind = ds_grd_CultrueTestInfo.getColumn(i, "tclskind");
  16613. var vParentrsltinptyn = ds_grd_CultrueTestInfo.getColumn(i, "parentrsltinptyn"); // 타이틀 구분
  16614. var vReptrslt = utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(i, "reptrslt"));
  16615. trace("pRsltstat = " + pRsltstat)
  16616. // 결과 수정기능 체크
  16617. // 최종보고시 이상치 결과는 최종보고권한이 있는 유저만 가능함
  16618. // ※ 진단검사 초기 정보를 이용한 사용자 권한 가져오기( 화면오픈시 정보 조회해야함 )
  16619. if (pRsltstat == "4")
  16620. {
  16621. var vPanicMark = ds_grd_CultrueTestInfo.getColumn(i, "panicmark");
  16622. var vDeltaMarkvar = ds_grd_CultrueTestInfo.getColumn(i, "deltamark");
  16623. var vCriticalMark = ds_grd_CultrueTestInfo.getColumn(i, "criticalmark");
  16624. var vAlertMark = ds_grd_CultrueTestInfo.getColumn(i, "alertmark");
  16625. var vRsltmark = ds_grd_CultrueTestInfo.getColumn(i, "rsltmark");
  16626. updateTF = false;
  16627. if(ds_grd_CultrueTestInfo.getColumn(i, "rsltstat") == "4" || ds_grd_CultrueTestInfo.getColumn(i, "rsltstat") == "5")
  16628. {
  16629. updateTF = true;
  16630. }
  16631. trace("updateTF = " + updateTF);
  16632. }
  16633. trace("vTclskind= " + vTclskind);
  16634. if (vTclskind == "2")
  16635. {
  16636. // Single항목 체크
  16637. if(utlf_isNull(vReptrslt.getTrim()))
  16638. {
  16639. sysf_messageBox("[" + vTclsscrnm + "]항목은 공백인 결과는 입력할 수 없습니다." , "I","");
  16640. isRstErr = "true";
  16641. break;
  16642. }
  16643. grdf_setStatus(pGridID, "U", [i]);
  16644. isUpdate = "true";
  16645. trace("updateTF=<><><><><>>>>>> " + updateTF);
  16646. trace("vTESTCDLIST(1) = " + vTestCDLIST);
  16647. if(updateTF)
  16648. {
  16649. vTestCDLIST = vTestCDLIST +"'"+utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(i, "testcd")) +"',";
  16650. vTestCDRsltLIST = vTestCDRsltLIST + utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(i, "testcd")) + "▦" +
  16651. utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(i, "reptrslt"))+ "▩";
  16652. }
  16653. }
  16654. else if (vTclskind == "3")
  16655. {
  16656. // Parent항목은 조건에 따라 Child항목만 체크
  16657. trace("vParentrsltinptyn= " + vParentrsltinptyn);
  16658. if (vParentrsltinptyn.getTrim() != "N") //Parent인데 입력가능한 항목들
  16659. {
  16660. //Parent항목 결과필수 입력[default:'1']
  16661. var vTestcd = ds_grd_CultrueTestInfo.getColumn(i, "testcd");
  16662. var vN_Inptrslt = ds_grd_CultrueTestInfo.getColumn(i, "inptrslt");
  16663. var vO_Inptrslt = ds_hidden_TestInfo_getCultrueTestInfo.lookup("testcd", vTestcd, "inptrslt");
  16664. trace("vTestcd(1) = " + vTestcd);
  16665. trace("vN_Inptrslt(1) = " + vN_Inptrslt);
  16666. trace("vO_Inptrslt(1) = " + vO_Inptrslt);
  16667. if(vN_Inptrslt == vO_Inptrslt)
  16668. {
  16669. if((vN_Inptrslt != "C" && utlf_isNull(vO_Inptrslt)) || ((pRsltstat == ds_grd_CultrueTestInfo.getColumn(i, "rsltstat")) && ("Y" != pRef.getColumn(i, "retestyn"))))
  16670. {
  16671. }
  16672. else
  16673. {
  16674. grdf_setStatus(pGridID, "U", [i]);
  16675. isUpdate = "true";
  16676. if(updateTF)
  16677. {
  16678. vTestCDLIST = vTestCDLIST +"'"+ utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(i, "testcd"))+"',";
  16679. vTestCDRsltLIST = vTestCDRsltLIST + utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(i, "testcd")) + "▦" +
  16680. utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(i, "reptrslt"))+ "▩";
  16681. }
  16682. }
  16683. }
  16684. else
  16685. {
  16686. grdf_setStatus(pGridID, "U", [i]);
  16687. isUpdate = "true";
  16688. if(updateTF)
  16689. {
  16690. vTestCDLIST = vTestCDLIST +"'"+ utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(i, "testcd"))+"',";
  16691. vTestCDRsltLIST = vTestCDRsltLIST + utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(i, "testcd")) + "▦" +
  16692. utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(i, "reptrslt"))+ "▩";
  16693. }
  16694. }
  16695. trace("vTestCDLIST(1) = " +vTestCDLIST);
  16696. trace("vTestCDRsltLIST(1) = " +vTestCDRsltLIST);
  16697. }
  16698. else //Parent인데 입력 불가능한 항목들
  16699. {
  16700. grdf_setStatus(pGridID, "U", [i]); // Parent 항목제외
  16701. trace("else");
  16702. if(updateTF)
  16703. {
  16704. vTestCDLIST = vTestCDLIST +"'"+ utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(i, "testcd"))+"',";
  16705. vTestCDRsltLIST = vTestCDRsltLIST + utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(i, "testcd")) + "▦" +
  16706. utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(i, "reptrslt"))+ "▩";
  16707. }
  16708. }
  16709. /* ↑↑↑↑↑↑↑↑↑ Parent항목 chile항목 ↓↓↓↓↓↓↓↓↓*/
  16710. for(var j = i+1; j < nGridMaxRow; j++)
  16711. {
  16712. var vTclsscrnm_SUB = pRef.getColumn(j, "tclsscrnm");
  16713. var vTclskind_SUB = pRef.getColumn(j, "tclskind");
  16714. var sChildessnrsltyn = pRef.getColumn(j, "childessnrsltyn"); // Child항목 결과필수 입력[default:'' or '0']
  16715. trace("vTclsscrnm_SUB = " + vTclsscrnm_SUB);
  16716. trace("vTclskind_SUB = " + vTclskind_SUB);
  16717. trace("sChildessnrsltyn = " + sChildessnrsltyn);
  16718. if(vTclskind_SUB != "4" && vTclskind_SUB != "5")
  16719. {
  16720. //--j;
  16721. trace("jjjjjjjjjjjjjj = " + j);
  16722. break;
  16723. }
  16724. if(sChildessnrsltyn.getTrim() == "1")
  16725. {
  16726. // sub필수 항목은 공백입력 안됨...
  16727. if( utlf_isNull(vReptrslt.getTrim()))
  16728. {
  16729. sysf_messageBox("[" + vTclsscrnm_SUB + "]항목은 공백인 결과는 입력할 수 없습니다." , "I","");
  16730. isRstErr = "true";
  16731. break;
  16732. }
  16733. }
  16734. var vTestcd = pRef.getColumn(j, "testcd");
  16735. var vN_Inptrslt = pRef.getColumn(j, "inptrslt");
  16736. var vO_Inptrslt = ds_hidden_TestInfo_getCultrueTestInfo.lookup("testcd", vTestcd, "inptrslt");
  16737. trace("vTestcd(2) = " + vTestcd);
  16738. trace("vN_Inptrslt(2)= " +vN_Inptrslt);
  16739. trace("vO_Inptrslt=(2) " +vO_Inptrslt);
  16740. trace("isUpdate(2) = " + isUpdate);
  16741. if(vN_Inptrslt == vO_Inptrslt)
  16742. {
  16743. if(((vTclskind_SUB != "4" && vTclskind_SUB != "5") && utlf_isNull(vN_Inptrslt )) || ((pRsltstat == ds_grd_CultrueTestInfo.getColumn(j, "rsltstat")) && ("Y" != pRef.getColumn(j, "retestyn"))))
  16744. {
  16745. trace("iffffffffff");
  16746. trace("isUpdate(3) = " + isUpdate);
  16747. }
  16748. else
  16749. {
  16750. grdf_setStatus(pGridID, "U", [i]);
  16751. isUpdate = "true";
  16752. trace("elsssssssssssssss");
  16753. if(updateTF)
  16754. {
  16755. vTestCDLIST = vTestCDLIST +"'"+ utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(j, "testcd"))+"',";
  16756. vTestCDRsltLIST = vTestCDRsltLIST + utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(j, "testcd")) + "▦" +
  16757. utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(j, "reptrslt"))+ "▩";
  16758. }
  16759. }
  16760. }
  16761. else
  16762. {
  16763. grdf_setStatus(pGridID, "U", [i]);
  16764. isUpdate = "true";
  16765. trace("updateTF = " + updateTF);
  16766. if(updateTF)
  16767. {
  16768. vTestCDLIST = vTestCDLIST +"'"+ utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(j, "testcd"))+"',";
  16769. vTestCDRsltLIST = vTestCDRsltLIST + utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(j, "testcd")) + "▦" +
  16770. utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(j, "reptrslt"))+ "▩";
  16771. }
  16772. trace("vTestCDLIST");
  16773. }
  16774. }
  16775. if (isRstErr == "true") break;
  16776. if(pRef.getColumn(j, "sel_value") == 1)
  16777. {
  16778. if(pRef.getColumn(j, "tclskind") != "4" && ds_getCultrueTestInfo.getColumn(j, "tclskind") != "5")
  16779. {
  16780. i = --j;
  16781. continue;
  16782. }
  16783. else
  16784. {
  16785. i = j;
  16786. }
  16787. }
  16788. else
  16789. {
  16790. i = j;
  16791. continue;
  16792. }
  16793. }
  16794. else //Single, Parent 항목 외.
  16795. {
  16796. trace("<<<<<<<<<<<<<<<<<<else>>>>>>>>>>>>>>>>>>");
  16797. var vTestcd = ds_getCultrueTestInfo.getColumn(i, "testcd");
  16798. var vN_Inptrslt = ds_getCultrueTestInfo.getColumn(i, "inptrslt");
  16799. var vO_Inptrslt = ds_hidden_TestInfo_getCultrueTestInfo.lookup("testcd", vTestcd, "inptrslt");
  16800. if(vN_Inptrslt == vO_Inptrslt)
  16801. {
  16802. if(((vTclskind_SUB != "4" && vTclskind_SUB != "5") && utlf_isNull(vN_Inptrslt)) || ((pRsltstat == ds_getCultrueTestInfo.getColumn(i, "rsltstat")) && ("Y" != pRef.getColumn(i, "retestyn"))))
  16803. {
  16804. }
  16805. else
  16806. {
  16807. grdf_setStatus(pGridID, "U", [i]);
  16808. isUpdate = "true";
  16809. if(updateTF)
  16810. {
  16811. vTestCDLIST = vTestCDLIST +"'"+ utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(j, "testcd"))+"',";
  16812. vTestCDRsltLIST = vTestCDRsltLIST + utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(j, "testcd")) + "▦" +
  16813. utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(j, "reptrslt"))+ "▩";
  16814. }
  16815. }
  16816. }
  16817. else
  16818. {
  16819. // objDs.setRowType(i, Dataset.ROWTYPE_UPDATE);
  16820. grdf_setStatus(pGridID, "U", [i]);
  16821. isUpdate = "true";
  16822. if(updateTF)
  16823. {
  16824. vTestCDLIST = vTestCDLIST +"'"+ utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(j, "testcd"))+"',";
  16825. vTestCDRsltLIST = vTestCDRsltLIST + utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(j, "testcd")) + "▦" +
  16826. utlf_transNullToEmpty(ds_grd_CultrueTestInfo.getColumn(j, "reptrslt"))+ "▩";
  16827. }
  16828. }
  16829. }
  16830. }
  16831. }
  16832. if (isRstErr == "true")
  16833. {
  16834. if (isSelected == "false")
  16835. {
  16836. if (pIsMsg == "true")
  16837. {
  16838. sysf_messageBox(vMsg + "할 항목을 선택해 주십시오." , "I","");
  16839. }
  16840. return "2"; // 선택한항목 없음
  16841. }
  16842. return "1"; // 입력결과 오류
  16843. }
  16844. else
  16845. {
  16846. if(isSelected == "false")
  16847. {
  16848. if (pIsMsg == "true")
  16849. {
  16850. sysf_messageBox(vMsg + "할 항목을 선택해 주십시오." , "I","");
  16851. }
  16852. return "2"; // 선택한항목 없음
  16853. }
  16854. if(isUpdate == "false")
  16855. {
  16856. sysf_messageBox("수정된 결과값이 없습니다." , "I","");
  16857. return "1"; // 입력결과 오류
  16858. }
  16859. //if(vTestCDLIST != "")
  16860. trace("vTestCDLIST=>>>>>>>>> " + vTestCDLIST);
  16861. if( !utlf_isNull(vTestCDLIST))
  16862. {
  16863. ds_hidden_DJGGParrm.setColumn(0, "testcdlist", String(vTestCDLIST).substring(0, String(vTestCDLIST).length-1));
  16864. ds_hidden_DJGGParrm.setColumn(0, "uprsltYN", "Y");
  16865. ds_hidden_DJGGParrm.setColumn(0, "bufDJGG", vTestCDRsltLIST);
  16866. }
  16867. else
  16868. {
  16869. ds_hidden_DJGGParrm.setColumn(0, "uprsltYN", "N");
  16870. }
  16871. return "0"; // 정상
  16872. }
  16873. }
  16874. /**
  16875. * 미생물 배지 라벨
  16876. */
  16877. function fLisMicroBarcodePrint(pRef)
  16878. {
  16879. try
  16880. {
  16881. var cntHR = pRef.rowcount;
  16882. var sPrntKind = ds_data_setupinfo.getColumn(0, "prntkind");
  16883. var iXPos = 0;
  16884. var iYPos = 0;
  16885. var portOpenTF = "";
  16886. if(cntHR > 0 && sPrntKind != 0)
  16887. {
  16888. var sCommKind = ds_data_setupinfo.getColumn(0, "commkind");
  16889. var sLeftBank = ds_data_blank.getColumn(0, "left");
  16890. var sTopBank = ds_data_blank.getColumn(0, "top");
  16891. trace("sCommKind =>> " + sCommKind);
  16892. if(sCommKind == "01")
  16893. {
  16894. var sSetUpVal = ds_data_comm02.getColumn(0, "setupval");
  16895. }
  16896. else if(sCommKind == "02")
  16897. {
  16898. var sComm = ds_data_comm02.getColumn(0, "comm");
  16899. var sDataBit = ds_data_comm02.getColumn(0, "databit");
  16900. var sStopBit = ds_data_comm02.getColumn(0, "stopbit");
  16901. var sBudRate = ds_data_comm02.getColumn(0, "baudrate");
  16902. var sParity = ds_data_comm02.getColumn(0, "parity");
  16903. CommAX.CommPort = sComm;
  16904. CommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  16905. portOpenTF = CommAX.PortOpen("true");
  16906. }
  16907. else if(sCommKind == "03")
  16908. {
  16909. var sSetUpVal = ds_data_comm03.getColumn(0, "setupval");
  16910. }
  16911. if( (portOpenTF == "TRUE" && sCommKind == "02")|| (sCommKind == "01")|| (sCommKind == "03"))
  16912. {
  16913. for(i = 0 ; i < cntHR; i++)
  16914. {
  16915. var sSndMsg = "";
  16916. var sPid = pRef.getColumn(i, "pid");
  16917. var sSexage = pRef.getColumn(i, "sexage");
  16918. var sPatnm = pRef.getColumn(i, "patnm");
  16919. var sSpclblnm = pRef.getColumn(i, "spclblnm");
  16920. var sAcptdt = pRef.getColumn(i, "acptdt");
  16921. var sMdialblnm = pRef.getColumn(i, "mdialblnm");
  16922. var sWardinfo = pRef.getColumn(i, "wardinfo");
  16923. var sWorkno = pRef.getColumn(i, "workno");
  16924. var sBcno = pRef.getColumn(i, "bcno");
  16925. var sPrntcnt = pRef.getColumn(i, "prntcnt");
  16926. var flag = pRef.getColumn(i, "flag");
  16927. if(utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  16928. if(utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  16929. if(sPrntKind == "1")
  16930. {
  16931. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  16932. iXPos = Number(sLeftBank) + 20;
  16933. iYPos = Number(sTopBank) + 2;
  16934. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  16935. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm); //검체명
  16936. if(flag == "reprnt") // 재출력화면일때
  16937. {
  16938. if(sCommKind == "01")
  16939. {
  16940. CommAX.SendMessageToLPT(sSndMsg);
  16941. sSndMsg = "";
  16942. }
  16943. else if(sCommKind == "02")
  16944. {
  16945. CommAX.SendMessage(sSndMsg);
  16946. sSndMsg = "";
  16947. }
  16948. }
  16949. iXPos = Number(sLeftBank) + 180;
  16950. iYPos = Number(sTopBank) + 5;
  16951. sSndMsg += lzzfBP_ChangeFont("C", 15, 15); // 폰트 설정
  16952. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sMdialblnm); //배지라벨명
  16953. iXPos = Number(sLeftBank) + 20;
  16954. iYPos = Number(sTopBank) + 25;
  16955. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  16956. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid); //환자등록번호
  16957. if(flag == "reprnt") // 재출력화면일때
  16958. {
  16959. if(sCommKind == "01")
  16960. {
  16961. CommAX.SendMessageToLPT(sSndMsg);
  16962. sSndMsg = "";
  16963. }
  16964. else if(sCommKind == "02")
  16965. {
  16966. CommAX.SendMessage(sSndMsg);
  16967. sSndMsg = "";
  16968. }
  16969. }
  16970. iXPos = Number(sLeftBank) + 120;
  16971. iYPos = Number(sTopBank) + 25;
  16972. sSndMsg += CommAX.PrtImgOut(iXPos, iYPos, sPatnm.substr(0, 20), 1, 1);
  16973. sSndMsg += CommAX.HanImageData();
  16974. if(flag == "reprnt") // 재출력화면일때
  16975. {
  16976. if(sCommKind == "01")
  16977. {
  16978. CommAX.SendMessageToLPT(sSndMsg);
  16979. sSndMsg = "";
  16980. }
  16981. else if(sCommKind == "02")
  16982. {
  16983. CommAX.SendMessage(sSndMsg);
  16984. sSndMsg = "";
  16985. }
  16986. }
  16987. iXPos = Number(sLeftBank) + 220;
  16988. iYPos = Number(sTopBank) + 25;
  16989. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  16990. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSexage); //성별나이
  16991. iXPos = Number(sLeftBank) + 50;
  16992. iYPos = Number(sTopBank) + 60;
  16993. sSndMsg += lzzfBP_FiendOrigin(iXPos, iYPos);//위치
  16994. sSndMsg += "^BY1,2.0";//
  16995. sSndMsg += "^B3" + "N" + ",N," + "50" + ",N,N^FD" + "*" + sBcno + "*" + "^FS";//바코드 크기
  16996. if(flag == "reprnt") // 재출력화면일때
  16997. {
  16998. if(sCommKind == "01")
  16999. {
  17000. CommAX.SendMessageToLPT(sSndMsg);
  17001. sSndMsg = "";
  17002. }
  17003. else if(sCommKind == "02")
  17004. {
  17005. CommAX.SendMessage(sSndMsg);
  17006. sSndMsg = "";
  17007. }
  17008. }
  17009. iXPos = Number(sLeftBank) + 30;
  17010. iYPos = Number(sTopBank) + 120;
  17011. sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
  17012. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sWorkno.substr(0,12)); //작업번호(부서정보)
  17013. iXPos = Number(sLeftBank) + 180;
  17014. iYPos = Number(sTopBank) + 120;
  17015. sSndMsg += lzzfBP_ChangeFont("C", 28, 10);
  17016. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sWorkno.substr(12));//작업번호
  17017. if(flag == "reprnt") // 재출력화면일때
  17018. {
  17019. sSndMsg += lzzfBP_EndFormat(sPrntcnt); // 접수바코드출력수
  17020. if(sCommKind == "01")
  17021. {
  17022. CommAX.SendMessageToLPT(sSndMsg);
  17023. }
  17024. else if(sCommKind == "02")
  17025. {
  17026. CommAX.SendMessage(sSndMsg);
  17027. }
  17028. }
  17029. }//end if(sPrntKind == "1")
  17030. }//end for
  17031. //portopen이 true이고 통신유형이 com일때 port close
  17032. if( portOpenTF == "TRUE" && sCommKind == "02")
  17033. {
  17034. CommAX.PortOpen("false");
  17035. }
  17036. }
  17037. else if((portOpenTF = "FALSE" && sCommKind == "02"))
  17038. {
  17039. sysf_messageBox("아래 사항을 확인후 재출력해주십시오."
  17040. + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
  17041. + " \n 2.케이블 확인"
  17042. + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
  17043. return;
  17044. }
  17045. }//end if(cntHR > 0 && sPrntKind != 0)
  17046. } //이후 2008-07-07 바코드 포트 오류 막기위해
  17047. catch (ee)
  17048. {
  17049. sysf_messageBox("바코드출력에", "E009");
  17050. return;
  17051. }
  17052. }
  17053. function fLisMicroBarcodePrint2(pRef)
  17054. {
  17055. try
  17056. {
  17057. var cntHR = pRef.rowcount;
  17058. var sPrntKind = ds_data_setupinfo.getColumn(0, "prntkind");
  17059. var iXPos = 0;
  17060. var iYPos = 0;
  17061. var portOpenTF = "";
  17062. if (cntHR > 0 && sPrntKind != 0)
  17063. {
  17064. var sCommKind = ds_data_setupinfo.getColumn(0, "commkind");
  17065. var sLeftBank = ds_data_blank.getColumn(0, "left");
  17066. var sTopBank = ds_data_blank.getColumn(0, "top");
  17067. for(i = 0; i < cntHR; i++)
  17068. {
  17069. var sSndMsg = "";
  17070. var sPid = pRef.getColumn(i, "pid");
  17071. var sSexage = pRef.getColumn(i, "sexage");
  17072. var sPatnm = pRef.getColumn(i, "patnm");
  17073. var sSpclblnm = pRef.getColumn(i, "spclblnm");
  17074. var sAcptdt = pRef.getColumn(i, "acptdt");
  17075. var sMdialblnm = pRef.getColumn(i, "mdialblnm");
  17076. var sWardinfo = pRef.getColumn(i, "wardinfo");
  17077. var sWorkno = pRef.getColumn(i, "workno");
  17078. var sBcno = pRef.getColumn(i, "bcno");
  17079. var sPrntcnt = pRef.getColumn(i, "prntcnt");
  17080. var flag = pRef.getColumn(i, "flag");
  17081. if(utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
  17082. if(utlf_isNull(sTopBank) || sTopBank == "-") sTopBank = 0;
  17083. //EPL
  17084. if (sPrntKind == "10")
  17085. {
  17086. sSndMsg += "N" + "\n";
  17087. sSndMsg += "JF" + "\n";
  17088. sSndMsg += "D9" + "\n";
  17089. sSndMsg += "S2" + "\n";
  17090. sSndMsg += "Q223,27" + "\n";
  17091. sSndMsg += "q456" + "\n";
  17092. iXPos = Number(sLeftBank);
  17093. iYPos = Number(sTopBank);
  17094. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + sSpclblnm + "\"" + "\n";
  17095. iXPos = Number(sLeftBank) + 300;
  17096. iYPos = Number(sTopBank);
  17097. sSndMsg += "A" + iXPos + "," + iYPos + ",0,4,1,1,N," + "\"" + sMdialblnm + "\"" + "\n";
  17098. iXPos = Number(sLeftBank);
  17099. iYPos = Number(sTopBank) + 35;
  17100. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + sPid + "\"" + "\n";
  17101. iXPos = Number(sLeftBank) + 130;
  17102. iYPos = Number(sTopBank);
  17103. sSndMsg += "A" + iXPos + "," + iYPos + ",0,9,2,2,N," + "\"" + sPatnm + "\"" + "\n";
  17104. iXPos = Number(sLeftBank) + 330;
  17105. iYPos = Number(sTopBank) + 35;
  17106. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + sSexage + "\"" + "\n";
  17107. iXPos = Number(sLeftBank) + 30;
  17108. iYPos = Number(sTopBank) + 75;
  17109. sSndMsg += "B" + iXPos + "," + iYPos + ",0,3,2,5,90,N," + "\"" + sBcno + "\"" + "\n";
  17110. iXPos = Number(sLeftBank) + 40;
  17111. iYPos = Number(sTopBank) + 175;
  17112. sSndMsg += "A" + iXPos + "," + iYPos + ",0,3,1,1,N," + "\"" + sBcno + "\"" + "\n";
  17113. sSndMsg += "P1" + "\n";
  17114. CommAX.SendMsg(sSndMsg);
  17115. }
  17116. else if (sPrntKind == "9")
  17117. {
  17118. //300dpi
  17119. sSndMsg = "^XA^SEE:UHANGUL.DAT^FS^CWQ,E:kfont3.FNT^FS";
  17120. sSndMsg += lzzfBP_StartFormat(0, 0); // 시작위치 셋팅
  17121. iXPos = Number(sLeftBank);
  17122. iYPos = Number(sTopBank);
  17123. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  17124. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSpclblnm);
  17125. iXPos = Number(sLeftBank) + 430;
  17126. iYPos = Number(sTopBank);
  17127. sSndMsg += lzzfBP_ChangeFont("C", 30, 30); // 폰트 설정
  17128. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sMdialblnm);
  17129. iXPos = Number(sLeftBank);
  17130. iYPos = Number(sTopBank) + 35;
  17131. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  17132. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sPid);
  17133. iXPos = Number(sLeftBank) + 250;
  17134. iYPos = Number(sTopBank);
  17135. sSndMsg += "^CI14^FO" + iXPos + "," + iYPos + "^AQN,40,40^FH^FD" + sPatnm + "^FS^CI1";
  17136. iXPos = Number(sLeftBank) + 460;
  17137. iYPos = Number(sTopBank) + 35;
  17138. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  17139. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sSexage);
  17140. iXPos = Number(sLeftBank) + 30;
  17141. iYPos = Number(sTopBank) + 75;
  17142. sSndMsg += lzzfBP_ChangeFont("F", 10, 10);
  17143. sSndMsg += lzzfBP_BarCode_Code39_300dpi(iXPos, iYPos, "N", 90, "*" + sBcno + "*"); // 바코드
  17144. iXPos = Number(sLeftBank) + 40;
  17145. iYPos = Number(sTopBank) + 175;
  17146. sSndMsg += lzzfBP_ChangeFont("C", 30, 20); // 폰트 설정
  17147. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sWorkno.substr(0, 12) + "-");
  17148. iXPos = Number(sLeftBank) + 350;
  17149. iYPos = Number(sTopBank) + 175;
  17150. sSndMsg += lzzfBP_ChangeFont("C", 30, 30); // 폰트 설정
  17151. sSndMsg += lzzfBP_FieldDataA(iXPos, iYPos, sWorkno.substr(12));
  17152. sSndMsg += "^XZ";
  17153. CommAX.SendMsg(sSndMsg);
  17154. }
  17155. else
  17156. {
  17157. sSndMsg = " A A102000300"; // 시작위치 셋팅
  17158. iXPos = Number(sLeftBank) + 20;
  17159. iYPos = Number(sTopBank) + 2;
  17160. sSndMsg += " V" + iYPos + " H" + iXPos + " S" + sSpclblnm;
  17161. iXPos = Number(sLeftBank) + 200;
  17162. iYPos = Number(sTopBank) + 1;
  17163. sSndMsg += " V" + iYPos + " H" + iXPos + " L0202 S" + sMdialblnm; //배지라벨명
  17164. iXPos = Number(sLeftBank) + 20;
  17165. iYPos = Number(sTopBank) + 26;
  17166. sSndMsg += " V" + iYPos + " H" + iXPos + " L0101 S" + sPid; //환자등록번호
  17167. iXPos = Number(sLeftBank) + 110;
  17168. iYPos = Number(sTopBank) + 16;
  17169. sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, sPatnm.substr(0, 20));
  17170. iXPos = Number(sLeftBank) + 200;
  17171. iYPos = Number(sTopBank) + 31;
  17172. sSndMsg += " V" + iYPos + " H" + iXPos + " S" + sSexage; //성별나이
  17173. iXPos = Number(sLeftBank) + 80;
  17174. iYPos = Number(sTopBank) + 48;
  17175. sSndMsg += " V" + iYPos + " H" + iXPos + " BG01050" + sBcno; // 바코드
  17176. iXPos = Number(sLeftBank) + 90;
  17177. iYPos = Number(sTopBank) + 102;
  17178. sSndMsg += " V" + iYPos + " H" + iXPos + " S" + "*" + sBcno + "*";
  17179. iXPos = Number(sLeftBank) + 60;
  17180. iYPos = Number(sTopBank) + 124;
  17181. sSndMsg += " V" + iYPos + " H" + iXPos + " S" + sWorkno.substr(0, 12) + "-";
  17182. iXPos = Number(sLeftBank) + 190;
  17183. iYPos = Number(sTopBank) + 120;
  17184. sSndMsg += " V" + iYPos + " H" + iXPos + " M" + sWorkno.substr(12);
  17185. sSndMsg += " Q" + sPrntcnt + " Z";
  17186. CommAX.SendMsg(sSndMsg);
  17187. }
  17188. } //end for
  17189. } //end if
  17190. }
  17191. catch (ee)
  17192. {
  17193. sysf_messageBox("바코드출력에", "E009");
  17194. return;
  17195. }
  17196. }
  17197. /**
  17198. * @group :
  17199. * @ver : 2007.09.18
  17200. * @by : 최경용
  17201. * @---------------------------------------------------
  17202. * @type : function
  17203. * @access : public
  17204. * @desc : 한글 및 특수문자 Field정의
  17205. * @param : pX = 시작 가로위치 (in dots)
  17206. * @param : pY = 시작 세로위치 (in dots)
  17207. * @param : pFont = 글자크기(1-10)
  17208. * @param : pData = Field Data
  17209. * @param : pReverse = 배경 기준으로 역상으로표시 ( Y:역상으로 )
  17210. * @return :
  17211. * @---------------------------------------------------
  17212. */
  17213. function fCarePrintOutH(pX, pY, pFont, pBold, pData, pReverse) {
  17214. var sBuf = fCareFontSize(pFont, pBold);
  17215. //sBuf += CommAX.PrtImgOut("GRAPH003", pData); //채혈자
  17216. //sBuf += fCareFiendOrigin(pX, pY);
  17217. //sBuf += "^XGGRAPH003," + pFont + "," + pFont + "^FS";
  17218. sBuf += CommAX.PrtImgOut(pX, pY, pData, pFont, pFont);
  17219. sBuf += CommAX.HanImageData();
  17220. return sBuf;
  17221. }
  17222. /**
  17223. * @group : commonweb
  17224. * @ver : 2007.09.18
  17225. * @by : 최경용
  17226. * @---------------------------------------------------
  17227. * @type : function
  17228. * @access : public
  17229. * @desc : 숫자 크기정의
  17230. * @param : pFont = 폰트크기(1-10)
  17231. * @return :
  17232. * @---------------------------------------------------
  17233. */
  17234. function fCareFontSize(pFont, pBold) {
  17235. var sBuf = "";
  17236. var pW = 0;
  17237. var pH = 0;
  17238. if(pFont == 1){
  17239. pH = 10;
  17240. pW = 10;
  17241. } else if(pFont == 2){
  17242. pH = 20;
  17243. pW = 20;
  17244. } else if(pFont == 3){
  17245. pH = 30;
  17246. pW = 30;
  17247. } else if(pFont == 4){
  17248. pH = 40;
  17249. pW = 40;
  17250. } else if(pFont == 5){
  17251. pH = 50;
  17252. pW = 50;
  17253. } else if(pFont == 6){
  17254. pH = 60;
  17255. pW = 60;
  17256. } else if(pFont == 7){
  17257. pH = 70;
  17258. pW = 70;
  17259. } else if(pFont == 8){
  17260. pH = 80;
  17261. pW = 80;
  17262. } else if(pFont == 9){
  17263. pH = 90;
  17264. pW = 90;
  17265. }else{
  17266. }
  17267. if(pBold == "Y"){
  17268. sBuf = "^CFA,"+pH+","+pW;
  17269. }else{
  17270. sBuf = "^CFE"+pH+","+pW;
  17271. }
  17272. return sBuf;
  17273. }]]></Script>